string/argz-ctsep.c

   1 /* Copyright (C) 1996-2022 Free Software Foundation, Inc.
   2    This file is part of the GNU C Library.
   3
   4    The GNU C Library is free software; you can redistribute it and/or
   5    modify it under the terms of the GNU Lesser General Public
   6    License as published by the Free Software Foundation; either
   7    version 2.1 of the License, or (at your option) any later version.
   8
   9    The GNU C Library is distributed in the hope that it will be useful,
  10    but WITHOUT ANY WARRANTY; without even the implied warranty of
  11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12    Lesser General Public License for more details.
  13
  14    You should have received a copy of the GNU Lesser General Public
  15    License along with the GNU C Library; if not, see
  16    <https://www.gnu.org/licenses/>.  */
  17
  18 #include <argz.h>
  19 #include <errno.h>
  20 #include <stdlib.h>
  21 #include <string.h>
  22
  23
  24 error_t
  25 __argz_create_sep (const char *string, int delim, char **argz, size_t *len)
  26 {
  27   size_t nlen = strlen (string) + 1;
  28
  29   if (nlen > 1)
  30     {
  31       const char *rp;
  32       char *wp;
  33
  34       *argz = (char *) malloc (nlen);
  35       if (*argz == NULL)
  36         return ENOMEM;
  37
  38       rp = string;
  39       wp = *argz;
  40       do
  41         if (*rp == delim)
  42           {
  43             if (wp > *argz && wp[-1] != '\0')
  44               *wp++ = '\0';
  45             else
  46               --nlen;
  47           }
  48         else
  49           *wp++ = *rp;
  50       while (*rp++ != '\0');
  51
  52       if (nlen == 0)
  53         {
  54           free (*argz);
  55           *argz = NULL;
  56           *len = 0;
  57         }
  58
  59       *len = nlen;
  60     }
  61   else
  62     {
  63       *argz = NULL;
  64       *len = 0;
  65     }
  66
  67   return 0;
  68 }
  69 weak_alias (__argz_create_sep, argz_create_sep)