1/* Emulate getcwd using getwd.
2   This function is in the public domain. */
3
4/*
5NAME
6	getcwd -- get absolute pathname for current working directory
7
8SYNOPSIS
9	char *getcwd (char pathname[len], len)
10
11DESCRIPTION
12	Copy the absolute pathname for the current working directory into
13	the supplied buffer and return a pointer to the buffer.  If the
14	current directory's path doesn't fit in LEN characters, the result
15	is NULL and errno is set.
16
17	If pathname is a null pointer, getcwd() will obtain size bytes of
18	space using malloc.
19
20BUGS
21	Emulated via the getwd() call, which is reasonable for most
22	systems that do not have getcwd().
23
24*/
25
26#include "config.h"
27
28#ifdef HAVE_SYS_PARAM_H
29#include <sys/param.h>
30#endif
31#include <errno.h>
32
33extern char *getwd ();
34extern int errno;
35
36#ifndef MAXPATHLEN
37#define MAXPATHLEN 1024
38#endif
39
40char *
41getcwd (buf, len)
42  char *buf;
43  int len;
44{
45  char ourbuf[MAXPATHLEN];
46  char *result;
47
48  result = getwd (ourbuf);
49  if (result) {
50    if (strlen (ourbuf) >= len) {
51      errno = ERANGE;
52      return 0;
53    }
54    if (!buf) {
55       buf = (char*)malloc(len);
56       if (!buf) {
57           errno = ENOMEM;
58	   return 0;
59       }
60    }
61    strcpy (buf, ourbuf);
62  }
63  return buf;
64}
65