|
1 /* |
|
2 * libtu/misc.c |
|
3 * |
|
4 * Copyright (c) Tuomo Valkonen 1999-2000. |
|
5 * |
|
6 * This file is distributed under the terms of the "Artistic License". |
|
7 * See the included file LICENSE for details. |
|
8 */ |
|
9 |
|
10 #include <stdlib.h> |
|
11 #include <stdio.h> |
|
12 #include <string.h> |
|
13 #include <malloc.h> |
|
14 |
|
15 #include "include/misc.h" |
|
16 |
|
17 |
|
18 void *malloczero(int size) |
|
19 { |
|
20 void *p=malloc(size); |
|
21 |
|
22 if(p!=NULL) |
|
23 memset(p, 0, size); |
|
24 |
|
25 return p; |
|
26 } |
|
27 |
|
28 |
|
29 void *remalloczero(void *ptr, int oldsize, int newsize) |
|
30 { |
|
31 void *p=NULL; |
|
32 |
|
33 if(newsize!=0){ |
|
34 p=malloc(newsize); |
|
35 |
|
36 if(p==NULL) |
|
37 return NULL; |
|
38 |
|
39 memset(p, 0, newsize); |
|
40 |
|
41 if(ptr!=NULL && oldsize<newsize) |
|
42 memcpy(p, ptr, oldsize); |
|
43 } |
|
44 |
|
45 if(ptr!=NULL) |
|
46 free(ptr); |
|
47 |
|
48 return p; |
|
49 } |
|
50 |
|
51 |
|
52 char *scopy(const char *p) |
|
53 { |
|
54 char*pn; |
|
55 size_t l=strlen(p); |
|
56 |
|
57 pn=(char*)malloc(l+1); |
|
58 |
|
59 if(pn==NULL) |
|
60 return NULL; |
|
61 |
|
62 memcpy(pn, p, l+1); |
|
63 |
|
64 return pn; |
|
65 } |
|
66 |
|
67 |
|
68 char *scat(const char *p1, const char *p2) |
|
69 { |
|
70 size_t l1, l2; |
|
71 char*pn; |
|
72 |
|
73 l1=strlen(p1); |
|
74 l2=strlen(p2); |
|
75 |
|
76 pn=(char*)malloc(l1+l2+1); |
|
77 |
|
78 if(pn==NULL) |
|
79 return NULL; |
|
80 |
|
81 memcpy(pn, p1, l1); |
|
82 memcpy(pn+l1, p2, l2+1); |
|
83 |
|
84 return pn; |
|
85 } |
|
86 |
|
87 |
|
88 char *scat3(const char *p1, const char *p2, const char *p3) |
|
89 { |
|
90 size_t l1, l2, l3; |
|
91 char *pn; |
|
92 |
|
93 l1=strlen(p1); |
|
94 l2=strlen(p2); |
|
95 l3=strlen(p3); |
|
96 |
|
97 pn=(char*)malloc(l1+l2+l3+1); |
|
98 |
|
99 if(pn==NULL) |
|
100 return NULL; |
|
101 |
|
102 memcpy(pn, p1, l1); |
|
103 memcpy(pn+l1, p2, l2); |
|
104 memcpy(pn+l1+l2, p3, l3+1); |
|
105 |
|
106 return pn; |
|
107 } |
|
108 |
|
109 |
|
110 /* */ |
|
111 |
|
112 |
|
113 const char *simple_basename(const char *name) |
|
114 { |
|
115 const char *p; |
|
116 |
|
117 p=name+strlen(name)-1; |
|
118 |
|
119 /* Skip any trailing slashes */ |
|
120 while(*p=='/'){ |
|
121 /* root? */ |
|
122 if(p==name) |
|
123 return name; |
|
124 p--; |
|
125 } |
|
126 |
|
127 while(p!=name){ |
|
128 if(*p=='/') |
|
129 return p+1; |
|
130 p--; |
|
131 } |
|
132 |
|
133 return name; |
|
134 } |
|
135 |
|
136 |
|
137 /* */ |
|
138 |
|
139 |
|
140 bool readf(FILE *f, void *buf, size_t n) |
|
141 { |
|
142 return fread(buf, 1, n, f)!=1; |
|
143 } |
|
144 |
|
145 |
|
146 bool writef(FILE *f, const void *buf, size_t n) |
|
147 { |
|
148 return fwrite(buf, 1, n, f)!=1; |
|
149 } |