update dev300-m58
[ooovba.git] / dmake / unix / dirbrk.c
blob186c5a8bc0d92ec0f0e3f52973dbd0b3173340f3
1 /* RCS $Id: dirbrk.c,v 1.4 2007-10-15 15:52:59 ihi Exp $
2 --
3 -- SYNOPSIS
4 -- Define the directory separator string.
5 --
6 -- DESCRIPTION
7 -- Define this string for any character that may appear in a path name
8 -- and can be used as a directory separator. Also provide a function
9 -- to indicate if a given path begins at the root of the file system.
11 -- AUTHOR
12 -- Dennis Vadura, dvadura@dmake.wticorp.com
14 -- WWW
15 -- http://dmake.wticorp.com/
17 -- COPYRIGHT
18 -- Copyright (c) 1996,1997 by WTI Corp. All rights reserved.
19 --
20 -- This program is NOT free software; you can redistribute it and/or
21 -- modify it under the terms of the Software License Agreement Provided
22 -- in the file <distribution-root>/readme/license.txt.
24 -- LOG
25 -- Use cvs log to obtain detailed change logs.
28 #include "extern.h"
30 #ifdef __EMX__
31 /* os2 uses /, \, and : */
32 /* FIXME: The OS/2 port most probably wants to use the HAVE_DRIVE_LETTERS
33 * macro, see extern.h. */
34 char* DirBrkStr = "/\\:";
35 #else
36 /* Unix only uses / */
37 char* DirBrkStr = "/";
38 #endif
41 ** Return TRUE if the name is the full specification of a path name to a file
42 ** starting at the root of the file system, otherwise return FALSE
44 PUBLIC int
45 If_root_path(name)
46 char *name;
48 return( strchr(DirBrkStr, *name) != NIL(char)
49 #ifdef HAVE_DRIVE_LETTERS
50 || (*name && name[1] == ':' && isalpha(*name))
51 #endif