Subversion Repositories scarts

/* Emulate getcwd using getwd.

   This function is in the public domain. */

/*

@deftypefn Supplemental char* getcwd (char *@var{pathname}, int @var{len})

Copy the absolute pathname for the current working directory into

@var{pathname}, which is assumed to point to a buffer of at least

@var{len} bytes, and return a pointer to the buffer.  If the current

directory's path doesn't fit in @var{len} characters, the result is

@code{NULL} and @code{errno} is set.  If @var{pathname} is a null pointer,

@code{getcwd} will obtain @var{len} bytes of space using

@code{malloc}.

@end deftypefn

*/

#include "config.h"

#ifdef HAVE_SYS_PARAM_H

#include <sys/param.h>

#endif

#include <errno.h>

#ifdef HAVE_STRING_H

#include <string.h>

#endif

#ifdef HAVE_STDLIB_H

#include <stdlib.h>

#endif

extern char *getwd ();

extern int errno;

#ifndef MAXPATHLEN

#define MAXPATHLEN 1024

#endif

char *

getcwd (char *buf, size_t len)

{

  char ourbuf[MAXPATHLEN];

  char *result;

  result = getwd (ourbuf);

  if (result) {

    if (strlen (ourbuf) >= len) {

      errno = ERANGE;

      return 0;

    }

    if (!buf) {

       buf = (char*)malloc(len);

       if (!buf) {

           errno = ENOMEM;

           return 0;

       }

    }

    strcpy (buf, ourbuf);

  }

  return buf;

}