arch/um/os-Linux/file.c

   1 /*
   2  * Copyright (C) 2002 Jeff Dike (jdike@karaya.com)
   3  * Licensed under the GPL
   4  */
   5
   6 #include <stdio.h>
   7 #include <unistd.h>
   8 #include <errno.h>
   9 #include <fcntl.h>
  10 #include <signal.h>
  11 #include <sys/types.h>
  12 #include <sys/stat.h>
  13 #include <sys/socket.h>
  14 #include <sys/un.h>
  15 #include <sys/ioctl.h>
  16 #include <sys/mount.h>
  17 #include <sys/uio.h>
  18 #include "os.h"
  19 #include "user.h"
  20
  21 static void copy_stat(struct uml_stat *dst, const struct stat64 *src)
  22 {
  23         *dst = ((struct uml_stat) {
  24                 .ust_dev     = src->st_dev,     /* device */
  25                 .ust_ino     = src->st_ino,     /* inode */
  26                 .ust_mode    = src->st_mode,    /* protection */
  27                 .ust_nlink   = src->st_nlink,   /* number of hard links */
  28                 .ust_uid     = src->st_uid,     /* user ID of owner */
  29                 .ust_gid     = src->st_gid,     /* group ID of owner */
  30                 .ust_size    = src->st_size,    /* total size, in bytes */
  31                 .ust_blksize = src->st_blksize, /* blocksize for filesys I/O */
  32                 .ust_blocks  = src->st_blocks,  /* number of blocks allocated */
  33                 .ust_atime   = src->st_atime,   /* time of last access */
  34                 .ust_mtime   = src->st_mtime,   /* time of last modification */
  35                 .ust_ctime   = src->st_ctime,   /* time of last change */
  36         });
  37 }
  38
  39 int os_stat_fd(const int fd, struct uml_stat *ubuf)
  40 {
  41         struct stat64 sbuf;
  42         int err;
  43
  44         CATCH_EINTR(err = fstat64(fd, &sbuf));
  45         if(err < 0)
  46                 return -errno;
  47
  48         if(ubuf != NULL)
  49                 copy_stat(ubuf, &sbuf);
  50         return err;
  51 }
  52
  53 int os_stat_file(const char *file_name, struct uml_stat *ubuf)
  54 {
  55         struct stat64 sbuf;
  56         int err;
  57
  58         do {
  59                 err = stat64(file_name, &sbuf);
  60         } while((err < 0) && (errno == EINTR)) ;
  61
  62         if(err < 0)
  63                 return -errno;
  64
  65         if(ubuf != NULL)
  66                 copy_stat(ubuf, &sbuf);
  67         return err;
  68 }
  69
  70 int os_access(const char* file, int mode)
  71 {
  72         int amode, err;
  73
  74         amode=(mode&OS_ACC_R_OK ? R_OK : 0) | (mode&OS_ACC_W_OK ? W_OK : 0) |
  75               (mode&OS_ACC_X_OK ? X_OK : 0) | (mode&OS_ACC_F_OK ? F_OK : 0) ;
  76
  77         err = access(file, amode);
  78         if(err < 0)
  79                 return -errno;
  80
  81         return 0;
  82 }
  83
  84 /* FIXME? required only by hostaudio (because it passes ioctls verbatim) */
  85 int os_ioctl_generic(int fd, unsigned int cmd, unsigned long arg)
  86 {
  87         int err;
  88
  89         err = ioctl(fd, cmd, arg);
  90         if(err < 0)
  91                 return -errno;
  92
  93         return err;
  94 }
  95
  96 /* FIXME: ensure namebuf in os_get_if_name is big enough */
  97 int os_get_ifname(int fd, char* namebuf)
  98 {
  99         if(ioctl(fd, SIOCGIFNAME, namebuf) < 0)
 100                 return -errno;
 101
 102         return 0;
 103 }
 104
 105 int os_set_slip(int fd)
 106 {
 107         int disc, sencap;
 108
 109         disc = N_SLIP;
 110         if(ioctl(fd, TIOCSETD, &disc) < 0)
 111                 return -errno;
 112
 113         sencap = 0;
 114         if(ioctl(fd, SIOCSIFENCAP, &sencap) < 0)
 115                 return -errno;
 116
 117         return 0;
 118 }
 119
 120 int os_set_owner(int fd, int pid)
 121 {
 122         if(fcntl(fd, F_SETOWN, pid) < 0){
 123                 int save_errno = errno;
 124
 125                 if(fcntl(fd, F_GETOWN, 0) != pid)
 126                         return -save_errno;
 127         }
 128
 129         return 0;
 130 }
 131
 132 int os_mode_fd(int fd, int mode)
 133 {
 134         int err;
 135
 136         do {
 137                 err = fchmod(fd, mode);
 138         } while((err < 0) && (errno==EINTR)) ;
 139
 140         if(err < 0)
 141                 return -errno;
 142
 143         return 0;
 144 }
 145
 146 int os_file_type(char *file)
 147 {
 148         struct uml_stat buf;
 149         int err;
 150
 151         err = os_stat_file(file, &buf);
 152         if(err < 0)
 153                 return err;
 154
 155         if(S_ISDIR(buf.ust_mode))
 156                 return OS_TYPE_DIR;
 157         else if(S_ISLNK(buf.ust_mode))
 158                 return OS_TYPE_SYMLINK;
 159         else if(S_ISCHR(buf.ust_mode))
 160                 return OS_TYPE_CHARDEV;
 161         else if(S_ISBLK(buf.ust_mode))
 162                 return OS_TYPE_BLOCKDEV;
 163         else if(S_ISFIFO(buf.ust_mode))
 164                 return OS_TYPE_FIFO;
 165         else if(S_ISSOCK(buf.ust_mode))
 166                 return OS_TYPE_SOCK;
 167         else return OS_TYPE_FILE;
 168 }
 169
 170 int os_file_mode(const char *file, struct openflags *mode_out)
 171 {
 172         int err;
 173
 174         *mode_out = OPENFLAGS();
 175
 176         err = access(file, W_OK);
 177         if(err && (errno != EACCES))
 178                 return -errno;
 179         else if(!err)
 180                 *mode_out = of_write(*mode_out);
 181
 182         err = access(file, R_OK);
 183         if(err && (errno != EACCES))
 184                 return -errno;
 185         else if(!err)
 186                 *mode_out = of_read(*mode_out);
 187
 188         return err;
 189 }
 190
 191 int os_open_file(const char *file, struct openflags flags, int mode)
 192 {
 193         int fd, err, f = 0;
 194
 195         if(flags.r && flags.w) f = O_RDWR;
 196         else if(flags.r) f = O_RDONLY;
 197         else if(flags.w) f = O_WRONLY;
 198         else f = 0;
 199
 200         if(flags.s) f |= O_SYNC;
 201         if(flags.c) f |= O_CREAT;
 202         if(flags.t) f |= O_TRUNC;
 203         if(flags.e) f |= O_EXCL;
 204
 205         fd = open64(file, f, mode);
 206         if(fd < 0)
 207                 return -errno;
 208
 209         if(flags.cl && fcntl(fd, F_SETFD, 1)){
 210                 err = -errno;
 211                 close(fd);
 212                 return err;
 213         }
 214
 215         return fd;
 216 }
 217
 218 int os_connect_socket(const char *name)
 219 {
 220         struct sockaddr_un sock;
 221         int fd, err;
 222
 223         sock.sun_family = AF_UNIX;
 224         snprintf(sock.sun_path, sizeof(sock.sun_path), "%s", name);
 225
 226         fd = socket(AF_UNIX, SOCK_STREAM, 0);
 227         if(fd < 0) {
 228                 err = -errno;
 229                 goto out;
 230         }
 231
 232         err = connect(fd, (struct sockaddr *) &sock, sizeof(sock));
 233         if(err) {
 234                 err = -errno;
 235                 goto out_close;
 236         }
 237
 238         return fd;
 239
 240 out_close:
 241         close(fd);
 242 out:
 243         return err;
 244 }
 245
 246 void os_close_file(int fd)
 247 {
 248         close(fd);
 249 }
 250
 251 int os_seek_file(int fd, unsigned long long offset)
 252 {
 253         unsigned long long actual;
 254
 255         actual = lseek64(fd, offset, SEEK_SET);
 256         if(actual != offset)
 257                 return -errno;
 258         return 0;
 259 }
 260
 261 int os_read_file(int fd, void *buf, int len)
 262 {
 263         int n = read(fd, buf, len);
 264
 265         if(n < 0)
 266                 return -errno;
 267         return n;
 268 }
 269
 270 int os_write_file(int fd, const void *buf, int len)
 271 {
 272         int n = write(fd, (void *) buf, len);
 273
 274         if(n < 0)
 275                 return -errno;
 276         return n;
 277 }
 278
 279 int os_file_size(const char *file, unsigned long long *size_out)
 280 {
 281         struct uml_stat buf;
 282         int err;
 283
 284         err = os_stat_file(file, &buf);
 285         if(err < 0){
 286                 printk("Couldn't stat \"%s\" : err = %d\n", file, -err);
 287                 return err;
 288         }
 289
 290         if(S_ISBLK(buf.ust_mode)){
 291                 int fd;
 292                 long blocks;
 293
 294                 fd = open(file, O_RDONLY, 0);
 295                 if(fd < 0) {
 296                         err = -errno;
 297                         printk("Couldn't open \"%s\", errno = %d\n", file,
 298                                errno);
 299                         return err;
 300                 }
 301                 if(ioctl(fd, BLKGETSIZE, &blocks) < 0){
 302                         err = -errno;
 303                         printk("Couldn't get the block size of \"%s\", "
 304                                "errno = %d\n", file, errno);
 305                         close(fd);
 306                         return err;
 307                 }
 308                 *size_out = ((long long) blocks) * 512;
 309                 close(fd);
 310         }
 311         else *size_out = buf.ust_size;
 312
 313         return 0;
 314 }
 315
 316 int os_file_modtime(const char *file, unsigned long *modtime)
 317 {
 318         struct uml_stat buf;
 319         int err;
 320
 321         err = os_stat_file(file, &buf);
 322         if(err < 0){
 323                 printk("Couldn't stat \"%s\" : err = %d\n", file, -err);
 324                 return err;
 325         }
 326
 327         *modtime = buf.ust_mtime;
 328         return 0;
 329 }
 330
 331 int os_set_exec_close(int fd)
 332 {
 333         int err;
 334
 335         CATCH_EINTR(err = fcntl(fd, F_SETFD, FD_CLOEXEC));
 336
 337         if(err < 0)
 338                 return -errno;
 339         return err;
 340 }
 341
 342 int os_pipe(int *fds, int stream, int close_on_exec)
 343 {
 344         int err, type = stream ? SOCK_STREAM : SOCK_DGRAM;
 345
 346         err = socketpair(AF_UNIX, type, 0, fds);
 347         if(err < 0)
 348                 return -errno;
 349
 350         if(!close_on_exec)
 351                 return 0;
 352
 353         err = os_set_exec_close(fds[0]);
 354         if(err < 0)
 355                 goto error;
 356
 357         err = os_set_exec_close(fds[1]);
 358         if(err < 0)
 359                 goto error;
 360
 361         return 0;
 362
 363  error:
 364         printk("os_pipe : Setting FD_CLOEXEC failed, err = %d\n", -err);
 365         close(fds[1]);
 366         close(fds[0]);
 367         return err;
 368 }
 369
 370 int os_set_fd_async(int fd)
 371 {
 372         int err, flags;
 373
 374         flags = fcntl(fd, F_GETFL);
 375         if (flags < 0)
 376                 return -errno;
 377
 378         flags |= O_ASYNC | O_NONBLOCK;
 379         if (fcntl(fd, F_SETFL, flags) < 0) {
 380                 err = -errno;
 381                 printk("os_set_fd_async : failed to set O_ASYNC and "
 382                        "O_NONBLOCK on fd # %d, errno = %d\n", fd, errno);
 383                 return err;
 384         }
 385
 386         if ((fcntl(fd, F_SETSIG, SIGIO) < 0) ||
 387             (fcntl(fd, F_SETOWN, os_getpid()) < 0)) {
 388                 err = -errno;
 389                 printk("os_set_fd_async : Failed to fcntl F_SETOWN "
 390                        "(or F_SETSIG) fd %d, errno = %d\n", fd, errno);
 391                 return err;
 392         }
 393
 394         return 0;
 395 }
 396
 397 int os_clear_fd_async(int fd)
 398 {
 399         int flags = fcntl(fd, F_GETFL);
 400
 401         flags &= ~(O_ASYNC | O_NONBLOCK);
 402         if(fcntl(fd, F_SETFL, flags) < 0)
 403                 return -errno;
 404         return 0;
 405 }
 406
 407 int os_set_fd_block(int fd, int blocking)
 408 {
 409         int flags;
 410
 411         flags = fcntl(fd, F_GETFL);
 412
 413         if(blocking) flags &= ~O_NONBLOCK;
 414         else flags |= O_NONBLOCK;
 415
 416         if(fcntl(fd, F_SETFL, flags) < 0)
 417                 return -errno;
 418
 419         return 0;
 420 }
 421
 422 int os_accept_connection(int fd)
 423 {
 424         int new;
 425
 426         new = accept(fd, NULL, 0);
 427         if(new < 0)
 428                 return -errno;
 429         return new;
 430 }
 431
 432 #ifndef SHUT_RD
 433 #define SHUT_RD 0
 434 #endif
 435
 436 #ifndef SHUT_WR
 437 #define SHUT_WR 1
 438 #endif
 439
 440 #ifndef SHUT_RDWR
 441 #define SHUT_RDWR 2
 442 #endif
 443
 444 int os_shutdown_socket(int fd, int r, int w)
 445 {
 446         int what, err;
 447
 448         if(r && w) what = SHUT_RDWR;
 449         else if(r) what = SHUT_RD;
 450         else if(w) what = SHUT_WR;
 451         else {
 452                 printk("os_shutdown_socket : neither r or w was set\n");
 453                 return -EINVAL;
 454         }
 455         err = shutdown(fd, what);
 456         if(err < 0)
 457                 return -errno;
 458         return 0;
 459 }
 460
 461 int os_rcv_fd(int fd, int *helper_pid_out)
 462 {
 463         int new, n;
 464         char buf[CMSG_SPACE(sizeof(new))];
 465         struct msghdr msg;
 466         struct cmsghdr *cmsg;
 467         struct iovec iov;
 468
 469         msg.msg_name = NULL;
 470         msg.msg_namelen = 0;
 471         iov = ((struct iovec) { .iov_base  = helper_pid_out,
 472                                 .iov_len   = sizeof(*helper_pid_out) });
 473         msg.msg_iov = &iov;
 474         msg.msg_iovlen = 1;
 475         msg.msg_control = buf;
 476         msg.msg_controllen = sizeof(buf);
 477         msg.msg_flags = 0;
 478
 479         n = recvmsg(fd, &msg, 0);
 480         if(n < 0)
 481                 return -errno;
 482         else if(n != iov.iov_len)
 483                 *helper_pid_out = -1;
 484
 485         cmsg = CMSG_FIRSTHDR(&msg);
 486         if(cmsg == NULL){
 487                 printk("rcv_fd didn't receive anything, error = %d\n", errno);
 488                 return -1;
 489         }
 490         if((cmsg->cmsg_level != SOL_SOCKET) ||
 491            (cmsg->cmsg_type != SCM_RIGHTS)){
 492                 printk("rcv_fd didn't receive a descriptor\n");
 493                 return -1;
 494         }
 495
 496         new = ((int *) CMSG_DATA(cmsg))[0];
 497         return new;
 498 }
 499
 500 int os_create_unix_socket(const char *file, int len, int close_on_exec)
 501 {
 502         struct sockaddr_un addr;
 503         int sock, err;
 504
 505         sock = socket(PF_UNIX, SOCK_DGRAM, 0);
 506         if(sock < 0)
 507                 return -errno;
 508
 509         if(close_on_exec) {
 510                 err = os_set_exec_close(sock);
 511                 if(err < 0)
 512                         printk("create_unix_socket : close_on_exec failed, "
 513                        "err = %d", -err);
 514         }
 515
 516         addr.sun_family = AF_UNIX;
 517
 518         /* XXX Be more careful about overflow */
 519         snprintf(addr.sun_path, len, "%s", file);
 520
 521         err = bind(sock, (struct sockaddr *) &addr, sizeof(addr));
 522         if(err < 0)
 523                 return -errno;
 524
 525         return sock;
 526 }
 527
 528 void os_flush_stdout(void)
 529 {
 530         fflush(stdout);
 531 }
 532
 533 int os_lock_file(int fd, int excl)
 534 {
 535         int type = excl ? F_WRLCK : F_RDLCK;
 536         struct flock lock = ((struct flock) { .l_type   = type,
 537                                               .l_whence = SEEK_SET,
 538                                               .l_start  = 0,
 539                                               .l_len    = 0 } );
 540         int err, save;
 541
 542         err = fcntl(fd, F_SETLK, &lock);
 543         if(!err)
 544                 goto out;
 545
 546         save = -errno;
 547         err = fcntl(fd, F_GETLK, &lock);
 548         if(err){
 549                 err = -errno;
 550                 goto out;
 551         }
 552
 553         printk("F_SETLK failed, file already locked by pid %d\n", lock.l_pid);
 554         err = save;
 555  out:
 556         return err;
 557 }