1 /*
2 20130505
3 Jan Mojzis
4 Public domain.
5 */
6
7 #include "str.h"
8
str_len(const char * s)9 long long str_len(const char *s) {
10
11 long long i;
12
13 for (i = 0; s[i]; ++i);
14 return i;
15 }
16
17
str_chr(const char * s,int c)18 long long str_chr(const char *s, int c) {
19
20 long long i;
21 char ch = c;
22
23 for (i = 0; s[i]; ++i) if (s[i] == ch) break;
24 return i;
25 }
26
str_rchr(const char * s,int c)27 long long str_rchr(const char *s, int c) {
28
29 long long i, u = -1;
30 char ch = c;
31
32 for (i = 0; s[i]; ++i) if (s[i] == ch) u = i;
33 if (u != -1) return u;
34 return i;
35 }
36
str_diff(const char * s,const char * t)37 int str_diff(const char *s, const char *t) {
38
39 register char x;
40
41 for (;;) {
42 x = *s; if (x != *t) break; if (!x) break; ++s; ++t;
43 x = *s; if (x != *t) break; if (!x) break; ++s; ++t;
44 x = *s; if (x != *t) break; if (!x) break; ++s; ++t;
45 x = *s; if (x != *t) break; if (!x) break; ++s; ++t;
46 }
47 return ((int)(unsigned int)(unsigned char) x)
48 - ((int)(unsigned int)(unsigned char) *t);
49 }
50
str_start(const char * s,const char * t)51 int str_start(const char *s, const char *t) {
52
53 char x;
54
55 for (;;) {
56 x = *t++; if (!x) return 1; if (x != *s++) return 0;
57 x = *t++; if (!x) return 1; if (x != *s++) return 0;
58 x = *t++; if (!x) return 1; if (x != *s++) return 0;
59 x = *t++; if (!x) return 1; if (x != *s++) return 0;
60 }
61 }
62
63