1 /* $Id: strutil.c,v 1.15 2004-12-20 07:12:25 btb Exp $ */
3 THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
4 SOFTWARE CORPORATION ("PARALLAX"). PARALLAX, IN DISTRIBUTING THE CODE TO
5 END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
6 ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
7 IN USING, DISPLAYING, AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
8 SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
9 FREE PURPOSES. IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
10 CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES. THE END-USER UNDERSTANDS
11 AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
12 COPYRIGHT 1993-1999 PARALLAX SOFTWARE CORPORATION. ALL RIGHTS RESERVED.
29 char *strdup(const char *str)
33 newstr = malloc(strlen(str) + 1);
40 // string compare without regard to case
42 int stricmp( const char *s1, const char *s2 )
48 u1 = toupper((int) *s1);
49 u2 = toupper((int) *s2);
51 return (u1 > u2) ? 1 : -1;
60 int strnicmp( const char *s1, const char *s2, int n )
66 u1 = toupper((int) *s1);
67 u2 = toupper((int) *s2);
69 return (u1 > u2) ? 1 : -1;
74 } while (u1 && u2 && n);
82 void strlwr( char *s1 )
90 void strupr( char *s1 )
100 void strrev( char *s1 )
104 t = s1 + strlen(s1) - 1;
115 // remove extension from filename, doesn't work with paths.
116 void removeext(const char *filename, char *out)
120 if ((p = strrchr(filename, '.')))
122 strncpy(out, filename, p - filename);
123 out[p - filename] = 0;
126 strcpy(out, filename);
130 #if !defined(__MSDOS__) && !(defined(_WIN32) && !defined(_WIN32_WCE))
131 void _splitpath(char *name, char *drive, char *path, char *base, char *ext)
149 s = strrchr(p, '\\');
186 char drive[10], path[50], name[16], ext[5];
188 drive[0] = path[0] = name[0] = ext[0] = '\0';
189 _splitpath("f:\\tmp\\x.out", drive, path, name, ext);
190 drive[0] = path[0] = name[0] = ext[0] = '\0';
191 _splitpath("tmp\\x.out", drive, path, name, ext);
192 drive[0] = path[0] = name[0] = ext[0] = '\0';
193 _splitpath("f:\\tmp\\a.out", NULL, NULL, name, NULL);
194 drive[0] = path[0] = name[0] = ext[0] = '\0';
195 _splitpath("tmp\\*.dem", drive, path, NULL, NULL);
196 drive[0] = path[0] = name[0] = ext[0] = '\0';
197 _splitpath(".\\tmp\\*.dem", drive, path, NULL, NULL);