2011-06-30 16:08:56 +00:00
|
|
|
/*-
|
|
|
|
* Copyright (c) 1998 Michael Smith <msmith@freebsd.org>
|
2012-08-05 12:15:15 +00:00
|
|
|
* Copyright (c) 2012 Andrey V. Elsukov <ae@FreeBSD.org>
|
2011-06-30 16:08:56 +00:00
|
|
|
* All rights reserved.
|
|
|
|
*
|
|
|
|
* Redistribution and use in source and binary forms, with or without
|
|
|
|
* modification, are permitted provided that the following conditions
|
|
|
|
* are met:
|
|
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
|
|
* notice, this list of conditions and the following disclaimer.
|
|
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
|
|
* documentation and/or other materials provided with the distribution.
|
|
|
|
*
|
|
|
|
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
|
|
|
|
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
|
|
|
|
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
|
|
|
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
|
|
|
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
|
|
|
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
|
|
|
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
|
|
|
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
|
|
|
* SUCH DAMAGE.
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include <sys/cdefs.h>
|
|
|
|
__FBSDID("$FreeBSD$");
|
|
|
|
|
2012-08-05 12:15:15 +00:00
|
|
|
#include <sys/disk.h>
|
2011-06-30 16:08:56 +00:00
|
|
|
#include <stand.h>
|
|
|
|
#include <stdarg.h>
|
|
|
|
#include <bootstrap.h>
|
2012-08-05 12:15:15 +00:00
|
|
|
#include <part.h>
|
2011-06-30 16:08:56 +00:00
|
|
|
|
|
|
|
#include "disk.h"
|
|
|
|
|
|
|
|
#ifdef DISK_DEBUG
|
|
|
|
# define DEBUG(fmt, args...) printf("%s: " fmt "\n" , __func__ , ## args)
|
|
|
|
#else
|
|
|
|
# define DEBUG(fmt, args...)
|
|
|
|
#endif
|
|
|
|
|
2012-08-05 12:15:15 +00:00
|
|
|
struct open_disk {
|
|
|
|
struct ptable *table;
|
|
|
|
off_t mediasize;
|
|
|
|
u_int sectorsize;
|
2011-06-30 16:08:56 +00:00
|
|
|
};
|
|
|
|
|
2012-08-05 12:15:15 +00:00
|
|
|
struct print_args {
|
|
|
|
struct disk_devdesc *dev;
|
|
|
|
const char *prefix;
|
|
|
|
int verbose;
|
|
|
|
};
|
2011-07-01 18:31:59 +00:00
|
|
|
|
2012-08-05 12:15:15 +00:00
|
|
|
/* Convert size to a human-readable number. */
|
2011-06-30 16:08:56 +00:00
|
|
|
static char *
|
2012-08-05 12:15:15 +00:00
|
|
|
display_size(uint64_t size, u_int sectorsize)
|
2011-06-30 16:08:56 +00:00
|
|
|
{
|
|
|
|
static char buf[80];
|
|
|
|
char unit;
|
|
|
|
|
2012-08-05 12:15:15 +00:00
|
|
|
size = size * sectorsize / 1024;
|
2011-06-30 16:08:56 +00:00
|
|
|
unit = 'K';
|
|
|
|
if (size >= 10485760000LL) {
|
|
|
|
size /= 1073741824;
|
|
|
|
unit = 'T';
|
|
|
|
} else if (size >= 10240000) {
|
|
|
|
size /= 1048576;
|
|
|
|
unit = 'G';
|
|
|
|
} else if (size >= 10000) {
|
|
|
|
size /= 1024;
|
|
|
|
unit = 'M';
|
|
|
|
}
|
2012-08-05 12:15:15 +00:00
|
|
|
sprintf(buf, "%ld%cB", (long)size, unit);
|
2011-06-30 16:08:56 +00:00
|
|
|
return (buf);
|
|
|
|
}
|
|
|
|
|
|
|
|
static int
|
2012-08-05 12:15:15 +00:00
|
|
|
ptblread(void *d, void *buf, size_t blocks, off_t offset)
|
2011-06-30 16:08:56 +00:00
|
|
|
{
|
2012-08-05 12:15:15 +00:00
|
|
|
struct disk_devdesc *dev;
|
|
|
|
struct open_disk *od;
|
2011-06-30 16:08:56 +00:00
|
|
|
|
2012-08-05 12:15:15 +00:00
|
|
|
dev = (struct disk_devdesc *)d;
|
|
|
|
od = (struct open_disk *)dev->d_opendata;
|
|
|
|
return (dev->d_dev->dv_strategy(dev, F_READ, offset,
|
|
|
|
blocks * od->sectorsize, (char *)buf, NULL));
|
2011-06-30 16:08:56 +00:00
|
|
|
}
|
|
|
|
|
2012-08-05 12:15:15 +00:00
|
|
|
#define PWIDTH 35
|
2011-06-30 16:08:56 +00:00
|
|
|
static void
|
2012-08-05 12:15:15 +00:00
|
|
|
ptable_print(void *arg, const char *pname, const struct ptable_entry *part)
|
2011-06-30 16:08:56 +00:00
|
|
|
{
|
2012-08-05 12:15:15 +00:00
|
|
|
struct print_args *pa, bsd;
|
|
|
|
struct open_disk *od;
|
|
|
|
struct ptable *table;
|
2011-06-30 16:08:56 +00:00
|
|
|
char line[80];
|
|
|
|
|
2012-08-05 12:15:15 +00:00
|
|
|
pa = (struct print_args *)arg;
|
|
|
|
od = (struct open_disk *)pa->dev->d_opendata;
|
|
|
|
sprintf(line, " %s%s: %s", pa->prefix, pname,
|
|
|
|
parttype2str(part->type));
|
|
|
|
if (pa->verbose)
|
|
|
|
sprintf(line, "%-*s%s", PWIDTH, line,
|
|
|
|
display_size(part->end - part->start + 1,
|
|
|
|
od->sectorsize));
|
|
|
|
strcat(line, "\n");
|
2011-06-30 16:08:56 +00:00
|
|
|
pager_output(line);
|
2012-08-05 12:15:15 +00:00
|
|
|
if (part->type == PART_FREEBSD) {
|
|
|
|
/* Open slice with BSD label */
|
|
|
|
pa->dev->d_offset = part->start;
|
|
|
|
table = ptable_open(pa->dev, part->end - part->start + 1,
|
|
|
|
od->sectorsize, ptblread);
|
|
|
|
if (table == NULL)
|
|
|
|
return;
|
|
|
|
sprintf(line, " %s%s", pa->prefix, pname);
|
|
|
|
bsd.dev = pa->dev;
|
|
|
|
bsd.prefix = line;
|
|
|
|
bsd.verbose = pa->verbose;
|
|
|
|
ptable_iterate(table, &bsd, ptable_print);
|
|
|
|
ptable_close(table);
|
2011-06-30 16:08:56 +00:00
|
|
|
}
|
|
|
|
}
|
2012-08-05 12:15:15 +00:00
|
|
|
#undef PWIDTH
|
2011-06-30 16:08:56 +00:00
|
|
|
|
2012-08-05 12:15:15 +00:00
|
|
|
void
|
|
|
|
disk_print(struct disk_devdesc *dev, char *prefix, int verbose)
|
2011-06-30 16:08:56 +00:00
|
|
|
{
|
2012-08-05 12:15:15 +00:00
|
|
|
struct open_disk *od;
|
|
|
|
struct print_args pa;
|
|
|
|
|
|
|
|
/* Disk should be opened */
|
|
|
|
od = (struct open_disk *)dev->d_opendata;
|
|
|
|
pa.dev = dev;
|
|
|
|
pa.prefix = prefix;
|
|
|
|
pa.verbose = verbose;
|
|
|
|
ptable_iterate(od->table, &pa, ptable_print);
|
2011-06-30 16:08:56 +00:00
|
|
|
}
|
|
|
|
|
2012-08-05 12:15:15 +00:00
|
|
|
int
|
|
|
|
disk_open(struct disk_devdesc *dev, off_t mediasize, u_int sectorsize)
|
2011-06-30 16:08:56 +00:00
|
|
|
{
|
2012-08-05 12:15:15 +00:00
|
|
|
struct open_disk *od;
|
|
|
|
struct ptable *table;
|
|
|
|
struct ptable_entry part;
|
|
|
|
int rc;
|
2011-06-30 16:08:56 +00:00
|
|
|
|
2012-08-05 12:15:15 +00:00
|
|
|
od = (struct open_disk *)malloc(sizeof(struct open_disk));
|
|
|
|
if (od == NULL) {
|
|
|
|
DEBUG("no memory");
|
|
|
|
return (ENOMEM);
|
2011-06-30 16:08:56 +00:00
|
|
|
}
|
|
|
|
/*
|
2012-08-05 12:15:15 +00:00
|
|
|
* While we are reading disk metadata, make sure we do it relative
|
|
|
|
* to the start of the disk
|
2011-06-30 16:08:56 +00:00
|
|
|
*/
|
2012-08-05 12:15:15 +00:00
|
|
|
rc = 0;
|
|
|
|
table = NULL;
|
|
|
|
dev->d_offset = 0;
|
|
|
|
dev->d_opendata = od;
|
|
|
|
od->mediasize = mediasize;
|
|
|
|
od->sectorsize = sectorsize;
|
2012-08-13 13:10:50 +00:00
|
|
|
DEBUG("%s unit %d, slice %d, partition %d",
|
2012-08-05 12:15:15 +00:00
|
|
|
disk_fmtdev(dev), dev->d_unit, dev->d_slice, dev->d_partition);
|
|
|
|
|
|
|
|
/* Determine disk layout. */
|
|
|
|
od->table = ptable_open(dev, mediasize / sectorsize, sectorsize,
|
|
|
|
ptblread);
|
|
|
|
if (od->table == NULL) {
|
|
|
|
DEBUG("Can't read partition table");
|
|
|
|
rc = ENXIO;
|
2011-06-30 16:08:56 +00:00
|
|
|
goto out;
|
|
|
|
}
|
2012-08-13 13:08:30 +00:00
|
|
|
if (ptable_gettype(od->table) == PTABLE_BSD &&
|
|
|
|
dev->d_partition >= 0) {
|
|
|
|
/* It doesn't matter what value has d_slice */
|
|
|
|
rc = ptable_getpart(od->table, &part, dev->d_partition);
|
|
|
|
if (rc == 0)
|
|
|
|
dev->d_offset = part.start;
|
|
|
|
} else if (dev->d_slice > 0) {
|
2012-08-05 12:15:15 +00:00
|
|
|
/* Try to get information about partition */
|
|
|
|
rc = ptable_getpart(od->table, &part, dev->d_slice);
|
|
|
|
if (rc != 0) /* Partition doesn't exist */
|
2011-06-30 16:08:56 +00:00
|
|
|
goto out;
|
2012-08-05 12:15:15 +00:00
|
|
|
dev->d_offset = part.start;
|
2012-08-13 13:33:21 +00:00
|
|
|
if (dev->d_partition == 255)
|
2012-08-05 12:15:15 +00:00
|
|
|
goto out; /* Nothing more to do */
|
2012-08-13 13:33:21 +00:00
|
|
|
if (dev->d_partition == -1) {
|
|
|
|
/*
|
|
|
|
* If we are looking at a BSD slice, and the
|
|
|
|
* partition is < 0, assume the 'a' partition.
|
|
|
|
*/
|
|
|
|
if (part.type == PART_FREEBSD)
|
|
|
|
dev->d_partition = 0;
|
|
|
|
else
|
|
|
|
goto out;
|
|
|
|
}
|
2012-08-05 12:15:15 +00:00
|
|
|
/* Try to read BSD label */
|
|
|
|
table = ptable_open(dev, part.end - part.start + 1,
|
|
|
|
od->sectorsize, ptblread);
|
|
|
|
if (table == NULL) {
|
|
|
|
DEBUG("Can't read BSD label");
|
|
|
|
rc = ENXIO;
|
2011-06-30 16:08:56 +00:00
|
|
|
goto out;
|
|
|
|
}
|
2012-08-05 12:15:15 +00:00
|
|
|
rc = ptable_getpart(table, &part, dev->d_partition);
|
|
|
|
if (rc != 0)
|
|
|
|
goto out;
|
|
|
|
dev->d_offset += part.start;
|
|
|
|
} else if (dev->d_slice == 0) {
|
|
|
|
rc = ptable_getbestpart(od->table, &part);
|
|
|
|
if (rc != 0)
|
|
|
|
goto out;
|
|
|
|
/* Save the slice number of best partition to dev */
|
|
|
|
dev->d_slice = part.index;
|
|
|
|
dev->d_offset = part.start;
|
2011-06-30 16:08:56 +00:00
|
|
|
}
|
|
|
|
out:
|
2012-08-05 12:15:15 +00:00
|
|
|
if (table != NULL)
|
|
|
|
ptable_close(table);
|
2012-08-12 14:16:21 +00:00
|
|
|
|
2012-08-05 12:15:15 +00:00
|
|
|
if (rc != 0) {
|
|
|
|
if (od->table != NULL)
|
|
|
|
ptable_close(od->table);
|
|
|
|
free(od);
|
2012-08-13 13:10:50 +00:00
|
|
|
DEBUG("%s could not open", disk_fmtdev(dev));
|
2012-08-12 14:16:21 +00:00
|
|
|
} else {
|
2012-08-13 13:10:50 +00:00
|
|
|
DEBUG("%s offset %lld", disk_fmtdev(dev), dev->d_offset);
|
2012-08-05 12:15:15 +00:00
|
|
|
}
|
2011-06-30 16:08:56 +00:00
|
|
|
return (rc);
|
|
|
|
}
|
|
|
|
|
2012-08-05 12:15:15 +00:00
|
|
|
int
|
|
|
|
disk_close(struct disk_devdesc *dev)
|
2011-06-30 16:08:56 +00:00
|
|
|
{
|
2012-08-05 12:15:15 +00:00
|
|
|
struct open_disk *od;
|
2011-06-30 16:08:56 +00:00
|
|
|
|
2012-08-05 12:15:15 +00:00
|
|
|
od = (struct open_disk *)dev->d_opendata;
|
2012-08-13 13:10:50 +00:00
|
|
|
DEBUG("%s closed", disk_fmtdev(dev));
|
2012-08-05 12:15:15 +00:00
|
|
|
ptable_close(od->table);
|
|
|
|
free(od);
|
2011-06-30 16:08:56 +00:00
|
|
|
return (0);
|
|
|
|
}
|
|
|
|
|
2012-08-05 12:15:15 +00:00
|
|
|
char*
|
|
|
|
disk_fmtdev(struct disk_devdesc *dev)
|
2011-06-30 16:08:56 +00:00
|
|
|
{
|
2012-08-05 12:15:15 +00:00
|
|
|
static char buf[128];
|
|
|
|
char *cp;
|
2011-06-30 16:08:56 +00:00
|
|
|
|
2012-08-05 12:15:15 +00:00
|
|
|
cp = buf + sprintf(buf, "%s%d", dev->d_dev->dv_name, dev->d_unit);
|
|
|
|
if (dev->d_slice > 0) {
|
2011-06-30 16:08:56 +00:00
|
|
|
#ifdef LOADER_GPT_SUPPORT
|
2012-08-05 12:15:15 +00:00
|
|
|
if (dev->d_partition == 255) {
|
|
|
|
sprintf(cp, "p%d:", dev->d_slice);
|
|
|
|
return (buf);
|
|
|
|
} else
|
2011-06-30 16:08:56 +00:00
|
|
|
#endif
|
2011-07-01 18:31:59 +00:00
|
|
|
#ifdef LOADER_MBR_SUPPORT
|
2012-08-05 12:15:15 +00:00
|
|
|
cp += sprintf(cp, "s%d", dev->d_slice);
|
2011-07-01 18:31:59 +00:00
|
|
|
#endif
|
2012-08-05 12:15:15 +00:00
|
|
|
}
|
2012-08-13 13:08:30 +00:00
|
|
|
if (dev->d_partition >= 0)
|
|
|
|
cp += sprintf(cp, "%c", dev->d_partition + 'a');
|
2012-08-05 12:15:15 +00:00
|
|
|
strcat(cp, ":");
|
|
|
|
return (buf);
|
2011-06-30 16:08:56 +00:00
|
|
|
}
|
|
|
|
|
2012-08-05 12:15:15 +00:00
|
|
|
int
|
|
|
|
disk_parsedev(struct disk_devdesc *dev, const char *devspec, const char **path)
|
2011-06-30 16:08:56 +00:00
|
|
|
{
|
2012-08-05 12:15:15 +00:00
|
|
|
int unit, slice, partition;
|
|
|
|
const char *np;
|
|
|
|
char *cp;
|
|
|
|
|
|
|
|
np = devspec;
|
|
|
|
unit = slice = partition = -1;
|
|
|
|
if (*np != '\0' && *np != ':') {
|
|
|
|
unit = strtol(np, &cp, 10);
|
|
|
|
if (cp == np)
|
|
|
|
return (EUNIT);
|
2011-06-30 16:08:56 +00:00
|
|
|
#ifdef LOADER_GPT_SUPPORT
|
2012-08-05 12:15:15 +00:00
|
|
|
if (*cp == 'p') {
|
|
|
|
np = cp + 1;
|
|
|
|
slice = strtol(np, &cp, 10);
|
|
|
|
if (np == cp)
|
|
|
|
return (ESLICE);
|
|
|
|
/* we don't support nested partitions on GPT */
|
|
|
|
if (*cp != '\0' && *cp != ':')
|
|
|
|
return (EINVAL);
|
|
|
|
partition = 255;
|
|
|
|
} else
|
2011-06-30 16:08:56 +00:00
|
|
|
#endif
|
2011-07-01 18:31:59 +00:00
|
|
|
#ifdef LOADER_MBR_SUPPORT
|
2012-08-05 12:15:15 +00:00
|
|
|
if (*cp == 's') {
|
|
|
|
np = cp + 1;
|
|
|
|
slice = strtol(np, &cp, 10);
|
|
|
|
if (np == cp)
|
|
|
|
return (ESLICE);
|
|
|
|
}
|
2011-07-01 18:31:59 +00:00
|
|
|
#endif
|
2012-08-05 12:15:15 +00:00
|
|
|
if (*cp != '\0' && *cp != ':') {
|
|
|
|
partition = *cp - 'a';
|
|
|
|
if (partition < 0)
|
|
|
|
return (EPART);
|
|
|
|
cp++;
|
|
|
|
}
|
|
|
|
} else
|
|
|
|
return (EINVAL);
|
|
|
|
|
|
|
|
if (*cp != '\0' && *cp != ':')
|
|
|
|
return (EINVAL);
|
|
|
|
dev->d_unit = unit;
|
|
|
|
dev->d_slice = slice;
|
|
|
|
dev->d_partition = partition;
|
|
|
|
if (path != NULL)
|
|
|
|
*path = (*cp == '\0') ? cp: cp + 1;
|
|
|
|
return (0);
|
2011-06-30 16:08:56 +00:00
|
|
|
}
|