123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370 |
- /* file_util.c - convenience routines for common stat operations
- 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
- modify it under the terms of the GNU General Public License as
- published by the Free Software Foundation; either version 2, or (at
- your option) any later version.
- This program is distributed in the hope that it will be useful, but
- WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
- General Public License for more details.
- */
- #include "config.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"
- #ifdef HAVE_MD5
- #include "md5.h"
- #endif
- #include "libbb/libbb.h"
- #if defined HAVE_SHA256
- #include "sha256.h"
- #endif
- int file_exists(const char *file_name)
- {
- struct stat st;
- if (stat(file_name, &st) == -1)
- return 0;
- return 1;
- }
- int file_is_dir(const char *file_name)
- {
- struct stat st;
- if (stat(file_name, &st) == -1)
- return 0;
- return S_ISDIR(st.st_mode);
- }
- /* read a single line from a file, stopping at a newline or EOF.
- If a newline is read, it will appear in the resulting string.
- Return value is a malloc'ed char * which should be freed at
- some point by the caller.
- Return value is NULL if the file is at EOF when called.
- */
- char *file_read_line_alloc(FILE * fp)
- {
- 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 == -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;
- }
- int file_copy(const char *src, const char *dest)
- {
- int err;
- 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;
- }
- int file_mkdir_hier(const char *path, long mode)
- {
- return make_directory(path, mode, FILEUTILS_RECUR);
- }
- #ifdef HAVE_MD5
- char *file_md5sum_alloc(const char *file_name)
- {
- static const int md5sum_bin_len = 16;
- static const int md5sum_hex_len = 32;
- 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 = xcalloc(1, md5sum_hex_len + 1);
- file = fopen(file_name, "r");
- if (file == NULL) {
- opkg_perror(ERROR, "Failed to open file %s", file_name);
- free(md5sum_hex);
- return NULL;
- }
- err = md5_stream(file, md5sum_bin);
- if (err) {
- opkg_msg(ERROR, "Could't compute md5sum for %s.\n", file_name);
- fclose(file);
- free(md5sum_hex);
- return NULL;
- }
- 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;
- }
- #endif
- #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 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 = 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;
- }
- #endif
- char *checksum_bin2hex(const char *src, size_t len)
- {
- unsigned char *p;
- static unsigned char buf[65];
- const unsigned char *s = (unsigned char *)src;
- static const unsigned char bin2hex[16] = {
- '0', '1', '2', '3',
- '4', '5', '6', '7',
- '8', '9', 'a', 'b',
- 'c', 'd', 'e', 'f'
- };
- 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;
- }
- #define hex(c) \
- (c >= 'a' ? (c - 'a') : (c >= 'A' ? (c - 'A') : (c - '0')))
- for (p = buf, *len = 0;
- slen > 0 && isxdigit(s[0]) && isxdigit(s[1]);
- slen--, s += 2, (*len)++)
- *p++ = hex(s[0]) * 16 + hex(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;
- }
|