extras/volume_id/lib/udf.c

   1 /*
   2  * volume_id - reads filesystem label and uuid
   3  *
   4  * Copyright (C) 2004 Kay Sievers <kay.sievers@vrfy.org>
   5  *
   6  *      This program is free software; you can redistribute it and/or modify it
   7  *      under the terms of the GNU General Public License as published by the
   8  *      Free Software Foundation version 2 of the License.
   9  */
  10
  11 #ifndef _GNU_SOURCE
  12 #define _GNU_SOURCE 1
  13 #endif
  14
  15 #ifdef HAVE_CONFIG_H
  16 #  include <config.h>
  17 #endif
  18
  19 #include <stdio.h>
  20 #include <stdlib.h>
  21 #include <unistd.h>
  22 #include <string.h>
  23 #include <errno.h>
  24 #include <ctype.h>
  25
  26 #include "libvolume_id.h"
  27 #include "util.h"
  28
  29 struct volume_descriptor {
  30         struct descriptor_tag {
  31                 uint16_t        id;
  32                 uint16_t        version;
  33                 uint8_t         checksum;
  34                 uint8_t         reserved;
  35                 uint16_t        serial;
  36                 uint16_t        crc;
  37                 uint16_t        crc_len;
  38                 uint32_t        location;
  39         } PACKED tag;
  40         union {
  41                 struct anchor_descriptor {
  42                         uint32_t        length;
  43                         uint32_t        location;
  44                 } PACKED anchor;
  45                 struct primary_descriptor {
  46                         uint32_t        seq_num;
  47                         uint32_t        desc_num;
  48                         struct dstring {
  49                                 uint8_t clen;
  50                                 uint8_t c[31];
  51                         } PACKED ident;
  52                 } PACKED primary;
  53         } PACKED type;
  54 } PACKED;
  55
  56 struct volume_structure_descriptor {
  57         uint8_t         type;
  58         uint8_t         id[5];
  59         uint8_t         version;
  60 } PACKED;
  61
  62 #define UDF_VSD_OFFSET                  0x8000
  63
  64 int volume_id_probe_udf(struct volume_id *id, uint64_t off)
  65 {
  66         struct volume_descriptor *vd;
  67         struct volume_structure_descriptor *vsd;
  68         unsigned int bs;
  69         unsigned int b;
  70         unsigned int type;
  71         unsigned int count;
  72         unsigned int loc;
  73         unsigned int clen;
  74
  75         dbg("probing at offset 0x%llx", (unsigned long long) off);
  76
  77         vsd = (struct volume_structure_descriptor *) volume_id_get_buffer(id, off + UDF_VSD_OFFSET, 0x200);
  78         if (vsd == NULL)
  79                 return -1;
  80
  81         if (memcmp(vsd->id, "NSR02", 5) == 0)
  82                 goto blocksize;
  83         if (memcmp(vsd->id, "NSR03", 5) == 0)
  84                 goto blocksize;
  85         if (memcmp(vsd->id, "BEA01", 5) == 0)
  86                 goto blocksize;
  87         if (memcmp(vsd->id, "BOOT2", 5) == 0)
  88                 goto blocksize;
  89         if (memcmp(vsd->id, "CD001", 5) == 0)
  90                 goto blocksize;
  91         if (memcmp(vsd->id, "CDW02", 5) == 0)
  92                 goto blocksize;
  93         if (memcmp(vsd->id, "TEA03", 5) == 0)
  94                 goto blocksize;
  95         return -1;
  96
  97 blocksize:
  98         /* search the next VSD to get the logical block size of the volume */
  99         for (bs = 0x800; bs < 0x8000; bs += 0x800) {
 100                 vsd = (struct volume_structure_descriptor *) volume_id_get_buffer(id, off + UDF_VSD_OFFSET + bs, 0x800);
 101                 if (vsd == NULL)
 102                         return -1;
 103                 dbg("test for blocksize: 0x%x", bs);
 104                 if (vsd->id[0] != '\0')
 105                         goto nsr;
 106         }
 107         return -1;
 108
 109 nsr:
 110         /* search the list of VSDs for a NSR descriptor */
 111         for (b = 0; b < 64; b++) {
 112                 vsd = (struct volume_structure_descriptor *) volume_id_get_buffer(id, off + UDF_VSD_OFFSET + (b * bs), 0x800);
 113                 if (vsd == NULL)
 114                         return -1;
 115
 116                 dbg("vsd: %c%c%c%c%c",
 117                     vsd->id[0], vsd->id[1], vsd->id[2], vsd->id[3], vsd->id[4]);
 118
 119                 if (vsd->id[0] == '\0')
 120                         return -1;
 121                 if (memcmp(vsd->id, "NSR02", 5) == 0)
 122                         goto anchor;
 123                 if (memcmp(vsd->id, "NSR03", 5) == 0)
 124                         goto anchor;
 125         }
 126         return -1;
 127
 128 anchor:
 129         /* read anchor volume descriptor */
 130         vd = (struct volume_descriptor *) volume_id_get_buffer(id, off + (256 * bs), 0x200);
 131         if (vd == NULL)
 132                 return -1;
 133
 134         type = le16_to_cpu(vd->tag.id);
 135         if (type != 2) /* TAG_ID_AVDP */
 136                 goto found;
 137
 138         /* get desriptor list address and block count */
 139         count = le32_to_cpu(vd->type.anchor.length) / bs;
 140         loc = le32_to_cpu(vd->type.anchor.location);
 141         dbg("0x%x descriptors starting at logical secor 0x%x", count, loc);
 142
 143         /* pick the primary descriptor from the list */
 144         for (b = 0; b < count; b++) {
 145                 vd = (struct volume_descriptor *) volume_id_get_buffer(id, off + ((loc + b) * bs), 0x200);
 146                 if (vd == NULL)
 147                         return -1;
 148
 149                 type = le16_to_cpu(vd->tag.id);
 150                 dbg("descriptor type %i", type);
 151
 152                 /* check validity */
 153                 if (type == 0)
 154                         goto found;
 155                 if (le32_to_cpu(vd->tag.location) != loc + b)
 156                         goto found;
 157
 158                 if (type == 1) /* TAG_ID_PVD */
 159                         goto pvd;
 160         }
 161         goto found;
 162
 163 pvd:
 164         volume_id_set_label_raw(id, &(vd->type.primary.ident.clen), 32);
 165
 166         clen = vd->type.primary.ident.clen;
 167         dbg("label string charsize=%i bit", clen);
 168         if (clen == 8)
 169                 volume_id_set_label_string(id, vd->type.primary.ident.c, 31);
 170         else if (clen == 16)
 171                 volume_id_set_label_unicode16(id, vd->type.primary.ident.c, BE,31);
 172
 173 found:
 174         volume_id_set_usage(id, VOLUME_ID_FILESYSTEM);
 175         id->type = "udf";
 176
 177         return 0;
 178 }