version 1.14.2.2, 2002/10/28 15:43:24
|
version 1.15, 2003/01/25 14:38:58
|
|
|
| |
| |
#include <fstream> | #include <fstream> |
|
#include <cctype> // for tolower() |
|
#include <cstring> |
#include "System.h" | #include "System.h" |
| |
#include <Pegasus/Common/PegasusVersion.h> | #include <Pegasus/Common/PegasusVersion.h> |
|
|
return true; | return true; |
} | } |
| |
|
// ATTN: Move to platform-specific System implementation files and call |
|
// strcasecmp where it is available. |
|
Sint32 System::strcasecmp(const char* s1, const char* s2) |
|
{ |
|
while (*s1 && *s2) |
|
{ |
|
int r = tolower(*s1++) - tolower(*s2++); |
|
|
|
if (r) |
|
return r; |
|
} |
|
|
|
if (*s2) |
|
return -1; |
|
else if (*s1) |
|
return 1; |
|
|
|
return 0; |
|
} |
|
|
|
// Return the just the file name from the path into basename |
|
char *System::extract_file_name(const char *fullpath, char *basename) |
|
{ |
|
char *p; |
|
char buff[2048]; |
|
if (fullpath == NULL) |
|
{ |
|
basename[0] = '\0'; |
|
return basename; |
|
} |
|
strcpy(buff, fullpath); |
|
for(p = buff + strlen(buff); p >= buff; p--) |
|
{ |
|
if (*p == '\\' || *p == '/') |
|
{ |
|
strcpy(basename, p+1); |
|
return basename; |
|
} |
|
} |
|
strcpy(basename, fullpath); |
|
return basename; |
|
} |
|
|
|
// Return the just the path to the file name into dirname |
|
char *System::extract_file_path(const char *fullpath, char *dirname) |
|
{ |
|
char *p; |
|
char buff[2048]; |
|
if (fullpath == NULL) |
|
{ |
|
dirname[0] = '\0'; |
|
return dirname; |
|
} |
|
strcpy(buff, fullpath); |
|
for(p = buff + strlen(buff); p >= buff; p--) |
|
{ |
|
if (*p == '\\' || *p == '/') |
|
{ |
|
strncpy(dirname, buff, p+1 - buff); |
|
dirname[p+1 - buff] = '\0'; |
|
return dirname; |
|
} |
|
} |
|
strcpy(dirname, fullpath); |
|
return dirname; |
|
} |
|
|
PEGASUS_NAMESPACE_END | PEGASUS_NAMESPACE_END |