libc.obj:

- Added basename() and  dirname()
 - libc_test all tabs -> spaces

git-svn-id: svn://kolibrios.org@9262 a494cfbc-eb01-0410-851d-a64ba20cac60

programs/develop/ktcc/trunk/libc.obj/source/libc.c

@@ -116,6 +116,9 @@
 #include "time/time.c"
 #include "time/asctime.c"
 
+#include "misc/basename.c"
+#include "misc/dirname.c"
+
 __asm__(
     ".include \"math/acos.s\"\n\t"
     ".include \"math/asin.s\"\n\t"

programs/develop/ktcc/trunk/libc.obj/source/misc/basename.c

@@ -0,0 +1,13 @@
+#include <string.h>
+#include <libgen.h>
+
+char *basename(char *s)
+{
+    size_t i;
+    if (!s || !*s) return ".";
+    i = strlen(s)-1;
+    for (; i&&s[i]=='/'; i--) s[i] = 0;
+    for (; i&&s[i-1]!='/'; i--);
+    return s+i;
+}
+ 

programs/develop/ktcc/trunk/libc.obj/source/misc/dirname.c

@@ -0,0 +1,14 @@
+#include <string.h>
+#include <libgen.h>
+
+char *dirname(char *s)
+{
+    size_t i;
+    if (!s || !*s) return ".";
+    i = strlen(s)-1;
+    for (; s[i]=='/'; i--) if (!i) return "/";
+    for (; s[i]!='/'; i--) if (!i) return ".";
+    for (; s[i]=='/'; i--) if (!i) return "/";
+    s[i+1] = 0;
+    return s;
+} 

programs/develop/ktcc/trunk/libc.obj/source/symbols.txt

@@ -172,3 +172,6 @@ time
 localtime
 asctime
 difftime
+!____MISC____
+basename
+dirname