freebsd-skq/sys/dev/vinum/vinumconfig.c
obrien c63dab466c Use __FBSDID().
Also some minor style cleanups.
2003-08-24 17:55:58 +00:00

2146 lines
71 KiB
C

/*-
* Copyright (c) 1997, 1998
* Nan Yang Computer Services Limited. All rights reserved.
*
* This software is distributed under the so-called ``Berkeley
* License'':
*
* 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.
* 3. All advertising materials mentioning features or use of this software
* must display the following acknowledgement:
* This product includes software developed by Nan Yang Computer
* Services Limited.
* 4. Neither the name of the Company nor the names of its contributors
* may be used to endorse or promote products derived from this software
* without specific prior written permission.
*
* This software is provided ``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 company 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.
*
* $Id: vinumconfig.c,v 1.41 2003/05/23 00:57:34 grog Exp grog $
*/
#include <sys/cdefs.h>
__FBSDID("$FreeBSD$");
#define STATIC static
#include <dev/vinum/vinumhdr.h>
#include <dev/vinum/request.h>
#define MAXTOKEN 64 /* maximum number of tokens in a line */
/*
* We can afford the luxury of global variables here,
* since start_config ensures that these functions
* are single-threaded.
*/
/* These are indices in vinum_conf of the last-mentioned of each kind of object */
static int current_drive; /* note the last drive we mention, for
* some defaults */
static int current_plex; /* and the same for the last plex */
static int current_volume; /* and the last volme */
static struct _ioctl_reply *ioctl_reply; /* struct to return via ioctl */
/* These values are used by most of these routines, so set them as globals */
static char *token[MAXTOKEN]; /* pointers to individual tokens */
static int tokens; /* number of tokens */
#define TOCONS 0x01
#define TOTTY 0x02
#define TOLOG 0x04
struct putchar_arg {
int flags;
struct tty *tty;
};
#define MSG_MAX 1024 /* maximum length of a formatted message */
/*
* Format an error message and return to the user
* in the reply. CARE: This routine is designed
* to be called only from the configuration
* routines, so it assumes it's the owner of the
* configuration lock, and unlocks it on exit.
*/
void
throw_rude_remark(int error, char *msg,...)
{
int retval;
va_list ap;
char *text;
static int finishing; /* don't recurse */
int was_finishing;
if ((vinum_conf.flags & VF_LOCKED) == 0) /* bug catcher */
panic("throw_rude_remark: called without config lock");
va_start(ap, msg);
if ((ioctl_reply != NULL) /* we're called from the user */
&&(!(vinum_conf.flags & VF_READING_CONFIG))) { /* and not reading from disk: return msg */
/*
* We can't just format to ioctl_reply, since it
* may contain our input parameters
*/
text = Malloc(MSG_MAX);
if (text == NULL) {
log(LOG_ERR, "vinum: can't allocate error message buffer\n");
printf("vinum: ");
vprintf(msg, ap); /* print to the console */
printf("\n");
} else {
retval = kvprintf(msg, NULL, (void *) text, 10, ap);
text[retval] = '\0'; /* delimit */
strlcpy(ioctl_reply->msg, text, sizeof(ioctl_reply->msg));
ioctl_reply->error = error; /* first byte is the error number */
Free(text);
}
} else {
printf("vinum: ");
vprintf(msg, ap); /* print to the console */
printf("\n");
}
va_end(ap);
if (vinum_conf.flags & VF_READING_CONFIG) { /* go through to the bitter end, */
if ((vinum_conf.flags & VF_READING_CONFIG) /* we're reading from disk, */
&&((daemon_options & daemon_noupdate) == 0)) {
log(LOG_NOTICE, "Disabling configuration updates\n");
daemon_options |= daemon_noupdate;
}
return;
}
/*
* We have a problem here: we want to unlock the
* configuration, which implies tidying up, but
* if we find an error while tidying up, we
* could recurse for ever. Use this kludge to
* only try once.
*/
was_finishing = finishing;
finishing = 1;
finish_config(was_finishing); /* unlock anything we may be holding */
finishing = was_finishing;
longjmp(command_fail, error);
}
/*
* Check a volume to see if the plex is already assigned to it.
* Return index in volume->plex, or -1 if not assigned
*/
int
my_plex(int volno, int plexno)
{
int i;
struct volume *vol;
vol = &VOL[volno]; /* point to volno */
for (i = 0; i < vol->plexes; i++)
if (vol->plex[i] == plexno)
return i;
return -1; /* not found */
}
/*
* Check a plex to see if the subdisk is already assigned to it.
* Return index in plex->sd, or -1 if not assigned
*/
int
my_sd(int plexno, int sdno)
{
int i;
struct plex *plex;
plex = &PLEX[plexno];
for (i = 0; i < plex->subdisks; i++)
if (plex->sdnos[i] == sdno)
return i;
return -1; /* not found */
}
/* Add plex to the volume if possible */
int
give_plex_to_volume(int volno, int plexno, int preferme)
{
struct volume *vol;
int i;
int volplexno;
/*
* It's not an error for the plex to already
* belong to the volume, but we need to check a
* number of things to make sure it's done right.
* Some day.
*/
volplexno = my_plex(volno, plexno);
vol = &VOL[volno]; /* point to volume */
if (volplexno < 0) {
if (vol->plexes == MAXPLEX) /* all plexes allocated */
throw_rude_remark(ENOSPC,
"Too many plexes for volume %s",
vol->name);
else if ((vol->plexes > 0) /* we have other plexes */
&&((vol->flags & VF_CONFIG_SETUPSTATE) == 0)) /* and we're not setting up state */
invalidate_subdisks(&PLEX[plexno], sd_stale); /* make our subdisks invalid */
vol->plex[vol->plexes] = plexno; /* this one */
vol->plexes++; /* add another plex */
PLEX[plexno].volno = volno; /* note the number of our volume */
/* Find out how big our volume is */
for (i = 0; i < vol->plexes; i++)
vol->size = max(vol->size, PLEX[vol->plex[i]].length);
volplexno = vol->plexes - 1; /* number of plex in volume */
}
if (preferme) {
if (vol->preferred_plex >= 0) /* already had a facourite, */
printf("vinum: changing preferred plex for %s from %s to %s\n",
vol->name,
PLEX[vol->plex[vol->preferred_plex]].name,
PLEX[plexno].name);
vol->preferred_plex = volplexno;
}
return volplexno;
}
/*
* Add subdisk to a plex if possible
*/
int
give_sd_to_plex(int plexno, int sdno)
{
int i;
struct plex *plex;
struct sd *sd;
/*
* It's not an error for the sd to already
* belong to the plex, but we need to check a
* number of things to make sure it's done right.
* Some day.
*/
i = my_sd(plexno, sdno);
if (i >= 0) /* does it already belong to us? */
return i; /* that's it */
plex = &PLEX[plexno]; /* point to the plex */
sd = &SD[sdno]; /* and the subdisk */
/* Do we have an offset? Otherwise put it after the last one */
if (sd->plexoffset < 0) { /* no offset specified */
if (plex->subdisks > 0) {
struct sd *lastsd = &SD[plex->sdnos[plex->subdisks - 1]]; /* last subdisk */
if (plex->organization == plex_concat) /* concat, */
sd->plexoffset = lastsd->sectors + lastsd->plexoffset; /* starts here */
else /* striped, RAID-4 or RAID-5 */
sd->plexoffset = plex->stripesize * plex->subdisks; /* starts here */
} else /* first subdisk */
sd->plexoffset = 0; /* start at the beginning */
}
if (plex->subdisks == MAXSD) /* we already have our maximum */
throw_rude_remark(ENOSPC, /* crap out */
"Can't add %s to %s: plex full",
sd->name,
plex->name);
plex->subdisks++; /* another entry */
if (plex->subdisks >= plex->subdisks_allocated) /* need more space */
EXPAND(plex->sdnos, int, plex->subdisks_allocated, INITIAL_SUBDISKS_IN_PLEX);
/* Adjust size of plex and volume. */
if (isparity(plex)) /* RAID-4 or RAID-5 */
plex->length = (plex->subdisks - 1) * sd->sectors; /* size is one disk short */
else
plex->length += sd->sectors; /* plex gets this much bigger */
if (plex->volno >= 0) /* we have a volume */
VOL[plex->volno].size = max(VOL[plex->volno].size, plex->length); /* adjust its size */
/*
* We need to check that the subdisks don't overlap,
* but we can't do that until a point where we *must*
* know the size of all the subdisks. That's not
* here. But we need to sort them by offset
*/
for (i = 0; i < plex->subdisks - 1; i++) {
if (sd->plexoffset < SD[plex->sdnos[i]].plexoffset) { /* it fits before this one */
/* First move any remaining subdisks by one */
int j;
for (j = plex->subdisks - 1; j > i; j--) /* move up one at a time */
plex->sdnos[j] = plex->sdnos[j - 1];
plex->sdnos[i] = sdno;
sd->plexsdno = i; /* note where we are in the subdisk */
return i;
}
}
/*
* The plex doesn't have any subdisk with a
* larger offset. Insert it here.
*/
plex->sdnos[i] = sdno;
sd->plexsdno = i; /* note where we are in the subdisk */
sd->plexno = plex->plexno; /* and who we belong to */
return i;
}
/*
* Add a subdisk to drive if possible. The
* pointer to the drive must already be stored in
* the sd structure, but the drive doesn't know
* about the subdisk yet.
*/
void
give_sd_to_drive(int sdno)
{
struct sd *sd; /* pointer to subdisk */
struct drive *drive; /* and drive */
int fe; /* index in free list */
int sfe; /* and index of subdisk when assigning max */
sd = &SD[sdno]; /* point to sd */
drive = &DRIVE[sd->driveno]; /* and drive */
if (drive->state != drive_up) {
update_sd_state(sdno); /* that crashes the subdisk */
return;
}
sd->sectorsize = drive->sectorsize; /* get sector size from drive */
if (drive->flags & VF_HOTSPARE) /* the drive is a hot spare, */
throw_rude_remark(ENOSPC,
"Can't place %s on hot spare drive %s",
sd->name,
drive->label.name);
if ((drive->sectors_available == 0) /* no space left */
||(sd->sectors > drive->sectors_available)) { /* or too big, */
sd->driveoffset = -1; /* don't be confusing */
free_sd(sd->sdno);
throw_rude_remark(ENOSPC, "No space for %s on %s", sd->name, drive->label.name);
return; /* in case we come back here */
}
drive->subdisks_used++; /* one more subdisk */
if (sd->sectors == 0) { /* take the largest chunk */
sfe = 0; /* to keep the compiler happy */
for (fe = 0; fe < drive->freelist_entries; fe++) {
if (drive->freelist[fe].sectors >= sd->sectors) { /* more space here */
sd->sectors = drive->freelist[fe].sectors; /* take it */
sd->driveoffset = drive->freelist[fe].offset;
sfe = fe; /* and note the index for later */
}
}
if (sd->sectors == 0) { /* no luck, */
sd->driveoffset = -1; /* don't be confusing */
free_sd(sd->sdno);
throw_rude_remark(ENOSPC, /* give up */
"No space for %s on %s",
sd->name,
drive->label.name);
}
if (sfe < (drive->freelist_entries - 1)) /* not the last one, */
bcopy(&drive->freelist[sfe + 1],
&drive->freelist[sfe],
(drive->freelist_entries - sfe) * sizeof(struct drive_freelist));
drive->freelist_entries--; /* one less entry */
drive->sectors_available -= sd->sectors; /* and note how much less space we have */
} else if (sd->driveoffset < 0) { /* no offset specified, find one */
for (fe = 0; fe < drive->freelist_entries; fe++) {
if (drive->freelist[fe].sectors >= sd->sectors) { /* it'll fit here */
sd->driveoffset = drive->freelist[fe].offset;
if (sd->sectors == drive->freelist[fe].sectors) { /* used up the entire entry */
if (fe < (drive->freelist_entries - 1)) /* not the last one, */
bcopy(&drive->freelist[fe + 1],
&drive->freelist[fe],
(drive->freelist_entries - fe) * sizeof(struct drive_freelist));
drive->freelist_entries--; /* one less entry */
} else {
drive->freelist[fe].sectors -= sd->sectors; /* this much less space */
drive->freelist[fe].offset += sd->sectors; /* this much further on */
}
drive->sectors_available -= sd->sectors; /* and note how much less space we have */
break;
}
}
if (sd->driveoffset < 0)
/*
* Didn't find anything. Although the drive has
* enough space, it's too fragmented
*/
{
free_sd(sd->sdno);
throw_rude_remark(ENOSPC, "No space for %s on %s", sd->name, drive->label.name);
}
} else { /* specific offset */
/*
* For a specific offset to work, the space must be
* entirely in a single freelist entry. Look for it.
*/
u_int64_t sdend = sd->driveoffset + sd->sectors; /* end of our subdisk */
for (fe = 0; fe < drive->freelist_entries; fe++) {
u_int64_t dend = drive->freelist[fe].offset + drive->freelist[fe].sectors; /* end of entry */
if (dend >= sdend) { /* fits before here */
if (drive->freelist[fe].offset > sd->driveoffset) { /* starts after the beginning of sd area */
sd->driveoffset = -1; /* don't be confusing */
set_sd_state(sd->sdno, sd_down, setstate_force);
throw_rude_remark(ENOSPC,
"No space for %s on drive %s at offset %lld",
sd->name,
drive->label.name,
sd->driveoffset);
return;
}
/*
* We've found the space, and we can allocate it.
* We don't need to say that to the subdisk, which
* already knows about it. We need to tell it to
* the free list, though. We have four possibilities:
*
* 1. The subdisk exactly eats up the entry. That's the
* same as above.
* 2. The subdisk starts at the beginning and leaves space
* at the end.
* 3. The subdisk starts after the beginning and leaves
* space at the end as well: we end up with another
* fragment.
* 4. The subdisk leaves space at the beginning and finishes
* at the end.
*/
drive->sectors_available -= sd->sectors; /* note how much less space we have */
if (sd->driveoffset == drive->freelist[fe].offset) { /* 1 or 2 */
if (sd->sectors == drive->freelist[fe].sectors) { /* 1: used up the entire entry */
if (fe < (drive->freelist_entries - 1)) /* not the last one, */
bcopy(&drive->freelist[fe + 1],
&drive->freelist[fe],
(drive->freelist_entries - fe) * sizeof(struct drive_freelist));
drive->freelist_entries--; /* one less entry */
} else { /* 2: space at the end */
drive->freelist[fe].sectors -= sd->sectors; /* this much less space */
drive->freelist[fe].offset += sd->sectors; /* this much further on */
}
} else { /* 3 or 4 */
drive->freelist[fe].sectors = sd->driveoffset - drive->freelist[fe].offset;
if (dend > sdend) { /* 3: space at the end as well */
if (fe < (drive->freelist_entries - 1)) /* not the last one */
bcopy(&drive->freelist[fe], /* move the rest down */
&drive->freelist[fe + 1],
(drive->freelist_entries - fe) * sizeof(struct drive_freelist));
drive->freelist_entries++; /* one less entry */
drive->freelist[fe + 1].offset = sdend; /* second entry starts after sd */
drive->freelist[fe + 1].sectors = dend - sdend; /* and is this long */
}
}
break;
}
}
}
drive->opencount++; /* one more subdisk attached */
}
/* Get an empty drive entry from the drive table */
int
get_empty_drive(void)
{
int driveno;
struct drive *drive;
/* first see if we have one which has been deallocated */
for (driveno = 0; driveno < vinum_conf.drives_allocated; driveno++) {
if (DRIVE[driveno].state == drive_unallocated) /* bingo */
break;
}
if (driveno >= vinum_conf.drives_allocated) /* we've used all our allocation */
EXPAND(DRIVE, struct drive, vinum_conf.drives_allocated, INITIAL_DRIVES);
/* got a drive entry. Make it pretty */
drive = &DRIVE[driveno];
bzero(drive, sizeof(struct drive));
drive->driveno = driveno; /* put number in structure */
drive->flags |= VF_NEWBORN; /* newly born drive */
strcpy(drive->devicename, "unknown"); /* and make the name ``unknown'' */
return driveno; /* return the index */
}
/*
* Find the named drive in vinum_conf.drive,
* return the index in vinum_conf.drive.
* Don't mark the drive as allocated (XXX SMP)
* If create != 0, create an entry if it doesn't exist
*/
/* XXX check if we have it open from attach */
int
find_drive(const char *name, int create)
{
int driveno;
struct drive *drive;
if (name != NULL) {
for (driveno = 0; driveno < vinum_conf.drives_allocated; driveno++) {
drive = &DRIVE[driveno]; /* point to drive */
if ((drive->label.name[0] != '\0') /* it has a name */
&&(strcmp(drive->label.name, name) == 0) /* and it's this one */
&&(drive->state > drive_unallocated)) /* and it's a real one: found */
return driveno;
}
}
/* the drive isn't in the list. Add it if he wants */
if (create == 0) /* don't want to create */
return -1; /* give up */
driveno = get_empty_drive();
drive = &DRIVE[driveno];
if (name != NULL)
strlcpy(drive->label.name, /* put in its name */
name,
sizeof(drive->label.name));
drive->state = drive_referenced; /* in use, nothing worthwhile there */
return driveno; /* return the index */
}
/*
* Find a drive given its device name.
* devname must be valid.
* Otherwise the same as find_drive above.
*/
int
find_drive_by_name(const char *devname, int create)
{
int driveno;
struct drive *drive;
for (driveno = 0; driveno < vinum_conf.drives_allocated; driveno++) {
drive = &DRIVE[driveno]; /* point to drive */
if ((strcmp(drive->devicename, devname) == 0) /* it's this device */
&&(drive->state > drive_unallocated)) /* and it's a real one: found */
return driveno;
}
/* the drive isn't in the list. Add it if he wants */
if (create == 0) /* don't want to create */
return -1; /* give up */
driveno = get_empty_drive();
drive = &DRIVE[driveno];
bcopy(devname, /* put in its name */
drive->devicename,
min(sizeof(drive->devicename),
strlen(devname)));
drive->state = drive_referenced; /* in use, nothing worthwhile there */
return driveno; /* return the index */
}
/* Find an empty subdisk in the subdisk table */
int
get_empty_sd(void)
{
int sdno;
struct sd *sd;
/* first see if we have one which has been deallocated */
for (sdno = 0; sdno < vinum_conf.subdisks_allocated; sdno++) {
if (SD[sdno].state == sd_unallocated) /* bingo */
break;
}
if (sdno >= vinum_conf.subdisks_allocated)
/*
* We've run out of space. sdno is pointing
* where we want it, but at the moment we
* don't have the space. Get it.
*
* XXX We should check for overflow here. We
* shouldn't allocate more than VINUM_MAXSD
* subdisks (currently at least a quarter of a
* million).
*/
EXPAND(SD, struct sd, vinum_conf.subdisks_allocated, INITIAL_SUBDISKS);
/* initialize some things */
sd = &SD[sdno]; /* point to it */
bzero(sd, sizeof(struct sd)); /* initialize */
sd->flags |= VF_NEWBORN; /* newly born subdisk */
sd->plexno = -1; /* no plex */
sd->sectors = -1; /* no space */
sd->driveno = -1; /* no drive */
sd->plexoffset = -1; /* and no offsets */
sd->driveoffset = -1;
return sdno; /* return the index */
}
/* return a drive to the free pool */
void
free_drive(struct drive *drive)
{
LOCKDRIVE(drive);
if (drive->flags & VF_OPEN) /* it's open, */
close_locked_drive(drive); /* close it */
if (drive->freelist)
Free(drive->freelist);
bzero(drive, sizeof(struct drive)); /* this also sets drive_unallocated */
unlockdrive(drive);
}
/*
* Find the named subdisk in vinum_conf.sd.
*
* If create != 0, create an entry if it doesn't exist
*
* Return index in vinum_conf.sd
*/
int
find_subdisk(const char *name, int create)
{
int sdno;
struct sd *sd;
for (sdno = 0; sdno < vinum_conf.subdisks_allocated; sdno++) {
if (strcmp(SD[sdno].name, name) == 0) /* found it */
return sdno;
}
/* the subdisk isn't in the list. Add it if he wants */
if (create == 0) /* don't want to create */
return -1; /* give up */
/* Allocate one and insert the name */
sdno = get_empty_sd();
sd = &SD[sdno];
bcopy(name, sd->name, min(sizeof(sd->name), strlen(name))); /* put in its name */
return sdno; /* return the pointer */
}
/* Return space to a drive */
void
return_drive_space(int driveno, int64_t offset, int length)
{
struct drive *drive;
int fe; /* free list entry */
u_int64_t sdend; /* end of our subdisk */
u_int64_t dend; /* end of our freelist entry */
drive = &DRIVE[driveno];
if (drive->state == drive_up) {
sdend = offset + length; /* end of our subdisk */
/* Look for where to return the sd address space */
for (fe = 0;
(fe < drive->freelist_entries) && (drive->freelist[fe].offset < offset);
fe++);
/*
* Now we are pointing to the last entry, the first
* with a higher offset than the subdisk, or both.
*/
if ((fe > 1) /* not the first entry */
&&((fe == drive->freelist_entries) /* gone past the end */
||(drive->freelist[fe].offset > offset))) /* or past the block were looking for */
fe--; /* point to the block before */
dend = drive->freelist[fe].offset + drive->freelist[fe].sectors; /* end of the entry */
/*
* At this point, we are pointing to the correct
* place in the free list. A number of possibilities
* exist:
*
* 1. The block to be freed starts at the end of the
* block to which we are pointing. This has two
* subcases:
*
* a. The block to be freed ends at the beginning
* of the following block. Merge the three
* areas into a single block.
*
* b. The block is shorter than the space between
* the current block and the next one. Enlarge
* the current block.
*
* 2. The block to be freed starts after the end
* of the block. Again, we have two cases:
*
* a. It ends before the start of the following block.
* Create a new free block.
*
* b. It ends at the start of the following block.
* Enlarge the following block downwards.
*
* When there is only one free space block, and the
* space to be returned is before it, the pointer is
* to a non-existent zeroth block. XXX check this
*/
if (offset == dend) { /* Case 1: it starts at the end of this block */
if ((fe < drive->freelist_entries - 1) /* we're not the last block in the free list */
/* and the subdisk ends at the start of the next block */
&&(sdend == drive->freelist[fe + 1].offset)) {
drive->freelist[fe].sectors /* 1a: merge all three blocks */
= drive->freelist[fe + 1].sectors;
if (fe < drive->freelist_entries - 2) /* still more blocks after next */
bcopy(&drive->freelist[fe + 2], /* move down one */
&drive->freelist[fe + 1],
(drive->freelist_entries - 2 - fe)
* sizeof(struct drive_freelist));
drive->freelist_entries--; /* one less entry in the free list */
} else /* 1b: just enlarge this block */
drive->freelist[fe].sectors += length;
} else { /* Case 2 */
if (offset > dend) /* it starts after this block */
fe++; /* so look at the next block */
if ((fe < drive->freelist_entries) /* we're not the last block in the free list */
/* and the subdisk ends at the start of this block: case 4 */
&&(sdend == drive->freelist[fe].offset)) {
drive->freelist[fe].offset = offset; /* it starts where the sd was */
drive->freelist[fe].sectors += length; /* and it's this much bigger */
} else { /* case 3: non-contiguous */
if (fe < drive->freelist_entries) /* not after the last block, */
bcopy(&drive->freelist[fe], /* move the rest up one entry */
&drive->freelist[fe + 1],
(drive->freelist_entries - fe)
* sizeof(struct drive_freelist));
drive->freelist_entries++; /* one less entry */
drive->freelist[fe].offset = offset; /* this entry represents the sd */
drive->freelist[fe].sectors = length;
}
}
drive->sectors_available += length; /* the sectors are now available */
}
}
/*
* Free an allocated sd entry.
* This performs memory management only. remove()
* is responsible for checking relationships.
*/
void
free_sd(int sdno)
{
struct sd *sd;
sd = &SD[sdno];
if ((sd->driveno >= 0) /* we have a drive, */
&&(sd->sectors > 0)) /* and some space on it */
return_drive_space(sd->driveno, /* return the space */
sd->driveoffset,
sd->sectors);
if (sd->plexno >= 0)
PLEX[sd->plexno].subdisks--; /* one less subdisk */
destroy_dev(sd->dev);
bzero(sd, sizeof(struct sd)); /* and clear it out */
sd->state = sd_unallocated;
vinum_conf.subdisks_used--; /* one less sd */
}
/* Find an empty plex in the plex table */
int
get_empty_plex(void)
{
int plexno;
struct plex *plex; /* if we allocate one */
/* first see if we have one which has been deallocated */
for (plexno = 0; plexno < vinum_conf.plexes_allocated; plexno++) {
if (PLEX[plexno].state == plex_unallocated) /* bingo */
break; /* and get out of here */
}
if (plexno >= vinum_conf.plexes_allocated)
EXPAND(PLEX, struct plex, vinum_conf.plexes_allocated, INITIAL_PLEXES);
/* Found a plex. Give it an sd structure */
plex = &PLEX[plexno]; /* this one is ours */
bzero(plex, sizeof(struct plex)); /* polish it up */
plex->sdnos = (int *) Malloc(sizeof(int) * INITIAL_SUBDISKS_IN_PLEX); /* allocate sd table */
CHECKALLOC(plex->sdnos, "vinum: Can't allocate plex subdisk table");
bzero(plex->sdnos, (sizeof(int) * INITIAL_SUBDISKS_IN_PLEX)); /* do we need this? */
plex->flags |= VF_NEWBORN; /* newly born plex */
plex->subdisks = 0; /* no subdisks in use */
plex->subdisks_allocated = INITIAL_SUBDISKS_IN_PLEX; /* and we have space for this many */
plex->organization = plex_disorg; /* and it's not organized */
plex->volno = -1; /* no volume yet */
return plexno; /* return the index */
}
/*
* Find the named plex in vinum_conf.plex
*
* If create != 0, create an entry if it doesn't exist
* return index in vinum_conf.plex
*/
int
find_plex(const char *name, int create)
{
int plexno;
struct plex *plex;
for (plexno = 0; plexno < vinum_conf.plexes_allocated; plexno++) {
if (strcmp(PLEX[plexno].name, name) == 0) /* found it */
return plexno;
}
/* the plex isn't in the list. Add it if he wants */
if (create == 0) /* don't want to create */
return -1; /* give up */
/* Allocate one and insert the name */
plexno = get_empty_plex();
plex = &PLEX[plexno]; /* point to it */
bcopy(name, plex->name, min(sizeof(plex->name), strlen(name))); /* put in its name */
return plexno; /* return the pointer */
}
/*
* Free an allocated plex entry
* and its associated memory areas
*/
void
free_plex(int plexno)
{
struct plex *plex;
plex = &PLEX[plexno];
if (plex->sdnos)
Free(plex->sdnos);
if (plex->lock)
Free(plex->lock);
destroy_dev(plex->dev);
bzero(plex, sizeof(struct plex)); /* and clear it out */
plex->state = plex_unallocated;
}
/* Find an empty volume in the volume table */
int
get_empty_volume(void)
{
int volno;
struct volume *vol;
int i;
/* first see if we have one which has been deallocated */
for (volno = 0; volno < vinum_conf.volumes_allocated; volno++) {
if (VOL[volno].state == volume_unallocated) /* bingo */
break;
}
if (volno >= vinum_conf.volumes_allocated)
EXPAND(VOL, struct volume, vinum_conf.volumes_allocated, INITIAL_VOLUMES);
/* Now initialize fields */
vol = &VOL[volno];
bzero(vol, sizeof(struct volume));
vol->flags |= VF_NEWBORN | VF_CREATED; /* newly born volume */
vol->preferred_plex = ROUND_ROBIN_READPOL; /* round robin */
for (i = 0; i < MAXPLEX; i++) /* mark the plexes missing */
vol->plex[i] = -1;
return volno; /* return the index */
}
/*
* Find the named volume in vinum_conf.volume.
*
* If create != 0, create an entry if it doesn't exist
* return the index in vinum_conf
*/
int
find_volume(const char *name, int create)
{
int volno;
struct volume *vol;
for (volno = 0; volno < vinum_conf.volumes_allocated; volno++) {
if (strcmp(VOL[volno].name, name) == 0) /* found it */
return volno;
}
/* the volume isn't in the list. Add it if he wants */
if (create == 0) /* don't want to create */
return -1; /* give up */
/* Allocate one and insert the name */
volno = get_empty_volume();
vol = &VOL[volno];
bcopy(name, vol->name, min(sizeof(vol->name), strlen(name))); /* put in its name */
vol->blocksize = DEV_BSIZE; /* block size of this volume */
return volno; /* return the pointer */
}
/*
* Free an allocated volume entry
* and its associated memory areas
*/
void
free_volume(int volno)
{
struct volume *vol;
vol = &VOL[volno];
destroy_dev(vol->dev);
bzero(vol, sizeof(struct volume)); /* and clear it out */
vol->state = volume_unallocated;
}
/*
* Handle a drive definition. We store the information in the global variable
* drive, so we don't need to allocate.
*
* If we find an error, print a message and return
*/
void
config_drive(int update)
{
enum drive_label_info partition_status; /* info about the partition */
int parameter;
int driveno; /* index of drive in vinum_conf */
struct drive *drive; /* and pointer to it */
int otherdriveno; /* index of possible second drive */
int sdno;
if (tokens < 2) /* not enough tokens */
throw_rude_remark(EINVAL, "Drive has no name\n");
driveno = find_drive(token[1], 1); /* allocate a drive to initialize */
drive = &DRIVE[driveno]; /* and get a pointer */
if (update && ((drive->flags & VF_NEWBORN) == 0)) /* this drive exists already */
return; /* don't do anything */
drive->flags &= ~VF_NEWBORN; /* no longer newly born */
if (drive->state != drive_referenced) { /* we already know this drive */
/*
* XXX Check which definition is more up-to-date. Give
* preference for the definition on its own drive.
*/
return; /* XXX */
}
for (parameter = 2; parameter < tokens; parameter++) { /* look at the other tokens */
switch (get_keyword(token[parameter], &keyword_set)) {
case kw_device:
parameter++;
otherdriveno = find_drive_by_name(token[parameter], 0); /* see if it exists already */
if (otherdriveno >= 0) { /* yup, */
drive->state = drive_unallocated; /* deallocate the drive */
throw_rude_remark(EEXIST, /* and complain */
"Drive %s would have same device as drive %s",
token[1],
DRIVE[otherdriveno].label.name);
}
if (drive->devicename[0] == '/') { /* we know this drive... */
if (strcmp(drive->devicename, token[parameter])) /* different name */
close_drive(drive); /* close it if it's open */
else /* no change */
break;
}
/* open the device and get the configuration */
bcopy(token[parameter], /* insert device information */
drive->devicename,
min(sizeof(drive->devicename),
strlen(token[parameter])));
partition_status = read_drive_label(drive, 1);
switch (partition_status) {
case DL_CANT_OPEN: /* not our kind */
close_drive(drive);
if (drive->lasterror == EFTYPE) /* wrong kind of partition */
throw_rude_remark(drive->lasterror,
"Drive %s has invalid partition type",
drive->label.name);
else /* I/O error of some kind */
throw_rude_remark(drive->lasterror,
"Can't initialize drive %s",
drive->label.name);
break;
case DL_WRONG_DRIVE: /* valid drive, not the name we expected */
if (vinum_conf.flags & VF_FORCECONFIG) { /* but we'll accept that */
bcopy(token[1], drive->label.name, sizeof(drive->label.name));
break;
}
close_drive(drive);
/*
* There's a potential race condition here:
* the rude remark refers to a field in an
* unallocated drive, which potentially could
* be reused. This works because we're the only
* thread accessing the config at the moment.
*/
drive->state = drive_unallocated; /* throw it away completely */
throw_rude_remark(drive->lasterror,
"Incorrect drive name %s specified for drive %s",
token[1],
drive->label.name);
break;
case DL_DELETED_LABEL: /* it was a drive, but we deleted it */
case DL_NOT_OURS: /* nothing to do with the rest */
case DL_OURS:
break;
}
/*
* read_drive_label overwrites the device name.
* If we get here, we can have the drive,
* so put it back again
*/
bcopy(token[parameter],
drive->devicename,
min(sizeof(drive->devicename),
strlen(token[parameter])));
break;
case kw_state:
parameter++; /* skip the keyword */
if (vinum_conf.flags & VF_READING_CONFIG)
drive->state = DriveState(token[parameter]); /* set the state */
break;
case kw_hotspare: /* this drive is a hot spare */
drive->flags |= VF_HOTSPARE;
break;
default:
close_drive(drive);
throw_rude_remark(EINVAL,
"Drive %s, invalid keyword: %s",
token[1],
token[parameter]);
}
}
if (drive->devicename[0] != '/') {
drive->state = drive_unallocated; /* deallocate the drive */
throw_rude_remark(EINVAL, "No device name for %s", drive->label.name);
}
vinum_conf.drives_used++; /* passed all hurdles: one more in use */
/*
* If we're replacing a drive, it could be that
* we already have subdisks referencing this
* drive. Note where they should be and change
* their state to obsolete.
*/
for (sdno = 0; sdno < vinum_conf.subdisks_allocated; sdno++) {
if ((SD[sdno].state > sd_referenced)
&& (SD[sdno].driveno == driveno)) {
give_sd_to_drive(sdno);
if (SD[sdno].state > sd_stale)
SD[sdno].state = sd_stale;
}
}
}
/*
* Handle a subdisk definition. We store the
* information in the global variable sd, so we
* don't need to allocate.
*
* On error throw a message back to the caller.
*/
void
config_subdisk(int update)
{
int parameter;
int sdno; /* index of sd in vinum_conf */
struct sd *sd; /* and pointer to it */
u_int64_t size;
int detached = 0; /* set to 1 if this is a detached subdisk */
int sdindex = -1; /* index in plexes subdisk table */
enum sdstate state = sd_unallocated; /* state to set, if specified */
int autosize = 0; /* set if we autosize in give_sd_to_drive */
int namedsdno; /* index of another with this name */
char partition = 0; /* partition of external subdisk */
sdno = get_empty_sd(); /* allocate an SD to initialize */
sd = &SD[sdno]; /* and get a pointer */
for (parameter = 1; parameter < tokens; parameter++) { /* look at the other tokens */
switch (get_keyword(token[parameter], &keyword_set)) {
/*
* If we have a 'name' parameter, it must
* come first, because we're too lazy to tidy
* up dangling refs if it comes later.
*/
case kw_name:
namedsdno = find_subdisk(token[++parameter], 0); /* find an existing sd with this name */
if (namedsdno >= 0) { /* got one */
if (SD[namedsdno].state == sd_referenced) { /* we've been told about this one */
if (parameter > 2)
throw_rude_remark(EINVAL,
"sd %s: name parameter must come first\n", /* no go */
token[parameter]);
else {
int i;
struct plex *plex; /* for tidying up dangling references */
*sd = SD[namedsdno]; /* copy from the referenced one */
SD[namedsdno].state = sd_unallocated; /* and deallocate the referenced one */
plex = &PLEX[sd->plexno]; /* now take a look at our plex */
for (i = 0; i < plex->subdisks; i++) { /* look for the pointer */
if (plex->sdnos[i] == namedsdno) /* pointing to the old subdisk */
plex->sdnos[i] = sdno; /* bend it to point here */
}
}
}
if (update) /* are we updating? */
return; /* that's OK, nothing more to do */
else
throw_rude_remark(EINVAL, "Duplicate subdisk %s", token[parameter]);
} else
bcopy(token[parameter],
sd->name,
min(sizeof(sd->name), strlen(token[parameter])));
break;
case kw_detached:
detached = 1;
break;
case kw_plexoffset:
size = sizespec(token[++parameter]);
if ((size == -1) /* unallocated */
&&(vinum_conf.flags & VF_READING_CONFIG)) /* reading from disk */
break; /* invalid sd; just ignore it */
if ((size % DEV_BSIZE) != 0)
throw_rude_remark(EINVAL,
"sd %s, bad plex offset alignment: %lld",
sd->name,
(long long) size);
else
sd->plexoffset = size / DEV_BSIZE;
break;
case kw_driveoffset:
size = sizespec(token[++parameter]);
if ((size == -1) /* unallocated */
&&(vinum_conf.flags & VF_READING_CONFIG)) /* reading from disk */
break; /* invalid sd; just ignore it */
if ((size % DEV_BSIZE) != 0)
throw_rude_remark(EINVAL,
"sd %s, bad drive offset alignment: %lld",
sd->name,
(long long) size);
else
sd->driveoffset = size / DEV_BSIZE;
break;
case kw_len:
if (get_keyword(token[++parameter], &keyword_set) == kw_max) /* select maximum size from drive */
size = 0; /* this is how we say it :-) */
else
size = sizespec(token[parameter]);
if ((size % DEV_BSIZE) != 0)
throw_rude_remark(EINVAL, "sd %s, length %d not multiple of sector size", sd->name, size);
else
sd->sectors = size / DEV_BSIZE;
/*
* We have a problem with autosizing: we need to
* give the drive to the plex before we give it
* to the drive, in order to be clean if we give
* up in the middle, but at this time the size hasn't
* been set. Note that we have to fix up after
* giving the subdisk to the drive.
*/
if (size == 0)
autosize = 1; /* note that we're autosizing */
break;
case kw_drive:
sd->driveno = find_drive(token[++parameter], 1); /* insert drive information */
break;
case kw_plex:
sd->plexno = find_plex(token[++parameter], 1); /* insert plex information */
break;
/*
* Set the state. We can't do this directly,
* because give_sd_to_plex may change it
*/
case kw_state:
parameter++; /* skip the keyword */
if (vinum_conf.flags & VF_READING_CONFIG)
state = SdState(token[parameter]); /* set the state */
break;
case kw_partition:
parameter++; /* skip the keyword */
if ((strlen(token[parameter]) != 1)
|| (token[parameter][0] < 'a')
|| (token[parameter][0] > 'h'))
throw_rude_remark(EINVAL,
"%s: invalid partition %c",
sd->name,
token[parameter][0]);
else
partition = token[parameter][0];
break;
case kw_retryerrors:
sd->flags |= VF_RETRYERRORS;
break;
default:
throw_rude_remark(EINVAL, "%s: invalid keyword: %s", sd->name, token[parameter]);
}
}
/* Check we have a drive name */
if (sd->driveno < 0) { /* didn't specify a drive */
sd->driveno = current_drive; /* set to the current drive */
if (sd->driveno < 0) /* no current drive? */
throw_rude_remark(EINVAL, "Subdisk %s is not associated with a drive", sd->name);
}
if (DRIVE[sd->driveno].state != drive_up)
sd->state = sd_crashed;
/*
* This is tacky. If something goes wrong
* with the checks, we may end up losing drive
* space. FIXME.
*/
if (autosize != 0) /* need to find a size, */
give_sd_to_drive(sdno); /* do it before the plex */
/* Check for a plex name */
if ((sd->plexno < 0) /* didn't specify a plex */
&&(!detached)) /* and didn't say not to, */
sd->plexno = current_plex; /* set to the current plex */
if (sd->plexno >= 0)
sdindex = give_sd_to_plex(sd->plexno, sdno); /* now tell the plex that it has this sd */
sd->sdno = sdno; /* point to our entry in the table */
/* Does the subdisk have a name? If not, give it one */
if (sd->name[0] == '\0') { /* no name */
char sdsuffix[8]; /* form sd name suffix here */
/* Do we have a plex name? */
if (sdindex >= 0) /* we have a plex */
strlcpy(sd->name, /* take it from there */
PLEX[sd->plexno].name,
sizeof(sd->name));
else /* no way */
throw_rude_remark(EINVAL, "Unnamed sd is not associated with a plex");
sprintf(sdsuffix, ".s%d", sdindex); /* form the suffix */
strlcat(sd->name, sdsuffix, sizeof(sd->name)); /* and add it to the name */
}
/* do we have complete info for this subdisk? */
if (sd->sectors < 0)
throw_rude_remark(EINVAL, "sd %s has no length spec", sd->name);
if (sd->dev == NULL)
/*
* sdno can (at least theoretically) overflow
* into the low order bit of the type field.
* This gives rise to a subdisk with type
* VINUM_SD2_TYPE. This is a feature, not a
* bug.
*/
sd->dev = make_dev(&vinum_cdevsw,
VINUMMINOR(sdno, VINUM_SD_TYPE),
UID_ROOT,
GID_OPERATOR,
S_IRUSR | S_IWUSR | S_IRGRP,
"vinum/sd/%s",
sd->name);
if (state != sd_unallocated) /* we had a specific state to set */
sd->state = state; /* do it now */
else if (sd->state == sd_unallocated) /* no, nothing set yet, */
sd->state = sd_empty; /* must be empty */
if (autosize == 0) /* no autoconfig, do the drive now */
give_sd_to_drive(sdno);
vinum_conf.subdisks_used++; /* one more in use */
}
/*
* Handle a plex definition.
*/
void
config_plex(int update)
{
int parameter;
int plexno; /* index of plex in vinum_conf */
struct plex *plex; /* and pointer to it */
int pindex = MAXPLEX; /* index in volume's plex list */
int detached = 0; /* don't give it to a volume */
int namedplexno;
enum plexstate state = plex_init; /* state to set at end */
int preferme; /* set if we want to be preferred access */
current_plex = -1; /* forget the previous plex */
preferme = 0; /* nothing special yet */
plexno = get_empty_plex(); /* allocate a plex */
plex = &PLEX[plexno]; /* and point to it */
plex->plexno = plexno; /* and back to the config */
for (parameter = 1; parameter < tokens; parameter++) { /* look at the other tokens */
switch (get_keyword(token[parameter], &keyword_set)) {
/*
* If we have a 'name' parameter, it must
* come first, because we're too lazy to tidy
* up dangling refs if it comes later.
*/
case kw_name:
namedplexno = find_plex(token[++parameter], 0); /* find an existing plex with this name */
if (namedplexno >= 0) { /* plex exists already, */
if (PLEX[namedplexno].state == plex_referenced) { /* we've been told about this one */
if (parameter > 2) /* we've done other things first, */
throw_rude_remark(EINVAL,
"plex %s: name parameter must come first\n", /* no go */
token[parameter]);
else {
int i;
struct volume *vol; /* for tidying up dangling references */
*plex = PLEX[namedplexno]; /* get the info */
PLEX[namedplexno].state = plex_unallocated; /* and deallocate the other one */
vol = &VOL[plex->volno]; /* point to the volume */
for (i = 0; i < MAXPLEX; i++) { /* for each plex */
if (vol->plex[i] == namedplexno)
vol->plex[i] = plexno; /* bend the pointer */
}
}
break; /* use this one */
}
if (update) /* are we updating? */
return; /* yes: that's OK, just return */
else
throw_rude_remark(EINVAL, "Duplicate plex %s", token[parameter]);
} else
bcopy(token[parameter], /* put in the name */
plex->name,
min(MAXPLEXNAME, strlen(token[parameter])));
break;
case kw_detached:
detached = 1;
break;
case kw_org: /* plex organization */
switch (get_keyword(token[++parameter], &keyword_set)) {
case kw_concat:
plex->organization = plex_concat;
break;
case kw_striped:
{
int stripesize = sizespec(token[++parameter]);
plex->organization = plex_striped;
if (stripesize % DEV_BSIZE != 0) /* not a multiple of block size, */
throw_rude_remark(EINVAL, "plex %s: stripe size %d not a multiple of sector size",
plex->name,
stripesize);
else
plex->stripesize = stripesize / DEV_BSIZE;
break;
}
case kw_raid4:
{
int stripesize = sizespec(token[++parameter]);
plex->organization = plex_raid4;
if (stripesize % DEV_BSIZE != 0) /* not a multiple of block size, */
throw_rude_remark(EINVAL, "plex %s: stripe size %d not a multiple of sector size",
plex->name,
stripesize);
else
plex->stripesize = stripesize / DEV_BSIZE;
break;
}
case kw_raid5:
{
int stripesize = sizespec(token[++parameter]);
plex->organization = plex_raid5;
if (stripesize % DEV_BSIZE != 0) /* not a multiple of block size, */
throw_rude_remark(EINVAL, "plex %s: stripe size %d not a multiple of sector size",
plex->name,
stripesize);
else
plex->stripesize = stripesize / DEV_BSIZE;
break;
}
default:
throw_rude_remark(EINVAL, "Invalid plex organization");
}
if (isstriped(plex)
&& (plex->stripesize == 0)) /* didn't specify a valid stripe size */
throw_rude_remark(EINVAL, "Need a stripe size parameter");
break;
/*
* We're the preferred plex of our volume.
* Unfortunately, we don't know who our
* volume is yet. Note that we want to be
* preferred, and actually do it after we
* get a volume.
*/
case kw_preferred:
preferme = 1;
break;
case kw_volume:
plex->volno = find_volume(token[++parameter], 1); /* insert a pointer to the volume */
break;
case kw_sd: /* add a subdisk */
{
int sdno;
sdno = find_subdisk(token[++parameter], 1); /* find a subdisk */
SD[sdno].plexoffset = sizespec(token[++parameter]); /* get the offset */
give_sd_to_plex(plexno, sdno); /* and insert it there */
break;
}
case kw_state:
parameter++; /* skip the keyword */
if (vinum_conf.flags & VF_READING_CONFIG)
state = PlexState(token[parameter]); /* set the state */
break;
default:
throw_rude_remark(EINVAL, "plex %s, invalid keyword: %s",
plex->name,
token[parameter]);
}
}
if (plex->organization == plex_disorg)
throw_rude_remark(EINVAL, "No plex organization specified");
if ((plex->volno < 0) /* we don't have a volume */
&&(!detached)) /* and we wouldn't object */
plex->volno = current_volume;
if (plex->volno >= 0)
pindex = give_plex_to_volume(plex->volno, /* Now tell the volume that it has this plex */
plexno,
preferme);
/* Does the plex have a name? If not, give it one */
if (plex->name[0] == '\0') { /* no name */
char plexsuffix[8]; /* form plex name suffix here */
/* Do we have a volume name? */
if (plex->volno >= 0) /* we have a volume */
strlcpy(plex->name, /* take it from there */
VOL[plex->volno].name,
sizeof(plex->name));
else /* no way */
throw_rude_remark(EINVAL, "Unnamed plex is not associated with a volume");
sprintf(plexsuffix, ".p%d", pindex); /* form the suffix */
strlcat(plex->name, plexsuffix, sizeof(plex->name)); /* and add it to the name */
}
if (isstriped(plex)) {
plex->lock = (struct rangelock *)
Malloc(PLEX_LOCKS * sizeof(struct rangelock));
CHECKALLOC(plex->lock, "vinum: Can't allocate lock table\n");
bzero((char *) plex->lock, PLEX_LOCKS * sizeof(struct rangelock));
plex->lockmtx = &plexmutex[plexno % PLEXMUTEXES]; /* use this mutex for locking */
}
/* Note the last plex we configured */
current_plex = plexno;
plex->state = state; /* set whatever state we chose */
vinum_conf.plexes_used++; /* one more in use */
if (plex->dev == NULL)
plex->dev = make_dev(&vinum_cdevsw,
VINUMMINOR(plexno, VINUM_PLEX_TYPE),
UID_ROOT,
GID_OPERATOR,
S_IRUSR | S_IWUSR | S_IRGRP,
"vinum/plex/%s",
plex->name);
}
/*
* Handle a volume definition.
* If we find an error, print a message, deallocate the nascent volume, and return
*/
void
config_volume(int update)
{
int parameter;
int volno;
struct volume *vol; /* collect volume info here */
int i;
if (tokens < 2) /* not enough tokens */
throw_rude_remark(EINVAL, "Volume has no name");
current_volume = -1; /* forget the previous volume */
volno = find_volume(token[1], 1); /* allocate a volume to initialize */
vol = &VOL[volno]; /* and get a pointer */
if (update && ((vol->flags & VF_CREATED) == 0)) /* this volume exists already */
return; /* don't do anything */
vol->flags &= ~VF_CREATED; /* it exists now */
for (parameter = 2; parameter < tokens; parameter++) { /* look at all tokens */
switch (get_keyword(token[parameter], &keyword_set)) {
case kw_plex:
{
int plexno; /* index of this plex */
int myplexno; /* and index if it's already ours */
plexno = find_plex(token[++parameter], 1); /* find a plex */
if (plexno < 0) /* couldn't */
break; /* we've already had an error message */
myplexno = my_plex(volno, plexno); /* does it already belong to us? */
if (myplexno > 0) /* yes, shouldn't get it again */
throw_rude_remark(EINVAL,
"Plex %s already belongs to volume %s",
token[parameter],
vol->name);
else if (++vol->plexes > 8) /* another entry */
throw_rude_remark(EINVAL,
"Too many plexes for volume %s",
vol->name);
vol->plex[vol->plexes - 1] = plexno;
PLEX[plexno].state = plex_referenced; /* we know something about it */
PLEX[plexno].volno = volno; /* and this volume references it */
}
break;
case kw_readpol:
switch (get_keyword(token[++parameter], &keyword_set)) { /* decide what to do */
case kw_round:
vol->preferred_plex = ROUND_ROBIN_READPOL; /* default */
break;
case kw_prefer:
{
int myplexno; /* index of this plex */
myplexno = find_plex(token[++parameter], 1); /* find a plex */
if (myplexno < 0) { /* couldn't */
printf("vinum: couldn't find preferred plex %s for %s\n",
token[parameter],
vol->name);
break; /* we've already had an error message */
}
myplexno = my_plex(volno, myplexno); /* does it already belong to us? */
if (myplexno > 0) /* yes */
vol->preferred_plex = myplexno; /* just note the index */
else if (++vol->plexes > 8) /* another entry */
throw_rude_remark(EINVAL, "Too many plexes");
else { /* space for the new plex */
vol->plex[vol->plexes - 1] = myplexno; /* add it to our list */
vol->preferred_plex = vol->plexes - 1; /* and note the index */
}
}
break;
default:
throw_rude_remark(EINVAL, "Invalid read policy");
}
case kw_setupstate:
vol->flags |= VF_CONFIG_SETUPSTATE; /* set the volume up later on */
break;
case kw_state:
parameter++; /* skip the keyword */
if (vinum_conf.flags & VF_READING_CONFIG)
vol->state = VolState(token[parameter]); /* set the state */
break;
/*
* XXX experimental ideas. These are not
* documented, and will not be until I
* decide they're worth keeping.
*/
case kw_writethrough: /* set writethrough mode */
vol->flags |= VF_WRITETHROUGH;
break;
case kw_writeback: /* set writeback mode */
vol->flags &= ~VF_WRITETHROUGH;
break;
default:
throw_rude_remark(EINVAL, "volume %s, invalid keyword: %s",
vol->name,
token[parameter]);
}
}
current_volume = volno; /* note last referred volume */
vol->volno = volno; /* also note in volume */
/*
* Before we can actually use the volume, we need
* a volume label. We could start to fake one here,
* but it will be a lot easier when we have some
* to copy from the drives, so defer it until we
* set up the configuration. XXX
*/
if (vol->state == volume_unallocated)
vol->state = volume_down; /* now ready to bring up at the end */
/* Find out how big our volume is */
for (i = 0; i < vol->plexes; i++)
vol->size = max(vol->size, PLEX[vol->plex[i]].length);
vinum_conf.volumes_used++; /* one more in use */
if (vol->dev == NULL)
vol->dev = make_dev(&vinum_cdevsw,
VINUMMINOR(volno, VINUM_VOLUME_TYPE),
UID_ROOT,
GID_OPERATOR,
S_IRUSR | S_IWUSR | S_IRGRP,
"vinum/%s",
vol->name);
}
/*
* Parse a config entry. CARE! This destroys the original contents of the
* config entry, which we don't really need after this. More specifically, it
* places \0 characters at the end of each token.
*
* Return 0 if all is well, otherwise EINVAL for invalid keyword,
* or ENOENT if 'read' command doesn't find any drives.
*/
int
parse_config(char *cptr, struct keywordset *keyset, int update)
{
int status;
status = 0; /* until proven otherwise */
tokens = tokenize(cptr, token, MAXTOKEN); /* chop up into tokens */
if (tokens <= 0) /* screwed up or empty line */
return tokens; /* give up */
else if (tokens == MAXTOKEN) /* too many */
throw_rude_remark(E2BIG,
"Configuration error for %s: too many parameters",
token[1]);
if (token[0][0] == '#') /* comment line */
return 0;
switch (get_keyword(token[0], keyset)) { /* decide what to do */
case kw_drive:
config_drive(update);
break;
case kw_subdisk:
config_subdisk(update);
break;
case kw_plex:
config_plex(update);
break;
case kw_volume:
config_volume(update);
break;
/* Anything else is invalid in this context */
default:
throw_rude_remark(EINVAL, /* should we die? */
"Invalid configuration information: %s",
token[0]);
}
return status;
}
/*
* parse a line handed in from userland via ioctl.
* This differs only by the error reporting mechanism:
* we return the error indication in the reply to the
* ioctl, so we need to set a global static pointer in
* this file. This technique works because we have
* ensured that configuration is performed in a single-
* threaded manner
*/
int
parse_user_config(char *cptr, struct keywordset *keyset)
{
int status;
ioctl_reply = (struct _ioctl_reply *) cptr;
status = parse_config(cptr, keyset, 0);
ioctl_reply = NULL; /* don't do this again */
return status;
}
/* Remove an object */
void
remove(struct vinum_ioctl_msg *msg)
{
struct vinum_ioctl_msg message = *msg; /* make a copy to hand on */
ioctl_reply = (struct _ioctl_reply *) msg; /* reinstate the address to reply to */
ioctl_reply->error = 0; /* no error, */
ioctl_reply->msg[0] = '\0'; /* no message */
switch (message.type) {
case drive_object:
remove_drive_entry(message.index, message.force);
updateconfig(0);
return;
case sd_object:
remove_sd_entry(message.index, message.force, message.recurse);
updateconfig(0);
return;
case plex_object:
remove_plex_entry(message.index, message.force, message.recurse);
updateconfig(0);
return;
case volume_object:
remove_volume_entry(message.index, message.force, message.recurse);
updateconfig(0);
return;
default:
ioctl_reply->error = EINVAL;
strcpy(ioctl_reply->msg, "Invalid object type");
}
}
/* Remove a drive. */
void
remove_drive_entry(int driveno, int force)
{
struct drive *drive = &DRIVE[driveno];
int sdno;
if ((driveno > vinum_conf.drives_allocated) /* not a valid drive */
||(drive->state == drive_unallocated)) { /* or nothing there */
ioctl_reply->error = EINVAL;
strcpy(ioctl_reply->msg, "No such drive");
} else if (drive->opencount > 0) { /* we have subdisks */
if (force) { /* do it at any cost */
for (sdno = 0; sdno < vinum_conf.subdisks_allocated; sdno++) {
if ((SD[sdno].state != sd_unallocated) /* subdisk is allocated */
&&(SD[sdno].driveno == driveno)) /* and it belongs to this drive */
remove_sd_entry(sdno, force, 0);
}
remove_drive(driveno); /* now remove it */
vinum_conf.drives_used--; /* one less drive */
} else
ioctl_reply->error = EBUSY; /* can't do that */
} else {
remove_drive(driveno); /* just remove it */
vinum_conf.drives_used--; /* one less drive */
}
}
/* remove a subdisk */
void
remove_sd_entry(int sdno, int force, int recurse)
{
struct sd *sd = &SD[sdno];
if ((sdno > vinum_conf.subdisks_allocated) /* not a valid sd */
||(sd->state == sd_unallocated)) { /* or nothing there */
ioctl_reply->error = EINVAL;
strcpy(ioctl_reply->msg, "No such subdisk");
} else if (sd->flags & VF_OPEN) /* we're open */
ioctl_reply->error = EBUSY; /* no getting around that */
else if (sd->plexno >= 0) { /* we have a plex */
if (force) { /* do it at any cost */
struct plex *plex = &PLEX[sd->plexno]; /* point to our plex */
int mysdno;
for (mysdno = 0; /* look for ourselves */
mysdno < plex->subdisks && &SD[plex->sdnos[mysdno]] != sd;
mysdno++);
if (mysdno == plex->subdisks) /* didn't find it */
log(LOG_ERR,
"Error removing subdisk %s: not found in plex %s\n",
SD[mysdno].name,
plex->name);
else { /* remove the subdisk from plex */
if (mysdno < (plex->subdisks - 1)) /* not the last subdisk */
bcopy(&plex->sdnos[mysdno + 1],
&plex->sdnos[mysdno],
(plex->subdisks - 1 - mysdno) * sizeof(int));
plex->subdisks--;
sd->plexno = -1; /* disown the subdisk */
}
/*
* Removing a subdisk from a striped or
* RAID-4 or RAID-5 plex really tears the
* hell out of the structure, and it needs
* to be reinitialized.
*/
if (plex->organization != plex_concat) /* not concatenated, */
set_plex_state(plex->plexno, plex_faulty, setstate_force); /* need to reinitialize */
log(LOG_INFO, "vinum: removing %s\n", sd->name);
free_sd(sdno);
} else
ioctl_reply->error = EBUSY; /* can't do that */
} else {
log(LOG_INFO, "vinum: removing %s\n", sd->name);
free_sd(sdno);
}
}
/* remove a plex */
void
remove_plex_entry(int plexno, int force, int recurse)
{
struct plex *plex = &PLEX[plexno];
int sdno;
if ((plexno > vinum_conf.plexes_allocated) /* not a valid plex */
||(plex->state == plex_unallocated)) { /* or nothing there */
ioctl_reply->error = EINVAL;
strcpy(ioctl_reply->msg, "No such plex");
} else if (plex->flags & VF_OPEN) { /* we're open */
ioctl_reply->error = EBUSY; /* no getting around that */
return;
}
if (plex->subdisks) {
if (force) { /* do it anyway */
if (recurse) { /* remove all below */
int sds = plex->subdisks;
for (sdno = 0; sdno < sds; sdno++)
free_sd(plex->sdnos[sdno]); /* free all subdisks */
} else { /* just tear them out */
int sds = plex->subdisks;
for (sdno = 0; sdno < sds; sdno++)
SD[plex->sdnos[sdno]].plexno = -1; /* no plex any more */
}
} else { /* can't do it without force */
ioctl_reply->error = EBUSY; /* can't do that */
return;
}
}
if (plex->volno >= 0) { /* we are part of a volume */
if (force) { /* do it at any cost */
struct volume *vol = &VOL[plex->volno];
int myplexno;
for (myplexno = 0; myplexno < vol->plexes; myplexno++)
if (vol->plex[myplexno] == plexno) /* found it */
break;
if (myplexno == vol->plexes) /* didn't find it. Huh? */
log(LOG_ERR,
"Error removing plex %s: not found in volume %s\n",
plex->name,
vol->name);
if (myplexno < (vol->plexes - 1)) /* not the last plex in the list */
bcopy(&vol->plex[myplexno + 1],
&vol->plex[myplexno],
vol->plexes - 1 - myplexno);
vol->plexes--;
} else {
ioctl_reply->error = EBUSY; /* can't do that */
return;
}
}
log(LOG_INFO, "vinum: removing %s\n", plex->name);
free_plex(plexno);
vinum_conf.plexes_used--; /* one less plex */
}
/* remove a volume */
void
remove_volume_entry(int volno, int force, int recurse)
{
struct volume *vol = &VOL[volno];
int plexno;
if ((volno > vinum_conf.volumes_allocated) /* not a valid volume */
||(vol->state == volume_unallocated)) { /* or nothing there */
ioctl_reply->error = EINVAL;
strcpy(ioctl_reply->msg, "No such volume");
} else if (vol->flags & VF_OPEN) /* we're open */
ioctl_reply->error = EBUSY; /* no getting around that */
else if (vol->plexes) {
if (recurse && force) { /* remove all below */
int plexes = vol->plexes;
/* for (plexno = plexes - 1; plexno >= 0; plexno--) */
for (plexno = 0; plexno < plexes; plexno++)
remove_plex_entry(vol->plex[plexno], force, recurse);
log(LOG_INFO, "vinum: removing %s\n", vol->name);
free_volume(volno);
vinum_conf.volumes_used--; /* one less volume */
} else
ioctl_reply->error = EBUSY; /* can't do that */
} else {
log(LOG_INFO, "vinum: removing %s\n", vol->name);
free_volume(volno);
vinum_conf.volumes_used--; /* one less volume */
}
}
/* Currently called only from ioctl */
void
update_sd_config(int sdno, int diskconfig)
{
if (!diskconfig)
set_sd_state(sdno, sd_up, setstate_configuring);
SD[sdno].flags &= ~VF_NEWBORN;
}
void
update_plex_config(int plexno, int diskconfig)
{
u_int64_t size;
int sdno;
struct plex *plex = &PLEX[plexno];
enum plexstate state = plex_up; /* state we want the plex in */
int remainder; /* size of fractional stripe at end */
int added_plex; /* set if we add a plex to a volume */
int required_sds; /* number of subdisks we need */
struct sd *sd;
struct volume *vol;
int data_sds = 0; /* number of sds carrying data */
if (plex->state < plex_init) /* not a real plex, */
return;
added_plex = 0;
if (plex->volno >= 0) { /* we have a volume */
vol = &VOL[plex->volno];
/*
* If we're newly born,
* and the volume isn't,
* and it has other plexes,
* and we didn't read this mess from disk,
* we were added later.
*/
if ((plex->flags & VF_NEWBORN)
&& ((vol->flags & VF_NEWBORN) == 0)
&& (vol->plexes > 0)
&& (diskconfig == 0)) {
added_plex = 1;
state = plex_down; /* so take ourselves down */
}
}
/*
* Check that our subdisks make sense. For
* striped plexes, we need at least two
* subdisks, and for RAID-4 and RAID-5 plexes we
* need at least three subdisks. In each case
* they must all be the same size.
*/
if (plex->organization == plex_striped) {
data_sds = plex->subdisks;
required_sds = 2;
} else if (isparity(plex)) { /* RAID 4 or 5 */
data_sds = plex->subdisks - 1;
required_sds = 3;
} else
required_sds = 0;
if (required_sds > 0) { /* striped, RAID-4 or RAID-5 */
if (plex->subdisks < required_sds) {
log(LOG_ERR,
"vinum: plex %s does not have at least %d subdisks\n",
plex->name,
required_sds);
state = plex_faulty;
}
/*
* Now see if the plex size is a multiple of
* the stripe size. If not, trim off the end
* of each subdisk and return it to the drive.
*/
if (plex->length > 0) {
if (data_sds > 0) {
if (plex->stripesize > 0) {
remainder = (int) (plex->length /* are we exact? */
% ((u_int64_t) plex->stripesize * data_sds));
if (remainder) { /* no */
log(LOG_INFO, "vinum: removing %d blocks of partial stripe at the end of %s\n",
remainder,
plex->name);
plex->length -= remainder; /* shorten the plex */
remainder /= data_sds; /* spread the remainder amongst the sds */
for (sdno = 0; sdno < plex->subdisks; sdno++) {
sd = &SD[plex->sdnos[sdno]]; /* point to the subdisk */
return_drive_space(sd->driveno, /* return the space */
sd->driveoffset + sd->sectors - remainder,
remainder);
sd->sectors -= remainder; /* and shorten it */
}
}
} else /* no data sds, */
plex->length = 0; /* reset length */
}
}
}
size = 0;
for (sdno = 0; sdno < plex->subdisks; sdno++) {
sd = &SD[plex->sdnos[sdno]];
if (isstriped(plex)
&& (sdno > 0)
&& (sd->sectors != SD[plex->sdnos[sdno - 1]].sectors)) {
log(LOG_ERR, "vinum: %s must have equal sized subdisks\n", plex->name);
state = plex_down;
}
size += sd->sectors;
if (added_plex) /* we were added later */
sd->state = sd_stale; /* stale until proven otherwise */
if (plex->sectorsize != 0) {
if (sd->sectorsize != plex->sectorsize) /* incompatible sector sizes? */
printf("vinum: incompatible sector sizes. "
"%s has %d bytes, %s has %d bytes. Ignored.\n",
sd->name,
sd->sectorsize,
plex->name,
plex->sectorsize);
} else /* not set yet, */
plex->sectorsize = sd->sectorsize;
}
if (plex->subdisks) { /* plex has subdisks, calculate size */
/*
* XXX We shouldn't need to calculate the size any
* more. Check this some time
*/
if (isparity(plex))
size = size / plex->subdisks * (plex->subdisks - 1); /* less space for RAID-4 and RAID-5 */
if (plex->length != size)
log(LOG_INFO,
"Correcting length of %s: was %lld, is %lld\n",
plex->name,
(long long) plex->length,
(long long) size);
plex->length = size;
} else { /* no subdisks, */
plex->length = 0; /* no size */
state = plex_down; /* take it down */
}
update_plex_state(plexno); /* set the state */
plex->flags &= ~VF_NEWBORN;
}
void
update_volume_config(int volno)
{
struct volume *vol = &VOL[volno];
struct plex *plex;
int plexno;
if (vol->state != volume_unallocated)
/*
* Recalculate the size of the volume,
* which might change if the original
* plexes were not a multiple of the
* stripe size.
*/
{
vol->size = 0;
for (plexno = 0; plexno < vol->plexes; plexno++) {
plex = &PLEX[vol->plex[plexno]];
vol->size = max(plex->length, vol->size); /* maximum size */
plex->volplexno = plexno; /* note it in the plex */
if (vol->sectorsize != 0) {
if (plex->sectorsize != vol->sectorsize) /* incompatible sector sizes? */
printf("vinum: incompatible sector sizes. "
"%s has %d, %s has %d. Ignored.\n",
plex->name,
plex->sectorsize,
vol->name,
vol->sectorsize);
} else /* not set yet, */
vol->sectorsize = plex->sectorsize;
}
}
vol->flags &= ~VF_NEWBORN; /* no longer newly born */
}
/*
* Update the global configuration. This is
* called after configuration changes.
*
* diskconfig is != 0 if we're reading in a config
* from disk. In this case, we don't try to bring
* the devices up, though we will bring them down
* if there's some error which got missed when
* writing to disk.
*/
void
updateconfig(int diskconfig)
{
int plexno;
int volno;
for (plexno = 0; plexno < vinum_conf.plexes_allocated; plexno++)
update_plex_config(plexno, diskconfig);
for (volno = 0; volno < vinum_conf.volumes_allocated; volno++) {
if (VOL[volno].state > volume_uninit) {
VOL[volno].flags &= ~VF_CONFIG_SETUPSTATE; /* no more setupstate */
update_volume_state(volno);
update_volume_config(volno);
}
}
save_config();
}
/*
* Start manual changes to the configuration and lock out
* others who may wish to do so.
* XXX why do we need this and lock_config too?
*/
int
start_config(int force)
{
int error;
current_drive = -1; /* note the last drive we mention, for
* some defaults */
current_plex = -1; /* and the same for the last plex */
current_volume = -1; /* and the last volume */
while ((vinum_conf.flags & VF_CONFIGURING) != 0) {
vinum_conf.flags |= VF_WILL_CONFIGURE;
if ((error = tsleep(&vinum_conf, PRIBIO | PCATCH, "vincfg", 0)) != 0)
return error;
}
/*
* We need two flags here: VF_CONFIGURING
* tells other processes to hold off (this
* function), and VF_CONFIG_INCOMPLETE
* tells the state change routines not to
* propagate incrememntal state changes
*/
vinum_conf.flags |= VF_CONFIGURING | VF_CONFIG_INCOMPLETE;
if (force)
vinum_conf.flags |= VF_FORCECONFIG; /* overwrite differently named drives */
current_drive = -1; /* reset the defaults */
current_plex = -1; /* and the same for the last plex */
current_volume = -1; /* and the last volme */
return 0;
}
/*
* Update the config if update is 1, and unlock
* it. We won't update the configuration if we
* are called in a recursive loop via throw_rude_remark.
*/
void
finish_config(int update)
{
/* we've finished our config */
vinum_conf.flags &= ~(VF_CONFIG_INCOMPLETE | VF_READING_CONFIG | VF_FORCECONFIG);
if (update)
updateconfig(0); /* so update things */
else
updateconfig(1); /* do some updates only */
vinum_conf.flags &= ~VF_CONFIGURING; /* and now other people can take a turn */
if ((vinum_conf.flags & VF_WILL_CONFIGURE) != 0) {
vinum_conf.flags &= ~VF_WILL_CONFIGURE;
wakeup_one(&vinum_conf);
}
}
/* Local Variables: */
/* fill-column: 50 */
/* End: */