librols/strdup.c

   1 /*
   2  * This file has been modified for the cdrkit suite.
   3  *
   4  * The behaviour and appearence of the program code below can differ to a major
   5  * extent from the version distributed by the original author(s).
   6  *
   7  * For details, see Changelog file distributed with the cdrkit package. If you
   8  * received this file from another source then ask the distributing person for
   9  * a log of modifications.
  10  *
  11  */
  12
  13 /* @(#)strdup.c 1.1 03/02/27 Copyright 2003 J. Schilling */
  14 /*
  15  *      strdup() to be used if missing on libc
  16  *
  17  *      Copyright (c) 2003 J. Schilling
  18  */
  19 /*
  20  * This program is free software; you can redistribute it and/or modify
  21  * it under the terms of the GNU General Public License version 2
  22  * as published by the Free Software Foundation.
  23  *
  24  * This program is distributed in the hope that it will be useful,
  25  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  26  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  27  * GNU General Public License for more details.
  28  *
  29  * You should have received a copy of the GNU General Public License along with
  30  * this program; see the file COPYING.  If not, write to the Free Software
  31  * Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  32  */
  33
  34 #include <mconfig.h>
  35 #include <standard.h>
  36 #include <stdxlib.h>
  37 #include <strdefs.h>
  38 #include <schily.h>
  39 #include <libport.h>
  40
  41 #ifndef HAVE_STRDUP
  42
  43 EXPORT char *
  44 strdup(s)
  45         const char      *s;
  46 {
  47         unsigned i      = strlen(s) + 1;
  48         char     *res   = malloc(i);
  49
  50         if (res == NULL)
  51                 return (NULL);
  52         if (i > 16) {
  53                 movebytes(s, res, (int) i);
  54         } else {
  55                 char    *s2 = res;
  56
  57                 while ((*s2++ = *s++) != '\0')
  58                         ;
  59         }
  60         return (res);
  61 }
  62 #endif  /* HAVE_STRDUP */