updates.
[silc.git] / apps / irssi / src / core / misc.c
index 1af327afb8ff5152eac9ac3396b006481c97be37..93612d6bb5ab7704f786fa2dc51fd21e5ee4fbf7 100644 (file)
@@ -26,6 +26,7 @@
 #ifdef HAVE_REGEX_H
 #  include <regex.h>
 #endif
+#include <pwd.h>
 
 typedef struct {
        int condition;
@@ -126,7 +127,7 @@ int find_substr(const char *list, const char *item)
                return FALSE;
 
        for (;;) {
-               while (isspace((gint) *list)) list++;
+               while (i_isspace(*list)) list++;
                if (*list == '\0') break;
 
                ptr = strchr(list, ' ');
@@ -324,7 +325,7 @@ char *stristr(const char *data, const char *key)
                if (key[pos] == '\0')
                         return (char *) data;
 
-               if (toupper(data[pos]) == toupper(key[pos]))
+               if (i_toupper(data[pos]) == i_toupper(key[pos]))
                        pos++;
                else {
                        data++;
@@ -337,7 +338,7 @@ char *stristr(const char *data, const char *key)
 
 #define isbound(c) \
        ((unsigned char) (c) < 128 && \
-       (isspace((int) (c)) || ispunct((int) (c))))
+       (i_isspace(c) || i_ispunct(c)))
 
 char *strstr_full_case(const char *data, const char *key, int icase)
 {
@@ -364,7 +365,7 @@ char *strstr_full_case(const char *data, const char *key, int icase)
                        return (char *) data;
                }
 
-               match = icase ? (toupper(data[pos]) == toupper(key[pos])) :
+               match = icase ? (i_toupper(data[pos]) == i_toupper(key[pos])) :
                                 data[pos] == key[pos];
 
                if (match && (pos != 0 || data == start || isbound(data[-1])))
@@ -430,10 +431,11 @@ int mkpath(const char *path, int mode)
                dir = g_strndup(path, (int) (p-path));
                if (stat(dir, &statbuf) != 0) {
 #ifndef WIN32
-                       if (mkdir(dir, mode) == -1) {
+                       if (mkdir(dir, mode) == -1)
 #else
-                       if (_mkdir(dir) == -1) {
+                       if (_mkdir(dir) == -1)
 #endif
+                       {
                                g_free(dir);
                                return -1;
                        }
@@ -447,11 +449,24 @@ int mkpath(const char *path, int mode)
        return 0;
 }
 
+/* Get home directory */
+const char *get_home_dir(void)
+{
+       struct passwd *pw = getpwuid(getuid());
+       if (!pw) {
+        if (g_getenv("HOME"))
+          return g_getenv("HOME");
+        else
+          return ".";
+       }
+       return pw->pw_dir;
+}
+
 /* convert ~/ to $HOME */
 char *convert_home(const char *path)
 {
        return *path == '~' && (*(path+1) == '/' || *(path+1) == '\0') ?
-               g_strconcat(g_get_home_dir(), path+1, NULL) :
+               g_strconcat((char *)get_home_dir, path+1, NULL) :
                g_strdup(path);
 }
 
@@ -472,7 +487,7 @@ unsigned int g_istr_hash(gconstpointer v)
        unsigned int h = 0, g;
 
        while (*s != '\0') {
-               h = (h << 4) + toupper(*s);
+               h = (h << 4) + i_toupper(*s);
                if ((g = h & 0xf0000000UL)) {
                        h = h ^ (g >> 24);
                        h = h ^ g;
@@ -492,7 +507,7 @@ int match_wildcards(const char *cmask, const char *data)
        newmask = mask = g_strdup(cmask);
        for (; *mask != '\0' && *data != '\0'; mask++) {
                if (*mask != '*') {
-                       if (*mask != '?' && toupper(*mask) != toupper(*data))
+                       if (*mask != '?' && i_toupper(*mask) != i_toupper(*data))
                                break;
 
                        data++;
@@ -538,7 +553,7 @@ int is_numeric(const char *str, char end_char)
                return FALSE;
 
        while (*str != '\0' && *str != end_char) {
-               if (!isdigit(*str)) return FALSE;
+               if (!i_isdigit(*str)) return FALSE;
                str++;
        }
 
@@ -725,3 +740,47 @@ GSList *columns_sort_list(GSList *list, int rows)
                             g_slist_length(list), sorted);
         return sorted;
 }
+
+/* Expand escape string, the first character in data should be the
+   one after '\'. Returns the expanded character or -1 if error. */
+int expand_escape(const char **data)
+{
+        char digit[4];
+
+       switch (**data) {
+       case 't':
+               return '\t';
+       case 'r':
+               return '\r';
+       case 'n':
+               return '\n';
+       case 'e':
+               return 27; /* ESC */
+
+       case 'x':
+                /* hex digit */
+               if (!i_isxdigit((*data)[1]) || !i_isxdigit((*data)[2]))
+                       return -1;
+
+               digit[0] = (*data)[1];
+               digit[1] = (*data)[2];
+                digit[2] = '\0';
+               *data += 2;
+               return strtol(digit, NULL, 16);
+       case 'c':
+                /* control character (\cA = ^A) */
+                (*data)++;
+               return i_toupper(**data) - 64;
+       default:
+               if (!i_isdigit(**data))
+                       return -1;
+
+                /* octal */
+                digit[0] = (*data)[0];
+                digit[1] = (*data)[1];
+               digit[2] = (*data)[2];
+                digit[3] = '\0';
+               *data += 2;
+               return strtol(digit, NULL, 8);
+       }
+}