diff --git a/src/apps/bin/pwd/Jamfile b/src/apps/bin/pwd/Jamfile new file mode 100644 index 0000000000..6879eaad5c --- /dev/null +++ b/src/apps/bin/pwd/Jamfile @@ -0,0 +1,3 @@ +SubDir OBOS_TOP src kernel apps pwd ; + +KernelObjects <$(SOURCE_GRIST)>main.c : -fpic -Wno-unused ; diff --git a/src/apps/bin/pwd/getopt.h b/src/apps/bin/pwd/getopt.h new file mode 100644 index 0000000000..b4af644ea1 --- /dev/null +++ b/src/apps/bin/pwd/getopt.h @@ -0,0 +1,141 @@ +/* Declarations for getopt. + Copyright (C) 1989, 90, 91, 92, 93, 94 Free Software Foundation, Inc. + +This file is part of the GNU C Library. Its master source is NOT part of +the C library, however. The master source lives in /gd/gnu/lib. + +The GNU C Library is free software; you can redistribute it and/or +modify it under the terms of the GNU Library General Public License as +published by the Free Software Foundation; either version 2 of the +License, or (at your option) any later version. + +The GNU C Library 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 +Library General Public License for more details. + +You should have received a copy of the GNU Library General Public +License along with the GNU C Library; see the file COPYING.LIB. If +not, write to the Free Software Foundation, Inc., 675 Mass Ave, +Cambridge, MA 02139, USA. */ + +#ifndef _GETOPT_H +#define _GETOPT_H 1 + +#ifndef _IMPEXP_ROOT +#define _IMPEXP_ROOT +#endif + +#ifdef __cplusplus +extern "C" { +#endif + +/* For communication from `getopt' to the caller. + When `getopt' finds an option that takes an argument, + the argument value is returned here. + Also, when `ordering' is RETURN_IN_ORDER, + each non-option ARGV-element is returned here. */ + +extern _IMPEXP_ROOT char *optarg; + +/* Index in ARGV of the next element to be scanned. + This is used for communication to and from the caller + and for communication between successive calls to `getopt'. + + On entry to `getopt', zero means this is the first call; initialize. + + When `getopt' returns EOF, this is the index of the first of the + non-option elements that the caller should itself scan. + + Otherwise, `optind' communicates from one call to the next + how much of ARGV has been scanned so far. */ + +extern _IMPEXP_ROOT int optind; + +/* Callers store zero here to inhibit the error message `getopt' prints + for unrecognized options. */ + +extern _IMPEXP_ROOT int opterr; + +/* Set to an option character which was unrecognized. */ + +extern _IMPEXP_ROOT int optopt; + +/* Describe the long-named options requested by the application. + The LONG_OPTIONS argument to getopt_long or getopt_long_only is a vector + of `struct option' terminated by an element containing a name which is + zero. + + The field `has_arg' is: + no_argument (or 0) if the option does not take an argument, + required_argument (or 1) if the option requires an argument, + optional_argument (or 2) if the option takes an optional argument. + + If the field `flag' is not NULL, it points to a variable that is set + to the value given in the field `val' when the option is found, but + left unchanged if the option is not found. + + To have a long-named option do something other than set an `int' to + a compiled-in constant, such as set a value from `optarg', set the + option's `flag' field to zero and its `val' field to a nonzero + value (the equivalent single-letter option character, if there is + one). For long options that have a zero `flag' field, `getopt' + returns the contents of the `val' field. */ + +struct option +{ +#if defined (__STDC__) && __STDC__ + const char *name; +#else + char *name; +#endif + /* has_arg can't be an enum because some compilers complain about + type mismatches in all the code that assumes it is an int. */ + int has_arg; + int *flag; + int val; +}; + +/* Names for the values of the `has_arg' field of `struct option'. */ + +#define no_argument 0 +#define required_argument 1 +#define optional_argument 2 + + +#if defined(__cplusplus) || (defined (__STDC__) && __STDC__) +#if defined(__GNU_LIBRARY__) || __dest_os == __be_os +/* Many other libraries have conflicting prototypes for getopt, with + differences in the consts, in stdlib.h. To avoid compilation + errors, only prototype getopt for the GNU C library. */ +/* + * But at Be we only use GNU so this is OK + */ +extern _IMPEXP_ROOT int getopt (int argc, char *const *argv, const char *shortopts); +#else /* not __GNU_LIBRARY__ or __BEOS__ */ +extern int getopt (); +#endif /* __GNU_LIBRARY__ || __BEOS__ */ +extern _IMPEXP_ROOT int getopt_long (int argc, char *const *argv, const char *shortopts, + const struct option *longopts, int *longind); +extern _IMPEXP_ROOT int getopt_long_only (int argc, char *const *argv, + const char *shortopts, + const struct option *longopts, int *longind); + +/* Internal only. Users should not call this directly. */ +extern int _getopt_internal (int argc, char *const *argv, + const char *shortopts, + const struct option *longopts, int *longind, + int long_only); +#else /* not __STDC__ or cplusplus */ +extern _IMPEXP_ROOT int getopt (); +extern _IMPEXP_ROOT int getopt_long (); +extern _IMPEXP_ROOT int getopt_long_only (); + +extern int _getopt_internal (); +#endif /* __STDC__ */ + +#ifdef __cplusplus +} +#endif + +#endif /* _GETOPT_H */ diff --git a/src/apps/bin/pwd/pwd.c b/src/apps/bin/pwd/pwd.c new file mode 100644 index 0000000000..b6becfa807 --- /dev/null +++ b/src/apps/bin/pwd/pwd.c @@ -0,0 +1,111 @@ +#include +#include +#include +#include +#include +#include +#include + +static char *getcwd_logical(void); +int usage(void); +int version(void); + +int main(int argc, char *argv[]) +{ + int physical = false; + int argOption; + char *pcTemp; + int indexptr = 0; + char * const * optargv = argv; + + struct option help_opt = { "help", no_argument, 0, 1 } ; + struct option version_opt = { "version", no_argument, 0, 2 } ; + + struct option options[] = { + help_opt, version_opt, 0 + }; + + while ((argOption = getopt_long(argc, optargv, "LP", options, &indexptr)) != -1) + switch (argOption) { + case '?': + case 'L': // Logical + physical = false; + break; + case 'P': // Physical + physical = true; + break; + default: + switch (options[indexptr].val) { + case 1: // help + usage(); + exit(0); + case 2: // version + version(); + exit(0); + default: + break; + } + break; + } + argc -= optind; + + if (argc != 0) + { + usage(); + } + else + { + /* + * If the logical option was specified, and we can not find the logical currrent directory + * then behave as if -P (physical) was specified. + */ + if ((!physical && (pcTemp = getcwd_logical()) != NULL) || (pcTemp = getcwd(NULL, 0)) != NULL) + printf("%s\n", pcTemp); + else + exit(0); + } + return B_NO_ERROR; +} + + +int usage(void) +{ + (void)fprintf(stderr, +"pwd OBOS (C)2003 MIT License. (http://www.openbeos.net/) + +Usage: pwd [OPTION]... +Print the current working directory path + + --help display this help and exit + --version display version information and exit + -L treat path as a Logical device + -P treat path as a Physical device (default)\n" ); + return; +} + +int version(void) +{ + (void)fprintf(stderr, "pwd OBOS (C)2003 MIT License. (http://www.openbeos.net/)\n"); + return; +} + +static char * +getcwd_logical(void) +{ + struct stat logical, physical; + char *pwd; + + /* + * Check that $PWD is an absolute logical pathname referring to the current working directory. + */ + if ((pwd = getenv("PWD")) != NULL && *pwd == '/') { + if (stat(pwd, &logical) == -1 || stat(".", &physical) == -1) + return (NULL); + if (logical.st_dev == physical.st_dev && logical.st_ino == physical.st_ino) + return (pwd); + } + + errno = ENOENT; + return (NULL); +} +