2 * Compact Disc Control Utility by Serge V. Vakulenko <vak@cronyx.ru>.
3 * Based on the non-X based CD player by Jean-Marc Zucconi and
6 * Fixed and further modified on 5-Sep-1995 by Jukka Ukkonen <jau@funet.fi>.
8 * 11-Sep-1995: Jukka A. Ukkonen <jau@funet.fi>
9 * A couple of further fixes to my own earlier "fixes".
11 * 18-Sep-1995: Jukka A. Ukkonen <jau@funet.fi>
12 * Added an ability to specify addresses relative to the
13 * beginning of a track. This is in fact a variation of
14 * doing the simple play_msf() call.
16 * 11-Oct-1995: Serge V.Vakulenko <vak@cronyx.ru>
17 * New eject algorithm.
18 * Some code style reformatting.
22 static const char rcsid[] =
27 #include <sys/cdrio.h>
29 #include <sys/ioctl.h>
30 #include <sys/param.h>
31 #include <arpa/inet.h>
46 #define ASTS_INVALID 0x00 /* Audio status byte not valid */
47 #define ASTS_PLAYING 0x11 /* Audio play operation in progress */
48 #define ASTS_PAUSED 0x12 /* Audio play operation paused */
49 #define ASTS_COMPLETED 0x13 /* Audio play operation successfully completed */
50 #define ASTS_ERROR 0x14 /* Audio play operation stopped due to error */
51 #define ASTS_VOID 0x15 /* No current audio status to return */
53 #ifndef DEFAULT_CD_DRIVE
54 # define DEFAULT_CD_DRIVE "/dev/cd0"
57 #ifndef DEFAULT_CD_PARTITION
58 # define DEFAULT_CD_PARTITION "c"
77 #define CMD_PREVIOUS 17
79 #define STATUS_AUDIO 0x1
80 #define STATUS_MEDIA 0x2
81 #define STATUS_VOLUME 0x4
89 { CMD_CLOSE, "close", 1, "" },
90 { CMD_DEBUG, "debug", 1, "on | off" },
91 { CMD_EJECT, "eject", 1, "" },
92 { CMD_HELP, "?", 1, 0 },
93 { CMD_HELP, "help", 1, "" },
94 { CMD_INFO, "info", 1, "" },
95 { CMD_NEXT, "next", 1, "" },
96 { CMD_PAUSE, "pause", 2, "" },
97 { CMD_PLAY, "play", 1, "min1:sec1[.fram1] [min2:sec2[.fram2]]" },
98 { CMD_PLAY, "play", 1, "track1[.index1] [track2[.index2]]" },
99 { CMD_PLAY, "play", 1, "tr1 m1:s1[.f1] [[tr2] [m2:s2[.f2]]]" },
100 { CMD_PLAY, "play", 1, "[#block [len]]" },
101 { CMD_PREVIOUS, "previous", 2, "" },
102 { CMD_QUIT, "quit", 1, "" },
103 { CMD_RESET, "reset", 4, "" },
104 { CMD_RESUME, "resume", 1, "" },
105 { CMD_SET, "set", 2, "msf | lba" },
106 { CMD_STATUS, "status", 1, "[audio | media | volume]" },
107 { CMD_STOP, "stop", 3, "" },
108 { CMD_VOLUME, "volume", 1,
109 "<l> <r> | left | right | mute | mono | stereo" },
110 { CMD_CDID, "cdid", 2, "" },
111 { CMD_SPEED, "speed", 2, "speed" },
115 struct cd_toc_entry toc_buffer[100];
122 int setvol(int, int);
123 int read_toc_entrys(int);
124 int play_msf(int, int, int, int, int, int);
125 int play_track(int, int, int, int);
126 int get_vol(int *, int *);
127 int status(int *, int *, int *, int *);
129 int next_prev(char *arg, int);
133 int pstatus(char *arg);
135 void prtrack(struct cd_toc_entry *e, int lastflag);
136 void lba2msf(unsigned long lba, u_char *m, u_char *s, u_char *f);
137 unsigned int msf2lba(u_char m, u_char s, u_char f);
138 int play_blocks(int blk, int len);
139 int run(int cmd, char *arg);
140 char *parse(char *buf, int *cmd);
143 char *use_cdrom_instead(const char *);
144 __const char *strstatus(int);
145 static u_int dbprog_discid(void);
146 __const char *cdcontrol_prompt(void);
155 for (c=cmdtab; c->name; ++c) {
159 for (i = c->min, s = c->name; *s; s++, i--) {
167 printf (" %s", c->args);
170 printf ("\n\tThe word \"play\" is not required for the play commands.\n");
171 printf ("\tThe plain target address is taken as a synonym for play.\n");
176 fprintf (stderr, "usage: cdcontrol [-sv] [-f device] [command ...]\n");
180 char *use_cdrom_instead(const char *old_envvar)
184 device = getenv(old_envvar);
186 warnx("%s environment variable deprecated, "
187 "please use CDROM in the future.", old_envvar);
192 int main (int argc, char **argv)
198 switch (getopt (argc, argv, "svhf:")) {
219 if (argc > 0 && ! strcasecmp (*argv, "help"))
223 cdname = getenv("CDROM");
227 cdname = use_cdrom_instead("MUSIC_CD");
229 cdname = use_cdrom_instead("CD_DRIVE");
231 cdname = use_cdrom_instead("DISC");
233 cdname = use_cdrom_instead("CDPLAY");
236 cdname = DEFAULT_CD_DRIVE;
237 warnx("no CD device name specified, defaulting to %s", cdname);
244 for (p=buf; argc-->0; ++argv) {
245 len = strlen (*argv);
247 if (p + len >= buf + sizeof (buf) - 1)
257 arg = parse (buf, &cmd);
258 return (run (cmd, arg));
262 verbose = isatty (0);
265 printf ("Compact Disc Control utility, version %s\n", VERSION);
266 printf ("Type `?' for command list\n\n");
271 if (run (cmd, arg) < 0) {
281 int run (int cmd, char *arg)
292 if (fd < 0 && ! open_cd ())
298 if (fd < 0 && ! open_cd ())
304 if (fd < 0 && ! open_cd ())
307 return pstatus (arg);
311 if (fd < 0 && ! open_cd ())
314 while (isspace (*arg))
317 return next_prev (arg, cmd);
320 if (fd < 0 && ! open_cd ())
323 return ioctl (fd, CDIOCPAUSE);
326 if (fd < 0 && ! open_cd ())
329 return ioctl (fd, CDIOCRESUME);
332 if (fd < 0 && ! open_cd ())
335 rc = ioctl (fd, CDIOCSTOP);
337 (void) ioctl (fd, CDIOCALLOW);
342 if (fd < 0 && ! open_cd ())
345 rc = ioctl (fd, CDIOCRESET);
353 if (fd < 0 && ! open_cd ())
356 if (! strcasecmp (arg, "on"))
357 return ioctl (fd, CDIOCSETDEBUG);
359 if (! strcasecmp (arg, "off"))
360 return ioctl (fd, CDIOCCLRDEBUG);
362 warnx("invalid command arguments");
367 if (fd < 0 && ! open_cd ())
370 (void) ioctl (fd, CDIOCALLOW);
371 rc = ioctl (fd, CDIOCEJECT);
377 if (fd < 0 && ! open_cd ())
380 (void) ioctl (fd, CDIOCALLOW);
381 rc = ioctl (fd, CDIOCCLOSE);
389 if (fd < 0 && ! open_cd ())
392 while (isspace (*arg))
398 if (! strcasecmp (arg, "msf"))
400 else if (! strcasecmp (arg, "lba"))
403 warnx("invalid command arguments");
407 if (fd < 0 && !open_cd ())
410 if (! strncasecmp (arg, "left", strlen(arg)))
411 return ioctl (fd, CDIOCSETLEFT);
413 if (! strncasecmp (arg, "right", strlen(arg)))
414 return ioctl (fd, CDIOCSETRIGHT);
416 if (! strncasecmp (arg, "mono", strlen(arg)))
417 return ioctl (fd, CDIOCSETMONO);
419 if (! strncasecmp (arg, "stereo", strlen(arg)))
420 return ioctl (fd, CDIOCSETSTERIO);
422 if (! strncasecmp (arg, "mute", strlen(arg)))
423 return ioctl (fd, CDIOCSETMUTE);
425 if (2 != sscanf (arg, "%d %d", &l, &r)) {
426 warnx("invalid command arguments");
430 return setvol (l, r);
433 if (fd < 0 && ! open_cd ())
437 if (strcasecmp("max", arg) == 0)
438 speed = CDR_MAX_SPEED;
440 speed = strtol(arg, NULL, 10) * 177;
441 if (speed <= 0 || speed > INT_MAX) {
442 warnx("invalid command arguments %s", arg);
445 return ioctl(fd, CDRIOCREADSPEED, &speed);
457 struct ioc_toc_header h;
459 int rc, start, end = 0, istart = 1, iend = 1;
461 rc = ioctl (fd, CDIOREADTOCHEADER, &h);
466 n = h.ending_track - h.starting_track + 1;
467 rc = read_toc_entrys ((n + 1) * sizeof (struct cd_toc_entry));
472 if (! arg || ! *arg) {
473 /* Play the whole disc */
475 return play_blocks (0, msf2lba (toc_buffer[n].addr.msf.minute,
476 toc_buffer[n].addr.msf.second,
477 toc_buffer[n].addr.msf.frame));
479 return play_blocks (0, ntohl(toc_buffer[n].addr.lba));
482 if (strchr (arg, '#')) {
483 /* Play block #blk [ len ] */
486 if (2 != sscanf (arg, "#%d%d", &blk, &len) &&
487 1 != sscanf (arg, "#%d", &blk))
492 len = msf2lba (toc_buffer[n].addr.msf.minute,
493 toc_buffer[n].addr.msf.second,
494 toc_buffer[n].addr.msf.frame) - blk;
496 len = ntohl(toc_buffer[n].addr.lba) - blk;
498 return play_blocks (blk, len);
501 if (strchr (arg, ':')) {
503 * Play MSF m1:s1 [ .f1 ] [ m2:s2 [ .f2 ] ]
505 * Will now also undestand timed addresses relative
506 * to the beginning of a track in the form...
508 * tr1 m1:s1[.f1] [[tr2] [m2:s2[.f2]]]
511 unsigned m1, m2, s1, s2, f1, f2;
512 unsigned char tm, ts, tf;
514 tr2 = m2 = s2 = f2 = f1 = 0;
515 if (8 == sscanf (arg, "%d %d:%d.%d %d %d:%d.%d",
516 &tr1, &m1, &s1, &f1, &tr2, &m2, &s2, &f2))
517 goto Play_Relative_Addresses;
519 tr2 = m2 = s2 = f2 = f1 = 0;
520 if (7 == sscanf (arg, "%d %d:%d %d %d:%d.%d",
521 &tr1, &m1, &s1, &tr2, &m2, &s2, &f2))
522 goto Play_Relative_Addresses;
524 tr2 = m2 = s2 = f2 = f1 = 0;
525 if (7 == sscanf (arg, "%d %d:%d.%d %d %d:%d",
526 &tr1, &m1, &s1, &f1, &tr2, &m2, &s2))
527 goto Play_Relative_Addresses;
529 tr2 = m2 = s2 = f2 = f1 = 0;
530 if (7 == sscanf (arg, "%d %d:%d.%d %d:%d.%d",
531 &tr1, &m1, &s1, &f1, &m2, &s2, &f2))
532 goto Play_Relative_Addresses;
534 tr2 = m2 = s2 = f2 = f1 = 0;
535 if (6 == sscanf (arg, "%d %d:%d.%d %d:%d",
536 &tr1, &m1, &s1, &f1, &m2, &s2))
537 goto Play_Relative_Addresses;
539 tr2 = m2 = s2 = f2 = f1 = 0;
540 if (6 == sscanf (arg, "%d %d:%d %d:%d.%d",
541 &tr1, &m1, &s1, &m2, &s2, &f2))
542 goto Play_Relative_Addresses;
544 tr2 = m2 = s2 = f2 = f1 = 0;
545 if (6 == sscanf (arg, "%d %d:%d.%d %d %d",
546 &tr1, &m1, &s1, &f1, &tr2, &m2))
547 goto Play_Relative_Addresses;
549 tr2 = m2 = s2 = f2 = f1 = 0;
550 if (5 == sscanf (arg, "%d %d:%d %d:%d", &tr1, &m1, &s1, &m2, &s2))
551 goto Play_Relative_Addresses;
553 tr2 = m2 = s2 = f2 = f1 = 0;
554 if (5 == sscanf (arg, "%d %d:%d %d %d",
555 &tr1, &m1, &s1, &tr2, &m2))
556 goto Play_Relative_Addresses;
558 tr2 = m2 = s2 = f2 = f1 = 0;
559 if (5 == sscanf (arg, "%d %d:%d.%d %d",
560 &tr1, &m1, &s1, &f1, &tr2))
561 goto Play_Relative_Addresses;
563 tr2 = m2 = s2 = f2 = f1 = 0;
564 if (4 == sscanf (arg, "%d %d:%d %d", &tr1, &m1, &s1, &tr2))
565 goto Play_Relative_Addresses;
567 tr2 = m2 = s2 = f2 = f1 = 0;
568 if (4 == sscanf (arg, "%d %d:%d.%d", &tr1, &m1, &s1, &f1))
569 goto Play_Relative_Addresses;
571 tr2 = m2 = s2 = f2 = f1 = 0;
572 if (3 == sscanf (arg, "%d %d:%d", &tr1, &m1, &s1))
573 goto Play_Relative_Addresses;
575 tr2 = m2 = s2 = f2 = f1 = 0;
576 goto Try_Absolute_Timed_Addresses;
578 Play_Relative_Addresses:
585 tm = toc_buffer[tr1].addr.msf.minute;
586 ts = toc_buffer[tr1].addr.msf.second;
587 tf = toc_buffer[tr1].addr.msf.frame;
589 lba2msf(ntohl(toc_buffer[tr1].addr.lba),
596 printf ("Track %d is not that long.\n", tr1);
617 if (m2 || s2 || f2) {
635 m2 = toc_buffer[n].addr.msf.minute;
636 s2 = toc_buffer[n].addr.msf.second;
637 f2 = toc_buffer[n].addr.msf.frame;
639 lba2msf(ntohl(toc_buffer[n].addr.lba),
646 } else if (tr2 > n) {
653 tm = toc_buffer[tr2].addr.msf.minute;
654 ts = toc_buffer[tr2].addr.msf.second;
655 tf = toc_buffer[tr2].addr.msf.frame;
657 lba2msf(ntohl(toc_buffer[tr2].addr.lba),
675 tm = toc_buffer[n].addr.msf.minute;
676 ts = toc_buffer[n].addr.msf.second;
677 tf = toc_buffer[n].addr.msf.frame;
679 lba2msf(ntohl(toc_buffer[n].addr.lba),
687 printf ("The playing time of the disc is not that long.\n");
690 return (play_msf (m1, s1, f1, m2, s2, f2));
692 Try_Absolute_Timed_Addresses:
693 if (6 != sscanf (arg, "%d:%d.%d%d:%d.%d",
694 &m1, &s1, &f1, &m2, &s2, &f2) &&
695 5 != sscanf (arg, "%d:%d.%d%d:%d", &m1, &s1, &f1, &m2, &s2) &&
696 5 != sscanf (arg, "%d:%d%d:%d.%d", &m1, &s1, &m2, &s2, &f2) &&
697 3 != sscanf (arg, "%d:%d.%d", &m1, &s1, &f1) &&
698 4 != sscanf (arg, "%d:%d%d:%d", &m1, &s1, &m2, &s2) &&
699 2 != sscanf (arg, "%d:%d", &m1, &s1))
704 m2 = toc_buffer[n].addr.msf.minute;
705 s2 = toc_buffer[n].addr.msf.second;
706 f2 = toc_buffer[n].addr.msf.frame;
708 lba2msf(ntohl(toc_buffer[n].addr.lba),
715 return play_msf (m1, s1, f1, m2, s2, f2);
719 * Play track trk1 [ .idx1 ] [ trk2 [ .idx2 ] ]
721 if (4 != sscanf (arg, "%d.%d%d.%d", &start, &istart, &end, &iend) &&
722 3 != sscanf (arg, "%d.%d%d", &start, &istart, &end) &&
723 3 != sscanf (arg, "%d%d.%d", &start, &end, &iend) &&
724 2 != sscanf (arg, "%d.%d", &start, &istart) &&
725 2 != sscanf (arg, "%d%d", &start, &end) &&
726 1 != sscanf (arg, "%d", &start))
731 return (play_track (start, istart, end, iend));
734 warnx("invalid command arguments");
738 int next_prev (char *arg, int cmd)
740 struct ioc_toc_header h;
741 int dir, junk, n, off, rc, trk;
743 dir = (cmd == CMD_NEXT) ? 1 : -1;
744 rc = ioctl (fd, CDIOREADTOCHEADER, &h);
748 n = h.ending_track - h.starting_track + 1;
749 rc = status (&trk, &junk, &junk, &junk);
754 if (sscanf (arg, "%u", &off) != 1) {
755 warnx("invalid command argument");
762 if (trk > h.ending_track)
765 return (play_track (trk, 1, n, 1));
768 const char *strstatus (int sts)
771 case ASTS_INVALID: return ("invalid");
772 case ASTS_PLAYING: return ("playing");
773 case ASTS_PAUSED: return ("paused");
774 case ASTS_COMPLETED: return ("completed");
775 case ASTS_ERROR: return ("error");
776 case ASTS_VOID: return ("void");
777 default: return ("??");
781 int pstatus (char *arg)
784 struct ioc_read_subchannel ss;
785 struct cd_sub_channel_info data;
786 int rc, trk, m, s, f;
788 char *p, vmcn[(4 * 15) + 1];
790 while ((p = strtok(arg, " \t"))) {
792 if (!strncasecmp(p, "audio", strlen(p)))
793 what |= STATUS_AUDIO;
794 else if (!strncasecmp(p, "media", strlen(p)))
795 what |= STATUS_MEDIA;
796 else if (!strncasecmp(p, "volume", strlen(p)))
797 what |= STATUS_VOLUME;
799 warnx("invalid command arguments");
804 what = STATUS_AUDIO|STATUS_MEDIA|STATUS_VOLUME;
805 if (what & STATUS_AUDIO) {
806 rc = status (&trk, &m, &s, &f);
809 printf ("Audio status = %d<%s>, current track = %d, current position = %d:%02d.%02d\n",
810 rc, strstatus (rc), trk, m, s, f);
812 printf ("%d %d %d:%02d.%02d\n", rc, trk, m, s, f);
814 printf ("No current status info available\n");
816 if (what & STATUS_MEDIA) {
817 bzero (&ss, sizeof (ss));
819 ss.data_len = sizeof (data);
820 ss.address_format = msf ? CD_MSF_FORMAT : CD_LBA_FORMAT;
821 ss.data_format = CD_MEDIA_CATALOG;
822 rc = ioctl (fd, CDIOCREADSUBCHANNEL, (char *) &ss);
824 printf("Media catalog is %sactive",
825 ss.data->what.media_catalog.mc_valid ? "": "in");
826 if (ss.data->what.media_catalog.mc_valid &&
827 ss.data->what.media_catalog.mc_number[0])
829 strvisx (vmcn, ss.data->what.media_catalog.mc_number,
830 (sizeof (vmcn) - 1) / 4, VIS_OCTAL | VIS_NL);
831 printf(", number \"%.*s\"", (int)sizeof (vmcn), vmcn);
835 printf("No media catalog info available\n");
837 if (what & STATUS_VOLUME) {
838 rc = ioctl (fd, CDIOCGETVOL, &v);
841 printf ("Left volume = %d, right volume = %d\n",
844 printf ("%d %d\n", v.vol[0], v.vol[1]);
846 printf ("No volume level info available\n");
853 * Convert an integer to its text string representation, and
854 * compute its checksum. Used by dbprog_discid to derive the
858 * n - The integer value.
861 * The integer checksum.
870 /* For backward compatibility this algorithm must not change */
871 sprintf(buf, "%u", n);
872 for (p = buf; *p != '\0'; p++)
881 * Compute a magic disc ID based on the number of tracks,
882 * the length of each track, and a checksum of the string
883 * that represents the offset of each track.
886 * s - Pointer to the curstat_t structure.
889 * The integer disc ID.
894 struct ioc_toc_header h;
900 rc = ioctl (fd, CDIOREADTOCHEADER, &h);
903 ntr = h.ending_track - h.starting_track + 1;
906 rc = read_toc_entrys ((ntr + 1) * sizeof (struct cd_toc_entry));
910 /* For backward compatibility this algorithm must not change */
911 for (i = 0; i < ntr; i++) {
912 #define TC_MM(a) toc_buffer[a].addr.msf.minute
913 #define TC_SS(a) toc_buffer[a].addr.msf.second
914 n += dbprog_sum((TC_MM(i) * 60) + TC_SS(i));
916 t += ((TC_MM(i+1) * 60) + TC_SS(i+1)) -
917 ((TC_MM(i) * 60) + TC_SS(i));
920 return((n % 0xff) << 24 | t << 8 | ntr);
927 id = dbprog_discid();
932 printf ("%08x\n",id);
937 int info (char *arg __unused)
939 struct ioc_toc_header h;
942 rc = ioctl (fd, CDIOREADTOCHEADER, &h);
945 printf ("Starting track = %d, ending track = %d, TOC size = %d bytes\n",
946 h.starting_track, h.ending_track, h.len);
948 printf ("%d %d %d\n", h.starting_track,
949 h.ending_track, h.len);
951 warn("getting toc header");
955 n = h.ending_track - h.starting_track + 1;
956 rc = read_toc_entrys ((n + 1) * sizeof (struct cd_toc_entry));
961 printf ("track start duration block length type\n");
962 printf ("-------------------------------------------------\n");
965 for (i = 0; i < n; i++) {
966 printf ("%5d ", toc_buffer[i].track);
967 prtrack (toc_buffer + i, 0);
969 printf ("%5d ", toc_buffer[n].track);
970 prtrack (toc_buffer + n, 1);
974 void lba2msf (unsigned long lba, u_char *m, u_char *s, u_char *f)
976 lba += 150; /* block start offset */
977 lba &= 0xffffff; /* negative lbas use only 24 bits */
978 *m = lba / (60 * 75);
984 unsigned int msf2lba (u_char m, u_char s, u_char f)
986 return (((m * 60) + s) * 75 + f) - 150;
989 void prtrack (struct cd_toc_entry *e, int lastflag)
991 int block, next, len;
995 /* Print track start */
996 printf ("%2d:%02d.%02d ", e->addr.msf.minute,
997 e->addr.msf.second, e->addr.msf.frame);
999 block = msf2lba (e->addr.msf.minute, e->addr.msf.second,
1002 block = ntohl(e->addr.lba);
1003 lba2msf(block, &m, &s, &f);
1004 /* Print track start */
1005 printf ("%2d:%02d.%02d ", m, s, f);
1008 /* Last track -- print block */
1009 printf (" - %6d - -\n", block);
1014 next = msf2lba (e[1].addr.msf.minute, e[1].addr.msf.second,
1015 e[1].addr.msf.frame);
1017 next = ntohl(e[1].addr.lba);
1019 /* Take into account a start offset time. */
1020 lba2msf (len - 150, &m, &s, &f);
1022 /* Print duration, block, length, type */
1023 printf ("%2d:%02d.%02d %6d %6d %5s\n", m, s, f, block, len,
1024 (e->control & 4) ? "data" : "audio");
1027 int play_track (int tstart, int istart, int tend, int iend)
1029 struct ioc_play_track t;
1031 t.start_track = tstart;
1032 t.start_index = istart;
1036 return ioctl (fd, CDIOCPLAYTRACKS, &t);
1039 int play_blocks (int blk, int len)
1041 struct ioc_play_blocks t;
1046 return ioctl (fd, CDIOCPLAYBLOCKS, &t);
1049 int setvol (int left, int right)
1058 return ioctl (fd, CDIOCSETVOL, &v);
1061 int read_toc_entrys (int len)
1063 struct ioc_read_toc_entry t;
1065 t.address_format = msf ? CD_MSF_FORMAT : CD_LBA_FORMAT;
1066 t.starting_track = 0;
1068 t.data = toc_buffer;
1070 return (ioctl (fd, CDIOREADTOCENTRYS, (char *) &t));
1073 int play_msf (int start_m, int start_s, int start_f,
1074 int end_m, int end_s, int end_f)
1076 struct ioc_play_msf a;
1078 a.start_m = start_m;
1079 a.start_s = start_s;
1080 a.start_f = start_f;
1085 return ioctl (fd, CDIOCPLAYMSF, (char *) &a);
1088 int status (int *trk, int *min, int *sec, int *frame)
1090 struct ioc_read_subchannel s;
1091 struct cd_sub_channel_info data;
1094 bzero (&s, sizeof (s));
1096 s.data_len = sizeof (data);
1097 s.address_format = msf ? CD_MSF_FORMAT : CD_LBA_FORMAT;
1098 s.data_format = CD_CURRENT_POSITION;
1100 if (ioctl (fd, CDIOCREADSUBCHANNEL, (char *) &s) < 0)
1103 *trk = s.data->what.position.track_number;
1105 *min = s.data->what.position.reladdr.msf.minute;
1106 *sec = s.data->what.position.reladdr.msf.second;
1107 *frame = s.data->what.position.reladdr.msf.frame;
1109 lba2msf(ntohl(s.data->what.position.reladdr.lba),
1116 return s.data->header.audio_status;
1122 return ("cdcontrol> ");
1129 static EditLine *el = NULL;
1130 static History *hist = NULL;
1132 static char buf[MAXLINE];
1135 const char *bp = NULL;
1141 el = el_init("cdcontrol", stdin, stdout,
1143 hist = history_init();
1144 history(hist, &he, H_EVENT, 100);
1145 el_set(el, EL_HIST, history, hist);
1146 el_set(el, EL_EDITOR, "emacs");
1147 el_set(el, EL_PROMPT, cdcontrol_prompt);
1148 el_set(el, EL_SIGNAL, 1);
1149 el_source(el, NULL);
1151 if ((bp = el_gets(el, &num)) == NULL || num == 0) {
1153 fprintf (stderr, "\r\n");
1157 len = (num > MAXLINE) ? MAXLINE : num;
1158 memcpy(buf, bp, len);
1160 history(hist, &he, H_ENTER, bp);
1164 if (! fgets (buf, sizeof (buf), stdin)) {
1166 fprintf (stderr, "\r\n");
1170 p = parse (buf, cmd);
1175 char *parse (char *buf, int *cmd)
1181 for (p=buf; isspace (*p); p++)
1184 if (isdigit (*p) || (p[0] == '#' && isdigit (p[1]))) {
1187 } else if (*p == '+') {
1190 } else if (*p == '-') {
1191 *cmd = CMD_PREVIOUS;
1195 for (buf = p; *p && ! isspace (*p); p++)
1202 if (*p) { /* It must be a spacing character! */
1206 for (q=p; *q && *q != '\n' && *q != '\r'; q++)
1212 for (c=cmdtab; c->name; ++c) {
1213 /* Is it an exact match? */
1214 if (! strcasecmp (buf, c->name)) {
1219 /* Try short hand forms then... */
1220 if (len >= c->min && ! strncasecmp (buf, c->name, len)) {
1221 if (*cmd != -1 && *cmd != c->command) {
1222 warnx("ambiguous command");
1230 warnx("invalid command, enter ``help'' for commands");
1234 while (isspace (*p))
1241 char devbuf[MAXPATHLEN];
1246 if (*cdname == '/') {
1247 snprintf (devbuf, MAXPATHLEN, "%s", cdname);
1249 snprintf (devbuf, MAXPATHLEN, "%s%s", _PATH_DEV, cdname);
1252 fd = open (devbuf, O_RDONLY);
1254 if (fd < 0 && errno == ENOENT) {
1255 strcat (devbuf, DEFAULT_CD_PARTITION);
1256 fd = open (devbuf, O_RDONLY);
1260 if (errno == ENXIO) {
1261 /* ENXIO has an overloaded meaning here.
1262 * The original "Device not configured" should
1263 * be interpreted as "No disc in drive %s". */
1264 warnx("no disc in drive %s", devbuf);
1267 err(1, "%s", devbuf);