/* * Copyright (c) 1995 * Matthieu Herrb. 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. * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed for the NetBSD Project * by Matthieu Herrb. * 4. The name of the author may not be used to endorse or promote products * derived from this software without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``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 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. */ /* * Eject command * * It knows to eject floppies, CD-ROMS and tapes * and tries to unmount file systems first */ #include #include #include #include #include #include #include #include #include #include #include #include #include #include typedef struct DEVTAB { char *name; char *device; char qualifier; u_int type; } DEVTAB; /* * known device nicknames and types * (used for selecting the proper ioctl to eject them) */ #define FLOPPY 0x00000001 #define CDROM 0x00000002 #define TAPE 0x00010000 #define MOUNTABLE(x) ((x) & 0x0000ffff) static DEVTAB devtab[] = { { "diskette", "/dev/fd0", 'a', FLOPPY }, { "diskette0", "/dev/fd0", 'a', FLOPPY }, { "diskette1", "/dev/fd1", 'a', FLOPPY }, { "floppy", "/dev/fd0", 'a', FLOPPY }, { "floppy0", "/dev/fd0", 'a', FLOPPY }, { "floppy1", "/dev/fd1", 'a', FLOPPY }, { "fd", "/dev/fd0", 'a', FLOPPY }, { "fd0", "/dev/fd0", 'a', FLOPPY }, { "fd1", "/dev/fd1", 'a', FLOPPY }, { "cdrom", "/dev/cd0", 'a', CDROM }, { "cdrom0", "/dev/cd0", 'a', CDROM }, { "cdrom1", "/dev/cd1", 'a', CDROM }, { "cd", "/dev/cd0", 'a', CDROM }, { "cd0", "/dev/cd0", 'a', CDROM }, { "cd1", "/dev/cd1", 'a', CDROM }, { "mcd", "/dev/mcd0", 'a', CDROM }, { "mcd0", "/dev/mcd0", 'a', CDROM }, { "mcd1", "/dev/mcd1", 'a', CDROM }, { "tape", "/dev/rst0", '\0', TAPE }, { "tape0", "/dev/rst0", '\0', TAPE }, { "tape1", "/dev/rst1", '\0', TAPE }, { "st", "/dev/rst0", '\0', TAPE }, { "st0", "/dev/rst0", '\0', TAPE }, { "st1", "/dev/rst1", '\0', TAPE }, { "dat", "/dev/rst0", '\0', TAPE }, { "dat0", "/dev/rst0", '\0', TAPE }, { "dat1", "/dev/rst1", '\0', TAPE }, { "exabyte", "/dev/rst0", '\0', TAPE }, { "exabyte0", "/dev/rst0", '\0', TAPE }, { "exabyte1", "/dev/rst1", '\0', TAPE }, { NULL, NULL } }; struct types { char *str; int type; } types[] = { { "diskette", FLOPPY }, { "floppy", FLOPPY }, { "cdrom", CDROM }, { "tape", TAPE }, { NULL, 0 } }; int verbose; /* * remind the syntax of the command to the user */ static void usage() { errx(1, "usage: eject [-n][-f][-t devtype][[-d] raw device | nickname ]"); /*NOTREACHED*/ } /* * given a device nick name, find its associated raw device and type */ static char * device_by_nickname(name, pdevtype, pqualifier) char *name; int *pdevtype; char *pqualifier; { int i; for (i = 0; devtab[i].name != NULL; i++) { if (strcmp(name, devtab[i].name) == 0) { *pdevtype = devtab[i].type; *pqualifier = devtab[i].qualifier; return devtab[i].device; } } *pdevtype = -1; return NULL; } /* * Given a raw device name, find its type and partition tag * from the name. */ static char * device_by_name(device, pdevtype, pqualifier) char *device; int *pdevtype; char *pqualifier; { int i; for (i = 0; devtab[i].name != NULL; i++) { if (strncmp(devtab[i].device, device, strlen(devtab[i].device)) == 0) { *pdevtype = devtab[i].type; *pqualifier = devtab[i].qualifier; return devtab[i].device; } } *pdevtype = -1; return NULL; } /* * eject a floppy */ static void eject_floppy(device) char *device; { #ifdef __i386 printf("You may now press the eject button on the floppy drive...\n"); return; #else int fd; fd = open(device, O_RDONLY); if (fd < 0) { err(1, "open %s", device); } if (ioctl(fd, DIOCEJECT, 0) < 0) { err(1, device); } close(fd); #endif } /* eject_floppy */ /* * eject a cd */ static void eject_cdrom(device) char *device; { int fd; fd = open(device, O_RDONLY); if (fd < 0) { err(1, "%s: open", device); } if (ioctl(fd, CDIOCALLOW) < 0) { err(1, "%s: CDIOCALLOW", device); } if (ioctl(fd, CDIOCEJECT, 0) < 0) { err(1, "%s: CDIOCEJECT", device); } if (close(fd) != 0) err(1, "%s: close", device); } /* eject_cdrom */ /* * eject a tape */ static void eject_tape(device) char *device; { int fd; struct mtop mt_com; fd = open(device, O_RDONLY); if (fd < 0) { err(1, "open %s", device); } mt_com.mt_op = MTOFFL; if (ioctl(fd, MTIOCTOP, &mt_com) < 0) { err(1, "%s: MTOFFL", device); } close(fd); } /* eject_tape */ /* * test if partitions of a device are mounted * and unmount them */ static void umount_mounted(device) char *device; { struct statfs *mntbuf; int i, n, l; n = getmntinfo(&mntbuf, MNT_NOWAIT); if (n == 0) { err(1, "getmntinfo"); } l = strlen(device); for (i = 0; i < n; i++) { if (strncmp(device, mntbuf[i].f_mntfromname, l) == 0) { if (verbose) printf("Unmounting: %s\n", mntbuf[i].f_mntonname); if (unmount(mntbuf[i].f_mntonname, 0) < 0) { err(1, "umount %s from %s", mntbuf[i].f_mntfromname, mntbuf[i].f_mntonname); } } } } /* * Eject - ejects various removable devices, including cdrom, tapes, * diskettes */ int main(argc, argv) int argc; char *argv[]; { char device[MAXPATHLEN]; char *devpath; char qualifier; int umount_flag, devtype; int i, ch; /* Default options values */ devpath = NULL; devtype = -1; umount_flag = 1; while ((ch = getopt(argc, argv, "d:fnt:v")) != EOF) { switch (ch) { case 'd': devpath = optarg; break; case 'f': umount_flag = 0; break; case 'n': for (i = 0; devtab[i].name != NULL; i++) { printf("%9s => %s%c\n", devtab[i].name, devtab[i].device, devtab[i].qualifier); } return 0; case 't': for (i = 0; types[i].str != NULL; i++) { if (strcasecmp(optarg, types[i].str) == 0) { devtype = types[i].type; break; } } if (devtype == -1) errx(1, "%s: unknown device type", optarg); break; case 'v': verbose = 1; break; case '?': default: usage(); /*NOTREACHED*/ } } argc -= optind; argv += optind; if (devpath != NULL) { /* device specified with 'd' option */ if (devtype == -1) device_by_name(devpath, &devtype, &qualifier); else qualifier = '\0'; } else { if (argc <= 0) { errx(1, "No device specified"); /* NOTREACHED */ } if (strncmp(argv[0], "/dev/", 5) == 0) { /* * If argument begins with "/dev/", assume * a device name. */ if (devtype == -1) { devpath = device_by_name(argv[0], &devtype, &qualifier); } else { /* Device type specified; use literally */ devpath = argv[0]; qualifier = '\0'; } } else { /* assume a nickname */ devpath = device_by_nickname(argv[0], &devtype, &qualifier); } } if (devpath == NULL) { errx(1, "%s: unknown device", argv[0]); /*NOTREACHED*/ } if (umount_flag && MOUNTABLE(devtype)) { umount_mounted(devpath); } snprintf(device, sizeof(device), "%s%c", devpath, qualifier); if (verbose) printf("Ejecting device `%s'\n", device); switch (devtype) { case FLOPPY: eject_floppy(device); break; case CDROM: eject_cdrom(device); break; case TAPE: eject_tape(device); break; default: errx(1, "impossible... devtype = %d", devtype); } exit(0); }