79 lines
1.4 KiB
C
79 lines
1.4 KiB
C
|
/* $Id: path.c,v 1.1 2003/04/04 20:42:13 momjian Exp $ */
|
||
|
|
||
|
#include "c.h"
|
||
|
#include <ctype.h>
|
||
|
|
||
|
/*
|
||
|
* is_absolute_path
|
||
|
*/
|
||
|
bool is_absolute_path(const char *filename)
|
||
|
{
|
||
|
return filename[0] == '/'
|
||
|
#ifdef WIN32 /* WIN32 paths can either have forward or backward slashes */
|
||
|
|| filename[0] == '\\'
|
||
|
|| (isalpha(filename[0]) && filename[1] == ':'
|
||
|
&& (filename[2] == '\\' || filename[2] == '/'))
|
||
|
#endif
|
||
|
;
|
||
|
}
|
||
|
|
||
|
|
||
|
|
||
|
/*
|
||
|
* first_path_separator
|
||
|
*/
|
||
|
char *first_path_separator(const char *filename)
|
||
|
{
|
||
|
#ifndef WIN32
|
||
|
return strchr(filename, '/');
|
||
|
#else
|
||
|
char *slash, *bslash;
|
||
|
|
||
|
/* How should we handle "C:file.c"? */
|
||
|
slash = strchr(filename, '/');
|
||
|
bslash = strchr(filename, '\\');
|
||
|
if (slash == NULL)
|
||
|
return bslash;
|
||
|
else if (bslash == NULL)
|
||
|
return slash;
|
||
|
else
|
||
|
return (slash < bslash) ? slash : bslash;
|
||
|
#endif
|
||
|
}
|
||
|
|
||
|
|
||
|
/*
|
||
|
* last_path_separator
|
||
|
*/
|
||
|
char *last_path_separator(const char *filename)
|
||
|
{
|
||
|
#ifndef WIN32
|
||
|
return strrchr(filename, '/');
|
||
|
#else
|
||
|
char *slash, *bslash;
|
||
|
|
||
|
/* How should we handle "C:file.c"? */
|
||
|
slash = strrchr(filename, '/');
|
||
|
bslash = strrchr(filename, '\\');
|
||
|
if (slash == NULL)
|
||
|
return bslash;
|
||
|
else if (bslash == NULL)
|
||
|
return slash;
|
||
|
else
|
||
|
return (slash > bslash) ? slash : bslash;
|
||
|
#endif
|
||
|
}
|
||
|
|
||
|
|
||
|
/*
|
||
|
* Extracts the actual name of the program as called.
|
||
|
*/
|
||
|
char *
|
||
|
get_progname(char *argv0)
|
||
|
{
|
||
|
if (!last_path_separator(argv0))
|
||
|
return argv0;
|
||
|
else
|
||
|
return last_path_separator(argv0) + 1;
|
||
|
}
|