File: strdup.c

package info (click to toggle)
gclcvs 2.7.0-101
  • links: PTS
  • area: main
  • in suites: squeeze
  • size: 135,252 kB
  • ctags: 174,324
  • sloc: ansic: 986,459; asm: 311,430; lisp: 242,735; exp: 45,962; makefile: 42,669; sh: 30,705; cpp: 13,316; yacc: 6,093; perl: 3,454; tcl: 3,179; lex: 1,620; sed: 688; pascal: 175; awk: 56; fortran: 24; csh: 23
file content (32 lines) | stat: -rw-r--r-- 662 bytes parent folder | download | duplicates (23) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
 
/*

@deftypefn Supplemental char* strdup (const char *@var{s})

Returns a pointer to a copy of @var{s} in memory obtained from
@code{malloc}, or @code{NULL} if insufficient memory was available.

@end deftypefn

*/

#include <ansidecl.h>
#ifdef ANSI_PROTOTYPES
#include <stddef.h>
#else
#define size_t unsigned long
#endif

extern size_t	strlen PARAMS ((const char*));
extern PTR	malloc PARAMS ((size_t));
extern PTR	memcpy PARAMS ((PTR, const PTR, size_t));

char *
strdup(s)
     const char *s;
{
  size_t len = strlen (s) + 1;
  char *result = (char*) malloc (len);
  if (result == (char*) 0)
    return (char*) 0;
  return (char*) memcpy (result, s, len);
}