1 /* PSPP - computes sample statistics.
2 Copyright (C) 1997-9, 2000 Free Software Foundation, Inc.
3 Written by Ben Pfaff <blp@gnu.org>.
5 This program is free software; you can redistribute it and/or
6 modify it under the terms of the GNU General Public License as
7 published by the Free Software Foundation; either version 2 of the
8 License, or (at your option) any later version.
10 This program is distributed in the hope that it will be useful, but
11 WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software
17 Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
23 /* Headers and miscellaneous. */
33 #define strrchr rindex
36 char *strchr (), *strrchr ();
40 char *strtok_r (char *, const char *, char **);
44 char *stpcpy (char *dest, const char *src);
48 int strcasecmp (const char *s1, const char *s2);
52 int strncasecmp (const char *s1, const char *s2, size_t n);
56 void *memmem (const void *haystack, size_t haystack_len,
57 const void *needle, size_t needle_len);
60 /* sprintf() wrapper functions for convenience. */
62 /* spprintf() calls sprintf() and returns the address of the null
63 terminator in the resulting string. It should be portable the way
64 it's been implemented. */
67 #define spprintf(BUF, FORMAT, ARGS...) \
68 ((BUF) + sprintf ((BUF), (FORMAT) , ## ARGS))
70 #define spprintf(BUF, FORMAT, ARGS...) \
71 ({ sprintf ((BUF), (FORMAT) , ## ARGS); \
74 #else /* Not GNU C. */
75 char *spprintf (char *buf, const char *format, ...);
76 #endif /* Not GNU C. */
78 /* nsprintf() calls sprintf() and returns the strlen() of the
79 resulting string. It should be portable the way it's been
83 #define nsprintf(BUF, FORMAT, ARGS...) \
84 (sprintf ((BUF), (FORMAT) , ## ARGS))
85 #define nvsprintf(BUF, FORMAT, ARGS) \
86 (vsprintf ((BUF), (FORMAT), (ARGS)))
87 #else /* Not good sprintf(). */
88 #define nsprintf(BUF, FORMAT, ARGS...) \
91 sprintf ((pbuf), (FORMAT) , ## ARGS); \
94 #define nvsprintf(BUF, FORMAT, ARGS) \
97 vsprintf ((pbuf), (FORMAT), (ARGS)); \
100 #endif /* Not good sprintf(). */
101 #else /* Not GNU C. */
102 #if HAVE_GOOD_SPRINTF
103 #define nsprintf sprintf
104 #define nvsprintf vsprintf
105 #else /* Not good sprintf(). */
106 int nsprintf (char *buf, const char *format, ...);
107 int nvsprintf (char *buf, const char *format, va_list args);
108 #endif /* Not good sprintf(). */
109 #endif /* Not GNU C. */
112 long getline (char **lineptr, size_t *n, FILE *stream);
116 long getdelim (char **lineptr, size_t * n, int delimiter, FILE * stream);
121 void buf_reverse (char *, size_t);
122 char *buf_find_reverse (const char *, size_t, const char *, size_t);
123 int buf_compare_case (const char *, const char *, size_t);
124 int buf_compare_rpad (const char *, size_t, const char *, size_t);
125 void buf_copy_rpad (char *, size_t, const char *, size_t);
126 void buf_copy_str_lpad (char *, size_t, const char *);
127 void buf_copy_str_rpad (char *, size_t, const char *);
129 int str_compare_rpad (const char *, const char *);
130 void str_copy_rpad (char *, size_t, const char *);
131 void str_copy_trunc (char *, size_t, const char *);
132 void str_uppercase (char *);
134 /* Fixed-length strings. */
141 void ls_create (struct fixed_string *, const char *);
142 void ls_create_buffer (struct fixed_string *,
143 const char *, size_t len);
144 void ls_init (struct fixed_string *, const char *, size_t);
145 void ls_shallow_copy (struct fixed_string *, const struct fixed_string *);
146 void ls_destroy (struct fixed_string *);
148 void ls_null (struct fixed_string *);
149 int ls_null_p (const struct fixed_string *);
150 int ls_empty_p (const struct fixed_string *);
152 size_t ls_length (const struct fixed_string *);
153 char *ls_c_str (const struct fixed_string *);
154 char *ls_end (const struct fixed_string *);
158 ls_length (const struct fixed_string *st)
164 ls_c_str (const struct fixed_string *st)
170 ls_end (const struct fixed_string *st)
172 return st->string + st->length;
176 /* Variable length strings. */
180 size_t length; /* Length, not including a null terminator. */
181 size_t capacity; /* Allocated capacity, not including one
182 extra byte allocated for null terminator. */
183 char *string; /* String data, not necessarily null
187 /* Constructors, destructors. */
188 void ds_create (struct string *, const char *);
189 void ds_init (struct string *, size_t);
190 void ds_destroy (struct string *);
192 /* Copy, shrink, extend. */
193 void ds_replace (struct string *, const char *);
194 void ds_clear (struct string *);
195 void ds_extend (struct string *, size_t);
196 void ds_shrink (struct string *);
197 void ds_truncate (struct string *, size_t);
198 void ds_rpad (struct string *, size_t length, char pad);
201 size_t ds_length (const struct string *);
202 char *ds_c_str (const struct string *);
203 char *ds_data (const struct string *);
204 char *ds_end (const struct string *);
205 size_t ds_capacity (const struct string *);
209 int ds_gets (struct string *, FILE *);
210 int ds_get_config_line (FILE *, struct string *, struct file_locator *);
213 void ds_putc (struct string *, int ch);
214 void ds_puts (struct string *, const char *);
215 void ds_concat (struct string *, const char *, size_t);
216 void ds_vprintf (struct string *st, const char *, va_list);
217 void ds_printf (struct string *, const char *, ...)
218 PRINTF_FORMAT (2, 3);
222 ds_putc (struct string *st, int ch)
224 if (st->length == st->capacity)
225 ds_extend (st, st->length + 1);
226 st->string[st->length++] = ch;
230 ds_length (const struct string *st)
236 ds_c_str (const struct string *st)
238 ((char *) st->string)[st->length] = '\0';
243 ds_data (const struct string *st)
249 ds_end (const struct string *st)
251 return st->string + st->length;