Various: Remove argument validation after profiling.
[collection4.git] / src / utils_array.c
1 /**
2  * collection4 - utils_array.c
3  * Copyright (C) 2010  Florian octo Forster
4  * 
5  * This program is free software; you can redistribute it and/or
6  * modify it under the terms of the GNU Lesser General Public
7  * License as published by the Free Software Foundation; either
8  * version 2.1 of the License, or (at your option) any later version.
9  * 
10  * This program is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * Lesser General Public License for more details.
14  * 
15  * You should have received a copy of the GNU Lesser General Public
16  * License along with this program; if not, write to the Free Software
17  * Foundation, Inc., 51 Franklin Street, Fifth Floor,
18  * Boston, MA  02110-1301  USA
19  *
20  * Authors:
21  *   Florian octo Forster <ff at octo.it>
22  **/
23
24 #include <stdlib.h>
25 #include <stdio.h>
26 #include <stdarg.h>
27 #include <string.h>
28 #include <errno.h>
29
30 #include "utils_array.h"
31
32 struct str_array_s
33 {
34   char **ptr;
35   size_t size;
36 };
37
38 static int sort_callback (const void *v0, const void *v1) /* {{{ */
39 {
40   const char *c0 = v0;
41   const char *c1 = v1;
42
43   return (strcmp (c0, c1));
44 } /* }}} int sort_callback */
45
46 str_array_t *array_create (void) /* {{{ */
47 {
48   str_array_t *a;
49
50   a = malloc (sizeof (*a));
51   if (a == NULL)
52     return (NULL);
53
54   memset (a, 0, sizeof (*a));
55   a->ptr = NULL;
56   a->size = 0;
57
58   return (a);
59 } /* }}} str_array_t *array_create */
60
61 void array_destroy (str_array_t *a) /* {{{ */
62 {
63   if (a == NULL)
64     return;
65
66   free (a->ptr);
67   a->ptr = NULL;
68   a->size = 0;
69
70   free (a);
71 } /* }}} void array_destroy */
72
73 int array_append (str_array_t *a, const char *entry) /* {{{ */
74 {
75   char **ptr;
76
77   if ((entry == NULL) || (a == NULL))
78     return (EINVAL);
79
80   ptr = realloc (a->ptr, sizeof (*a->ptr) * (a->size + 1));
81   if (ptr == NULL)
82     return (ENOMEM);
83   a->ptr = ptr;
84   ptr = a->ptr + a->size;
85
86   *ptr = strdup (entry);
87   if (*ptr == NULL)
88     return (ENOMEM);
89
90   a->size++;
91   return (0);
92 } /* }}} int array_append */
93
94 int array_append_format (str_array_t *a, const char *format, ...) /* {{{ */
95 {
96   char buffer[1024];
97   va_list ap;
98   int status;
99
100   va_start (ap, format);
101   status = vsnprintf (buffer, sizeof (buffer), format, ap);
102   va_end(ap);
103
104   if ((status < 0) || (((size_t) status) >= sizeof (buffer)))
105     return (ENOMEM);
106
107   return (array_append (a, buffer));
108 } /* }}} int array_append_format */
109
110 int array_prepend (str_array_t *a, const char *entry) /* {{{ */
111 {
112   char **ptr;
113   char *cpy;
114
115   if ((entry == NULL) || (a == NULL))
116     return (EINVAL);
117
118   cpy = strdup (entry);
119   if (cpy == NULL)
120     return (ENOMEM);
121
122   ptr = realloc (a->ptr, sizeof (*a->ptr) * (a->size + 1));
123   if (ptr == NULL)
124   {
125     free (cpy);
126     return (ENOMEM);
127   }
128   a->ptr = ptr;
129
130   memmove (a->ptr + 1, a->ptr, sizeof (*a->ptr) * a->size);
131   a->ptr[0] = cpy;
132   a->size++;
133
134   return (0);
135 } /* }}} int array_prepend */
136
137 int array_prepend_format (str_array_t *a, const char *format, ...) /* {{{ */
138 {
139   char buffer[1024];
140   va_list ap;
141   int status;
142
143   va_start (ap, format);
144   status = vsnprintf (buffer, sizeof (buffer), format, ap);
145   va_end(ap);
146
147   if ((status < 0) || (((size_t) status) >= sizeof (buffer)))
148     return (ENOMEM);
149
150   return (array_prepend (a, buffer));
151 } /* }}} int array_prepend_format */
152
153 int array_sort (str_array_t *a) /* {{{ */
154 {
155   if (a == NULL)
156     return (EINVAL);
157
158   qsort (a->ptr, a->size, sizeof (*a->ptr), sort_callback);
159
160   return (0);
161 } /* }}} int array_sort */
162
163 int array_argc (str_array_t *a) /* {{{ */
164 {
165   if (a == NULL)
166     return (-1);
167
168   return ((int) a->size);
169 } /* }}} int array_argc */
170
171 char **array_argv (str_array_t *a) /* {{{ */
172 {
173   if ((a == NULL) || (a->size == 0))
174     return (NULL);
175
176   return (a->ptr);
177 } /* }}} char **array_argv */
178
179 /* vim: set sw=2 sts=2 et fdm=marker : */