Add trunc and truncf.
[dragonfly.git] / crypto / openssh-4 / xmalloc.c
1 /* $OpenBSD: xmalloc.c,v 1.27 2006/08/03 03:34:42 deraadt Exp $ */
2 /*
3  * Author: Tatu Ylonen <ylo@cs.hut.fi>
4  * Copyright (c) 1995 Tatu Ylonen <ylo@cs.hut.fi>, Espoo, Finland
5  *                    All rights reserved
6  * Versions of malloc and friends that check their results, and never return
7  * failure (they call fatal if they encounter an error).
8  *
9  * As far as I am concerned, the code I have written for this software
10  * can be used freely for any purpose.  Any derived versions of this
11  * software must be clearly marked as such, and if the derived work is
12  * incompatible with the protocol description in the RFC file, it must be
13  * called by a name other than "ssh" or "Secure Shell".
14  */
15
16 #include "includes.h"
17
18 #include <sys/param.h>
19 #include <stdarg.h>
20 #include <stdio.h>
21 #include <stdlib.h>
22 #include <string.h>
23
24 #include "xmalloc.h"
25 #include "log.h"
26
27 void *
28 xmalloc(size_t size)
29 {
30         void *ptr;
31
32         if (size == 0)
33                 fatal("xmalloc: zero size");
34         ptr = malloc(size);
35         if (ptr == NULL)
36                 fatal("xmalloc: out of memory (allocating %lu bytes)", (u_long) size);
37         return ptr;
38 }
39
40 void *
41 xcalloc(size_t nmemb, size_t size)
42 {
43         void *ptr;
44
45         if (size == 0 || nmemb == 0)
46                 fatal("xcalloc: zero size");
47         if (SIZE_T_MAX / nmemb < size)
48                 fatal("xcalloc: nmemb * size > SIZE_T_MAX");
49         ptr = calloc(nmemb, size);
50         if (ptr == NULL)
51                 fatal("xcalloc: out of memory (allocating %lu bytes)",
52                     (u_long)(size * nmemb));
53         return ptr;
54 }
55
56 void *
57 xrealloc(void *ptr, size_t nmemb, size_t size)
58 {
59         void *new_ptr;
60         size_t new_size = nmemb * size;
61
62         if (new_size == 0)
63                 fatal("xrealloc: zero size");
64         if (SIZE_T_MAX / nmemb < size)
65                 fatal("xrealloc: nmemb * size > SIZE_T_MAX");
66         if (ptr == NULL)
67                 new_ptr = malloc(new_size);
68         else
69                 new_ptr = realloc(ptr, new_size);
70         if (new_ptr == NULL)
71                 fatal("xrealloc: out of memory (new_size %lu bytes)",
72                     (u_long) new_size);
73         return new_ptr;
74 }
75
76 void
77 xfree(void *ptr)
78 {
79         if (ptr == NULL)
80                 fatal("xfree: NULL pointer given as argument");
81         free(ptr);
82 }
83
84 char *
85 xstrdup(const char *str)
86 {
87         size_t len;
88         char *cp;
89
90         len = strlen(str) + 1;
91         cp = xmalloc(len);
92         strlcpy(cp, str, len);
93         return cp;
94 }
95
96 int
97 xasprintf(char **ret, const char *fmt, ...)
98 {
99         va_list ap;
100         int i;
101
102         va_start(ap, fmt);
103         i = vasprintf(ret, fmt, ap);
104         va_end(ap);
105
106         if (i < 0 || *ret == NULL)
107                 fatal("xasprintf: could not allocate memory");
108
109         return (i);
110 }