OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [or1ksim/] [port/] [strndup.c] - Blame information for rev 639

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 19 jeremybenn
/* strndup.c -- Substitute implementation of strndup ()
2
 
3
   Copyright (C) 1999 Damjan Lampret, lampret@opencores.org
4
   Copyright (C) 2008 Embecosm Limited
5
 
6
   Contributor Jeremy Bennett <jeremy.bennett@embecosm.com>
7
 
8
   This file is part of Or1ksim, the OpenRISC 1000 Architectural Simulator.
9
 
10
   This program is free software; you can redistribute it and/or modify it
11
   under the terms of the GNU General Public License as published by the Free
12
   Software Foundation; either version 3 of the License, or (at your option)
13
   any later version.
14
 
15
   This program is distributed in the hope that it will be useful, but WITHOUT
16
   ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
17
   FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
18
   more details.
19
 
20
   You should have received a copy of the GNU General Public License along
21
   with this program.  If not, see <http://www.gnu.org/licenses/>.  */
22
 
23
/* This program is commented throughout in a fashion suitable for processing
24
   with Doxygen. */
25
 
26
 
27
/* Autoconf and/or portability configuration */
28
#include "config.h"
29
 
30
 
31
#ifndef HAVE_STRNDUP
32 82 jeremybenn
 
33 96 jeremybenn
/* the definition of size_t is provided in stddef.h.
34
 
35
   Mark Jarvin patch notes that stdlib.h and string.h are also needed. */
36 60 jeremybenn
#include <stddef.h>
37 96 jeremybenn
#include <stdlib.h>
38
#include <string.h>
39 19 jeremybenn
 
40
/* Taken from glibc */
41
char *
42
strndup (const char *s, size_t n)
43
{
44
        char *new;
45
        size_t len = strlen (s);
46
        if (len>n)
47
                len=n;
48
 
49
        new = (char *) malloc (len + 1);
50
 
51
        if (new == NULL)
52
                return NULL;
53
 
54
        new[len] = '\0';
55
        return (char *) memcpy (new, s, len);
56
}
57
 
58
#endif  /* HAVE_STRNDUP */

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.