git.ozlabs.org Git - petitboot/blob - lib/system/system.c

   1
   2 #if defined(HAVE_CONFIG_H)
   3 #include "config.h"
   4 #endif
   5
   6 #include <assert.h>
   7 #include <errno.h>
   8 #include <stdlib.h>
   9 #include <string.h>
  10 #include <unistd.h>
  11 #include <sys/stat.h>
  12 #include <sys/types.h>
  13 #include <sys/wait.h>
  14
  15 #include "log/log.h"
  16 #include <talloc/talloc.h>
  17 #include "system.h"
  18
  19 const struct pb_system_apps pb_system_apps = {
  20         .prefix         = PREFIX,
  21         .cp             = HOST_PROG_CP,
  22         .kexec          = HOST_PROG_KEXEC,
  23         .mount          = HOST_PROG_MOUNT,
  24         .shutdown       = HOST_PROG_SHUTDOWN,
  25         .sftp           = HOST_PROG_SFTP,
  26         .tftp           = HOST_PROG_TFTP,
  27         .umount         = HOST_PROG_UMOUNT,
  28         .wget           = HOST_PROG_WGET,
  29         .ip             = HOST_PROG_IP,
  30         .udhcpc         = HOST_PROG_UDHCPC,
  31 };
  32
  33 int pb_mkdir_recursive(const char *dir)
  34 {
  35         struct stat statbuf;
  36         char *str, *sep;
  37         int mode = 0755;
  38
  39         if (!*dir)
  40                 return 0;
  41
  42         if (!stat(dir, &statbuf)) {
  43                 if (!S_ISDIR(statbuf.st_mode)) {
  44                         pb_log("%s: %s exists, but isn't a directory\n",
  45                                         __func__, dir);
  46                         return -1;
  47                 }
  48                 return 0;
  49         }
  50
  51         str = talloc_strdup(NULL, dir);
  52         sep = strchr(*str == '/' ? str + 1 : str, '/');
  53
  54         while (1) {
  55
  56                 /* terminate the path at sep */
  57                 if (sep)
  58                         *sep = '\0';
  59
  60                 if (mkdir(str, mode) && errno != EEXIST) {
  61                         pb_log("mkdir(%s): %s\n", str, strerror(errno));
  62                         return -1;
  63                 }
  64
  65                 if (!sep)
  66                         break;
  67
  68                 /* reset dir to the full path */
  69                 strcpy(str, dir);
  70                 sep = strchr(sep + 1, '/');
  71         }
  72
  73         talloc_free(str);
  74
  75         return 0;
  76 }
  77
  78 int pb_rmdir_recursive(const char *base, const char *dir)
  79 {
  80         char *cur, *pos;
  81
  82         /* sanity check: make sure that dir is within base */
  83         if (strncmp(base, dir, strlen(base)))
  84                 return -1;
  85
  86         cur = talloc_strdup(NULL, dir);
  87
  88         while (strcmp(base, dir)) {
  89
  90                 rmdir(dir);
  91
  92                 /* null-terminate at the last slash */
  93                 pos = strrchr(dir, '/');
  94                 if (!pos)
  95                         break;
  96
  97                 *pos = '\0';
  98         }
  99
 100         talloc_free(cur);
 101
 102         return 0;
 103 }
 104
 105 /**
 106  * pb_run_cmd - Run the supplied command.
 107  * @cmd_argv: An argument list array for execv.
 108  * @wait: Wait for the child process to complete before returning.
 109  * @dry_run: Don't actually fork and exec.
 110  */
 111
 112 int pb_run_cmd(const char *const *cmd_argv, int wait, int dry_run)
 113 {
 114 #if defined(DEBUG)
 115         enum {do_debug = 1};
 116 #else
 117         enum {do_debug = 0};
 118 #endif
 119         int status;
 120         pid_t pid;
 121
 122         if (do_debug) {
 123                 const char *const *p = cmd_argv;
 124
 125                 pb_log("%s: %s", __func__, (dry_run ? "(dry-run) " : ""));
 126
 127                 while (*p) {
 128                         pb_log("%s ", *p);
 129                         p++;
 130                 }
 131                 pb_log("\n");
 132         } else
 133                 pb_log("%s: %s%s\n", __func__, (dry_run ? "(dry-run) " : ""),
 134                         cmd_argv[0]);
 135
 136         if (dry_run)
 137                 return 0;
 138
 139         pid = fork();
 140
 141         if (pid == -1) {
 142                 pb_log("%s: fork failed: %s\n", __func__, strerror(errno));
 143                 return -1;
 144         }
 145
 146         if (pid == 0) {
 147                 int log = fileno(pb_log_get_stream());
 148
 149                 /* Redirect child output to log. */
 150
 151                 status = dup2(log, STDOUT_FILENO);
 152                 assert(status != -1);
 153
 154                 status = dup2(log, STDERR_FILENO);
 155                 assert(status != -1);
 156
 157                 execvp(cmd_argv[0], (char *const *)cmd_argv);
 158                 pb_log("%s: exec failed: %s\n", __func__, strerror(errno));
 159                 exit(EXIT_FAILURE);
 160         }
 161
 162         if (!wait && !waitpid(pid, &status, WNOHANG))
 163                 return 0;
 164
 165         if (waitpid(pid, &status, 0) == -1) {
 166                 pb_log("%s: waitpid failed: %s\n", __func__,
 167                                 strerror(errno));
 168                 return -1;
 169         }
 170
 171         if (do_debug && WIFSIGNALED(status) && WTERMSIG(status) == SIGINT)
 172                 pb_log("%s: signaled\n", __func__);
 173
 174         if (!WIFEXITED(status)) {
 175                 pb_log("%s: %s failed\n", __func__, cmd_argv[0]);
 176                 return -1;
 177         }
 178
 179         if (WEXITSTATUS(status))
 180                 pb_log("%s: WEXITSTATUS %d\n", __func__, WEXITSTATUS(status));
 181
 182         return WEXITSTATUS(status);
 183 }