11556Srgrimes/*- 21556Srgrimes * Copyright (c) 1991, 1993 31556Srgrimes * The Regents of the University of California. All rights reserved. 41556Srgrimes * 51556Srgrimes * This code is derived from software contributed to Berkeley by 61556Srgrimes * Kenneth Almquist. 71556Srgrimes * 81556Srgrimes * Redistribution and use in source and binary forms, with or without 91556Srgrimes * modification, are permitted provided that the following conditions 101556Srgrimes * are met: 111556Srgrimes * 1. Redistributions of source code must retain the above copyright 121556Srgrimes * notice, this list of conditions and the following disclaimer. 131556Srgrimes * 2. Redistributions in binary form must reproduce the above copyright 141556Srgrimes * notice, this list of conditions and the following disclaimer in the 151556Srgrimes * documentation and/or other materials provided with the distribution. 161556Srgrimes * 4. Neither the name of the University nor the names of its contributors 171556Srgrimes * may be used to endorse or promote products derived from this software 181556Srgrimes * without specific prior written permission. 191556Srgrimes * 201556Srgrimes * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 211556Srgrimes * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 221556Srgrimes * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 231556Srgrimes * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 241556Srgrimes * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 251556Srgrimes * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 261556Srgrimes * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 271556Srgrimes * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 281556Srgrimes * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 291556Srgrimes * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 301556Srgrimes * SUCH DAMAGE. 311556Srgrimes */ 321556Srgrimes 331556Srgrimes#ifndef lint 3436150Scharnier#if 0 3536150Scharnierstatic char sccsid[] = "@(#)cd.c 8.2 (Berkeley) 5/4/95"; 3636150Scharnier#endif 371556Srgrimes#endif /* not lint */ 3899110Sobrien#include <sys/cdefs.h> 3999110Sobrien__FBSDID("$FreeBSD$"); 401556Srgrimes 4117987Speter#include <sys/types.h> 4217987Speter#include <sys/stat.h> 4317987Speter#include <stdlib.h> 4420425Ssteve#include <string.h> 4517987Speter#include <unistd.h> 4617987Speter#include <errno.h> 47100661Stjr#include <limits.h> 4817987Speter 491556Srgrimes/* 501556Srgrimes * The cd and pwd commands. 511556Srgrimes */ 521556Srgrimes 531556Srgrimes#include "shell.h" 541556Srgrimes#include "var.h" 551556Srgrimes#include "nodes.h" /* for jobs.h */ 561556Srgrimes#include "jobs.h" 571556Srgrimes#include "options.h" 581556Srgrimes#include "output.h" 591556Srgrimes#include "memalloc.h" 601556Srgrimes#include "error.h" 6120425Ssteve#include "exec.h" 6217987Speter#include "redir.h" 631556Srgrimes#include "mystring.h" 6417987Speter#include "show.h" 6520425Ssteve#include "cd.h" 66223060Sjilles#include "builtins.h" 671556Srgrimes 68213811Sobrienstatic int cdlogical(char *); 69213811Sobrienstatic int cdphysical(char *); 70213811Sobrienstatic int docd(char *, int, int); 71213811Sobrienstatic char *getcomponent(void); 72213811Sobrienstatic char *findcwd(char *); 73213811Sobrienstatic void updatepwd(char *); 74213811Sobrienstatic char *getpwd(void); 75213811Sobrienstatic char *getpwd2(void); 761556Srgrimes 77213760Sobrienstatic char *curdir = NULL; /* current working directory */ 78213760Sobrienstatic char *prevdir; /* previous working directory */ 79213760Sobrienstatic char *cdcomppath; 801556Srgrimes 811556Srgrimesint 82240541Sjillescdcmd(int argc __unused, char **argv __unused) 8317987Speter{ 84201053Sjilles const char *dest; 85200956Sjilles const char *path; 861556Srgrimes char *p; 871556Srgrimes struct stat statb; 88222154Sjilles int ch, phys, print = 0, getcwderr = 0; 89222154Sjilles int rc; 90222292Sjilles int errno1 = ENOENT; 911556Srgrimes 92100664Stjr phys = Pflag; 93240541Sjilles while ((ch = nextopt("eLP")) != '\0') { 9497092Stjr switch (ch) { 95222154Sjilles case 'e': 96222154Sjilles getcwderr = 1; 97222154Sjilles break; 9897092Stjr case 'L': 9997092Stjr phys = 0; 10097092Stjr break; 10197092Stjr case 'P': 10297092Stjr phys = 1; 10397092Stjr break; 10497092Stjr } 10597092Stjr } 10697092Stjr 107240541Sjilles if (*argptr != NULL && argptr[1] != NULL) 10897092Stjr error("too many arguments"); 10997092Stjr 110240541Sjilles if ((dest = *argptr) == NULL && (dest = bltinlookup("HOME", 1)) == NULL) 1111556Srgrimes error("HOME not set"); 1125234Sbde if (*dest == '\0') 1135234Sbde dest = "."; 1141556Srgrimes if (dest[0] == '-' && dest[1] == '\0') { 1151556Srgrimes dest = prevdir ? prevdir : curdir; 11612273Speter if (dest) 11712273Speter print = 1; 11812273Speter else 11912273Speter dest = "."; 1201556Srgrimes } 121222381Sjilles if (dest[0] == '/' || 122222381Sjilles (dest[0] == '.' && (dest[1] == '/' || dest[1] == '\0')) || 123222381Sjilles (dest[0] == '.' && dest[1] == '.' && (dest[2] == '/' || dest[2] == '\0')) || 124222381Sjilles (path = bltinlookup("CDPATH", 1)) == NULL) 1251556Srgrimes path = nullstr; 1261556Srgrimes while ((p = padvance(&path, dest)) != NULL) { 127230095Sjilles if (stat(p, &statb) < 0) { 128230095Sjilles if (errno != ENOENT) 129230095Sjilles errno1 = errno; 130230095Sjilles } else if (!S_ISDIR(statb.st_mode)) 131230095Sjilles errno1 = ENOTDIR; 132230095Sjilles else { 1331556Srgrimes if (!print) { 1341556Srgrimes /* 1351556Srgrimes * XXX - rethink 1361556Srgrimes */ 13738886Stegge if (p[0] == '.' && p[1] == '/' && p[2] != '\0') 138159551Sstefanf print = strcmp(p + 2, dest); 139159551Sstefanf else 140159551Sstefanf print = strcmp(p, dest); 1411556Srgrimes } 142222154Sjilles rc = docd(p, print, phys); 143222154Sjilles if (rc >= 0) 144222154Sjilles return getcwderr ? rc : 0; 145222292Sjilles if (errno != ENOENT) 146222292Sjilles errno1 = errno; 1471556Srgrimes } 1481556Srgrimes } 149222292Sjilles error("%s: %s", dest, strerror(errno1)); 15017987Speter /*NOTREACHED*/ 15117987Speter return 0; 1521556Srgrimes} 1531556Srgrimes 1541556Srgrimes 1551556Srgrimes/* 15697092Stjr * Actually change the directory. In an interactive shell, print the 15720774Ssteve * directory name if "print" is nonzero. 1581556Srgrimes */ 159213811Sobrienstatic int 16097092Stjrdocd(char *dest, int print, int phys) 16120425Ssteve{ 162222154Sjilles int rc; 16397092Stjr 16497092Stjr TRACE(("docd(\"%s\", %d, %d) called\n", dest, print, phys)); 16597092Stjr 16697092Stjr /* If logical cd fails, fall back to physical. */ 167222154Sjilles if ((phys || (rc = cdlogical(dest)) < 0) && (rc = cdphysical(dest)) < 0) 16897092Stjr return (-1); 16997092Stjr 17097092Stjr if (print && iflag && curdir) 17197092Stjr out1fmt("%s\n", curdir); 17297092Stjr 173222154Sjilles return (rc); 17497092Stjr} 17597092Stjr 176213811Sobrienstatic int 17797092Stjrcdlogical(char *dest) 17897092Stjr{ 17938886Stegge char *p; 18038886Stegge char *q; 18138886Stegge char *component; 18238886Stegge struct stat statb; 18338886Stegge int first; 18438886Stegge int badstat; 18520425Ssteve 18638886Stegge /* 18738886Stegge * Check each component of the path. If we find a symlink or 18838886Stegge * something we can't stat, clear curdir to force a getcwd() 18938886Stegge * next time we get the value of the current directory. 19038886Stegge */ 19138886Stegge badstat = 0; 19238886Stegge cdcomppath = stalloc(strlen(dest) + 1); 19338886Stegge scopy(dest, cdcomppath); 19438886Stegge STARTSTACKSTR(p); 19538886Stegge if (*dest == '/') { 19638886Stegge STPUTC('/', p); 19738886Stegge cdcomppath++; 19838886Stegge } 19938886Stegge first = 1; 20038886Stegge while ((q = getcomponent()) != NULL) { 20138886Stegge if (q[0] == '\0' || (q[0] == '.' && q[1] == '\0')) 20238886Stegge continue; 20338886Stegge if (! first) 20438886Stegge STPUTC('/', p); 20538886Stegge first = 0; 20638886Stegge component = q; 207215783Sjilles STPUTS(q, p); 20838886Stegge if (equal(component, "..")) 20938886Stegge continue; 21038886Stegge STACKSTRNUL(p); 21197092Stjr if (lstat(stackblock(), &statb) < 0) { 21238886Stegge badstat = 1; 21338886Stegge break; 21438886Stegge } 21538886Stegge } 21638886Stegge 2171556Srgrimes INTOFF; 218176521Sstefanf if ((p = findcwd(badstat ? NULL : dest)) == NULL || chdir(p) < 0) { 2191556Srgrimes INTON; 22097092Stjr return (-1); 2211556Srgrimes } 222176521Sstefanf updatepwd(p); 2231556Srgrimes INTON; 22497092Stjr return (0); 2251556Srgrimes} 2261556Srgrimes 227213811Sobrienstatic int 22897092Stjrcdphysical(char *dest) 22997092Stjr{ 230176521Sstefanf char *p; 231222154Sjilles int rc = 0; 2321556Srgrimes 23397092Stjr INTOFF; 234215727Sjilles if (chdir(dest) < 0) { 23597092Stjr INTON; 23697092Stjr return (-1); 23797092Stjr } 238215727Sjilles p = findcwd(NULL); 239222154Sjilles if (p == NULL) { 240216622Sjilles warning("warning: failed to get name of current directory"); 241222154Sjilles rc = 1; 242222154Sjilles } 243176521Sstefanf updatepwd(p); 24497092Stjr INTON; 245222154Sjilles return (rc); 24697092Stjr} 24797092Stjr 2481556Srgrimes/* 2491556Srgrimes * Get the next component of the path name pointed to by cdcomppath. 2501556Srgrimes * This routine overwrites the string pointed to by cdcomppath. 2511556Srgrimes */ 252213811Sobrienstatic char * 25390111Simpgetcomponent(void) 25420774Ssteve{ 25525222Ssteve char *p; 2561556Srgrimes char *start; 2571556Srgrimes 2581556Srgrimes if ((p = cdcomppath) == NULL) 2591556Srgrimes return NULL; 2601556Srgrimes start = cdcomppath; 2611556Srgrimes while (*p != '/' && *p != '\0') 2621556Srgrimes p++; 2631556Srgrimes if (*p == '\0') { 2641556Srgrimes cdcomppath = NULL; 2651556Srgrimes } else { 2661556Srgrimes *p++ = '\0'; 2671556Srgrimes cdcomppath = p; 2681556Srgrimes } 2691556Srgrimes return start; 2701556Srgrimes} 2711556Srgrimes 2721556Srgrimes 273213811Sobrienstatic char * 274176521Sstefanffindcwd(char *dir) 27520774Ssteve{ 2761556Srgrimes char *new; 2771556Srgrimes char *p; 2781556Srgrimes 27938886Stegge /* 28038886Stegge * If our argument is NULL, we don't know the current directory 28138886Stegge * any more because we traversed a symbolic link or something 28238886Stegge * we couldn't stat(). 28338886Stegge */ 284199631Sstefanf if (dir == NULL || curdir == NULL) 285199631Sstefanf return getpwd2(); 2861556Srgrimes cdcomppath = stalloc(strlen(dir) + 1); 2871556Srgrimes scopy(dir, cdcomppath); 2881556Srgrimes STARTSTACKSTR(new); 2891556Srgrimes if (*dir != '/') { 290215783Sjilles STPUTS(curdir, new); 291215783Sjilles if (STTOPC(new) == '/') 2921556Srgrimes STUNPUTC(new); 2931556Srgrimes } 2941556Srgrimes while ((p = getcomponent()) != NULL) { 2951556Srgrimes if (equal(p, "..")) { 2961556Srgrimes while (new > stackblock() && (STUNPUTC(new), *new) != '/'); 2971556Srgrimes } else if (*p != '\0' && ! equal(p, ".")) { 2981556Srgrimes STPUTC('/', new); 299215783Sjilles STPUTS(p, new); 3001556Srgrimes } 3011556Srgrimes } 3021556Srgrimes if (new == stackblock()) 3031556Srgrimes STPUTC('/', new); 3041556Srgrimes STACKSTRNUL(new); 305176521Sstefanf return stackblock(); 306176521Sstefanf} 307176521Sstefanf 308176521Sstefanf/* 309176521Sstefanf * Update curdir (the name of the current directory) in response to a 310176521Sstefanf * cd command. We also call hashcd to let the routines in exec.c know 311176521Sstefanf * that the current directory has changed. 312176521Sstefanf */ 313213811Sobrienstatic void 314176521Sstefanfupdatepwd(char *dir) 315176521Sstefanf{ 316176521Sstefanf hashcd(); /* update command hash table */ 317176521Sstefanf 31838886Stegge if (prevdir) 31938886Stegge ckfree(prevdir); 32038886Stegge prevdir = curdir; 321215727Sjilles curdir = dir ? savestr(dir) : NULL; 32286176Stegge setvar("PWD", curdir, VEXPORT); 32386176Stegge setvar("OLDPWD", prevdir, VEXPORT); 3241556Srgrimes} 3251556Srgrimes 3261556Srgrimesint 327240541Sjillespwdcmd(int argc __unused, char **argv __unused) 32817987Speter{ 329199631Sstefanf char *p; 33097092Stjr int ch, phys; 3311556Srgrimes 332100664Stjr phys = Pflag; 333240541Sjilles while ((ch = nextopt("LP")) != '\0') { 33497092Stjr switch (ch) { 33597092Stjr case 'L': 33697092Stjr phys = 0; 33797092Stjr break; 33897092Stjr case 'P': 33997092Stjr phys = 1; 34097092Stjr break; 34197092Stjr } 34297092Stjr } 3431556Srgrimes 344240541Sjilles if (*argptr != NULL) 34597092Stjr error("too many arguments"); 34638886Stegge 34797092Stjr if (!phys && getpwd()) { 34897092Stjr out1str(curdir); 34997092Stjr out1c('\n'); 35097092Stjr } else { 351199631Sstefanf if ((p = getpwd2()) == NULL) 35297092Stjr error(".: %s", strerror(errno)); 353199631Sstefanf out1str(p); 35497092Stjr out1c('\n'); 35597092Stjr } 35638886Stegge 35797092Stjr return 0; 35897092Stjr} 35938886Stegge 3601556Srgrimes/* 361176521Sstefanf * Get the current directory and cache the result in curdir. 3621556Srgrimes */ 363213811Sobrienstatic char * 36490111Simpgetpwd(void) 36520425Ssteve{ 366176521Sstefanf char *p; 36738886Stegge 3681556Srgrimes if (curdir) 36938886Stegge return curdir; 370176521Sstefanf 371199631Sstefanf p = getpwd2(); 372176521Sstefanf if (p != NULL) 373176521Sstefanf curdir = savestr(p); 374176521Sstefanf 375176521Sstefanf return curdir; 376176521Sstefanf} 377176521Sstefanf 378199631Sstefanf#define MAXPWD 256 379199631Sstefanf 380176521Sstefanf/* 381176521Sstefanf * Return the current directory. 382176521Sstefanf */ 383213811Sobrienstatic char * 384199631Sstefanfgetpwd2(void) 385176521Sstefanf{ 386199631Sstefanf char *pwd; 387199631Sstefanf int i; 38838886Stegge 389199631Sstefanf for (i = MAXPWD;; i *= 2) { 390199631Sstefanf pwd = stalloc(i); 391199631Sstefanf if (getcwd(pwd, i) != NULL) 392176521Sstefanf return pwd; 393199631Sstefanf stunalloc(pwd); 394199631Sstefanf if (errno != ERANGE) 395199631Sstefanf break; 39638886Stegge } 397199631Sstefanf 398206759Sjilles return NULL; 399206759Sjilles} 400206759Sjilles 401206759Sjilles/* 402206759Sjilles * Initialize PWD in a new shell. 403206759Sjilles * If the shell is interactive, we need to warn if this fails. 404206759Sjilles */ 405206759Sjillesvoid 406206759Sjillespwd_init(int warn) 407206759Sjilles{ 408206759Sjilles char *pwd; 409206759Sjilles struct stat stdot, stpwd; 410206759Sjilles 411206759Sjilles pwd = lookupvar("PWD"); 412199631Sstefanf if (pwd && *pwd == '/' && stat(".", &stdot) != -1 && 413199631Sstefanf stat(pwd, &stpwd) != -1 && 414199631Sstefanf stdot.st_dev == stpwd.st_dev && 415199631Sstefanf stdot.st_ino == stpwd.st_ino) { 416206759Sjilles if (curdir) 417206759Sjilles ckfree(curdir); 418206759Sjilles curdir = savestr(pwd); 419199631Sstefanf } 420206759Sjilles if (getpwd() == NULL && warn) 421206759Sjilles out2fmt_flush("sh: cannot determine working directory\n"); 422206759Sjilles setvar("PWD", curdir, VEXPORT); 4231556Srgrimes} 424