-/* String function */\r
-int str_equiv(const char *a, const char *b) {\r
- int i;\r
- for (i = 0; ; i++) {\r
- if (tolower(b[i]) != tolower(a[i])) return 0;\r
- if (! a[i]) return 1;\r
- }\r
+/* Are two strings case-insensitively equivalent? */\r
+int str_equiv(const TCHAR *a, const TCHAR *b) {\r
+ size_t len = _tcslen(a);\r
+ if (_tcslen(b) != len) return 0;\r
+ if (_tcsnicmp(a, b, len)) return 0;\r
+ return 1;\r
+}\r
+\r
+/* Convert a string to a number. */\r
+int str_number(const TCHAR *string, unsigned long *number, TCHAR **bogus) {\r
+ if (! string) return 1;\r
+\r
+ *number = _tcstoul(string, bogus, 0);\r
+ if (**bogus) return 2;\r
+\r
+ return 0;\r
+}\r
+\r
+int str_number(const TCHAR *string, unsigned long *number) {\r
+ TCHAR *bogus;\r
+ return str_number(string, number, &bogus);\r
+}\r
+\r
+/* Remove basename of a path. */\r
+void strip_basename(TCHAR *buffer) {\r
+ size_t len = _tcslen(buffer);\r
+ size_t i;\r
+ for (i = len; i && buffer[i] != _T('\\') && buffer[i] != _T('/'); i--);\r
+ /* X:\ is OK. */\r
+ if (i && buffer[i - 1] == _T(':')) i++;\r
+ buffer[i] = _T('\0');\r