14b88c807SRodney W. Grimes /*- 24b88c807SRodney W. Grimes * Copyright (c) 1991, 1993 34b88c807SRodney W. Grimes * The Regents of the University of California. All rights reserved. 44b88c807SRodney W. Grimes * 54b88c807SRodney W. Grimes * This code is derived from software contributed to Berkeley by 64b88c807SRodney W. Grimes * Kenneth Almquist. 74b88c807SRodney W. Grimes * 84b88c807SRodney W. Grimes * Redistribution and use in source and binary forms, with or without 94b88c807SRodney W. Grimes * modification, are permitted provided that the following conditions 104b88c807SRodney W. Grimes * are met: 114b88c807SRodney W. Grimes * 1. Redistributions of source code must retain the above copyright 124b88c807SRodney W. Grimes * notice, this list of conditions and the following disclaimer. 134b88c807SRodney W. Grimes * 2. Redistributions in binary form must reproduce the above copyright 144b88c807SRodney W. Grimes * notice, this list of conditions and the following disclaimer in the 154b88c807SRodney W. Grimes * documentation and/or other materials provided with the distribution. 164b88c807SRodney W. Grimes * 3. All advertising materials mentioning features or use of this software 174b88c807SRodney W. Grimes * must display the following acknowledgement: 184b88c807SRodney W. Grimes * This product includes software developed by the University of 194b88c807SRodney W. Grimes * California, Berkeley and its contributors. 204b88c807SRodney W. Grimes * 4. Neither the name of the University nor the names of its contributors 214b88c807SRodney W. Grimes * may be used to endorse or promote products derived from this software 224b88c807SRodney W. Grimes * without specific prior written permission. 234b88c807SRodney W. Grimes * 244b88c807SRodney W. Grimes * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 254b88c807SRodney W. Grimes * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 264b88c807SRodney W. Grimes * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 274b88c807SRodney W. Grimes * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 284b88c807SRodney W. Grimes * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 294b88c807SRodney W. Grimes * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 304b88c807SRodney W. Grimes * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 314b88c807SRodney W. Grimes * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 324b88c807SRodney W. Grimes * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 334b88c807SRodney W. Grimes * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 344b88c807SRodney W. Grimes * SUCH DAMAGE. 354b88c807SRodney W. Grimes */ 364b88c807SRodney W. Grimes 374b88c807SRodney W. Grimes #ifndef lint 384b88c807SRodney W. Grimes static char sccsid[] = "@(#)cd.c 8.1 (Berkeley) 5/31/93"; 394b88c807SRodney W. Grimes #endif /* not lint */ 404b88c807SRodney W. Grimes 414b88c807SRodney W. Grimes /* 424b88c807SRodney W. Grimes * The cd and pwd commands. 434b88c807SRodney W. Grimes */ 444b88c807SRodney W. Grimes 454b88c807SRodney W. Grimes #include "shell.h" 464b88c807SRodney W. Grimes #include "var.h" 474b88c807SRodney W. Grimes #include "nodes.h" /* for jobs.h */ 484b88c807SRodney W. Grimes #include "jobs.h" 494b88c807SRodney W. Grimes #include "options.h" 504b88c807SRodney W. Grimes #include "output.h" 514b88c807SRodney W. Grimes #include "memalloc.h" 524b88c807SRodney W. Grimes #include "error.h" 534b88c807SRodney W. Grimes #include "mystring.h" 544b88c807SRodney W. Grimes #include <sys/types.h> 554b88c807SRodney W. Grimes #include <sys/stat.h> 564b88c807SRodney W. Grimes #include <errno.h> 574b88c807SRodney W. Grimes 584b88c807SRodney W. Grimes 594b88c807SRodney W. Grimes #ifdef __STDC__ 604b88c807SRodney W. Grimes STATIC int docd(char *, int); 614b88c807SRodney W. Grimes STATIC void updatepwd(char *); 624b88c807SRodney W. Grimes STATIC void getpwd(void); 634b88c807SRodney W. Grimes STATIC char *getcomponent(void); 644b88c807SRodney W. Grimes #else 654b88c807SRodney W. Grimes STATIC int docd(); 664b88c807SRodney W. Grimes STATIC void updatepwd(); 674b88c807SRodney W. Grimes STATIC void getpwd(); 684b88c807SRodney W. Grimes STATIC char *getcomponent(); 694b88c807SRodney W. Grimes #endif 704b88c807SRodney W. Grimes 714b88c807SRodney W. Grimes 724b88c807SRodney W. Grimes char *curdir; /* current working directory */ 734b88c807SRodney W. Grimes char *prevdir; /* previous working directory */ 744b88c807SRodney W. Grimes STATIC char *cdcomppath; 754b88c807SRodney W. Grimes 764b88c807SRodney W. Grimes int 774b88c807SRodney W. Grimes cdcmd(argc, argv) char **argv; { 784b88c807SRodney W. Grimes char *dest; 794b88c807SRodney W. Grimes char *path; 804b88c807SRodney W. Grimes char *p; 814b88c807SRodney W. Grimes struct stat statb; 824b88c807SRodney W. Grimes char *padvance(); 834b88c807SRodney W. Grimes int print = 0; 844b88c807SRodney W. Grimes 854b88c807SRodney W. Grimes nextopt(nullstr); 864b88c807SRodney W. Grimes if ((dest = *argptr) == NULL && (dest = bltinlookup("HOME", 1)) == NULL) 874b88c807SRodney W. Grimes error("HOME not set"); 884b88c807SRodney W. Grimes if (dest[0] == '-' && dest[1] == '\0') { 894b88c807SRodney W. Grimes dest = prevdir ? prevdir : curdir; 904b88c807SRodney W. Grimes print = 1; 914b88c807SRodney W. Grimes } 924b88c807SRodney W. Grimes if (*dest == '/' || (path = bltinlookup("CDPATH", 1)) == NULL) 934b88c807SRodney W. Grimes path = nullstr; 944b88c807SRodney W. Grimes while ((p = padvance(&path, dest)) != NULL) { 954b88c807SRodney W. Grimes if (stat(p, &statb) >= 0 964b88c807SRodney W. Grimes && (statb.st_mode & S_IFMT) == S_IFDIR) { 974b88c807SRodney W. Grimes if (!print) { 984b88c807SRodney W. Grimes /* 994b88c807SRodney W. Grimes * XXX - rethink 1004b88c807SRodney W. Grimes */ 1014b88c807SRodney W. Grimes if (p[0] == '.' && p[1] == '/') 1024b88c807SRodney W. Grimes p += 2; 1034b88c807SRodney W. Grimes print = strcmp(p, dest); 1044b88c807SRodney W. Grimes } 1054b88c807SRodney W. Grimes if (docd(p, print) >= 0) 1064b88c807SRodney W. Grimes return 0; 1074b88c807SRodney W. Grimes 1084b88c807SRodney W. Grimes } 1094b88c807SRodney W. Grimes } 1104b88c807SRodney W. Grimes error("can't cd to %s", dest); 1114b88c807SRodney W. Grimes } 1124b88c807SRodney W. Grimes 1134b88c807SRodney W. Grimes 1144b88c807SRodney W. Grimes /* 1154b88c807SRodney W. Grimes * Actually do the chdir. If the name refers to symbolic links, we 1164b88c807SRodney W. Grimes * compute the actual directory name before doing the cd. In an 1174b88c807SRodney W. Grimes * interactive shell, print the directory name if "print" is nonzero 1184b88c807SRodney W. Grimes * or if the name refers to a symbolic link. We also print the name 1194b88c807SRodney W. Grimes * if "/u/logname" was expanded in it, since this is similar to a 1204b88c807SRodney W. Grimes * symbolic link. (The check for this breaks if the user gives the 1214b88c807SRodney W. Grimes * cd command some additional, unused arguments.) 1224b88c807SRodney W. Grimes */ 1234b88c807SRodney W. Grimes 1244b88c807SRodney W. Grimes #if SYMLINKS == 0 1254b88c807SRodney W. Grimes STATIC int 1264b88c807SRodney W. Grimes docd(dest, print) 1274b88c807SRodney W. Grimes char *dest; 1284b88c807SRodney W. Grimes { 1294b88c807SRodney W. Grimes INTOFF; 1304b88c807SRodney W. Grimes if (chdir(dest) < 0) { 1314b88c807SRodney W. Grimes INTON; 1324b88c807SRodney W. Grimes return -1; 1334b88c807SRodney W. Grimes } 1344b88c807SRodney W. Grimes updatepwd(dest); 1354b88c807SRodney W. Grimes INTON; 1364b88c807SRodney W. Grimes if (print && iflag) 1374b88c807SRodney W. Grimes out1fmt("%s\n", stackblock()); 1384b88c807SRodney W. Grimes return 0; 1394b88c807SRodney W. Grimes } 1404b88c807SRodney W. Grimes 1414b88c807SRodney W. Grimes #else 1424b88c807SRodney W. Grimes 1434b88c807SRodney W. Grimes 1444b88c807SRodney W. Grimes 1454b88c807SRodney W. Grimes STATIC int 1464b88c807SRodney W. Grimes docd(dest, print) 1474b88c807SRodney W. Grimes char *dest; 1484b88c807SRodney W. Grimes { 1494b88c807SRodney W. Grimes register char *p; 1504b88c807SRodney W. Grimes register char *q; 1514b88c807SRodney W. Grimes char *symlink; 1524b88c807SRodney W. Grimes char *component; 1534b88c807SRodney W. Grimes struct stat statb; 1544b88c807SRodney W. Grimes int first; 1554b88c807SRodney W. Grimes int i; 1564b88c807SRodney W. Grimes 1574b88c807SRodney W. Grimes TRACE(("docd(\"%s\", %d) called\n", dest, print)); 1584b88c807SRodney W. Grimes 1594b88c807SRodney W. Grimes top: 1604b88c807SRodney W. Grimes cdcomppath = dest; 1614b88c807SRodney W. Grimes STARTSTACKSTR(p); 1624b88c807SRodney W. Grimes if (*dest == '/') { 1634b88c807SRodney W. Grimes STPUTC('/', p); 1644b88c807SRodney W. Grimes cdcomppath++; 1654b88c807SRodney W. Grimes } 1664b88c807SRodney W. Grimes first = 1; 1674b88c807SRodney W. Grimes while ((q = getcomponent()) != NULL) { 1684b88c807SRodney W. Grimes if (q[0] == '\0' || q[0] == '.' && q[1] == '\0') 1694b88c807SRodney W. Grimes continue; 1704b88c807SRodney W. Grimes if (! first) 1714b88c807SRodney W. Grimes STPUTC('/', p); 1724b88c807SRodney W. Grimes first = 0; 1734b88c807SRodney W. Grimes component = q; 1744b88c807SRodney W. Grimes while (*q) 1754b88c807SRodney W. Grimes STPUTC(*q++, p); 1764b88c807SRodney W. Grimes if (equal(component, "..")) 1774b88c807SRodney W. Grimes continue; 1784b88c807SRodney W. Grimes STACKSTRNUL(p); 1794b88c807SRodney W. Grimes if (lstat(stackblock(), &statb) < 0) 1804b88c807SRodney W. Grimes error("lstat %s failed", stackblock()); 1814b88c807SRodney W. Grimes if ((statb.st_mode & S_IFMT) != S_IFLNK) 1824b88c807SRodney W. Grimes continue; 1834b88c807SRodney W. Grimes 1844b88c807SRodney W. Grimes /* Hit a symbolic link. We have to start all over again. */ 1854b88c807SRodney W. Grimes print = 1; 1864b88c807SRodney W. Grimes STPUTC('\0', p); 1874b88c807SRodney W. Grimes symlink = grabstackstr(p); 1884b88c807SRodney W. Grimes i = (int)statb.st_size + 2; /* 2 for '/' and '\0' */ 1894b88c807SRodney W. Grimes if (cdcomppath != NULL) 1904b88c807SRodney W. Grimes i += strlen(cdcomppath); 1914b88c807SRodney W. Grimes p = stalloc(i); 1924b88c807SRodney W. Grimes if (readlink(symlink, p, (int)statb.st_size) < 0) { 1934b88c807SRodney W. Grimes error("readlink %s failed", stackblock()); 1944b88c807SRodney W. Grimes } 1954b88c807SRodney W. Grimes if (cdcomppath != NULL) { 1964b88c807SRodney W. Grimes p[(int)statb.st_size] = '/'; 1974b88c807SRodney W. Grimes scopy(cdcomppath, p + (int)statb.st_size + 1); 1984b88c807SRodney W. Grimes } else { 1994b88c807SRodney W. Grimes p[(int)statb.st_size] = '\0'; 2004b88c807SRodney W. Grimes } 2014b88c807SRodney W. Grimes if (p[0] != '/') { /* relative path name */ 2024b88c807SRodney W. Grimes char *r; 2034b88c807SRodney W. Grimes q = r = symlink; 2044b88c807SRodney W. Grimes while (*q) { 2054b88c807SRodney W. Grimes if (*q++ == '/') 2064b88c807SRodney W. Grimes r = q; 2074b88c807SRodney W. Grimes } 2084b88c807SRodney W. Grimes *r = '\0'; 2094b88c807SRodney W. Grimes dest = stalloc(strlen(symlink) + strlen(p) + 1); 2104b88c807SRodney W. Grimes scopy(symlink, dest); 2114b88c807SRodney W. Grimes strcat(dest, p); 2124b88c807SRodney W. Grimes } else { 2134b88c807SRodney W. Grimes dest = p; 2144b88c807SRodney W. Grimes } 2154b88c807SRodney W. Grimes goto top; 2164b88c807SRodney W. Grimes } 2174b88c807SRodney W. Grimes STPUTC('\0', p); 2184b88c807SRodney W. Grimes p = grabstackstr(p); 2194b88c807SRodney W. Grimes INTOFF; 2204b88c807SRodney W. Grimes if (chdir(p) < 0) { 2214b88c807SRodney W. Grimes INTON; 2224b88c807SRodney W. Grimes return -1; 2234b88c807SRodney W. Grimes } 2244b88c807SRodney W. Grimes updatepwd(p); 2254b88c807SRodney W. Grimes INTON; 2264b88c807SRodney W. Grimes if (print && iflag) 2274b88c807SRodney W. Grimes out1fmt("%s\n", p); 2284b88c807SRodney W. Grimes return 0; 2294b88c807SRodney W. Grimes } 2304b88c807SRodney W. Grimes #endif /* SYMLINKS */ 2314b88c807SRodney W. Grimes 2324b88c807SRodney W. Grimes 2334b88c807SRodney W. Grimes 2344b88c807SRodney W. Grimes /* 2354b88c807SRodney W. Grimes * Get the next component of the path name pointed to by cdcomppath. 2364b88c807SRodney W. Grimes * This routine overwrites the string pointed to by cdcomppath. 2374b88c807SRodney W. Grimes */ 2384b88c807SRodney W. Grimes 2394b88c807SRodney W. Grimes STATIC char * 2404b88c807SRodney W. Grimes getcomponent() { 2414b88c807SRodney W. Grimes register char *p; 2424b88c807SRodney W. Grimes char *start; 2434b88c807SRodney W. Grimes 2444b88c807SRodney W. Grimes if ((p = cdcomppath) == NULL) 2454b88c807SRodney W. Grimes return NULL; 2464b88c807SRodney W. Grimes start = cdcomppath; 2474b88c807SRodney W. Grimes while (*p != '/' && *p != '\0') 2484b88c807SRodney W. Grimes p++; 2494b88c807SRodney W. Grimes if (*p == '\0') { 2504b88c807SRodney W. Grimes cdcomppath = NULL; 2514b88c807SRodney W. Grimes } else { 2524b88c807SRodney W. Grimes *p++ = '\0'; 2534b88c807SRodney W. Grimes cdcomppath = p; 2544b88c807SRodney W. Grimes } 2554b88c807SRodney W. Grimes return start; 2564b88c807SRodney W. Grimes } 2574b88c807SRodney W. Grimes 2584b88c807SRodney W. Grimes 2594b88c807SRodney W. Grimes 2604b88c807SRodney W. Grimes /* 2614b88c807SRodney W. Grimes * Update curdir (the name of the current directory) in response to a 2624b88c807SRodney W. Grimes * cd command. We also call hashcd to let the routines in exec.c know 2634b88c807SRodney W. Grimes * that the current directory has changed. 2644b88c807SRodney W. Grimes */ 2654b88c807SRodney W. Grimes 2664b88c807SRodney W. Grimes void hashcd(); 2674b88c807SRodney W. Grimes 2684b88c807SRodney W. Grimes STATIC void 2694b88c807SRodney W. Grimes updatepwd(dir) 2704b88c807SRodney W. Grimes char *dir; 2714b88c807SRodney W. Grimes { 2724b88c807SRodney W. Grimes char *new; 2734b88c807SRodney W. Grimes char *p; 2744b88c807SRodney W. Grimes 2754b88c807SRodney W. Grimes hashcd(); /* update command hash table */ 2764b88c807SRodney W. Grimes cdcomppath = stalloc(strlen(dir) + 1); 2774b88c807SRodney W. Grimes scopy(dir, cdcomppath); 2784b88c807SRodney W. Grimes STARTSTACKSTR(new); 2794b88c807SRodney W. Grimes if (*dir != '/') { 2804b88c807SRodney W. Grimes if (curdir == NULL) 2814b88c807SRodney W. Grimes return; 2824b88c807SRodney W. Grimes p = curdir; 2834b88c807SRodney W. Grimes while (*p) 2844b88c807SRodney W. Grimes STPUTC(*p++, new); 2854b88c807SRodney W. Grimes if (p[-1] == '/') 2864b88c807SRodney W. Grimes STUNPUTC(new); 2874b88c807SRodney W. Grimes } 2884b88c807SRodney W. Grimes while ((p = getcomponent()) != NULL) { 2894b88c807SRodney W. Grimes if (equal(p, "..")) { 2904b88c807SRodney W. Grimes while (new > stackblock() && (STUNPUTC(new), *new) != '/'); 2914b88c807SRodney W. Grimes } else if (*p != '\0' && ! equal(p, ".")) { 2924b88c807SRodney W. Grimes STPUTC('/', new); 2934b88c807SRodney W. Grimes while (*p) 2944b88c807SRodney W. Grimes STPUTC(*p++, new); 2954b88c807SRodney W. Grimes } 2964b88c807SRodney W. Grimes } 2974b88c807SRodney W. Grimes if (new == stackblock()) 2984b88c807SRodney W. Grimes STPUTC('/', new); 2994b88c807SRodney W. Grimes STACKSTRNUL(new); 3004b88c807SRodney W. Grimes INTOFF; 3014b88c807SRodney W. Grimes if (prevdir) 3024b88c807SRodney W. Grimes ckfree(prevdir); 3034b88c807SRodney W. Grimes prevdir = curdir; 3044b88c807SRodney W. Grimes curdir = savestr(stackblock()); 3054b88c807SRodney W. Grimes INTON; 3064b88c807SRodney W. Grimes } 3074b88c807SRodney W. Grimes 3084b88c807SRodney W. Grimes 3094b88c807SRodney W. Grimes 3104b88c807SRodney W. Grimes int 3114b88c807SRodney W. Grimes pwdcmd(argc, argv) char **argv; { 3124b88c807SRodney W. Grimes getpwd(); 3134b88c807SRodney W. Grimes out1str(curdir); 3144b88c807SRodney W. Grimes out1c('\n'); 3154b88c807SRodney W. Grimes return 0; 3164b88c807SRodney W. Grimes } 3174b88c807SRodney W. Grimes 3184b88c807SRodney W. Grimes 3194b88c807SRodney W. Grimes 3204b88c807SRodney W. Grimes /* 3214b88c807SRodney W. Grimes * Run /bin/pwd to find out what the current directory is. We suppress 3224b88c807SRodney W. Grimes * interrupts throughout most of this, but the user can still break out 3234b88c807SRodney W. Grimes * of it by killing the pwd program. If we already know the current 3244b88c807SRodney W. Grimes * directory, this routine returns immediately. 3254b88c807SRodney W. Grimes */ 3264b88c807SRodney W. Grimes 3274b88c807SRodney W. Grimes #define MAXPWD 256 3284b88c807SRodney W. Grimes 3294b88c807SRodney W. Grimes STATIC void 3304b88c807SRodney W. Grimes getpwd() { 3314b88c807SRodney W. Grimes char buf[MAXPWD]; 3324b88c807SRodney W. Grimes char *p; 3334b88c807SRodney W. Grimes int i; 3344b88c807SRodney W. Grimes int status; 3354b88c807SRodney W. Grimes struct job *jp; 3364b88c807SRodney W. Grimes int pip[2]; 3374b88c807SRodney W. Grimes 3384b88c807SRodney W. Grimes if (curdir) 3394b88c807SRodney W. Grimes return; 3404b88c807SRodney W. Grimes INTOFF; 3414b88c807SRodney W. Grimes if (pipe(pip) < 0) 3424b88c807SRodney W. Grimes error("Pipe call failed"); 3434b88c807SRodney W. Grimes jp = makejob((union node *)NULL, 1); 3444b88c807SRodney W. Grimes if (forkshell(jp, (union node *)NULL, FORK_NOJOB) == 0) { 3454b88c807SRodney W. Grimes close(pip[0]); 3464b88c807SRodney W. Grimes if (pip[1] != 1) { 3474b88c807SRodney W. Grimes close(1); 3484b88c807SRodney W. Grimes copyfd(pip[1], 1); 3494b88c807SRodney W. Grimes close(pip[1]); 3504b88c807SRodney W. Grimes } 3514b88c807SRodney W. Grimes execl("/bin/pwd", "pwd", (char *)0); 3524b88c807SRodney W. Grimes error("Cannot exec /bin/pwd"); 3534b88c807SRodney W. Grimes } 3544b88c807SRodney W. Grimes close(pip[1]); 3554b88c807SRodney W. Grimes pip[1] = -1; 3564b88c807SRodney W. Grimes p = buf; 3574b88c807SRodney W. Grimes while ((i = read(pip[0], p, buf + MAXPWD - p)) > 0 3584b88c807SRodney W. Grimes || i == -1 && errno == EINTR) { 3594b88c807SRodney W. Grimes if (i > 0) 3604b88c807SRodney W. Grimes p += i; 3614b88c807SRodney W. Grimes } 3624b88c807SRodney W. Grimes close(pip[0]); 3634b88c807SRodney W. Grimes pip[0] = -1; 3644b88c807SRodney W. Grimes status = waitforjob(jp); 3654b88c807SRodney W. Grimes if (status != 0) 3664b88c807SRodney W. Grimes error((char *)0); 3674b88c807SRodney W. Grimes if (i < 0 || p == buf || p[-1] != '\n') 3684b88c807SRodney W. Grimes error("pwd command failed"); 3694b88c807SRodney W. Grimes p[-1] = '\0'; 3704b88c807SRodney W. Grimes curdir = savestr(buf); 3714b88c807SRodney W. Grimes INTON; 3724b88c807SRodney W. Grimes } 373