1  /* Implement the xstrndup function.
       2     Copyright (C) 2005-2023 Free Software Foundation, Inc.
       3     Written by Kaveh R. Ghazi <ghazi@caip.rutgers.edu>.
       4  
       5  This file is part of the libiberty library.
       6  Libiberty is free software; you can redistribute it and/or
       7  modify it under the terms of the GNU Library General Public
       8  License as published by the Free Software Foundation; either
       9  version 2 of the License, or (at your option) any later version.
      10  
      11  Libiberty is distributed in the hope that it will be useful,
      12  but WITHOUT ANY WARRANTY; without even the implied warranty of
      13  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
      14  Library General Public License for more details.
      15  
      16  You should have received a copy of the GNU Library General Public
      17  License along with libiberty; see the file COPYING.LIB.  If
      18  not, write to the Free Software Foundation, Inc., 51 Franklin Street - Fifth Floor,
      19  Boston, MA 02110-1301, USA.  */
      20  
      21  /*
      22  
      23  @deftypefn Replacement char* xstrndup (const char *@var{s}, size_t @var{n})
      24  
      25  Returns a pointer to a copy of @var{s} with at most @var{n} characters
      26  without fail, using @code{xmalloc} to obtain memory.  The result is
      27  always NUL terminated.
      28  
      29  @end deftypefn
      30  
      31  */
      32  
      33  #ifdef HAVE_CONFIG_H
      34  #include "config.h"
      35  #endif
      36  #include <sys/types.h>
      37  #ifdef HAVE_STRING_H
      38  #include <string.h>
      39  #else
      40  # ifdef HAVE_STRINGS_H
      41  #  include <strings.h>
      42  # endif
      43  #endif
      44  #include "ansidecl.h"
      45  #include "libiberty.h"
      46  
      47  char *
      48  xstrndup (const char *s, size_t n)
      49  {
      50    char *result;
      51    size_t len = strnlen (s, n);
      52  
      53    result = XNEWVEC (char, len + 1);
      54  
      55    result[len] = '\0';
      56    return (char *) memcpy (result, s, len);
      57  }