1 // Copyright (c) 2012, Google Inc.
2 // All rights reserved.
3 //
4 // Redistribution and use in source and binary forms, with or without
5 // modification, are permitted provided that the following conditions are
6 // met:
7 //
8 //     * Redistributions of source code must retain the above copyright
9 // notice, this list of conditions and the following disclaimer.
10 //     * Redistributions in binary form must reproduce the above
11 // copyright notice, this list of conditions and the following disclaimer
12 // in the documentation and/or other materials provided with the
13 // distribution.
14 //     * Neither the name of Google Inc. nor the names of its
15 // contributors may be used to endorse or promote products derived from
16 // this software without specific prior written permission.
17 //
18 // THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
19 // "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
20 // LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
21 // A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
22 // OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
23 // SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
24 // LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
25 // DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
26 // THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
27 // (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
28 // OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
29 
30 // This source file provides replacements for libc functions that we need. If
31 // we call the libc functions directly we risk crashing in the dynamic linker
32 // as it tries to resolve uncached PLT entries.
33 
34 #include "common/linux/linux_libc_support.h"
35 
36 #include <stddef.h>
37 
38 extern "C" {
39 
my_strlen(const char * s)40 size_t my_strlen(const char* s) {
41   size_t len = 0;
42   while (*s++) len++;
43   return len;
44 }
45 
my_strcmp(const char * a,const char * b)46 int my_strcmp(const char* a, const char* b) {
47   for (;;) {
48     if (*a < *b)
49       return -1;
50     else if (*a > *b)
51       return 1;
52     else if (*a == 0)
53       return 0;
54     a++;
55     b++;
56   }
57 }
58 
my_strncmp(const char * a,const char * b,size_t len)59 int my_strncmp(const char* a, const char* b, size_t len) {
60   for (size_t i = 0; i < len; ++i) {
61     if (*a < *b)
62       return -1;
63     else if (*a > *b)
64       return 1;
65     else if (*a == 0)
66       return 0;
67     a++;
68     b++;
69   }
70 
71   return 0;
72 }
73 
74 // Parse a non-negative integer.
75 //   result: (output) the resulting non-negative integer
76 //   s: a NUL terminated string
77 // Return true iff successful.
my_strtoui(int * result,const char * s)78 bool my_strtoui(int* result, const char* s) {
79   if (*s == 0)
80     return false;
81   int r = 0;
82   for (;; s++) {
83     if (*s == 0)
84       break;
85     const int old_r = r;
86     r *= 10;
87     if (*s < '0' || *s > '9')
88       return false;
89     r += *s - '0';
90     if (r < old_r)
91       return false;
92   }
93 
94   *result = r;
95   return true;
96 }
97 
98 // Return the length of the given unsigned integer when expressed in base 10.
my_uint_len(uintmax_t i)99 unsigned my_uint_len(uintmax_t i) {
100   if (!i)
101     return 1;
102 
103   int len = 0;
104   while (i) {
105     len++;
106     i /= 10;
107   }
108 
109   return len;
110 }
111 
112 // Convert an unsigned integer to a string
113 //   output: (output) the resulting string is written here. This buffer must be
114 //     large enough to hold the resulting string. Call |my_uint_len| to get the
115 //     required length.
116 //   i: the unsigned integer to serialise.
117 //   i_len: the length of the integer in base 10 (see |my_uint_len|).
my_uitos(char * output,uintmax_t i,unsigned i_len)118 void my_uitos(char* output, uintmax_t i, unsigned i_len) {
119   for (unsigned index = i_len; index; --index, i /= 10)
120     output[index - 1] = '0' + (i % 10);
121 }
122 
my_strchr(const char * haystack,char needle)123 const char* my_strchr(const char* haystack, char needle) {
124   while (*haystack && *haystack != needle)
125     haystack++;
126   if (*haystack == needle)
127     return haystack;
128   return (const char*) 0;
129 }
130 
my_strrchr(const char * haystack,char needle)131 const char* my_strrchr(const char* haystack, char needle) {
132   const char* ret = NULL;
133   while (*haystack) {
134     if (*haystack == needle)
135       ret = haystack;
136     haystack++;
137   }
138   return ret;
139 }
140 
my_memchr(const void * src,int needle,size_t src_len)141 void* my_memchr(const void* src, int needle, size_t src_len) {
142   const unsigned char* p = (const unsigned char*)src;
143   const unsigned char* p_end = p + src_len;
144   for (; p < p_end; ++p) {
145     if (*p == needle)
146       return (void*)p;
147   }
148   return NULL;
149 }
150 
151 // Read a hex value
152 //   result: (output) the resulting value
153 //   s: a string
154 // Returns a pointer to the first invalid charactor.
my_read_hex_ptr(uintptr_t * result,const char * s)155 const char* my_read_hex_ptr(uintptr_t* result, const char* s) {
156   uintptr_t r = 0;
157 
158   for (;; ++s) {
159     if (*s >= '0' && *s <= '9') {
160       r <<= 4;
161       r += *s - '0';
162     } else if (*s >= 'a' && *s <= 'f') {
163       r <<= 4;
164       r += (*s - 'a') + 10;
165     } else if (*s >= 'A' && *s <= 'F') {
166       r <<= 4;
167       r += (*s - 'A') + 10;
168     } else {
169       break;
170     }
171   }
172 
173   *result = r;
174   return s;
175 }
176 
my_read_decimal_ptr(uintptr_t * result,const char * s)177 const char* my_read_decimal_ptr(uintptr_t* result, const char* s) {
178   uintptr_t r = 0;
179 
180   for (;; ++s) {
181     if (*s >= '0' && *s <= '9') {
182       r *= 10;
183       r += *s - '0';
184     } else {
185       break;
186     }
187   }
188   *result = r;
189   return s;
190 }
191 
my_memset(void * ip,char c,size_t len)192 void my_memset(void* ip, char c, size_t len) {
193   char* p = (char *) ip;
194   while (len--)
195     *p++ = c;
196 }
197 
my_strlcpy(char * s1,const char * s2,size_t len)198 size_t my_strlcpy(char* s1, const char* s2, size_t len) {
199   size_t pos1 = 0;
200   size_t pos2 = 0;
201 
202   while (s2[pos2] != '\0') {
203     if (pos1 + 1 < len) {
204       s1[pos1] = s2[pos2];
205       pos1++;
206     }
207     pos2++;
208   }
209   if (len > 0)
210     s1[pos1] = '\0';
211 
212   return pos2;
213 }
214 
my_strlcat(char * s1,const char * s2,size_t len)215 size_t my_strlcat(char* s1, const char* s2, size_t len) {
216   size_t pos1 = 0;
217 
218   while (pos1 < len && s1[pos1] != '\0')
219     pos1++;
220 
221   if (pos1 == len)
222     return pos1;
223 
224   return pos1 + my_strlcpy(s1 + pos1, s2, len - pos1);
225 }
226 
my_isspace(int ch)227 int my_isspace(int ch) {
228   // Matches the C locale.
229   const char spaces[] = " \t\f\n\r\t\v";
230   for (size_t i = 0; i < sizeof(spaces); i++) {
231     if (ch == spaces[i])
232       return 1;
233   }
234   return 0;
235 }
236 
237 }  // extern "C"
238