Chameleon

Chameleon Svn Source Tree

Root/tags/2.0/i386/libsa/string.c

Source at commit 1808 created 12 years 3 months ago.
By blackosx, Revise layout of package installer 'Welcome' file so it looks cleaner. Change the copyright notice to begin from 2009 as seen in the Chameleon 2.0 r431 installer. Should this date be set earlier?
1/*␊
2 * Copyright (c) 1999-2003 Apple Computer, Inc. All rights reserved.␊
3 *␊
4 * @APPLE_LICENSE_HEADER_START@␊
5 * ␊
6 * Portions Copyright (c) 1999-2003 Apple Computer, Inc. All Rights␊
7 * Reserved. This file contains Original Code and/or Modifications of␊
8 * Original Code as defined in and that are subject to the Apple Public␊
9 * Source License Version 2.0 (the "License"). You may not use this file␊
10 * except in compliance with the License. Please obtain a copy of the␊
11 * License at http://www.apple.com/publicsource and read it before using␊
12 * this file.␊
13 * ␊
14 * The Original Code and all software distributed under the License are␊
15 * distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, EITHER␊
16 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,␊
17 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,␊
18 * FITNESS FOR A PARTICULAR PURPOSE OR NON- INFRINGEMENT. Please see the␊
19 * License for the specific language governing rights and limitations␊
20 * under the License.␊
21 * ␊
22 * @APPLE_LICENSE_HEADER_END@␊
23 */␊
24/* string operations */␊
25␊
26#include "libsa.h"␊
27␊
28void * memset(void * dst, int val, size_t len)␊
29{␊
30 asm volatile ( "rep; stosb"␊
31 : "=c" (len), "=D" (dst)␊
32 : "0" (len), "1" (dst), "a" (val)␊
33 : "memory" );␊
34␊
35 return dst;␊
36}␊
37␊
38#if 0␊
39void * memcpy(void * dst, const void * src, size_t len)␊
40{␊
41 asm volatile ( "rep; movsb"␊
42 : "=c" (len), "=D" (dst), "=S" (src)␊
43 : "0" (len), "1" (dst), "2" (src)␊
44 : "memory" );␊
45␊
46 return dst;␊
47}␊
48␊
49void bcopy(const void * src, void * dst, size_t len)␊
50{␊
51␉memcpy(dst, src, len);␊
52}␊
53␊
54void bzero(void * dst, size_t len)␊
55{␊
56 memset(dst, 0, len);␊
57}␊
58␊
59#else␊
60void * memcpy(void * dst, const void * src, size_t len)␊
61{␊
62 asm volatile ( "cld \n\t"␊
63 "movl %%ecx, %%edx \n\t"␊
64 "shrl $2, %%ecx \n\t"␊
65 "rep; movsl \n\t"␊
66 "movl %%edx, %%ecx \n\t"␊
67 "andl $3, %%ecx \n\t"␊
68 "rep; movsb \n\t"␊
69 : "=D" (dst)␊
70 : "c" (len), "D" (dst), "S" (src)␊
71 : "memory", "%edx" );␊
72␊
73 return dst;␊
74}␊
75␊
76void bcopy(const void * src, void * dst, size_t len)␊
77{␊
78 asm volatile ( "cld \n\t"␊
79 "movl %%ecx, %%edx \n\t"␊
80 "shrl $2, %%ecx \n\t"␊
81 "rep; movsl \n\t"␊
82 "movl %%edx, %%ecx \n\t"␊
83 "andl $3, %%ecx \n\t"␊
84 "rep; movsb \n\t"␊
85 :␊
86 : "c" (len), "D" (dst), "S" (src)␊
87 : "memory", "%edx" );␊
88}␊
89␊
90void bzero(void * dst, size_t len)␊
91{␊
92 asm volatile ( "xorl %%eax, %%eax \n\t"␊
93 "cld \n\t"␊
94 "movl %%ecx, %%edx \n\t"␊
95 "shrl $2, %%ecx \n\t"␊
96 "rep; stosl \n\t"␊
97 "movl %%edx, %%ecx \n\t"␊
98 "andl $3, %%ecx \n\t"␊
99 "rep; stosb \n\t"␊
100 : ␊
101 : "c" (len), "D" (dst)␊
102 : "memory", "%eax" );␊
103}␊
104#endif␊
105␊
106/* #if DONT_USE_GCC_BUILT_IN_STRLEN */␊
107␊
108#define tolower(c) ((int)((c) & ~0x20))␊
109#define toupper(c) ((int)((c) | 0x20))␊
110␊
111size_t strlen(const char * s)␊
112{␊
113␉int n = 0;␊
114␉while (*s++) n++;␊
115␉return(n);␊
116}␊
117␊
118/*#endif*/␊
119␊
120/* NOTE: Moved from ntfs.c */␊
121int␊
122memcmp(const void *p1, const void *p2, size_t len)␊
123{␊
124 while (len--) {␊
125 if (*(const char*)(p1++) != *(const char*)(p2++))␊
126 return -1;␊
127 }␊
128 return 0;␊
129}␊
130␊
131int␊
132strcmp(const char * s1, const char * s2)␊
133{␊
134␉while (*s1 && (*s1 == *s2)) {␊
135␉␉s1++;␊
136␉␉s2++;␊
137␉}␊
138␉return (*s1 - *s2);␊
139}␊
140␊
141int strncmp(const char * s1, const char * s2, size_t len)␊
142{␊
143␉register int n = len;␊
144␉while (--n >= 0 && *s1 == *s2++)␊
145␉␉if (*s1++ == '\0')␊
146␉␉␉return(0);␊
147␉return(n<0 ? 0 : *s1 - *--s2);␊
148}␊
149␊
150char *␊
151strcpy(char * s1, const char * s2)␊
152{␊
153␉register char *ret = s1;␊
154␉while (*s1++ = *s2++)␊
155␉␉continue;␊
156␉return ret;␊
157}␊
158␊
159char *␊
160strncpy(char * s1, const char * s2, size_t n)␊
161{␊
162␉register char *ret = s1;␊
163␉while (n && (*s1++ = *s2++))␊
164␉␉n--;␊
165␉return ret;␊
166}␊
167␊
168size_t␊
169strlcpy(char * s1, const char * s2, size_t n)␊
170{␊
171␉while (n && (*s1++ = *s2++))␊
172␉␉n--;␊
173␉if (!n) *--s1=0;␊
174␉return strlen(s2);␊
175}␊
176␊
177char *␊
178strstr(const char *in, const char *str)␊
179{␊
180 char c;␊
181 size_t len;␊
182␊
183 c = *str++;␊
184 if (!c)␊
185 return (char *) in;␉// Trivial empty string case␊
186␊
187 len = strlen(str);␊
188 do {␊
189 char sc;␊
190␊
191 do {␊
192 sc = *in++;␊
193 if (!sc)␊
194 return (char *) 0;␊
195 } while (sc != c);␊
196 } while (strncmp(in, str, len) != 0);␊
197␊
198 return (char *) (in - 1);␊
199}␊
200␊
201int␊
202ptol(const char *str)␊
203{␊
204␉register int c = *str;␊
205␊
206␉if (c <= '7' && c >= '0')␊
207␉␉c -= '0';␊
208␉else if (c <= 'h' && c >= 'a')␊
209␉␉c -= 'a';␊
210␉else c = 0;␊
211␉return c;␊
212}␊
213␊
214int␊
215atoi(const char *str)␊
216{␊
217␉register int sum = 0;␊
218␉while (*str == ' ' || *str == '\t')␊
219␉␉str++;␊
220␉while (*str >= '0' && *str <= '9') {␊
221␉␉sum *= 10;␊
222␉␉sum += *str++ - '0';␊
223␉}␊
224␉return sum;␊
225}␊
226␊
227char *strncat(char *s1, const char *s2, size_t n)␊
228{␊
229␉register char *ret = s1;␊
230␉while (*s1)␊
231␉␉s1++;␊
232␉while (n-- && *s2)␊
233␉␉*s1++ = *s2++;␊
234␉*s1 = '\0';␊
235␉return ret;␊
236}␊
237␊
238char *strcat(char *s1, const char *s2)␊
239{␊
240␉return(strncat(s1, s2, strlen(s2)));␊
241}␊
242␊
243char *strdup(const char *s1)␊
244{␊
245␉return strcpy(malloc(strlen(s1) + 1), s1);␊
246}␊
247␊
248#if STRNCASECMP␊
249int strncasecmp(const char *s1, const char *s2, size_t len)␊
250{␊
251␉register int n = len;␊
252␉while (--n >= 0 && tolower(*s1) == tolower(*s2++))␊
253␉␉if (*s1++ == '\0')␊
254␉␉␉return(0);␊
255␉return(n<0 ? 0 : tolower(*s1) - tolower(*--s2));␊
256}␊
257#endif␊
258␊
259char* strchr(const char *str, int c)␊
260{␊
261 do␊
262 {␊
263 if(*str == c)␊
264 return (char*)str;␊
265 }␊
266 while(*(str++));␊
267 ␊
268 return 0;␊
269} ␊
270 ␊
271char* strbreak(const char *str, char **next, long *len)␊
272{␊
273 char *start = (char*)str, *end;␊
274 bool quoted = false;␊
275 ␊
276 if ( !start || !len )␊
277 return 0;␊
278 ␊
279 *len = 0;␊
280 ␊
281 while ( isspace(*start) )␊
282 start++;␊
283 ␊
284 if (*start == '"')␊
285 {␊
286 start++;␊
287 ␊
288 end = strchr(start, '"');␊
289 if(end)␊
290 quoted = true;␊
291 else␊
292 end = strchr(start, '\0');␊
293 }␊
294 else␊
295 {␊
296 for ( end = start; *end && !isspace(*end); end++ )␊
297 {}␊
298 }␊
299 ␊
300 *len = end - start;␊
301 ␊
302 if(next)␊
303 *next = quoted ? end+1 : end;␊
304 ␊
305 return start;␊
306}␊
307␊
308/* COPYRIGHT NOTICE: checksum8 from AppleSMBIOS */␊
309uint8_t checksum8( void * start, unsigned int length )␊
310{␊
311 uint8_t csum = 0;␊
312 uint8_t * cp = (uint8_t *) start;␊
313 unsigned int i;␊
314␊
315 for ( i = 0; i < length; i++)␊
316 csum += *cp++;␊
317␊
318 return csum;␊
319}␊
320␊
321

Archive Download this file

Revision: 1808