2 libc-extension.cc -- compensate for lacking libc functions.
5 source file of the flowerlib
7 (c) 1997--2003 Han-Wen Nienhuys <hanwen@cs.uu.nl>
8 Jan Nieuwenhuizen <janneke@gnu.org>
14 #include "libc-extension.hh"
20 strnlwr (char* start ,int n)
25 *p = tolower (*p); /* a macro on some compilers */
31 strnupr (char* start, int n)
36 *p = toupper (*p); /* a macro on some compilers */
44 /** locate a substring. #memmem# finds the first occurrence of
45 #needle# in #haystack#. This is not ANSI-C.
47 The prototype is not in accordance with the Linux Programmer's
48 Manual v1.15, but it is with /usr/include/string.h */
51 _memmem (Byte const *haystack, int haystack_len,
52 Byte const *needle,int needle_len)
54 Byte const * end_haystack = haystack + haystack_len - needle_len + 1;
55 Byte const * end_needle = needle + needle_len ;
57 /* Ahhh ... Some minimal lowlevel stuff. This *is* nice; Varation
58 is the spice of life */
59 while (haystack < end_haystack)
61 Byte const *subneedle = needle;
62 Byte const *subhaystack = haystack;
63 while (subneedle < end_needle)
64 if (*subneedle++ != *subhaystack++)
67 // completed the needle. Gotcha.
68 return (Byte *) haystack;
76 memmem (void const *haystack, int haystack_len,
77 void const *needle,int needle_len)
79 Byte const* haystack_byte_c = (Byte const*)haystack;
80 Byte const* needle_byte_c = (Byte const*)needle;
81 return _memmem (haystack_byte_c, haystack_len, needle_byte_c, needle_len);
87 memrchr (Byte const * p, int n, char c)
101 my_swap (T &t1, T &t2, T &tmp)
109 strrev (Byte* byte, int length_i)
114 Byte* right = byte + length_i;
118 my_swap (*right-- , *left++ , tmp_byte);
124 #define lrint(__x) ((long)(double) __x)
129 snprintf (char *str, size_t, char const *format, ...)
132 va_start (ap, format);
133 int i = vsprintf (str, format, ap);
141 vsnprintf (char *str, size_t, char const *format, va_list args)
143 int i = vsprintf (str, format, args);
153 return x && ( x == x/ 2) ;