1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
|
/* $OpenBSD: ex_cd.c,v 1.5 2001/01/29 01:58:42 niklas Exp $ */
/*-
* Copyright (c) 1992, 1993, 1994
* The Regents of the University of California. All rights reserved.
* Copyright (c) 1992, 1993, 1994, 1995, 1996
* Keith Bostic. All rights reserved.
*
* See the LICENSE file for redistribution information.
*/
#include "config.h"
#ifndef lint
static const char sccsid[] = "@(#)ex_cd.c 10.10 (Berkeley) 8/12/96";
#endif /* not lint */
#include <sys/param.h>
#include <sys/queue.h>
#include <bitstring.h>
#include <errno.h>
#include <limits.h>
#include <pwd.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include "../common/common.h"
/*
* ex_cd -- :cd[!] [directory]
* Change directories.
*
* PUBLIC: int ex_cd __P((SCR *, EXCMD *));
*/
int
ex_cd(sp, cmdp)
SCR *sp;
EXCMD *cmdp;
{
struct passwd *pw;
ARGS *ap;
CHAR_T savech;
char *dir, *p, *t; /* XXX: END OF THE STACK, DON'T TRUST GETCWD. */
char buf[MAXPATHLEN * 2];
/*
* !!!
* Historic practice is that the cd isn't attempted if the file has
* been modified, unless its name begins with a leading '/' or the
* force flag is set.
*/
if (F_ISSET(sp->ep, F_MODIFIED) &&
!FL_ISSET(cmdp->iflags, E_C_FORCE) && sp->frp->name[0] != '/') {
msgq(sp, M_ERR,
"120|File modified since last complete write; write or use ! to override");
return (1);
}
switch (cmdp->argc) {
case 0:
/* If no argument, change to the user's home directory. */
if ((dir = getenv("HOME")) == NULL || *dir == '\0') {
if ((pw = getpwuid(getuid())) == NULL ||
pw->pw_dir == NULL || pw->pw_dir[0] == '\0') {
msgq(sp, M_ERR,
"121|Unable to find home directory location");
return (1);
}
dir = pw->pw_dir;
}
break;
case 1:
dir = cmdp->argv[0]->bp;
break;
default:
abort();
}
/*
* Try the current directory first. If this succeeds, don't display
* a message, vi didn't historically, and it should be obvious to the
* user where they are.
*/
if (!chdir(dir))
return (0);
/*
* If moving to the user's home directory, or, the path begins with
* "/", "./" or "../", it's the only place we try.
*/
if (cmdp->argc == 0 ||
(ap = cmdp->argv[0])->bp[0] == '/' ||
ap->len == 1 && ap->bp[0] == '.' ||
ap->len >= 2 && ap->bp[0] == '.' && ap->bp[1] == '.' &&
(ap->bp[2] == '/' || ap->bp[2] == '\0'))
goto err;
/* Try the O_CDPATH option values. */
for (p = t = O_STR(sp, O_CDPATH);; ++p)
if (*p == '\0' || *p == ':') {
/*
* Empty strings specify ".". The only way to get an
* empty string is a leading colon, colons in a row,
* or a trailing colon. Or, to put it the other way,
* if the length is 1 or less, then we're dealing with
* ":XXX", "XXX::XXXX" , "XXX:", or "". Since we've
* already tried dot, we ignore tham all.
*/
if (t < p - 1) {
savech = *p;
*p = '\0';
(void)snprintf(buf,
sizeof(buf), "%s/%s", t, dir);
*p = savech;
if (!chdir(buf)) {
if (getcwd(buf, sizeof(buf)) != NULL)
msgq_str(sp, M_INFO, buf, "122|New current directory: %s");
return (0);
}
}
t = p + 1;
if (*p == '\0')
break;
}
err: msgq_str(sp, M_SYSERR, dir, "%s");
return (1);
}
|
