12
12
You should have received a copy of the GNU General Public License
13
13
along with this program; if not, write to the Free Software
14
Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA */
14
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */
16
16
/* There may be prolems include all of theese. Try to test in
17
17
configure with ones are needed? */
21
#ifndef DRIZZLED_INTERNAL_M_STRING_H
22
#define DRIZZLED_INTERNAL_M_STRING_H
19
/* This is needed for the definitions of strchr... on solaris */
25
#include <drizzled/global.h>
28
#define __USE_GNU /* We want to use stpcpy */
24
30
#if defined(HAVE_STRINGS_H)
25
31
#include <strings.h>
56
68
extern char *strfill(char * s,size_t len,char fill);
57
69
extern char *strkey(char *dst,char *head,char *tail,char *flags);
58
70
extern char *strmake(char *dst,const char *src,size_t length);
71
#ifndef strmake_overlapp
72
extern char *strmake_overlapp(char *dst,const char *src, size_t length);
60
75
extern char *strsuff(const char *src,const char *suffix);
61
76
extern char *strxcat(char *dst,const char *src, ...);
62
77
extern char *strxmov(char *dst,const char *src, ...);
63
78
extern char *strxcpy(char *dst,const char *src, ...);
64
79
extern char *strxncat(char *dst,size_t len, const char *src, ...);
80
extern char *strxnmov(char *dst,size_t len, const char *src, ...);
65
81
extern char *strxncpy(char *dst,size_t len, const char *src, ...);
83
/* Prototypes of normal stringfunctions (with may ours) */
85
#ifdef WANT_STRING_PROTOTYPES
86
extern char *strcat(char *, const char *);
87
extern char *strchr(const char *, char);
88
extern char *strrchr(const char *, char);
89
extern char *strcpy(char *, const char *);
93
char *stpncpy(register char *dst, register const char *src, size_t n);
96
#if !defined(__cplusplus)
98
extern char *strpbrk(const char *, const char *);
101
extern int is_prefix(const char *, const char *);
67
103
/* Conversion routines */
69
105
MY_GCVT_ARG_FLOAT,
70
106
MY_GCVT_ARG_DOUBLE
71
107
} my_gcvt_arg_type;
73
DRIZZLED_API double my_strtod(const char *str, char **end, int *error);
74
DRIZZLED_API double my_atof(const char *nptr);
75
DRIZZLED_API size_t my_fcvt(double x, int precision, char *to, bool *error);
76
DRIZZLED_API size_t my_gcvt(double x, my_gcvt_arg_type type, int width, char *to,
109
double my_strtod(const char *str, char **end, int *error);
110
double my_atof(const char *nptr);
111
size_t my_fcvt(double x, int precision, char *to, bool *error);
112
size_t my_gcvt(double x, my_gcvt_arg_type type, int width, char *to,
79
#define NOT_FIXED_DEC (uint8_t)31
115
#define NOT_FIXED_DEC 31
82
118
The longest string my_fcvt can return is 311 + "precision" bytes.
100
136
(DBL_DIG + 2) significant digits + sign + "." + ("e-NNN" or
101
137
MAX_DECPT_FOR_F_FORMAT zeros for cases when |x|<1 and the 'f' format is used).
103
#define MY_GCVT_MAX_FIELD_WIDTH (DBL_DIG + 4 + cmax(5, MAX_DECPT_FOR_F_FORMAT))
139
#define MY_GCVT_MAX_FIELD_WIDTH (DBL_DIG + 4 + max(5, MAX_DECPT_FOR_F_FORMAT))
106
142
extern char *llstr(int64_t value,char *buff);
107
143
extern char *ullstr(int64_t value,char *buff);
109
extern char *int2str(int32_t val, char *dst, int radix, int upcase);
110
extern char *int10_to_str(int32_t val,char *dst,int radix);
111
DRIZZLED_API int64_t my_strtoll10(const char *nptr, char **endptr, int *error);
112
DRIZZLED_API char *int64_t2str(int64_t val,char *dst,int radix);
113
DRIZZLED_API char *int64_t10_to_str(int64_t val,char *dst,int radix);
145
extern char *int2str(long val, char *dst, int radix, int upcase);
146
extern char *int10_to_str(long val,char *dst,int radix);
147
extern char *str2int(const char *src,int radix,long lower,long upper,
149
int64_t my_strtoll10(const char *nptr, char **endptr, int *error);
150
#if SIZEOF_LONG == SIZEOF_LONG_LONG
151
#define int64_t2str(A,B,C) int2str((A),(B),(C),1)
152
#define int64_t10_to_str(A,B,C) int10_to_str((A),(B),(C))
154
extern char *int64_t2str(int64_t val,char *dst,int radix);
155
extern char *int64_t10_to_str(int64_t val,char *dst,int radix);
159
#if defined(__cplusplus)
164
LEX_STRING -- a pair of a C-string and its length.
168
/* This definition must match the one given in mysql/plugin.h */
169
struct st_mysql_lex_string
175
typedef struct st_mysql_lex_string LEX_STRING;
177
#define STRING_WITH_LEN(X) (X), ((size_t) (sizeof(X) - 1))
178
#define USTRING_WITH_LEN(X) ((unsigned char*) X), ((size_t) (sizeof(X) - 1))
179
#define C_STRING_WITH_LEN(X) ((char *) (X)), ((size_t) (sizeof(X) - 1))
181
/* SPACE_INT is a word that contains only spaces */
183
#define SPACE_INT 0x20202020
184
#elif SIZEOF_INT == 8
185
#define SPACE_INT 0x2020202020202020
187
#error define the appropriate constant for a word full of spaces
117
191
Skip trailing space.
193
On most systems reading memory in larger chunks (ideally equal to the size of
194
the chinks that the machine physically reads from memory) causes fewer memory
195
access loops and hence increased performance.
196
This is why the 'int' type is used : it's closest to that (according to how
198
So when we determine the amount of whitespace at the end of a string we do
200
1. We divide the string into 3 zones :
201
a) from the start of the string (__start) to the first multiple
202
of sizeof(int) (__start_words)
203
b) from the end of the string (__end) to the last multiple of sizeof(int)
205
c) a zone that is aligned to sizeof(int) and can be safely accessed
207
2. We start comparing backwards from (c) char-by-char. If all we find is
208
space then we continue
209
3. If there are elements in zone (b) we compare them as unsigned ints to a
210
int mask (SPACE_INT) consisting of all spaces
211
4. Finally we compare the remaining part (a) of the string char by char.
212
This covers for the last non-space unsigned int from 3. (if any)
214
This algorithm works well for relatively larger strings, but it will slow
215
the things down for smaller strings (because of the additional calculations
216
and checks compared to the naive method). Thus the barrier of length 20
119
219
@param ptr pointer to the input string
120
220
@param len the length of the string
121
221
@return the last non-space character
124
static inline const unsigned char *
125
skip_trailing_space(const unsigned char *ptr, size_t len)
224
static inline const unsigned char *skip_trailing_space(const unsigned char *ptr,size_t len)
127
226
const unsigned char *end= ptr + len;
129
while (end > ptr && isspace(*--end))
230
const unsigned char *end_words= (const unsigned char *)(intptr_t)
231
(((uint64_t)(intptr_t)end) / SIZEOF_INT * SIZEOF_INT);
232
const unsigned char *start_words= (const unsigned char *)(intptr_t)
233
((((uint64_t)(intptr_t)ptr) + SIZEOF_INT - 1) / SIZEOF_INT * SIZEOF_INT);
235
assert(((uint64_t)(intptr_t)ptr) >= SIZEOF_INT);
238
while (end > end_words && end[-1] == 0x20)
240
if (end[-1] == 0x20 && start_words < end_words)
241
while (end > start_words && ((const unsigned *)end)[-1] == SPACE_INT)
245
while (end > ptr && end[-1] == 0x20)
134
} /* namespace internal */
135
} /* namespace drizzled */
137
#endif /* DRIZZLED_INTERNAL_M_STRING_H */