s/malloc/xmalloc/ s/calloc/xcalloc/ s/realloc/realloc/
[project/opkg-lede.git] / libopkg / file_util.c
1 /* file_util.c - convenience routines for common stat operations
2
3 Carl D. Worth
4
5 Copyright (C) 2001 University of Southern California
6
7 This program is free software; you can redistribute it and/or
8 modify it under the terms of the GNU General Public License as
9 published by the Free Software Foundation; either version 2, or (at
10 your option) any later version.
11
12 This program is distributed in the hope that it will be useful, but
13 WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 General Public License for more details.
16 */
17
18 #include "includes.h"
19 #include <sys/types.h>
20 #include <sys/stat.h>
21
22 #include "sprintf_alloc.h"
23 #include "file_util.h"
24 #include "md5.h"
25 #include "libbb/libbb.h"
26 #undef strlen
27
28 #if defined HAVE_SHA256
29 #include "sha256.h"
30 #endif
31
32 int file_exists(const char *file_name)
33 {
34 int err;
35 struct stat stat_buf;
36
37 err = stat(file_name, &stat_buf);
38 if (err == 0) {
39 return 1;
40 } else {
41 return 0;
42 }
43 }
44
45 int file_is_dir(const char *file_name)
46 {
47 int err;
48 struct stat stat_buf;
49
50 err = stat(file_name, &stat_buf);
51 if (err) {
52 return 0;
53 }
54
55 return S_ISDIR(stat_buf.st_mode);
56 }
57
58 /* read a single line from a file, stopping at a newline or EOF.
59 If a newline is read, it will appear in the resulting string.
60 Return value is a malloc'ed char * which should be freed at
61 some point by the caller.
62
63 Return value is NULL if the file is at EOF when called.
64 */
65 #define FILE_READ_LINE_BUF_SIZE 1024
66 char *file_read_line_alloc(FILE *file)
67 {
68 char buf[FILE_READ_LINE_BUF_SIZE];
69 int buf_len;
70 char *line = NULL;
71 int line_size = 0;
72
73 memset(buf, 0, FILE_READ_LINE_BUF_SIZE);
74 while (fgets(buf, FILE_READ_LINE_BUF_SIZE, file)) {
75 buf_len = strlen(buf);
76 if (line) {
77 line_size += buf_len;
78 line = xrealloc(line, line_size);
79 strcat(line, buf);
80 } else {
81 line_size = buf_len + 1;
82 line = xstrdup(buf);
83 }
84 if (buf[buf_len - 1] == '\n') {
85 break;
86 }
87 }
88
89 return line;
90 }
91
92 int file_move(const char *src, const char *dest)
93 {
94 int err;
95
96 err = rename(src, dest);
97
98 if (err && errno == EXDEV) {
99 err = file_copy(src, dest);
100 unlink(src);
101 } else if (err) {
102 fprintf(stderr, "%s: ERROR: failed to rename %s to %s: %s\n",
103 __FUNCTION__, src, dest, strerror(errno));
104 }
105
106 return err;
107 }
108
109 /* I put these here to keep libbb dependencies from creeping all over
110 the opkg code */
111 int file_copy(const char *src, const char *dest)
112 {
113 int err;
114
115 err = copy_file(src, dest, FILEUTILS_FORCE | FILEUTILS_PRESERVE_STATUS);
116 if (err) {
117 fprintf(stderr, "%s: ERROR: failed to copy %s to %s\n",
118 __FUNCTION__, src, dest);
119 }
120
121 return err;
122 }
123
124 int file_mkdir_hier(const char *path, long mode)
125 {
126 return make_directory(path, mode, FILEUTILS_RECUR);
127 }
128
129 char *file_md5sum_alloc(const char *file_name)
130 {
131 static const int md5sum_bin_len = 16;
132 static const int md5sum_hex_len = 32;
133
134 static const unsigned char bin2hex[16] = {
135 '0', '1', '2', '3',
136 '4', '5', '6', '7',
137 '8', '9', 'a', 'b',
138 'c', 'd', 'e', 'f'
139 };
140
141 int i, err;
142 FILE *file;
143 char *md5sum_hex;
144 unsigned char md5sum_bin[md5sum_bin_len];
145
146 md5sum_hex = xcalloc(1, md5sum_hex_len + 1);
147
148 file = fopen(file_name, "r");
149 if (file == NULL) {
150 fprintf(stderr, "%s: Failed to open file %s: %s\n",
151 __FUNCTION__, file_name, strerror(errno));
152 free(md5sum_hex);
153 return NULL;
154 }
155
156 err = md5_stream(file, md5sum_bin);
157 if (err) {
158 fprintf(stderr, "%s: ERROR computing md5sum for %s: %s\n",
159 __FUNCTION__, file_name, strerror(err));
160 fclose(file);
161 free(md5sum_hex);
162 return NULL;
163 }
164
165 fclose(file);
166
167 for (i=0; i < md5sum_bin_len; i++) {
168 md5sum_hex[i*2] = bin2hex[md5sum_bin[i] >> 4];
169 md5sum_hex[i*2+1] = bin2hex[md5sum_bin[i] & 0xf];
170 }
171
172 md5sum_hex[md5sum_hex_len] = '\0';
173
174 return md5sum_hex;
175 }
176
177 #ifdef HAVE_SHA256
178 char *file_sha256sum_alloc(const char *file_name)
179 {
180 static const int sha256sum_bin_len = 32;
181 static const int sha256sum_hex_len = 64;
182
183 static const unsigned char bin2hex[16] = {
184 '0', '1', '2', '3',
185 '4', '5', '6', '7',
186 '8', '9', 'a', 'b',
187 'c', 'd', 'e', 'f'
188 };
189
190 int i, err;
191 FILE *file;
192 char *sha256sum_hex;
193 unsigned char sha256sum_bin[sha256sum_bin_len];
194
195 sha256sum_hex = xcalloc(1, sha256sum_hex_len + 1);
196
197 file = fopen(file_name, "r");
198 if (file == NULL) {
199 fprintf(stderr, "%s: Failed to open file %s: %s\n",
200 __FUNCTION__, file_name, strerror(errno));
201 free(sha256sum_hex);
202 return NULL;
203 }
204
205 err = sha256_stream(file, sha256sum_bin);
206 if (err) {
207 fprintf(stderr, "%s: ERROR computing sha256sum for %s: %s\n",
208 __FUNCTION__, file_name, strerror(err));
209 fclose(file);
210 free(sha256sum_hex);
211 return NULL;
212 }
213
214 fclose(file);
215
216 for (i=0; i < sha256sum_bin_len; i++) {
217 sha256sum_hex[i*2] = bin2hex[sha256sum_bin[i] >> 4];
218 sha256sum_hex[i*2+1] = bin2hex[sha256sum_bin[i] & 0xf];
219 }
220
221 sha256sum_hex[sha256sum_hex_len] = '\0';
222
223 return sha256sum_hex;
224 }
225
226 #endif