usr.bin/mkimg/bsd.c

   1 /*-
   2  * Copyright (c) 2014 Juniper Networks, Inc.
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  *
  14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  24  * SUCH DAMAGE.
  25  */
  26
  27 #include <sys/cdefs.h>
  28 __FBSDID("$FreeBSD$");
  29
  30 #include <sys/types.h>
  31 #include <sys/disklabel.h>
  32 #include <sys/endian.h>
  33 #include <sys/errno.h>
  34 #include <stdlib.h>
  35 #include <string.h>
  36 #include <unistd.h>
  37
  38 #include "mkimg.h"
  39 #include "scheme.h"
  40
  41 #ifndef FS_NANDFS
  42 #define FS_NANDFS       30
  43 #endif
  44
  45 static struct mkimg_alias bsd_aliases[] = {
  46     {   ALIAS_FREEBSD_NANDFS, ALIAS_INT2TYPE(FS_NANDFS) },
  47     {   ALIAS_FREEBSD_SWAP, ALIAS_INT2TYPE(FS_SWAP) },
  48     {   ALIAS_FREEBSD_UFS, ALIAS_INT2TYPE(FS_BSDFFS) },
  49     {   ALIAS_FREEBSD_VINUM, ALIAS_INT2TYPE(FS_VINUM) },
  50     {   ALIAS_FREEBSD_ZFS, ALIAS_INT2TYPE(FS_ZFS) },
  51     {   ALIAS_NONE, 0 }
  52 };
  53
  54 static u_int
  55 bsd_metadata(u_int where)
  56 {
  57         u_int secs;
  58
  59         secs = BBSIZE / secsz;
  60         return ((where == SCHEME_META_IMG_START) ? secs : 0);
  61 }
  62
  63 static int
  64 bsd_write(int fd, lba_t imgsz, void *bootcode)
  65 {
  66         u_char *buf, *p;
  67         struct disklabel *d;
  68         struct partition *dp;
  69         struct part *part;
  70         int error, n;
  71         uint16_t checksum;
  72
  73         buf = malloc(BBSIZE);
  74         if (buf == NULL)
  75                 return (ENOMEM);
  76         if (bootcode != NULL) {
  77                 memcpy(buf, bootcode, BBSIZE);
  78                 memset(buf + secsz, 0, secsz);
  79         } else
  80                 memset(buf, 0, BBSIZE);
  81
  82         imgsz = ncyls * nheads * nsecs;
  83         ftruncate(fd, imgsz * secsz);
  84
  85         d = (void *)(buf + secsz);
  86         le32enc(&d->d_magic, DISKMAGIC);
  87         le32enc(&d->d_secsize, secsz);
  88         le32enc(&d->d_nsectors, nsecs);
  89         le32enc(&d->d_ntracks, nheads);
  90         le32enc(&d->d_ncylinders, ncyls);
  91         le32enc(&d->d_secpercyl, nsecs * nheads);
  92         le32enc(&d->d_secperunit, imgsz);
  93         le16enc(&d->d_rpm, 3600);
  94         le32enc(&d->d_magic2, DISKMAGIC);
  95         le16enc(&d->d_npartitions, (8 > nparts + 1) ? 8 : nparts + 1);
  96         le32enc(&d->d_bbsize, BBSIZE);
  97
  98         dp = &d->d_partitions[RAW_PART];
  99         le32enc(&dp->p_size, imgsz);
 100         STAILQ_FOREACH(part, &partlist, link) {
 101                 n = part->index + ((part->index >= RAW_PART) ? 1 : 0);
 102                 dp = &d->d_partitions[n];
 103                 le32enc(&dp->p_size, part->size);
 104                 le32enc(&dp->p_offset, part->block);
 105                 dp->p_fstype = ALIAS_TYPE2INT(part->type);
 106         }
 107
 108         dp = &d->d_partitions[nparts + 1];
 109         checksum = 0;
 110         for (p = buf; p < (u_char *)dp; p += 2)
 111                 checksum ^= le16dec(p);
 112         le16enc(&d->d_checksum, checksum);
 113
 114         error = mkimg_seek(fd, 0);
 115         if (error == 0) {
 116                 if (write(fd, buf, BBSIZE) != BBSIZE)
 117                         error = errno;
 118         }
 119         free(buf);
 120         return (error);
 121 }
 122
 123 static struct mkimg_scheme bsd_scheme = {
 124         .name = "bsd",
 125         .description = "BSD disk label",
 126         .aliases = bsd_aliases,
 127         .metadata = bsd_metadata,
 128         .write = bsd_write,
 129         .nparts = 19,
 130         .bootcode = BBSIZE,
 131         .maxsecsz = 512
 132 };
 133
 134 SCHEME_DEFINE(bsd_scheme);