massive refactor for mp and organizationHEADmaster

1 files changed, 26 insertions, 0 deletions

diff --git a/klib/ltostr.c b/klib/ltostr.c
new file mode 100644
index 0000000..e28be31
--- /dev/null
+++ b/klib/ltostr.c
@@ -0,0 +1,26 @@
+#include "format.h"
+
+size_t
+ltostr(char *s, size_t limit, unsigned long l, bool sgn, int radix)
+{
+    size_t si = 0;
+    size_t digits = 0;
+    if((long)l < 0 && sgn) {
+        l = -((long)l);
+        s[0] = '-';
+    }
+    for(unsigned long lv = l; lv != 0; lv /= radix)
+        digits++;
+    digits = digits > limit ? limit : digits;
+
+    if(digits-- == 0)
+        s[si++] = '0'; 
+    for(unsigned long lv = l; lv != 0; lv /= radix)
+    {
+        if(si >= limit) return si;
+        int digit = lv % radix;
+        s[(digits - si)] = (digit >= 10 ? (digit + 'a' - 10) : digit + '0');
+        si++;
+    }
+    return si;
+}