#include <sys/cdio.h>
#include <sys/param.h>
#include <sys/mount.h>
#include <sys/iconv.h>
#include <sys/linker.h>
#include <sys/module.h>
#include <vfs/isofs/cd9660/cd9660_mount.h>
#include <ctype.h>
#include <err.h>
#include <errno.h>
#include <fcntl.h>
#include <grp.h>
#include <mntopts.h>
#include <pwd.h>
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <locale.h>
#include <sysexits.h>
#include <unistd.h>
struct mntopt mopts[] = {
MOPT_STDOPTS,
MOPT_UPDATE,
{ "extatt", 0, ISOFSMNT_EXTATT, 1 },
{ "gens", 0, ISOFSMNT_GENS, 1 },
{ "rrip", 1, ISOFSMNT_NORRIP, 1 },
{ "joliet", 1, ISOFSMNT_NOJOLIET, 1 },
{ "strictjoliet", 1, ISOFSMNT_BROKENJOLIET, 1 },
MOPT_NULL
};
static gid_t a_gid(const char *);
static uid_t a_uid(const char *);
static mode_t a_mask(const char *);
static int set_charset(struct iso_args *args, const char *cs_local);
static int get_ssector(const char *dev);
static void usage(void);
int
main(int argc, char **argv)
{
struct iso_args args;
int ch, mntflags, opts;
char *dev, *dir, mntpath[MAXPATHLEN];
struct vfsconf vfc;
int error, verbose;
const char *cs_local;
mntflags = opts = verbose = 0;
memset(&args, 0, sizeof args);
args.ssector = -1;
while ((ch = getopt(argc, argv, "bC:egG:jm:M:o:rs:U:v")) != -1)
switch (ch) {
case 'b':
opts |= ISOFSMNT_BROKENJOLIET;
break;
case 'C':
cs_local = kiconv_quirkcs(optarg, KICONV_VENDOR_MICSFT);
if (set_charset(&args, cs_local) == -1)
err(EX_OSERR, "cd9660_iconv");
opts |= ISOFSMNT_KICONV;
break;
case 'e':
opts |= ISOFSMNT_EXTATT;
break;
case 'g':
opts |= ISOFSMNT_GENS;
break;
case 'G':
opts |= ISOFSMNT_GID;
args.gid = a_gid(optarg);
break;
case 'j':
opts |= ISOFSMNT_NOJOLIET;
break;
case 'm':
args.fmask = a_mask(optarg);
opts |= ISOFSMNT_MODEMASK;
break;
case 'M':
args.dmask = a_mask(optarg);
opts |= ISOFSMNT_MODEMASK;
break;
case 'o':
getmntopts(optarg, mopts, &mntflags, &opts);
break;
case 'r':
opts |= ISOFSMNT_NORRIP;
break;
case 's':
args.ssector = atoi(optarg);
break;
case 'U':
opts |= ISOFSMNT_UID;
args.uid = a_uid(optarg);
break;
case 'v':
verbose++;
break;
case '?':
default:
usage();
}
argc -= optind;
argv += optind;
if (argc != 2)
usage();
dev = argv[0];
dir = argv[1];
checkpath(dir, mntpath);
rmslashes(dev, dev);
#define DEFAULT_ROOTUID -2
mntflags |= MNT_RDONLY;
args.export.ex_flags = MNT_EXRDONLY;
args.fspec = dev;
args.export.ex_root = DEFAULT_ROOTUID;
args.flags = opts;
if (args.ssector == -1) {
if ((args.ssector = get_ssector(dev)) == -1) {
if (verbose)
printf("could not determine starting sector, "
"using very first session\n");
args.ssector = 0;
} else if (verbose)
printf("using starting sector %d\n", args.ssector);
}
if (args.dmask == 0 && args.fmask > 0)
args.dmask = args.fmask;
else if (args.fmask == 0 && args.dmask > 0)
args.fmask = args.dmask;
error = getvfsbyname("cd9660", &vfc);
if (error && vfsisloadable("cd9660")) {
if (vfsload("cd9660"))
err(EX_OSERR, "vfsload(cd9660)");
endvfsent();
error = getvfsbyname("cd9660", &vfc);
}
if (error)
errx(1, "cd9660 filesystem is not available");
if (mount(vfc.vfc_name, mntpath, mntflags, &args) < 0)
err(1, "%s", args.fspec);
exit(0);
}
static int
set_charset(struct iso_args *args, const char *cs_local)
{
if (modfind("cd9660_iconv") < 0) {
if (kldload("cd9660_iconv") < 0 ||
modfind("cd9660_iconv") < 0) {
warnx("cannot find or load \"cd9660_iconv\" "
"kernel module");
return (-1);
}
}
snprintf(args->cs_disk, sizeof(args->cs_disk), "%s", ENCODING_UNICODE);
snprintf(args->cs_local, sizeof(args->cs_local), "%s", cs_local);
if (kiconv_add_xlat16_cspairs(args->cs_disk, args->cs_local) != 0)
return (-1);
return (0);
}
static void
usage(void)
{
fprintf(stderr,
"usage: mount_cd9660 [-begjrv] [-C charset] [-G gid] [-m mask]\n"
" [-M mask] [-o options] [-s startsector]\n"
" [-U uid] special_node\n");
exit(EX_USAGE);
}
static int
get_ssector(const char *dev)
{
struct ioc_toc_header h;
struct ioc_read_toc_entry t;
struct cd_toc_entry toc_buffer[100];
int fd, ntocentries, i;
if ((fd = open(dev, O_RDONLY)) == -1)
return -1;
if (ioctl(fd, CDIOREADTOCHEADER, &h) == -1) {
close(fd);
return -1;
}
ntocentries = h.ending_track - h.starting_track + 1;
if (ntocentries > 100) {
close(fd);
return -1;
}
t.address_format = CD_LBA_FORMAT;
t.starting_track = 0;
t.data_len = ntocentries * sizeof(struct cd_toc_entry);
t.data = toc_buffer;
if (ioctl(fd, CDIOREADTOCENTRYS, (char *) &t) == -1) {
close(fd);
return -1;
}
close(fd);
for (i = ntocentries - 1; i >= 0; i--)
if ((toc_buffer[i].control & 4) != 0)
break;
if (i < 0)
return -1;
return ntohl(toc_buffer[i].addr.lba);
}
static gid_t
a_gid(const char *s)
{
struct group *gr;
const char *gname;
gid_t gid;
if ((gr = getgrnam(s)) != NULL) {
gid = gr->gr_gid;
} else {
for (gname = s; *s && isdigit(*s); ++s)
;
if (!*s)
gid = atoi(gname);
else
errx(EX_NOUSER, "unknown group id: %s", gname);
}
return (gid);
}
static uid_t
a_uid(const char *s)
{
struct passwd *pw;
const char *uname;
uid_t uid;
if ((pw = getpwnam(s)) != NULL) {
uid = pw->pw_uid;
} else {
for (uname = s; *s && isdigit(*s); ++s)
;
if (!*s)
uid = atoi(uname);
else
errx(EX_NOUSER, "unknown user id: %s", uname);
}
return (uid);
}
static mode_t
a_mask(const char *s)
{
long val;
char *ep;
errno = 0;
val = strtol(s, &ep, 8);
if (errno != 0 || *ep != '\0' || val <= 0 || val > (long)ALLPERMS)
errx(EX_USAGE, "invalid file/dir mask: %s", s);
return (mode_t)val;
}
