libbb/loop.c

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  * Utility routines.
   4  *
   5  * Copyright (C) 1999-2004 by Erik Andersen <andersen@codepoet.org>
   6  * Copyright (C) 2005 by Rob Landley <rob@landley.net>
   7  *
   8  * Licensed under the GPL v2 or later, see the file LICENSE in this tarball.
   9  */
  10 #include "libbb.h"
  11 #include <linux/version.h>
  12
  13 #if LINUX_VERSION_CODE >= KERNEL_VERSION(2,6,0)
  14
  15 /* For 2.6, use the cleaned up header to get the 64 bit API. */
  16 // Commented out per Rob's request
  17 //# include "fix_u32.h" /* some old toolchains need __u64 for linux/loop.h */
  18 # include <linux/loop.h>
  19 typedef struct loop_info64 bb_loop_info;
  20 # define BB_LOOP_SET_STATUS LOOP_SET_STATUS64
  21 # define BB_LOOP_GET_STATUS LOOP_GET_STATUS64
  22
  23 #else
  24
  25 /* For 2.4 and earlier, use the 32 bit API (and don't trust the headers) */
  26 /* Stuff stolen from linux/loop.h for 2.4 and earlier kernels */
  27 # include <linux/posix_types.h>
  28 # define LO_NAME_SIZE        64
  29 # define LO_KEY_SIZE         32
  30 # define LOOP_SET_FD         0x4C00
  31 # define LOOP_CLR_FD         0x4C01
  32 # define BB_LOOP_SET_STATUS  0x4C02
  33 # define BB_LOOP_GET_STATUS  0x4C03
  34 typedef struct {
  35         int                lo_number;
  36         __kernel_dev_t     lo_device;
  37         unsigned long      lo_inode;
  38         __kernel_dev_t     lo_rdevice;
  39         int                lo_offset;
  40         int                lo_encrypt_type;
  41         int                lo_encrypt_key_size;
  42         int                lo_flags;
  43         char               lo_file_name[LO_NAME_SIZE];
  44         unsigned char      lo_encrypt_key[LO_KEY_SIZE];
  45         unsigned long      lo_init[2];
  46         char               reserved[4];
  47 } bb_loop_info;
  48 #endif
  49
  50 char* FAST_FUNC query_loop(const char *device)
  51 {
  52         int fd;
  53         bb_loop_info loopinfo;
  54         char *dev = NULL;
  55
  56         fd = open(device, O_RDONLY);
  57         if (fd >= 0) {
  58                 if (ioctl(fd, BB_LOOP_GET_STATUS, &loopinfo) == 0) {
  59                         dev = xasprintf("%lu %s", (long) loopinfo.lo_offset,
  60                                         (char *)loopinfo.lo_file_name);
  61                 }
  62                 close(fd);
  63         }
  64
  65         return dev;
  66 }
  67
  68 int FAST_FUNC del_loop(const char *device)
  69 {
  70         int fd, rc;
  71
  72         fd = open(device, O_RDONLY);
  73         if (fd < 0)
  74                 return 1;
  75         rc = ioctl(fd, LOOP_CLR_FD, 0);
  76         close(fd);
  77
  78         return rc;
  79 }
  80
  81 /* Returns 0 if mounted RW, 1 if mounted read-only, <0 for error.
  82    *device is loop device to use, or if *device==NULL finds a loop device to
  83    mount it on and sets *device to a strdup of that loop device name.  This
  84    search will re-use an existing loop device already bound to that
  85    file/offset if it finds one.
  86  */
  87 int FAST_FUNC set_loop(char **device, const char *file, unsigned long long offset)
  88 {
  89         char dev[LOOP_NAMESIZE];
  90         char *try;
  91         bb_loop_info loopinfo;
  92         struct stat statbuf;
  93         int i, dfd, ffd, mode, rc = -1;
  94
  95         /* Open the file.  Barf if this doesn't work.  */
  96         mode = O_RDWR;
  97         ffd = open(file, mode);
  98         if (ffd < 0) {
  99                 mode = O_RDONLY;
 100                 ffd = open(file, mode);
 101                 if (ffd < 0)
 102                         return -errno;
 103         }
 104
 105         /* Find a loop device.  */
 106         try = *device ? *device : dev;
 107         for (i = 0; rc; i++) {
 108                 sprintf(dev, LOOP_FORMAT, i);
 109
 110                 /* Ran out of block devices, return failure.  */
 111                 if (stat(try, &statbuf) != 0 || !S_ISBLK(statbuf.st_mode)) {
 112                         rc = -ENOENT;
 113                         break;
 114                 }
 115                 /* Open the sucker and check its loopiness.  */
 116                 dfd = open(try, mode);
 117                 if (dfd < 0 && errno == EROFS) {
 118                         mode = O_RDONLY;
 119                         dfd = open(try, mode);
 120                 }
 121                 if (dfd < 0)
 122                         goto try_again;
 123
 124                 rc = ioctl(dfd, BB_LOOP_GET_STATUS, &loopinfo);
 125
 126                 /* If device is free, claim it.  */
 127                 if (rc && errno == ENXIO) {
 128                         memset(&loopinfo, 0, sizeof(loopinfo));
 129                         safe_strncpy((char *)loopinfo.lo_file_name, file, LO_NAME_SIZE);
 130                         loopinfo.lo_offset = offset;
 131                         /* Associate free loop device with file.  */
 132                         if (ioctl(dfd, LOOP_SET_FD, ffd) == 0) {
 133                                 if (ioctl(dfd, BB_LOOP_SET_STATUS, &loopinfo) == 0)
 134                                         rc = 0;
 135                                 else
 136                                         ioctl(dfd, LOOP_CLR_FD, 0);
 137                         }
 138
 139                 /* If this block device already set up right, re-use it.
 140                    (Yes this is racy, but associating two loop devices with the same
 141                    file isn't pretty either.  In general, mounting the same file twice
 142                    without using losetup manually is problematic.)
 143                  */
 144                 } else
 145                 if (strcmp(file, (char *)loopinfo.lo_file_name) != 0
 146                  || offset != loopinfo.lo_offset
 147                 ) {
 148                         rc = -1;
 149                 }
 150                 close(dfd);
 151  try_again:
 152                 if (*device) break;
 153         }
 154         close(ffd);
 155         if (rc == 0) {
 156                 if (!*device)
 157                         *device = xstrdup(dev);
 158                 return (mode == O_RDONLY); /* 1:ro, 0:rw */
 159         }
 160         return rc;
 161 }