(file) Return to System.cpp CVS log (file) (dir) Up to [Pegasus] / pegasus / src / Pegasus / Common

Diff for /pegasus/src/Pegasus/Common/System.cpp between version 1.14.2.2 and 1.15

version 1.14.2.2, 2002/10/28 15:43:24 version 1.15, 2003/01/25 14:38:58
Line 37 
Line 37 
  
  
 #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>
Line 71 
Line 73 
     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


Legend:
Removed from v.1.14.2.2  
changed lines
  Added in v.1.15

No CVS admin address has been configured
Powered by
ViewCVS 0.9.2