/* file_util.c - convenience routines for common stat operations
- Carl D. Worth
+ Copyright (C) 2009 Ubiq Technologies <graham.gower@gmail.com>
+ Carl D. Worth
Copyright (C) 2001 University of Southern California
This program is free software; you can redistribute it and/or
General Public License for more details.
*/
-#include "includes.h"
+#include <stdio.h>
#include <sys/types.h>
#include <sys/stat.h>
+#include <dirent.h>
+#include <unistd.h>
+#include <ctype.h>
#include "sprintf_alloc.h"
#include "file_util.h"
-#include "md5.h"
+#include <libubox/md5.h>
#include "libbb/libbb.h"
-#undef strlen
-#if defined HAVE_SHA256
#include "sha256.h"
-#endif
int file_exists(const char *file_name)
{
- int err;
- struct stat stat_buf;
+ struct stat st;
+
+ if (stat(file_name, &st) == -1)
+ return 0;
- err = stat(file_name, &stat_buf);
- if (err == 0) {
return 1;
- } else {
- return 0;
- }
}
int file_is_dir(const char *file_name)
{
- int err;
- struct stat stat_buf;
+ struct stat st;
- err = stat(file_name, &stat_buf);
- if (err) {
- return 0;
- }
+ if (stat(file_name, &st) == -1)
+ return 0;
- return S_ISDIR(stat_buf.st_mode);
+ return S_ISDIR(st.st_mode);
}
/* read a single line from a file, stopping at a newline or EOF.
Return value is NULL if the file is at EOF when called.
*/
-#define FILE_READ_LINE_BUF_SIZE 1024
-char *file_read_line_alloc(FILE *file)
+char *file_read_line_alloc(FILE * fp)
{
- char buf[FILE_READ_LINE_BUF_SIZE];
- int buf_len;
- char *line = NULL;
- int line_size = 0;
-
- memset(buf, 0, FILE_READ_LINE_BUF_SIZE);
- while (fgets(buf, FILE_READ_LINE_BUF_SIZE, file)) {
- buf_len = strlen(buf);
- if (line) {
- line_size += buf_len;
- line = realloc(line, line_size);
- if (line == NULL) {
- fprintf(stderr, "%s: out of memory\n", __FUNCTION__);
- break;
- }
- strcat(line, buf);
- } else {
- line_size = buf_len + 1;
- line = strdup(buf);
- }
- if (buf[buf_len - 1] == '\n') {
- break;
- }
- }
-
- return line;
+ char buf[BUFSIZ];
+ unsigned int buf_len;
+ char *line = NULL;
+ unsigned int line_size = 0;
+ int got_nl = 0;
+
+ buf[0] = '\0';
+
+ while (fgets(buf, BUFSIZ, fp)) {
+ buf_len = strlen(buf);
+ if (buf[buf_len - 1] == '\n') {
+ buf_len--;
+ buf[buf_len] = '\0';
+ got_nl = 1;
+ }
+ if (line) {
+ line_size += buf_len;
+ line = xrealloc(line, line_size + 1);
+ strncat(line, buf, line_size);
+ } else {
+ line_size = buf_len + 1;
+ line = xstrdup(buf);
+ }
+ if (got_nl)
+ break;
+ }
+
+ return line;
}
int file_move(const char *src, const char *dest)
{
- int err;
-
- err = rename(src, dest);
-
- if (err && errno == EXDEV) {
- err = file_copy(src, dest);
- unlink(src);
- } else if (err) {
- fprintf(stderr, "%s: ERROR: failed to rename %s to %s: %s\n",
- __FUNCTION__, src, dest, strerror(errno));
- }
+ int err;
+
+ err = rename(src, dest);
+ if (err == -1) {
+ if (errno == EXDEV) {
+ /* src & dest live on different file systems */
+ err = file_copy(src, dest);
+ if (err == 0)
+ unlink(src);
+ } else {
+ opkg_perror(ERROR, "Failed to rename %s to %s",
+ src, dest);
+ }
+ }
- return err;
+ return err;
}
-/* I put these here to keep libbb dependencies from creeping all over
- the opkg code */
int file_copy(const char *src, const char *dest)
{
- int err;
+ int err;
- err = copy_file(src, dest, FILEUTILS_FORCE | FILEUTILS_PRESERVE_STATUS);
- if (err) {
- fprintf(stderr, "%s: ERROR: failed to copy %s to %s\n",
- __FUNCTION__, src, dest);
- }
+ err = copy_file(src, dest, FILEUTILS_FORCE | FILEUTILS_PRESERVE_STATUS);
+ if (err)
+ opkg_msg(ERROR, "Failed to copy file %s to %s.\n", src, dest);
- return err;
+ return err;
}
int file_mkdir_hier(const char *path, long mode)
{
- return make_directory(path, mode, FILEUTILS_RECUR);
+ return make_directory(path, mode, FILEUTILS_RECUR);
}
-char *file_md5sum_alloc(const char *file_name)
+
+static int hex2bin(unsigned char x)
{
- static const int md5sum_bin_len = 16;
- static const int md5sum_hex_len = 32;
+ if (x >= 'a' && x <= 'f')
+ return x - 'a' + 10;
+ else if (x >= 'A' && x <= 'F')
+ return x - 'A' + 10;
+ else if (x >= '0' && x <= '9')
+ return x - '0';
+ else
+ return 0;
+}
- static const unsigned char bin2hex[16] = {
+static const unsigned char bin2hex[16] = {
'0', '1', '2', '3',
'4', '5', '6', '7',
'8', '9', 'a', 'b',
'c', 'd', 'e', 'f'
- };
-
- int i, err;
- FILE *file;
- char *md5sum_hex;
- unsigned char md5sum_bin[md5sum_bin_len];
-
- md5sum_hex = calloc(1, md5sum_hex_len + 1);
- if (md5sum_hex == NULL) {
- fprintf(stderr, "%s: out of memory\n", __FUNCTION__);
- return strdup("");
- }
-
- file = fopen(file_name, "r");
- if (file == NULL) {
- fprintf(stderr, "%s: Failed to open file %s: %s\n",
- __FUNCTION__, file_name, strerror(errno));
- return strdup("");
- }
-
- err = md5_stream(file, md5sum_bin);
- if (err) {
- fprintf(stderr, "%s: ERROR computing md5sum for %s: %s\n",
- __FUNCTION__, file_name, strerror(err));
- return strdup("");
- }
-
- fclose(file);
-
- for (i=0; i < md5sum_bin_len; i++) {
- md5sum_hex[i*2] = bin2hex[md5sum_bin[i] >> 4];
- md5sum_hex[i*2+1] = bin2hex[md5sum_bin[i] & 0xf];
- }
-
- md5sum_hex[md5sum_hex_len] = '\0';
-
- return md5sum_hex;
+};
+
+char *file_md5sum_alloc(const char *file_name)
+{
+ static const int md5sum_bin_len = 16;
+ static const int md5sum_hex_len = 32;
+
+ int i, len;
+ char *md5sum_hex;
+ unsigned char md5sum_bin[md5sum_bin_len];
+
+ len = md5sum(file_name, md5sum_bin);
+
+ if (len) {
+ opkg_msg(ERROR, "Could't compute md5sum for %s.\n", file_name);
+ return NULL;
+ }
+
+ md5sum_hex = xcalloc(1, md5sum_hex_len + 1);
+
+ for (i = 0; i < md5sum_bin_len; i++) {
+ md5sum_hex[i * 2] = bin2hex[md5sum_bin[i] >> 4];
+ md5sum_hex[i * 2 + 1] = bin2hex[md5sum_bin[i] & 0xf];
+ }
+
+ md5sum_hex[md5sum_hex_len] = '\0';
+
+ return md5sum_hex;
}
-#ifdef HAVE_SHA256
char *file_sha256sum_alloc(const char *file_name)
{
- static const int sha256sum_bin_len = 32;
- static const int sha256sum_hex_len = 64;
+ static const int sha256sum_bin_len = 32;
+ static const int sha256sum_hex_len = 64;
- static const unsigned char bin2hex[16] = {
- '0', '1', '2', '3',
- '4', '5', '6', '7',
- '8', '9', 'a', 'b',
- 'c', 'd', 'e', 'f'
- };
-
- int i, err;
- FILE *file;
- char *sha256sum_hex;
- unsigned char sha256sum_bin[sha256sum_bin_len];
-
- sha256sum_hex = calloc(1, sha256sum_hex_len + 1);
- if (sha256sum_hex == NULL) {
- fprintf(stderr, "%s: out of memory\n", __FUNCTION__);
- return strdup("");
- }
-
- file = fopen(file_name, "r");
- if (file == NULL) {
- fprintf(stderr, "%s: Failed to open file %s: %s\n",
- __FUNCTION__, file_name, strerror(errno));
- return strdup("");
- }
-
- err = sha256_stream(file, sha256sum_bin);
- if (err) {
- fprintf(stderr, "%s: ERROR computing sha256sum for %s: %s\n",
- __FUNCTION__, file_name, strerror(err));
- return strdup("");
- }
-
- fclose(file);
-
- for (i=0; i < sha256sum_bin_len; i++) {
- sha256sum_hex[i*2] = bin2hex[sha256sum_bin[i] >> 4];
- sha256sum_hex[i*2+1] = bin2hex[sha256sum_bin[i] & 0xf];
- }
-
- sha256sum_hex[sha256sum_hex_len] = '\0';
-
- return sha256sum_hex;
+ int i, err;
+ FILE *file;
+ char *sha256sum_hex;
+ unsigned char sha256sum_bin[sha256sum_bin_len];
+
+ sha256sum_hex = xcalloc(1, sha256sum_hex_len + 1);
+
+ file = fopen(file_name, "r");
+ if (file == NULL) {
+ opkg_perror(ERROR, "Failed to open file %s", file_name);
+ free(sha256sum_hex);
+ return NULL;
+ }
+
+ err = sha256_stream(file, sha256sum_bin);
+ if (err) {
+ opkg_msg(ERROR, "Could't compute sha256sum for %s.\n",
+ file_name);
+ fclose(file);
+ free(sha256sum_hex);
+ return NULL;
+ }
+
+ fclose(file);
+
+ for (i = 0; i < sha256sum_bin_len; i++) {
+ sha256sum_hex[i * 2] = bin2hex[sha256sum_bin[i] >> 4];
+ sha256sum_hex[i * 2 + 1] = bin2hex[sha256sum_bin[i] & 0xf];
+ }
+
+ sha256sum_hex[sha256sum_hex_len] = '\0';
+
+ return sha256sum_hex;
+}
+
+char *checksum_bin2hex(const char *src, size_t len)
+{
+ unsigned char *p;
+ static unsigned char buf[65];
+ const unsigned char *s = (unsigned char *)src;
+ if (!s || len > 32)
+ return NULL;
+
+ for (p = buf; len > 0; s++, len--) {
+ *p++ = bin2hex[*s / 16];
+ *p++ = bin2hex[*s % 16];
+ }
+
+ *p = 0;
+
+ return (char *)buf;
+}
+
+char *checksum_hex2bin(const char *src, size_t *len)
+{
+ size_t slen;
+ unsigned char *p;
+ const unsigned char *s = (unsigned char *)src;
+ static unsigned char buf[32];
+
+ if (!src) {
+ *len = 0;
+ return NULL;
+ }
+
+ while (isspace(*src))
+ src++;
+
+ slen = strlen(src);
+
+ if (slen > 64) {
+ *len = 0;
+ return NULL;
+ }
+
+ for (p = buf, *len = 0;
+ slen > 0 && isxdigit(s[0]) && isxdigit(s[1]);
+ slen--, s += 2, (*len)++)
+ *p++ = hex2bin(s[0]) * 16 + hex2bin(s[1]);
+
+ return (char *)buf;
}
+int rm_r(const char *path)
+{
+ int ret = 0;
+ DIR *dir;
+ struct dirent *dent;
+
+ if (path == NULL) {
+ opkg_perror(ERROR, "Missing directory parameter");
+ return -1;
+ }
+
+ dir = opendir(path);
+ if (dir == NULL) {
+ opkg_perror(ERROR, "Failed to open dir %s", path);
+ return -1;
+ }
+
+ if (fchdir(dirfd(dir)) == -1) {
+ opkg_perror(ERROR, "Failed to change to dir %s", path);
+ closedir(dir);
+ return -1;
+ }
+
+ while (1) {
+ errno = 0;
+ if ((dent = readdir(dir)) == NULL) {
+ if (errno) {
+ opkg_perror(ERROR, "Failed to read dir %s",
+ path);
+ ret = -1;
+ }
+ break;
+ }
+
+ if (!strcmp(dent->d_name, ".") || !strcmp(dent->d_name, ".."))
+ continue;
+
+#ifdef _BSD_SOURCE
+ if (dent->d_type == DT_DIR) {
+ if ((ret = rm_r(dent->d_name)) == -1)
+ break;
+ continue;
+ } else if (dent->d_type == DT_UNKNOWN)
#endif
+ {
+ struct stat st;
+ if ((ret = lstat(dent->d_name, &st)) == -1) {
+ opkg_perror(ERROR, "Failed to lstat %s",
+ dent->d_name);
+ break;
+ }
+ if (S_ISDIR(st.st_mode)) {
+ if ((ret = rm_r(dent->d_name)) == -1)
+ break;
+ continue;
+ }
+ }
+
+ if ((ret = unlink(dent->d_name)) == -1) {
+ opkg_perror(ERROR, "Failed to unlink %s", dent->d_name);
+ break;
+ }
+ }
+
+ if (chdir("..") == -1) {
+ ret = -1;
+ opkg_perror(ERROR, "Failed to change to dir %s/..", path);
+ }
+
+ if (rmdir(path) == -1) {
+ ret = -1;
+ opkg_perror(ERROR, "Failed to remove dir %s", path);
+ }
+
+ if (closedir(dir) == -1) {
+ ret = -1;
+ opkg_perror(ERROR, "Failed to close dir %s", path);
+ }
+
+ return ret;
+}
+
+static int urlencode_is_specialchar(char c)
+{
+ switch (c) {
+ case ':':
+ case '?':
+ case '#':
+ case '[':
+ case ']':
+ case '@':
+ case '!':
+ case '$':
+ case '&':
+ case '\'':
+ case '(':
+ case ')':
+ case '*':
+ case '+':
+ case ',':
+ case ';':
+ case '=':
+ case '%':
+ return 1;
+
+ default:
+ return 0;
+ }
+}
+
+char *urlencode_path(const char *filename)
+{
+ size_t len = 0;
+ const unsigned char *in;
+ unsigned char *copy, *out;
+
+ for (in = (unsigned char *)filename; *in != 0; in++)
+ len += urlencode_is_specialchar(*in) ? 3 : 1;
+
+ copy = xcalloc(1, len + 1);
+
+ for (in = (unsigned char *)filename, out = copy; *in != 0; in++) {
+ if (urlencode_is_specialchar(*in)) {
+ *out++ = '%';
+ *out++ = bin2hex[*in / 16];
+ *out++ = bin2hex[*in % 16];
+ }
+ else {
+ *out++ = *in;
+ }
+ }
+
+ return (char *)copy;
+}
+
+char *urldecode_path(const char *filename)
+{
+ unsigned char *copy = (unsigned char *)xstrdup(filename);
+ unsigned char *in, *out;
+
+ for (in = copy, out = copy; *in != 0; in++) {
+ if (*in == '%' && isxdigit(in[1]) && isxdigit(in[2])) {
+ *out++ = hex2bin(in[1]) * 16 + hex2bin(in[2]);
+ in += 2;
+ }
+ else {
+ *out++ = *in;
+ }
+ }
+
+ *out = 0;
+
+ return (char *)copy;
+}