Upload 0.6.1-2 to unstable

[pkg/abook.git] / misc.c

diff --git a/misc.c b/misc.c
index 9ae0ff7a88db342b49ffc35b6f14f51086e296d6..0f96b7a878316948c11d98a70259865d5e70ac55 100644 (file)
--- a/misc.c
+++ b/misc.c
@@ -1,6 +1,6 @@
 
 /*
- * $Id: misc.c,v 1.22 2005/10/25 23:27:24 cduval Exp $
+ * $Id$
  *
  * by JH <jheinonen@users.sourceforge.net>
  *
@@ -64,6 +64,41 @@ strtrim(char *s)
        return s;
 }
 
+int
+is_number(char *p)
+{
+       if(!p || !*p || (*p == '-' && !*++p))
+               return 0;
+
+       for(; *p; p++)
+               if(!isdigit(*p))
+                       return 0;
+
+       return 1;
+}
+
+#ifndef HAVE_STRCASESTR
+char *
+strcasestr(const char *haystack, const char *needle)
+{
+       int i;
+       int k;
+
+       assert(haystack != NULL);
+       assert(needle != NULL);
+
+       for(i=0; i<strlen(haystack)-strlen(needle)+1; i++) {
+               for(k=0; k<strlen(needle); k++, i++) {
+                       if (tolower(haystack[i]) != tolower(needle[k]))
+                               break;
+                       else if ((k+1) == strlen(needle))
+                               return &haystack[i];
+               }
+       }
+
+       return NULL;
+}
+#endif
 
 #ifdef HAVE_CONFIG_H
 #      include "config.h"