i2p/haiku-beta6
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

pwd - Coded by Chris Simmons (Technix)

Browse Source 
git-svn-id: file:///srv/svn/repos/haiku/trunk/current@4752 a95241bf-73f2-0310-859d-f6bbb57e9c96
This commit is contained in:
Phil Greenway
2003-09-18 08:31:43 +00:00
parent f2e1bc22a4
commit ce8d28631d
3 changed files with 255 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/apps/bin/pwd/Jamfile
+3
View File
@@ -0,0 +1,3 @@
SubDir OBOS_TOP src kernel apps pwd ;
KernelObjects <$(SOURCE_GRIST)>main.c : -fpic -Wno-unused ;
src/apps/bin/pwd/getopt.h
+141
View File
@@ -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 */
src/apps/bin/pwd/pwd.c
+111
View File
@@ -0,0 +1,111 @@
#include <sys/stat.h>
#include <errno.h>
#include <getopt.h>
#include <ktypes.h>
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
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);
}