1  /* Copyright (C) 1996-2023 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)