src/common/runas.c

   1 /*
   2  * Copyright (C) 2011 - David Goulet <david.goulet@polymtl.ca>
   3  *                      Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
   4  *
   5  * This program is free software; you can redistribute it and/or modify it
   6  * under the terms of the GNU General Public License as published by the Free
   7  * Software Foundation; only version 2 of the License.
   8  *
   9  * This program is distributed in the hope that it will be useful, but WITHOUT
  10  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  11  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
  12  * more details.
  13  *
  14  * You should have received a copy of the GNU General Public License along with
  15  * this program; if not, write to the Free Software Foundation, Inc., 59 Temple
  16  * Place - Suite 330, Boston, MA  02111-1307, USA.
  17  */
  18
  19 #define _GNU_SOURCE
  20 #include <errno.h>
  21 #include <limits.h>
  22 #include <stdio.h>
  23 #include <stdlib.h>
  24 #include <string.h>
  25 #include <sys/wait.h>
  26 #include <sys/types.h>
  27 #include <sys/stat.h>
  28 #include <unistd.h>
  29 #include <fcntl.h>
  30 #include <sched.h>
  31 #include <sys/mman.h>
  32
  33 #include <common/error.h>
  34
  35 #include "runas.h"
  36
  37 #define RUNAS_CHILD_STACK_SIZE  10485760
  38
  39 #ifndef MAP_STACK
  40 #define MAP_STACK               0
  41 #endif
  42
  43 struct run_as_data {
  44         int (*cmd)(void *data);
  45         void *data;
  46         uid_t uid;
  47         gid_t gid;
  48         int retval_pipe;
  49 };
  50
  51 struct run_as_mkdir_data {
  52         const char *path;
  53         mode_t mode;
  54 };
  55
  56 struct run_as_open_data {
  57         const char *path;
  58         int flags;
  59         mode_t mode;
  60 };
  61
  62 /*
  63  * Create recursively directory using the FULL path.
  64  */
  65 static
  66 int _mkdir_recursive(void *_data)
  67 {
  68         struct run_as_mkdir_data *data = _data;
  69         const char *path;
  70         char *p, tmp[PATH_MAX];
  71         struct stat statbuf;
  72         mode_t mode;
  73         size_t len;
  74         int ret;
  75
  76         path = data->path;
  77         mode = data->mode;
  78
  79         ret = snprintf(tmp, sizeof(tmp), "%s", path);
  80         if (ret < 0) {
  81                 PERROR("snprintf mkdir");
  82                 goto error;
  83         }
  84
  85         len = ret;
  86         if (tmp[len - 1] == '/') {
  87                 tmp[len - 1] = 0;
  88         }
  89
  90         for (p = tmp + 1; *p; p++) {
  91                 if (*p == '/') {
  92                         *p = 0;
  93                         ret = stat(tmp, &statbuf);
  94                         if (ret < 0) {
  95                                 ret = mkdir(tmp, mode);
  96                                 if (ret < 0) {
  97                                         if (!(errno == EEXIST)) {
  98                                                 PERROR("mkdir recursive");
  99                                                 ret = -errno;
 100                                                 goto error;
 101                                         }
 102                                 }
 103                         }
 104                         *p = '/';
 105                 }
 106         }
 107
 108         ret = mkdir(tmp, mode);
 109         if (ret < 0) {
 110                 if (!(errno == EEXIST)) {
 111                         PERROR("mkdir recursive last piece");
 112                         ret = -errno;
 113                 } else {
 114                         ret = 0;
 115                 }
 116         }
 117
 118 error:
 119         return ret;
 120 }
 121
 122 static
 123 int _mkdir(void *_data)
 124 {
 125         struct run_as_mkdir_data *data = _data;
 126         return mkdir(data->path, data->mode);
 127 }
 128
 129 static
 130 int _open(void *_data)
 131 {
 132         struct run_as_open_data *data = _data;
 133         return open(data->path, data->flags, data->mode);
 134 }
 135
 136 static
 137 int child_run_as(void *_data)
 138 {
 139         struct run_as_data *data = _data;
 140         size_t writelen, writeleft, index;
 141         union {
 142                 int i;
 143                 char c[sizeof(int)];
 144         } sendret;
 145         int ret;
 146
 147         /*
 148          * Child: it is safe to drop egid and euid while sharing the
 149          * file descriptors with the parent process, since we do not
 150          * drop "uid": therefore, the user we are dropping egid/euid to
 151          * cannot attach to this process with, e.g. ptrace, nor map this
 152          * process memory.
 153          */
 154         if (data->gid != getegid()) {
 155                 ret = setegid(data->gid);
 156                 if (ret < 0) {
 157                         PERROR("setegid");
 158                         return EXIT_FAILURE;
 159                 }
 160         }
 161         if (data->uid != geteuid()) {
 162                 ret = seteuid(data->uid);
 163                 if (ret < 0) {
 164                         PERROR("seteuid");
 165                         return EXIT_FAILURE;
 166                 }
 167         }
 168         /*
 169          * Also set umask to 0 for mkdir executable bit.
 170          */
 171         umask(0);
 172         sendret.i = (*data->cmd)(data->data);
 173         /* send back return value */
 174         writeleft = sizeof(sendret);
 175         index = 0;
 176         do {
 177                 writelen = write(data->retval_pipe, &sendret.c[index],
 178                                 writeleft);
 179                 if (writelen < 0) {
 180                         PERROR("write");
 181                         return EXIT_FAILURE;
 182                 }
 183                 writeleft -= writelen;
 184                 index += writelen;
 185         } while (writeleft > 0);
 186         return EXIT_SUCCESS;
 187 }
 188
 189 static
 190 int run_as(int (*cmd)(void *data), void *data, uid_t uid, gid_t gid)
 191 {
 192         struct run_as_data run_as_data;
 193         int ret = 0;
 194         int status;
 195         pid_t pid;
 196         int retval_pipe[2];
 197         ssize_t readlen, readleft, index;
 198         void *child_stack;
 199         union {
 200                 int i;
 201                 char c[sizeof(int)];
 202         } retval;
 203
 204         /*
 205          * If we are non-root, we can only deal with our own uid.
 206          */
 207         if (geteuid() != 0) {
 208                 if (uid != geteuid()) {
 209                         ERR("Client (%d)/Server (%d) UID mismatch (and sessiond is not root)",
 210                                 uid, geteuid());
 211                         return -EPERM;
 212                 }
 213         }
 214
 215         ret = pipe(retval_pipe);
 216         if (ret < 0) {
 217                 PERROR("pipe");
 218                 retval.i = ret;
 219                 goto end;
 220         }
 221         run_as_data.data = data;
 222         run_as_data.cmd = cmd;
 223         run_as_data.uid = uid;
 224         run_as_data.gid = gid;
 225         run_as_data.retval_pipe = retval_pipe[1];       /* write end */
 226         child_stack = mmap(NULL, RUNAS_CHILD_STACK_SIZE,
 227                 PROT_WRITE | PROT_READ,
 228                 MAP_PRIVATE | MAP_GROWSDOWN | MAP_ANONYMOUS | MAP_STACK,
 229                 -1, 0);
 230         if (child_stack == MAP_FAILED) {
 231                 PERROR("mmap");
 232                 retval.i = -ENOMEM;
 233                 goto close_pipe;
 234         }
 235         /*
 236          * Pointing to the middle of the stack to support architectures
 237          * where the stack grows up (HPPA).
 238          */
 239         pid = clone(child_run_as, child_stack + (RUNAS_CHILD_STACK_SIZE / 2),
 240                 CLONE_FILES | SIGCHLD,
 241                 &run_as_data, NULL);
 242         if (pid < 0) {
 243                 PERROR("clone");
 244                 retval.i = pid;
 245                 goto unmap_stack;
 246         }
 247         /* receive return value */
 248         readleft = sizeof(retval);
 249         index = 0;
 250         do {
 251                 readlen = read(retval_pipe[0], &retval.c[index], readleft);
 252                 if (readlen < 0) {
 253                         PERROR("read");
 254                         ret = -1;
 255                         break;
 256                 }
 257                 readleft -= readlen;
 258                 index += readlen;
 259         } while (readleft > 0);
 260
 261         /*
 262          * Parent: wait for child to return, in which case the
 263          * shared memory map will have been created.
 264          */
 265         pid = waitpid(pid, &status, 0);
 266         if (pid < 0 || !WIFEXITED(status) || WEXITSTATUS(status) != 0) {
 267                 PERROR("wait");
 268                 retval.i = -1;
 269         }
 270 unmap_stack:
 271         ret = munmap(child_stack, RUNAS_CHILD_STACK_SIZE);
 272         if (ret < 0) {
 273                 PERROR("munmap");
 274                 retval.i = ret;
 275         }
 276 close_pipe:
 277         ret = close(retval_pipe[0]);
 278         if (ret) {
 279                 PERROR("close");
 280         }
 281         ret = close(retval_pipe[1]);
 282         if (ret) {
 283                 PERROR("close");
 284         }
 285 end:
 286         return retval.i;
 287 }
 288
 289 int run_as_mkdir_recursive(const char *path, mode_t mode, uid_t uid, gid_t gid)
 290 {
 291         struct run_as_mkdir_data data;
 292
 293         DBG3("mkdir() recursive %s with mode %d for uid %d and gid %d",
 294                         path, mode, uid, gid);
 295         data.path = path;
 296         data.mode = mode;
 297         return run_as(_mkdir_recursive, &data, uid, gid);
 298 }
 299
 300 int run_as_mkdir(const char *path, mode_t mode, uid_t uid, gid_t gid)
 301 {
 302         struct run_as_mkdir_data data;
 303
 304         DBG3("mkdir() %s with mode %d for uid %d and gid %d",
 305                         path, mode, uid, gid);
 306         data.path = path;
 307         data.mode = mode;
 308         return run_as(_mkdir, &data, uid, gid);
 309 }
 310
 311 /*
 312  * Note: open_run_as is currently not working. We'd need to pass the fd
 313  * opened in the child to the parent.
 314  */
 315 int run_as_open(const char *path, int flags, mode_t mode, uid_t uid, gid_t gid)
 316 {
 317         struct run_as_open_data data;
 318
 319         DBG3("open() %s with flags %X mode %d for uid %d and gid %d",
 320                         path, flags, mode, uid, gid);
 321         data.path = path;
 322         data.flags = flags;
 323         data.mode = mode;
 324         return run_as(_open, &data, uid, gid);
 325 }