lib/sh/stringlist.c

64 strlist_resize (sl, n)
65      STRINGLIST *sl;
70   if (sl == 0)
71     return (sl = strlist_create (n));
73   if (n > sl->list_size)
75       sl->list = strvec_resize (sl->list, n + 1);
76       for (i = sl->list_size; i <= n; i++)
77 	sl->list[i] = (char *)NULL;
78       sl->list_size = n;
80   return sl;
84 strlist_flush (sl)
85      STRINGLIST *sl;
87   if (sl == 0 || sl->list == 0)
89   strvec_flush (sl->list);
90   sl->list_len = 0;
94 strlist_dispose (sl)
95      STRINGLIST *sl;
97   if (sl == 0)
99   if (sl->list)
100     strvec_dispose (sl->list);
101   free (sl);
105 strlist_remove (sl, s)
106      STRINGLIST *sl;
111   if (sl == 0 || sl->list == 0 || sl->list_len == 0)
114   r = strvec_remove (sl->list, s);
116     sl->list_len--;
121 strlist_copy (sl)
122      STRINGLIST *sl;
127   if (sl == 0)
129   new = strlist_create (sl->list_size);
131   if (sl->list)
133       for (i = 0; i < sl->list_size; i++)
134 	new->list[i] = STRDUP (sl->list[i]);
136   new->list_size = sl->list_size;
137   new->list_len = sl->list_len;
150   STRINGLIST *sl;
156   sl = strlist_create (l1 + l2 + 1);
158     sl->list[n] = STRDUP (m1->list[i]);
160     sl->list[n] = STRDUP (m2->list[i]);
161   sl->list_len = n;
162   sl->list[n] = (char *)NULL;
163   return (sl);
192 strlist_prefix_suffix (sl, prefix, suffix)
193      STRINGLIST *sl;
199   if (sl == 0 || sl->list == 0 || sl->list_len == 0)
200     return sl;
206     return (sl);
208   for (i = 0; i < sl->list_len; i++)
210       llen = STRLEN (sl->list[i]);
215       strcpy (t + plen, sl->list[i]);
218       free (sl->list[i]);
219       sl->list[i] = t;
222   return (sl);
226 strlist_print (sl, prefix)
227      STRINGLIST *sl;
232   if (sl == 0)
234   for (i = 0; i < sl->list_len; i++)
235     printf ("%s%s\n", prefix ? prefix : "", sl->list[i]);
239 strlist_walk (sl, func)
240      STRINGLIST *sl;
245   if (sl == 0)
247   for (i = 0; i < sl->list_len; i++)
248     if ((*func)(sl->list[i]) < 0)
253 strlist_sort (sl)
254      STRINGLIST *sl;
256   if (sl == 0 || sl->list_len == 0 || sl->list == 0)
258   strvec_sort (sl->list);
286 strlist_to_word_list (sl, alloc, starting_index)
287      STRINGLIST *sl;
292   if (sl == 0 || sl->list == 0)
295   list = strvec_to_word_list (sl->list, alloc, starting_index);