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.
20 * $FreeBSD: src/usr.sbin/cdcontrol/cdcontrol.c,v 1.24.2.11 2002/11/20 00:26:19 njl Exp $
24 #include <sys/cdrio.h>
26 #include <sys/ioctl.h>
27 #include <sys/param.h>
42 #define ASTS_INVALID 0x00 /* Audio status byte not valid */
43 #define ASTS_PLAYING 0x11 /* Audio play operation in progress */
44 #define ASTS_PAUSED 0x12 /* Audio play operation paused */
45 #define ASTS_COMPLETED 0x13 /* Audio play operation successfully completed */
46 #define ASTS_ERROR 0x14 /* Audio play operation stopped due to error */
47 #define ASTS_VOID 0x15 /* No current audio status to return */
49 #ifndef DEFAULT_CD_DRIVE
50 # define DEFAULT_CD_DRIVE "/dev/cd0c"
53 #ifndef DEFAULT_CD_PARTITION
54 # define DEFAULT_CD_PARTITION "c"
73 #define CMD_PREVIOUS 17
75 #define STATUS_AUDIO 0x1
76 #define STATUS_MEDIA 0x2
77 #define STATUS_VOLUME 0x4
79 static struct cmdtab
{
85 { CMD_CLOSE
, "close", 1, "" },
86 { CMD_DEBUG
, "debug", 1, "on | off" },
87 { CMD_EJECT
, "eject", 1, "" },
88 { CMD_HELP
, "?", 1, 0 },
89 { CMD_HELP
, "help", 1, "" },
90 { CMD_INFO
, "info", 1, "" },
91 { CMD_NEXT
, "next", 1, "" },
92 { CMD_PAUSE
, "pause", 2, "" },
93 { CMD_PLAY
, "play", 1, "min1:sec1[.fram1] [min2:sec2[.fram2]]" },
94 { CMD_PLAY
, "play", 1, "track1[.index1] [track2[.index2]]" },
95 { CMD_PLAY
, "play", 1, "tr1 m1:s1[.f1] [[tr2] [m2:s2[.f2]]]" },
96 { CMD_PLAY
, "play", 1, "[#block [len]]" },
97 { CMD_PREVIOUS
, "previous", 2, "" },
98 { CMD_QUIT
, "quit", 1, "" },
99 { CMD_QUIT
, "exit", 1, "" },
100 { CMD_RESET
, "reset", 4, "" },
101 { CMD_RESUME
, "resume", 1, "" },
102 { CMD_SET
, "set", 2, "msf | lba" },
103 { CMD_STATUS
, "status", 1, "[audio | media | volume]" },
104 { CMD_STOP
, "stop", 3, "" },
105 { CMD_VOLUME
, "volume", 1,
106 "<l> <r> | left | right | mute | mono | stereo" },
107 { CMD_CDID
, "cdid", 2, "" },
108 { CMD_SPEED
, "speed", 2, "speed" },
112 static struct cd_toc_entry toc_buffer
[100];
114 static const char *cdname
;
116 static int verbose
= 1;
119 static int setvol(int, int);
120 static int read_toc_entrys(int);
121 static int play_msf(int, int, int, int, int, int);
122 static int play_track(int, int, int, int);
123 static int status(int *, int *, int *, int *);
124 static int open_cd(void);
125 static int next_prev(char *arg
, int);
126 static int play(char *arg
);
127 static int info(char *arg
);
128 static int cdid(void);
129 static int pstatus(char *arg
);
130 static char *input(int *);
131 static void prtrack(struct cd_toc_entry
*e
, int lastflag
);
132 static void lba2msf(unsigned long lba
,
133 u_char
*m
, u_char
*s
, u_char
*f
);
134 static unsigned int msf2lba(u_char m
, u_char s
, u_char f
);
135 static int play_blocks(int blk
, int len
);
136 static int run(int cmd
, char *arg
);
137 static char *parse(char *buf
, int *cmd
);
138 static void help(void);
139 static void usage(void);
140 static char *use_cdrom_instead(const char *);
141 static const char *strstatus(int);
142 static u_int
dbprog_discid(void);
143 static const char *cdcontrol_prompt(void);
153 for (c
=cmdtab
; c
->name
; ++c
) {
157 for (i
= c
->min
, s
= c
->name
; *s
; s
++, i
--) {
165 printf (" %s", c
->args
);
168 printf ("\n\tThe word \"play\" is not required for the play commands.\n");
169 printf ("\tThe plain target address is taken as a synonym for play.\n");
175 fprintf (stderr
, "usage: cdcontrol [-sv] [-f device] [command ...]\n");
180 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
);
193 main(int argc
, char **argv
)
199 switch (getopt (argc
, argv
, "svhf:")) {
220 if (argc
> 0 && ! strcasecmp (*argv
, "help"))
224 cdname
= getenv("CDROM");
228 cdname
= use_cdrom_instead("MUSIC_CD");
230 cdname
= use_cdrom_instead("CD_DRIVE");
232 cdname
= use_cdrom_instead("DISC");
234 cdname
= use_cdrom_instead("CDPLAY");
237 cdname
= DEFAULT_CD_DRIVE
;
238 warnx("no CD device name specified, defaulting to %s", cdname
);
245 for (p
=buf
; argc
-->0; ++argv
) {
246 len
= strlen (*argv
);
248 if (p
+ len
>= buf
+ sizeof (buf
) - 1)
258 arg
= parse (buf
, &cmd
);
259 return (run (cmd
, arg
));
263 verbose
= isatty (0);
266 printf ("Compact Disc Control utility, version %s\n", VERSION
);
267 printf ("Type `?' for command list\n\n");
272 if (run (cmd
, arg
) < 0) {
283 run(int cmd
, char *arg
)
294 if (fd
< 0 && ! open_cd ())
300 if (fd
< 0 && ! open_cd ())
306 if (fd
< 0 && ! open_cd ())
309 return pstatus (arg
);
313 if (fd
< 0 && ! open_cd ())
316 while (isspace (*arg
))
319 return next_prev (arg
, cmd
);
322 if (fd
< 0 && ! open_cd ())
325 return ioctl (fd
, CDIOCPAUSE
);
328 if (fd
< 0 && ! open_cd ())
331 return ioctl (fd
, CDIOCRESUME
);
334 if (fd
< 0 && ! open_cd ())
337 rc
= ioctl (fd
, CDIOCSTOP
);
339 ioctl (fd
, CDIOCALLOW
);
344 if (fd
< 0 && ! open_cd ())
347 rc
= ioctl (fd
, CDIOCRESET
);
355 if (fd
< 0 && ! open_cd ())
358 if (! strcasecmp (arg
, "on"))
359 return ioctl (fd
, CDIOCSETDEBUG
);
361 if (! strcasecmp (arg
, "off"))
362 return ioctl (fd
, CDIOCCLRDEBUG
);
364 warnx("invalid command arguments");
369 if (fd
< 0 && ! open_cd ())
372 ioctl (fd
, CDIOCALLOW
);
373 rc
= ioctl (fd
, CDIOCEJECT
);
379 if (fd
< 0 && ! open_cd ())
382 ioctl (fd
, CDIOCALLOW
);
383 rc
= ioctl (fd
, CDIOCCLOSE
);
391 if (fd
< 0 && ! open_cd ())
394 while (isspace (*arg
))
400 if (! strcasecmp (arg
, "msf"))
402 else if (! strcasecmp (arg
, "lba"))
405 warnx("invalid command arguments");
409 if (fd
< 0 && !open_cd ())
412 if (! strncasecmp (arg
, "left", strlen(arg
)))
413 return ioctl (fd
, CDIOCSETLEFT
);
415 if (! strncasecmp (arg
, "right", strlen(arg
)))
416 return ioctl (fd
, CDIOCSETRIGHT
);
418 if (! strncasecmp (arg
, "mono", strlen(arg
)))
419 return ioctl (fd
, CDIOCSETMONO
);
421 if (! strncasecmp (arg
, "stereo", strlen(arg
)))
422 return ioctl (fd
, CDIOCSETSTERIO
);
424 if (! strncasecmp (arg
, "mute", strlen(arg
)))
425 return ioctl (fd
, CDIOCSETMUTE
);
427 if (2 != sscanf (arg
, "%d %d", &l
, &r
)) {
428 warnx("invalid command arguments");
432 return setvol (l
, r
);
435 if (fd
< 0 && ! open_cd ())
439 if (strcasecmp("max", arg
) == 0)
440 speed
= CDR_MAX_SPEED
;
442 speed
= strtol(arg
, NULL
, 10) * 177;
443 if (speed
<= 0 || speed
> INT_MAX
) {
444 warnx("invalid command arguments %s", arg
);
447 return ioctl(fd
, CDRIOCREADSPEED
, &speed
);
460 struct ioc_toc_header h
;
462 int rc
, start
, end
= 0, istart
= 1, iend
= 1;
464 rc
= ioctl (fd
, CDIOREADTOCHEADER
, &h
);
469 n
= h
.ending_track
- h
.starting_track
+ 1;
470 rc
= read_toc_entrys ((n
+ 1) * sizeof (struct cd_toc_entry
));
475 if (! arg
|| ! *arg
) {
476 /* Play the whole disc */
478 return play_blocks (0, msf2lba (toc_buffer
[n
].addr
.msf
.minute
,
479 toc_buffer
[n
].addr
.msf
.second
,
480 toc_buffer
[n
].addr
.msf
.frame
));
482 return play_blocks (0, ntohl(toc_buffer
[n
].addr
.lba
));
485 if (strchr (arg
, '#')) {
486 /* Play block #blk [ len ] */
489 if (2 != sscanf (arg
, "#%d%d", &blk
, &len
) &&
490 1 != sscanf (arg
, "#%d", &blk
))
495 len
= msf2lba (toc_buffer
[n
].addr
.msf
.minute
,
496 toc_buffer
[n
].addr
.msf
.second
,
497 toc_buffer
[n
].addr
.msf
.frame
) - blk
;
499 len
= ntohl(toc_buffer
[n
].addr
.lba
) - blk
;
501 return play_blocks (blk
, len
);
504 if (strchr (arg
, ':')) {
506 * Play MSF m1:s1 [ .f1 ] [ m2:s2 [ .f2 ] ]
508 * Will now also undestand timed addresses relative
509 * to the beginning of a track in the form...
511 * tr1 m1:s1[.f1] [[tr2] [m2:s2[.f2]]]
514 unsigned m1
, m2
, s1
, s2
, f1
, f2
;
515 unsigned char tm
, ts
, tf
;
517 tr2
= m2
= s2
= f2
= f1
= 0;
518 if (8 == sscanf (arg
, "%d %d:%d.%d %d %d:%d.%d",
519 &tr1
, &m1
, &s1
, &f1
, &tr2
, &m2
, &s2
, &f2
))
520 goto Play_Relative_Addresses
;
522 tr2
= m2
= s2
= f2
= f1
= 0;
523 if (7 == sscanf (arg
, "%d %d:%d %d %d:%d.%d",
524 &tr1
, &m1
, &s1
, &tr2
, &m2
, &s2
, &f2
))
525 goto Play_Relative_Addresses
;
527 tr2
= m2
= s2
= f2
= f1
= 0;
528 if (7 == sscanf (arg
, "%d %d:%d.%d %d %d:%d",
529 &tr1
, &m1
, &s1
, &f1
, &tr2
, &m2
, &s2
))
530 goto Play_Relative_Addresses
;
532 tr2
= m2
= s2
= f2
= f1
= 0;
533 if (7 == sscanf (arg
, "%d %d:%d.%d %d:%d.%d",
534 &tr1
, &m1
, &s1
, &f1
, &m2
, &s2
, &f2
))
535 goto Play_Relative_Addresses
;
537 tr2
= m2
= s2
= f2
= f1
= 0;
538 if (6 == sscanf (arg
, "%d %d:%d.%d %d:%d",
539 &tr1
, &m1
, &s1
, &f1
, &m2
, &s2
))
540 goto Play_Relative_Addresses
;
542 tr2
= m2
= s2
= f2
= f1
= 0;
543 if (6 == sscanf (arg
, "%d %d:%d %d:%d.%d",
544 &tr1
, &m1
, &s1
, &m2
, &s2
, &f2
))
545 goto Play_Relative_Addresses
;
547 tr2
= m2
= s2
= f2
= f1
= 0;
548 if (6 == sscanf (arg
, "%d %d:%d.%d %d %d",
549 &tr1
, &m1
, &s1
, &f1
, &tr2
, &m2
))
550 goto Play_Relative_Addresses
;
552 tr2
= m2
= s2
= f2
= f1
= 0;
553 if (5 == sscanf (arg
, "%d %d:%d %d:%d", &tr1
, &m1
, &s1
, &m2
, &s2
))
554 goto Play_Relative_Addresses
;
556 tr2
= m2
= s2
= f2
= f1
= 0;
557 if (5 == sscanf (arg
, "%d %d:%d %d %d",
558 &tr1
, &m1
, &s1
, &tr2
, &m2
))
559 goto Play_Relative_Addresses
;
561 tr2
= m2
= s2
= f2
= f1
= 0;
562 if (5 == sscanf (arg
, "%d %d:%d.%d %d",
563 &tr1
, &m1
, &s1
, &f1
, &tr2
))
564 goto Play_Relative_Addresses
;
566 tr2
= m2
= s2
= f2
= f1
= 0;
567 if (4 == sscanf (arg
, "%d %d:%d %d", &tr1
, &m1
, &s1
, &tr2
))
568 goto Play_Relative_Addresses
;
570 tr2
= m2
= s2
= f2
= f1
= 0;
571 if (4 == sscanf (arg
, "%d %d:%d.%d", &tr1
, &m1
, &s1
, &f1
))
572 goto Play_Relative_Addresses
;
574 tr2
= m2
= s2
= f2
= f1
= 0;
575 if (3 == sscanf (arg
, "%d %d:%d", &tr1
, &m1
, &s1
))
576 goto Play_Relative_Addresses
;
578 tr2
= m2
= s2
= f2
= f1
= 0;
579 goto Try_Absolute_Timed_Addresses
;
581 Play_Relative_Addresses
:
590 tm
= toc_buffer
[tr1
].addr
.msf
.minute
;
591 ts
= toc_buffer
[tr1
].addr
.msf
.second
;
592 tf
= toc_buffer
[tr1
].addr
.msf
.frame
;
594 lba2msf(ntohl(toc_buffer
[tr1
].addr
.lba
),
601 printf ("Track %d is not that long.\n", tr1
+ 1);
620 if (m2
|| s2
|| f2
) {
638 m2
= toc_buffer
[n
].addr
.msf
.minute
;
639 s2
= toc_buffer
[n
].addr
.msf
.second
;
640 f2
= toc_buffer
[n
].addr
.msf
.frame
;
642 lba2msf(ntohl(toc_buffer
[n
].addr
.lba
),
649 } else if (tr2
> n
) {
656 tm
= toc_buffer
[tr2
].addr
.msf
.minute
;
657 ts
= toc_buffer
[tr2
].addr
.msf
.second
;
658 tf
= toc_buffer
[tr2
].addr
.msf
.frame
;
660 lba2msf(ntohl(toc_buffer
[tr2
].addr
.lba
),
678 tm
= toc_buffer
[n
].addr
.msf
.minute
;
679 ts
= toc_buffer
[n
].addr
.msf
.second
;
680 tf
= toc_buffer
[n
].addr
.msf
.frame
;
682 lba2msf(ntohl(toc_buffer
[n
].addr
.lba
),
690 printf ("The playing time of the disc is not that long.\n");
693 return (play_msf (m1
, s1
, f1
, m2
, s2
, f2
));
695 Try_Absolute_Timed_Addresses
:
696 if (6 != sscanf (arg
, "%d:%d.%d%d:%d.%d",
697 &m1
, &s1
, &f1
, &m2
, &s2
, &f2
) &&
698 5 != sscanf (arg
, "%d:%d.%d%d:%d", &m1
, &s1
, &f1
, &m2
, &s2
) &&
699 5 != sscanf (arg
, "%d:%d%d:%d.%d", &m1
, &s1
, &m2
, &s2
, &f2
) &&
700 3 != sscanf (arg
, "%d:%d.%d", &m1
, &s1
, &f1
) &&
701 4 != sscanf (arg
, "%d:%d%d:%d", &m1
, &s1
, &m2
, &s2
) &&
702 2 != sscanf (arg
, "%d:%d", &m1
, &s1
))
707 m2
= toc_buffer
[n
].addr
.msf
.minute
;
708 s2
= toc_buffer
[n
].addr
.msf
.second
;
709 f2
= toc_buffer
[n
].addr
.msf
.frame
;
711 lba2msf(ntohl(toc_buffer
[n
].addr
.lba
),
718 return play_msf (m1
, s1
, f1
, m2
, s2
, f2
);
722 * Play track trk1 [ .idx1 ] [ trk2 [ .idx2 ] ]
724 if (4 != sscanf (arg
, "%d.%d%d.%d", &start
, &istart
, &end
, &iend
) &&
725 3 != sscanf (arg
, "%d.%d%d", &start
, &istart
, &end
) &&
726 3 != sscanf (arg
, "%d%d.%d", &start
, &end
, &iend
) &&
727 2 != sscanf (arg
, "%d.%d", &start
, &istart
) &&
728 2 != sscanf (arg
, "%d%d", &start
, &end
) &&
729 1 != sscanf (arg
, "%d", &start
))
734 return (play_track (start
, istart
, end
, iend
));
737 warnx("invalid command arguments");
742 next_prev(char *arg
, int cmd
)
744 struct ioc_toc_header h
;
745 int dir
, junk
, n
, off
, rc
, trk
;
747 dir
= (cmd
== CMD_NEXT
) ? 1 : -1;
748 rc
= ioctl (fd
, CDIOREADTOCHEADER
, &h
);
752 n
= h
.ending_track
- h
.starting_track
+ 1;
753 rc
= status (&trk
, &junk
, &junk
, &junk
);
758 if (sscanf (arg
, "%u", &off
) != 1) {
759 warnx("invalid command argument");
766 if (trk
> h
.ending_track
)
769 return (play_track (trk
, 1, n
, 1));
776 case ASTS_INVALID
: return ("invalid");
777 case ASTS_PLAYING
: return ("playing");
778 case ASTS_PAUSED
: return ("paused");
779 case ASTS_COMPLETED
: return ("completed");
780 case ASTS_ERROR
: return ("error");
781 case ASTS_VOID
: return ("void");
782 default: return ("??");
790 struct ioc_read_subchannel ss
;
791 struct cd_sub_channel_info data
;
792 int rc
, trk
, m
, s
, f
;
794 char *p
, vmcn
[(4 * 15) + 1];
796 while ((p
= strtok(arg
, " \t"))) {
798 if (!strncasecmp(p
, "audio", strlen(p
)))
799 what
|= STATUS_AUDIO
;
800 else if (!strncasecmp(p
, "media", strlen(p
)))
801 what
|= STATUS_MEDIA
;
802 else if (!strncasecmp(p
, "volume", strlen(p
)))
803 what
|= STATUS_VOLUME
;
805 warnx("invalid command arguments");
810 what
= STATUS_AUDIO
|STATUS_MEDIA
|STATUS_VOLUME
;
811 if (what
& STATUS_AUDIO
) {
812 rc
= status (&trk
, &m
, &s
, &f
);
815 printf ("Audio status = %d<%s>, current track = %d, current position = %d:%02d.%02d\n",
816 rc
, strstatus (rc
), trk
, m
, s
, f
);
818 printf ("%d %d %d:%02d.%02d\n", rc
, trk
, m
, s
, f
);
820 printf ("No current status info available\n");
822 if (what
& STATUS_MEDIA
) {
823 bzero (&ss
, sizeof (ss
));
825 ss
.data_len
= sizeof (data
);
826 ss
.address_format
= msf
? CD_MSF_FORMAT
: CD_LBA_FORMAT
;
827 ss
.data_format
= CD_MEDIA_CATALOG
;
828 rc
= ioctl (fd
, CDIOCREADSUBCHANNEL
, (char *) &ss
);
830 printf("Media catalog is %sactive",
831 ss
.data
->what
.media_catalog
.mc_valid
? "": "in");
832 if (ss
.data
->what
.media_catalog
.mc_valid
&&
833 ss
.data
->what
.media_catalog
.mc_number
[0])
835 strvisx (vmcn
, ss
.data
->what
.media_catalog
.mc_number
,
836 (sizeof (vmcn
) - 1) / 4, VIS_OCTAL
| VIS_NL
);
837 printf(", number \"%.*s\"", (int)sizeof (vmcn
), vmcn
);
841 printf("No media catalog info available\n");
843 if (what
& STATUS_VOLUME
) {
844 rc
= ioctl (fd
, CDIOCGETVOL
, &v
);
847 printf ("Left volume = %d, right volume = %d\n",
850 printf ("%d %d\n", v
.vol
[0], v
.vol
[1]);
852 printf ("No volume level info available\n");
859 * Convert an integer to its text string representation, and
860 * compute its checksum. Used by dbprog_discid to derive the
864 * n - The integer value.
867 * The integer checksum.
876 /* For backward compatibility this algorithm must not change */
877 sprintf(buf
, "%u", n
);
878 for (p
= buf
; *p
!= '\0'; p
++)
887 * Compute a magic disc ID based on the number of tracks,
888 * the length of each track, and a checksum of the string
889 * that represents the offset of each track.
892 * s - Pointer to the curstat_t structure.
895 * The integer disc ID.
900 struct ioc_toc_header h
;
906 rc
= ioctl (fd
, CDIOREADTOCHEADER
, &h
);
909 ntr
= h
.ending_track
- h
.starting_track
+ 1;
912 rc
= read_toc_entrys ((ntr
+ 1) * sizeof (struct cd_toc_entry
));
916 /* For backward compatibility this algorithm must not change */
917 for (i
= 0; i
< ntr
; i
++) {
918 #define TC_MM(a) toc_buffer[a].addr.msf.minute
919 #define TC_SS(a) toc_buffer[a].addr.msf.second
920 n
+= dbprog_sum((TC_MM(i
) * 60) + TC_SS(i
));
922 t
+= ((TC_MM(i
+1) * 60) + TC_SS(i
+1)) -
923 ((TC_MM(i
) * 60) + TC_SS(i
));
926 return((n
% 0xff) << 24 | t
<< 8 | ntr
);
934 id
= dbprog_discid();
939 printf ("%08x\n",id
);
945 info(char *arg __unused
)
947 struct ioc_toc_header h
;
950 rc
= ioctl (fd
, CDIOREADTOCHEADER
, &h
);
953 printf ("Starting track = %d, ending track = %d, TOC size = %d bytes\n",
954 h
.starting_track
, h
.ending_track
, h
.len
);
956 printf ("%d %d %d\n", h
.starting_track
,
957 h
.ending_track
, h
.len
);
959 warn("getting toc header");
963 n
= h
.ending_track
- h
.starting_track
+ 1;
964 rc
= read_toc_entrys ((n
+ 1) * sizeof (struct cd_toc_entry
));
969 printf ("track start duration block length type\n");
970 printf ("-------------------------------------------------\n");
973 for (i
= 0; i
< n
; i
++) {
974 printf ("%5d ", toc_buffer
[i
].track
);
975 prtrack (toc_buffer
+ i
, 0);
977 printf ("%5d ", toc_buffer
[n
].track
);
978 prtrack (toc_buffer
+ n
, 1);
983 lba2msf(unsigned long lba
, u_char
*m
, u_char
*s
, u_char
*f
)
985 lba
+= 150; /* block start offset */
986 lba
&= 0xffffff; /* negative lbas use only 24 bits */
987 *m
= lba
/ (60 * 75);
994 msf2lba(u_char m
, u_char s
, u_char f
)
996 return (((m
* 60) + s
) * 75 + f
) - 150;
1000 prtrack(struct cd_toc_entry
*e
, int lastflag
)
1002 int block
, next
, len
;
1006 /* Print track start */
1007 printf ("%2d:%02d.%02d ", e
->addr
.msf
.minute
,
1008 e
->addr
.msf
.second
, e
->addr
.msf
.frame
);
1010 block
= msf2lba (e
->addr
.msf
.minute
, e
->addr
.msf
.second
,
1013 block
= ntohl(e
->addr
.lba
);
1014 lba2msf(block
, &m
, &s
, &f
);
1015 /* Print track start */
1016 printf ("%2d:%02d.%02d ", m
, s
, f
);
1019 /* Last track -- print block */
1020 printf (" - %6d - -\n", block
);
1025 next
= msf2lba (e
[1].addr
.msf
.minute
, e
[1].addr
.msf
.second
,
1026 e
[1].addr
.msf
.frame
);
1028 next
= ntohl(e
[1].addr
.lba
);
1030 /* Take into account a start offset time. */
1031 lba2msf (len
- 150, &m
, &s
, &f
);
1033 /* Print duration, block, length, type */
1034 printf ("%2d:%02d.%02d %6d %6d %5s\n", m
, s
, f
, block
, len
,
1035 (e
->control
& 4) ? "data" : "audio");
1039 play_track(int tstart
, int istart
, int tend
, int iend
)
1041 struct ioc_play_track t
;
1043 t
.start_track
= tstart
;
1044 t
.start_index
= istart
;
1048 return ioctl (fd
, CDIOCPLAYTRACKS
, &t
);
1052 play_blocks(int blk
, int len
)
1054 struct ioc_play_blocks t
;
1059 return ioctl (fd
, CDIOCPLAYBLOCKS
, &t
);
1063 setvol(int left
, int right
)
1072 return ioctl (fd
, CDIOCSETVOL
, &v
);
1076 read_toc_entrys(int len
)
1078 struct ioc_read_toc_entry t
;
1080 t
.address_format
= msf
? CD_MSF_FORMAT
: CD_LBA_FORMAT
;
1081 t
.starting_track
= 0;
1083 t
.data
= toc_buffer
;
1085 return (ioctl (fd
, CDIOREADTOCENTRYS
, (char *) &t
));
1089 play_msf(int start_m
, int start_s
, int start_f
,
1090 int end_m
, int end_s
, int end_f
)
1092 struct ioc_play_msf a
;
1094 a
.start_m
= start_m
;
1095 a
.start_s
= start_s
;
1096 a
.start_f
= start_f
;
1101 return ioctl (fd
, CDIOCPLAYMSF
, (char *) &a
);
1105 status(int *trk
, int *min
, int *sec
, int *frame
)
1107 struct ioc_read_subchannel s
;
1108 struct cd_sub_channel_info data
;
1111 bzero (&s
, sizeof (s
));
1113 s
.data_len
= sizeof (data
);
1114 s
.address_format
= msf
? CD_MSF_FORMAT
: CD_LBA_FORMAT
;
1115 s
.data_format
= CD_CURRENT_POSITION
;
1117 if (ioctl (fd
, CDIOCREADSUBCHANNEL
, (char *) &s
) < 0)
1120 *trk
= s
.data
->what
.position
.track_number
;
1122 *min
= s
.data
->what
.position
.reladdr
.msf
.minute
;
1123 *sec
= s
.data
->what
.position
.reladdr
.msf
.second
;
1124 *frame
= s
.data
->what
.position
.reladdr
.msf
.frame
;
1126 lba2msf(ntohl(s
.data
->what
.position
.reladdr
.lba
),
1133 return s
.data
->header
.audio_status
;
1137 cdcontrol_prompt(void)
1139 return ("cdcontrol> ");
1146 static EditLine
*el
= NULL
;
1147 static History
*hist
= NULL
;
1148 static HistEvent he
;
1149 static char buf
[MAXLINE
];
1152 const char *bp
= NULL
;
1158 el
= el_init("cdcontrol", stdin
, stdout
, stderr
);
1159 hist
= history_init();
1160 history(hist
, &he
, H_SETSIZE
, 100);
1161 el_set(el
, EL_HIST
, history
, hist
);
1162 el_set(el
, EL_EDITOR
, "emacs");
1163 el_set(el
, EL_PROMPT
, cdcontrol_prompt
);
1164 el_set(el
, EL_SIGNAL
, 1);
1165 el_source(el
, NULL
);
1167 if ((bp
= el_gets(el
, &num
)) == NULL
|| num
== 0) {
1169 fprintf (stderr
, "\r\n");
1173 len
= (num
>= MAXLINE
) ? MAXLINE
- 1 : num
;
1174 memcpy(buf
, bp
, len
);
1176 history(hist
, &he
, H_ENTER
, bp
);
1180 if (! fgets (buf
, sizeof (buf
), stdin
)) {
1182 fprintf (stderr
, "\r\n");
1186 p
= parse (buf
, cmd
);
1192 parse(char *buf
, int *cmd
)
1198 for (p
=buf
; isspace (*p
); p
++)
1201 if (isdigit (*p
) || (p
[0] == '#' && isdigit (p
[1]))) {
1204 } else if (*p
== '+') {
1207 } else if (*p
== '-') {
1208 *cmd
= CMD_PREVIOUS
;
1212 for (buf
= p
; *p
&& ! isspace (*p
); p
++)
1219 if (*p
) { /* It must be a spacing character! */
1223 for (q
=p
; *q
&& *q
!= '\n' && *q
!= '\r'; q
++)
1229 for (c
=cmdtab
; c
->name
; ++c
) {
1230 /* Is it an exact match? */
1231 if (! strcasecmp (buf
, c
->name
)) {
1236 /* Try short hand forms then... */
1237 if (len
>= c
->min
&& ! strncasecmp (buf
, c
->name
, len
)) {
1238 if (*cmd
!= -1 && *cmd
!= c
->command
) {
1239 warnx("ambiguous command");
1247 warnx("invalid command, enter ``help'' for commands");
1251 while (isspace (*p
))
1259 char devbuf
[MAXPATHLEN
];
1264 if (*cdname
== '/') {
1265 snprintf (devbuf
, MAXPATHLEN
, "%s", cdname
);
1267 snprintf (devbuf
, MAXPATHLEN
, "%s%s", _PATH_DEV
, cdname
);
1270 fd
= open (devbuf
, O_RDONLY
);
1272 if (fd
< 0 && errno
== ENOENT
) {
1273 strcat (devbuf
, DEFAULT_CD_PARTITION
);
1274 fd
= open (devbuf
, O_RDONLY
);
1278 if (errno
== ENXIO
) {
1279 /* ENXIO has an overloaded meaning here.
1280 * The original "Device not configured" should
1281 * be interpreted as "No disc in drive %s". */
1282 warnx("no disc in drive %s", devbuf
);
1285 err(1, "%s", devbuf
);