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
|
/* Getcwd.c - Get the working directory.
Copyright (C) 1992, 1993, 1994, 1996, 1997 Malc Arnold.
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2, or (at your option)
any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
#include <stdio.h>
#include <errno.h>
#ifdef HAVE_STRING_H
#include <string.h>
#else /* ! HAVE_STRING_H */
#include <strings.h>
#endif /* ! HAVE_STRING_H */
/****************************************************************************/
/* RCS info. */
#ifndef lint
static char *RcsId = "$Id: getcwd.c,v 2.1 1997/09/07 00:35:35 malc Exp $";
#endif /* ! lint */
/****************************************************************************/
/*LINTLIBRARY*/
/****************************************************************************/
/* Global function declarations */
extern FILE *popen();
extern int pclose();
/****************************************************************************/
/* Import the system error number */
extern int errno;
/****************************************************************************/
char *getcwd(buf, len)
char *buf;
int len;
{
/* Put the current directory in buf and return status */
FILE *fp;
/* Open the pwd executable in a pipe */
if ((fp = popen("pwd", "r")) == NULL) {
return(NULL);
}
/* Read the output - the working directory */
if (fgets(buf, len, fp) == NULL) {
return(NULL);
}
/* Check for newline and trim it */
if (buf[strlen(buf) - 1] != '\n') {
errno = EIO;
return(NULL);
}
buf[strlen(buf) - 1] = '\0';
/* Close the pipe and return the buffer */
(void) pclose(fp);
return(buf);
}
/****************************************************************************/
|
