1 /* $OpenBSD: cdio.c,v 1.84 2022/02/15 08:17:50 jsg Exp $ */ 2 3 /* Copyright (c) 1995 Serge V. Vakulenko 4 * All rights reserved. 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that the following conditions 8 * are met: 9 * 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 3. All advertising materials mentioning features or use of this software 16 * must display the following acknowledgement: 17 * This product includes software developed by Serge V. Vakulenko. 18 * 4. The name of the author may not be used to endorse or promote products 19 * derived from this software without specific prior written permission. 20 * 21 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 22 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 23 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 24 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 25 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 26 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 27 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 28 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 29 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 30 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 31 */ 32 33 /* 34 * Compact Disc Control Utility by Serge V. Vakulenko <vak@cronyx.ru>. 35 * Based on the non-X based CD player by Jean-Marc Zucconi and 36 * Andrey A. Chernov. 37 * 38 * Fixed and further modified on 5-Sep-1995 by Jukka Ukkonen <jau@funet.fi>. 39 * 40 * 11-Sep-1995: Jukka A. Ukkonen <jau@funet.fi> 41 * A couple of further fixes to my own earlier "fixes". 42 * 43 * 18-Sep-1995: Jukka A. Ukkonen <jau@funet.fi> 44 * Added an ability to specify addresses relative to the 45 * beginning of a track. This is in fact a variation of 46 * doing the simple play_msf() call. 47 * 48 * 11-Oct-1995: Serge V.Vakulenko <vak@cronyx.ru> 49 * New eject algorithm. 50 * Some code style reformatting. 51 * 52 * $FreeBSD: cdcontrol.c,v 1.13 1996/06/25 21:01:27 ache Exp $ 53 */ 54 55 #include <sys/types.h> 56 #include <sys/cdio.h> 57 #include <sys/ioctl.h> 58 #include <sys/queue.h> 59 #include <sys/scsiio.h> 60 #include <sys/stat.h> 61 62 #include <ctype.h> 63 #include <err.h> 64 #include <errno.h> 65 #include <fcntl.h> 66 #include <signal.h> 67 #include <stdio.h> 68 #include <stdlib.h> 69 #include <string.h> 70 #include <unistd.h> 71 #include <limits.h> 72 #include <histedit.h> 73 #include <util.h> 74 #include <vis.h> 75 76 #include "extern.h" 77 78 #define ASTS_INVALID 0x00 /* Audio status byte not valid */ 79 #define ASTS_PLAYING 0x11 /* Audio play operation in progress */ 80 #define ASTS_PAUSED 0x12 /* Audio play operation paused */ 81 #define ASTS_COMPLETED 0x13 /* Audio play operation successfully completed */ 82 #define ASTS_ERROR 0x14 /* Audio play operation stopped due to error */ 83 #define ASTS_VOID 0x15 /* No current audio status to return */ 84 85 #ifndef DEFAULT_CD_DRIVE 86 # define DEFAULT_CD_DRIVE "cd0" 87 #endif 88 89 #define CMD_DEBUG 1 90 #define CMD_DEVICE 2 91 #define CMD_EJECT 3 92 #define CMD_HELP 4 93 #define CMD_INFO 5 94 #define CMD_PAUSE 6 95 #define CMD_PLAY 7 96 #define CMD_QUIT 8 97 #define CMD_RESUME 9 98 #define CMD_STOP 10 99 #define CMD_VOLUME 11 100 #define CMD_CLOSE 12 101 #define CMD_RESET 13 102 #define CMD_SET 14 103 #define CMD_STATUS 15 104 #define CMD_NEXT 16 105 #define CMD_PREV 17 106 #define CMD_REPLAY 18 107 #define CMD_CDDB 19 108 #define CMD_CDID 20 109 #define CMD_BLANK 21 110 #define CMD_CDRIP 22 111 #define CMD_CDPLAY 23 112 113 struct cmdtab { 114 int command; 115 char *name; 116 int min; 117 char *args; 118 } cmdtab[] = { 119 { CMD_BLANK, "blank", 1, "" }, 120 { CMD_CDDB, "cddbinfo", 2, "[n]" }, 121 { CMD_CDID, "cdid", 3, "" }, 122 { CMD_CDPLAY, "cdplay", 3, "[track1-trackN ...]" }, 123 { CMD_CDRIP, "cdrip", 3, "[track1-trackN ...]" }, 124 { CMD_CLOSE, "close", 1, "" }, 125 { CMD_DEBUG, "debug", 3, "on | off" }, 126 { CMD_DEVICE, "device", 1, "devname" }, 127 { CMD_EJECT, "eject", 1, "" }, 128 { CMD_QUIT, "exit", 2, "" }, 129 { CMD_HELP, "?", 1, 0 }, 130 { CMD_HELP, "help", 1, "" }, 131 { CMD_INFO, "info", 1, "" }, 132 { CMD_NEXT, "next", 1, "" }, 133 { CMD_PAUSE, "pause", 2, "" }, 134 { CMD_PLAY, "play", 1, "[track1[.index1] [track2[.index2]]]" }, 135 { CMD_PLAY, "play", 1, "[[tr1] m1:s1[.f1] [tr2] [m2:s2[.f2]]]" }, 136 { CMD_PLAY, "play", 1, "[#block [len]]" }, 137 { CMD_PREV, "previous", 2, "" }, 138 { CMD_QUIT, "quit", 1, "" }, 139 { CMD_REPLAY, "replay", 3, "" }, 140 { CMD_RESET, "reset", 4, "" }, 141 { CMD_RESUME, "resume", 1, "" }, 142 { CMD_SET, "set", 2, "lba | msf" }, 143 { CMD_STATUS, "status", 1, "" }, 144 { CMD_STOP, "stop", 3, "" }, 145 { CMD_VOLUME, "volume", 1, "left_channel right_channel" }, 146 { CMD_VOLUME, "volume", 1, "left | right | mono | stereo | mute" }, 147 { 0, 0, 0, 0} 148 }; 149 150 struct cd_toc_entry *toc_buffer; 151 152 struct track_head tracks; 153 154 char *cdname; 155 int fd = -1; 156 int writeperm = 0; 157 u_int8_t mediacap[MMC_FEATURE_MAX / NBBY]; 158 int verbose = 1; 159 int msf = 1; 160 const char *cddb_host; 161 char **track_names; 162 volatile sig_atomic_t signo; 163 164 EditLine *el = NULL; /* line-editing structure */ 165 History *hist = NULL; /* line-editing history */ 166 void switch_el(void); 167 168 extern char *__progname; 169 170 int setvol(int, int); 171 int read_toc_entrys(int); 172 int play_msf(int, int, int, int, int, int); 173 int play_track(int, int, int, int); 174 int status(int *, int *, int *, int *); 175 int is_wave(int); 176 __dead void tao(int argc, char **argv); 177 int play(char *arg); 178 int info(char *arg); 179 int cddbinfo(char *arg); 180 int pstatus(char *arg); 181 int play_next(char *arg); 182 int play_prev(char *arg); 183 int play_same(char *arg); 184 void sigint_handler(int); 185 char *input(int *); 186 char *prompt(void); 187 void prtrack(struct cd_toc_entry *e, int lastflag, char *name); 188 void lba2msf(unsigned long lba, u_char *m, u_char *s, u_char *f); 189 unsigned int msf2lba(u_char m, u_char s, u_char f); 190 int play_blocks(int blk, int len); 191 int run(int cmd, char *arg); 192 char *parse(char *buf, int *cmd); 193 void help(void); 194 void usage(void); 195 char *strstatus(int); 196 int cdid(void); 197 void addmsf(u_int *, u_int *, u_int *, u_char, u_char, u_char); 198 int cmpmsf(u_char, u_char, u_char, u_char, u_char, u_char); 199 void toc2msf(u_int, u_char *, u_char *, u_char *); 200 201 void 202 help(void) 203 { 204 struct cmdtab *c; 205 char *s, n; 206 int i; 207 208 for (c = cmdtab; c->name; ++c) { 209 if (!c->args) 210 continue; 211 printf("\t"); 212 for (i = c->min, s = c->name; *s; s++, i--) { 213 if (i > 0) 214 n = toupper((unsigned char)*s); 215 else 216 n = *s; 217 putchar(n); 218 } 219 if (*c->args) 220 printf(" %s", c->args); 221 printf("\n"); 222 } 223 printf("\n\tThe word \"play\" is not required for the play commands.\n"); 224 printf("\tThe plain target address is taken as a synonym for play.\n"); 225 } 226 227 void 228 usage(void) 229 { 230 fprintf(stderr, "usage: %s [-sv] [-d host:port] [-f device] [command args ...]\n", 231 __progname); 232 exit(1); 233 } 234 235 int 236 main(int argc, char **argv) 237 { 238 int ch, cmd; 239 char *arg; 240 241 cdname = getenv("DISC"); 242 if (!cdname) 243 cdname = getenv("CDROM"); 244 245 cddb_host = getenv("CDDB"); 246 if (!cddb_host) 247 cddb_host = "gnudb.gnudb.org"; 248 249 while ((ch = getopt(argc, argv, "svd:f:")) != -1) 250 switch (ch) { 251 case 's': 252 verbose = 0; 253 break; 254 case 'v': 255 verbose++; 256 break; 257 case 'f': 258 cdname = optarg; 259 break; 260 case 'd': 261 cddb_host = optarg; 262 break; 263 default: 264 usage(); 265 } 266 267 argc -= optind; 268 argv += optind; 269 270 if (argc > 0 && ! strcasecmp(*argv, "help")) 271 usage(); 272 273 if (!cdname) { 274 cdname = DEFAULT_CD_DRIVE; 275 if (verbose > 1) 276 fprintf(stderr, 277 "No CD device name specified. Defaulting to %s.\n", 278 cdname); 279 } 280 281 if (argc > 0 && !strcasecmp(*argv, "tao")) { 282 tao(argc, argv); 283 /* NOTREACHED */ 284 } 285 if (argc > 0) { 286 char buf[80], *p; 287 int len; 288 289 for (p=buf; argc-->0; ++argv) { 290 len = snprintf(p, buf + sizeof buf - p, 291 "%s%s", (p > buf) ? " " : "", *argv); 292 293 if (len < 0 || len >= buf + sizeof buf - p) 294 errx(1, "argument list too long."); 295 296 p += len; 297 } 298 arg = parse(buf, &cmd); 299 return (run(cmd, arg)); 300 } 301 302 if (verbose == 1) 303 verbose = isatty(0); 304 305 if (verbose) { 306 printf("Compact Disc Control utility, version %s\n", VERSION); 307 printf("Type `?' for command list\n\n"); 308 } 309 310 switch_el(); 311 312 for (;;) { 313 arg = input(&cmd); 314 if (run(cmd, arg) < 0) { 315 if (verbose) 316 warn(NULL); 317 close(fd); 318 fd = -1; 319 } 320 fflush(stdout); 321 } 322 } 323 324 int 325 run(int cmd, char *arg) 326 { 327 int l, r, rc; 328 static char newcdname[PATH_MAX]; 329 330 switch (cmd) { 331 332 case CMD_QUIT: 333 switch_el(); 334 exit(0); 335 336 case CMD_INFO: 337 if (!open_cd(cdname, 0)) 338 return (0); 339 340 return info(arg); 341 342 case CMD_CDDB: 343 if (!open_cd(cdname, 0)) 344 return (0); 345 346 return cddbinfo(arg); 347 348 case CMD_CDID: 349 if (!open_cd(cdname, 0)) 350 return (0); 351 return cdid(); 352 353 case CMD_STATUS: 354 if (!open_cd(cdname, 0)) 355 return (0); 356 357 return pstatus(arg); 358 359 case CMD_PAUSE: 360 if (!open_cd(cdname, 0)) 361 return (0); 362 363 return ioctl(fd, CDIOCPAUSE); 364 365 case CMD_RESUME: 366 if (!open_cd(cdname, 0)) 367 return (0); 368 369 return ioctl(fd, CDIOCRESUME); 370 371 case CMD_STOP: 372 if (!open_cd(cdname, 0)) 373 return (0); 374 375 rc = ioctl(fd, CDIOCSTOP); 376 377 (void) ioctl(fd, CDIOCALLOW); 378 379 return (rc); 380 381 case CMD_RESET: 382 if (!open_cd(cdname, 0)) 383 return (0); 384 385 rc = ioctl(fd, CDIOCRESET); 386 if (rc == -1) 387 return rc; 388 close(fd); 389 fd = -1; 390 return (0); 391 392 case CMD_DEBUG: 393 if (!open_cd(cdname, 0)) 394 return (0); 395 396 if (!strcasecmp(arg, "on")) 397 return ioctl(fd, CDIOCSETDEBUG); 398 399 if (!strcasecmp(arg, "off")) 400 return ioctl(fd, CDIOCCLRDEBUG); 401 402 printf("%s: Invalid command arguments\n", __progname); 403 404 return (0); 405 406 case CMD_DEVICE: 407 /* close old device */ 408 if (fd > -1) { 409 (void) ioctl(fd, CDIOCALLOW); 410 close(fd); 411 fd = -1; 412 } 413 414 if (strlen(arg) == 0) { 415 printf("%s: Invalid parameter\n", __progname); 416 return (0); 417 } 418 419 /* open new device */ 420 if (!open_cd(arg, 0)) 421 return (0); 422 (void) strlcpy(newcdname, arg, sizeof(newcdname)); 423 cdname = newcdname; 424 return (1); 425 426 case CMD_EJECT: 427 if (!open_cd(cdname, 0)) 428 return (0); 429 430 (void) ioctl(fd, CDIOCALLOW); 431 rc = ioctl(fd, CDIOCEJECT); 432 if (rc == -1) 433 return (rc); 434 close(fd); 435 fd = -1; 436 if (track_names) 437 free_names(track_names); 438 track_names = NULL; 439 return (0); 440 441 case CMD_CLOSE: 442 if (!open_cd(cdname, 0)) 443 return (0); 444 445 (void) ioctl(fd, CDIOCALLOW); 446 rc = ioctl(fd, CDIOCCLOSE); 447 if (rc == -1) 448 return (rc); 449 close(fd); 450 fd = -1; 451 return (0); 452 453 case CMD_PLAY: 454 if (!open_cd(cdname, 0)) 455 return (0); 456 457 while (isspace((unsigned char)*arg)) 458 arg++; 459 460 return play(arg); 461 462 case CMD_SET: 463 if (!strcasecmp(arg, "msf")) 464 msf = 1; 465 else if (!strcasecmp(arg, "lba")) 466 msf = 0; 467 else 468 printf("%s: Invalid command arguments\n", __progname); 469 return (0); 470 471 case CMD_VOLUME: 472 if (!open_cd(cdname, 0)) 473 return (0); 474 475 if (!strncasecmp(arg, "left", strlen(arg))) 476 return ioctl(fd, CDIOCSETLEFT); 477 478 if (!strncasecmp(arg, "right", strlen(arg))) 479 return ioctl(fd, CDIOCSETRIGHT); 480 481 if (!strncasecmp(arg, "mono", strlen(arg))) 482 return ioctl(fd, CDIOCSETMONO); 483 484 if (!strncasecmp(arg, "stereo", strlen(arg))) 485 return ioctl(fd, CDIOCSETSTEREO); 486 487 if (!strncasecmp(arg, "mute", strlen(arg))) 488 return ioctl(fd, CDIOCSETMUTE); 489 490 if (2 != sscanf(arg, "%d%d", &l, &r)) { 491 printf("%s: Invalid command arguments\n", __progname); 492 return (0); 493 } 494 495 return setvol(l, r); 496 497 case CMD_NEXT: 498 if (!open_cd(cdname, 0)) 499 return (0); 500 501 return play_next(arg); 502 503 case CMD_PREV: 504 if (!open_cd(cdname, 0)) 505 return (0); 506 507 return play_prev(arg); 508 509 case CMD_REPLAY: 510 if (!open_cd(cdname, 0)) 511 return 0; 512 513 return play_same(arg); 514 case CMD_BLANK: 515 if (!open_cd(cdname, 1)) 516 return 0; 517 518 if (get_media_capabilities(mediacap, 1) == -1) { 519 warnx("Can't determine media type"); 520 return (0); 521 } 522 if (cdio_isset(mediacap, MMC_FEATURE_CDRW_WRITE) == 0 && 523 get_media_type() != MEDIATYPE_CDRW) { 524 warnx("The media doesn't support blanking"); 525 return (0); 526 } 527 528 return blank(); 529 case CMD_CDRIP: 530 if (!open_cd(cdname, 0)) 531 return (0); 532 533 while (isspace((unsigned char)*arg)) 534 arg++; 535 536 return cdrip(arg); 537 case CMD_CDPLAY: 538 if (!open_cd(cdname, 0)) 539 return (0); 540 541 while (isspace((unsigned char)*arg)) 542 arg++; 543 544 return cdplay(arg); 545 default: 546 case CMD_HELP: 547 help(); 548 return (0); 549 550 } 551 } 552 553 /* 554 * Check if audio file has RIFF WAVE format. If not, we assume it's just PCM. 555 */ 556 int 557 is_wave(int fd) 558 { 559 char buf[WAVHDRLEN]; 560 int rv; 561 562 rv = 0; 563 if (read(fd, buf, sizeof(buf)) == sizeof(buf)) { 564 if (memcmp(buf, "RIFF", 4) == 0 && 565 memcmp(buf + 8, "WAVE", 4) == 0) 566 rv = 1; 567 } 568 569 return (rv); 570 } 571 572 __dead void 573 tao(int argc, char **argv) 574 { 575 struct stat sb; 576 struct track_info *cur_track; 577 struct track_info *tr; 578 off_t availblk, needblk = 0; 579 u_int blklen; 580 u_int ntracks = 0; 581 char type; 582 int ch, speed; 583 const char *errstr; 584 585 if (argc == 1) 586 usage(); 587 588 SLIST_INIT(&tracks); 589 type = 'd'; 590 speed = DRIVE_SPEED_OPTIMAL; 591 blklen = 2048; 592 while (argc > 1) { 593 tr = malloc(sizeof(struct track_info)); 594 if (tr == NULL) 595 err(1, "tao"); 596 597 optreset = 1; 598 optind = 1; 599 while ((ch = getopt(argc, argv, "ads:")) != -1) { 600 switch (ch) { 601 case 'a': 602 type = 'a'; 603 blklen = 2352; 604 break; 605 case 'd': 606 type = 'd'; 607 blklen = 2048; 608 break; 609 case 's': 610 if (strcmp(optarg, "auto") == 0) { 611 speed = DRIVE_SPEED_OPTIMAL; 612 } else if (strcmp(optarg, "max") == 0) { 613 speed = DRIVE_SPEED_MAX; 614 } else { 615 speed = (int)strtonum(optarg, 1, 616 CD_MAX_SPEED, &errstr); 617 if (errstr != NULL) { 618 errx(1, 619 "incorrect speed value"); 620 } 621 } 622 break; 623 default: 624 usage(); 625 /* NOTREACHED */ 626 } 627 } 628 629 if (speed != DRIVE_SPEED_OPTIMAL && speed != DRIVE_SPEED_MAX) 630 tr->speed = CD_SPEED_TO_KBPS(speed, blklen); 631 else 632 tr->speed = speed; 633 634 tr->type = type; 635 tr->blklen = blklen; 636 argc -= optind; 637 argv += optind; 638 if (argv[0] == NULL) 639 usage(); 640 tr->file = argv[0]; 641 tr->fd = open(tr->file, O_RDONLY); 642 if (tr->fd == -1) 643 err(1, "cannot open file %s", tr->file); 644 if (fstat(tr->fd, &sb) == -1) 645 err(1, "cannot stat file %s", tr->file); 646 tr->sz = sb.st_size; 647 tr->off = 0; 648 if (tr->type == 'a') { 649 if (is_wave(tr->fd)) { 650 tr->sz -= WAVHDRLEN; 651 tr->off = WAVHDRLEN; 652 } 653 } 654 if (SLIST_EMPTY(&tracks)) 655 SLIST_INSERT_HEAD(&tracks, tr, track_list); 656 else 657 SLIST_INSERT_AFTER(cur_track, tr, track_list); 658 cur_track = tr; 659 } 660 661 if (!open_cd(cdname, 1)) 662 exit(1); 663 if (get_media_capabilities(mediacap, 1) == -1) 664 errx(1, "Can't determine media type"); 665 if (cdio_isset(mediacap, MMC_FEATURE_CD_TAO) == 0) 666 errx(1, "The media can't be written in TAO mode"); 667 668 get_disc_size(&availblk); 669 SLIST_FOREACH(tr, &tracks, track_list) { 670 needblk += tr->sz/tr->blklen; 671 ntracks++; 672 } 673 needblk += (ntracks - 1) * 150; /* transition area between tracks */ 674 if (needblk > availblk) 675 errx(1, "Only %llu of the required %llu blocks available", 676 availblk, needblk); 677 if (writetao(&tracks) != 0) 678 exit(1); 679 else 680 exit(0); 681 } 682 683 int 684 play(char *arg) 685 { 686 struct ioc_toc_header h; 687 unsigned char tm, ts, tf; 688 unsigned int tr1, tr2, m1, m2, s1, s2, f1, f2, i1, i2; 689 unsigned int blk, len, n; 690 char c; 691 int rc; 692 693 rc = ioctl(fd, CDIOREADTOCHEADER, &h); 694 695 if (rc == -1) 696 return (rc); 697 698 if (h.starting_track > h.ending_track) { 699 printf("TOC starting_track > TOC ending_track\n"); 700 return (0); 701 } 702 703 n = h.ending_track - h.starting_track + 1; 704 rc = read_toc_entrys((n + 1) * sizeof (struct cd_toc_entry)); 705 706 if (rc < 0) 707 return (rc); 708 709 /* 710 * Truncate trailing white space. Then by adding %c to the end of the 711 * sscanf() formats we catch any errant trailing characters. 712 */ 713 rc = strlen(arg) - 1; 714 while (rc >= 0 && isspace((unsigned char)arg[rc])) { 715 arg[rc] = '\0'; 716 rc--; 717 } 718 719 if (!arg || ! *arg) { 720 /* Play the whole disc */ 721 return (play_track(h.starting_track, 1, h.ending_track, 1)); 722 } 723 724 if (strchr(arg, '#')) { 725 /* Play block #blk [ len ] */ 726 if (2 != sscanf(arg, "#%u%u%c", &blk, &len, &c) && 727 1 != sscanf(arg, "#%u%c", &blk, &c)) { 728 printf("%s: Invalid command arguments\n", __progname); 729 return (0); 730 } 731 732 if (len == 0) { 733 if (msf) 734 len = msf2lba(toc_buffer[n].addr.msf.minute, 735 toc_buffer[n].addr.msf.second, 736 toc_buffer[n].addr.msf.frame) - blk; 737 else 738 len = toc_buffer[n].addr.lba - blk; 739 } 740 return play_blocks(blk, len); 741 } 742 743 if (strchr(arg, ':') == NULL) { 744 /* 745 * Play track tr1[.i1] [tr2[.i2]] 746 */ 747 if (4 == sscanf(arg, "%u.%u%u.%u%c", &tr1, &i1, &tr2, &i2, &c)) 748 goto play_track; 749 750 i2 = 1; 751 if (3 == sscanf(arg, "%u.%u%u%c", &tr1, &i1, &tr2, &c)) 752 goto play_track; 753 754 i1 = 1; 755 if (3 == sscanf(arg, "%u%u.%u%c", &tr1, &tr2, &i2, &c)) 756 goto play_track; 757 758 tr2 = 0; 759 i2 = 1; 760 if (2 == sscanf(arg, "%u.%u%c", &tr1, &i1, &c)) 761 goto play_track; 762 763 i1 = i2 = 1; 764 if (2 == sscanf(arg, "%u%u%c", &tr1, &tr2, &c)) 765 goto play_track; 766 767 i1 = i2 = 1; 768 tr2 = 0; 769 if (1 == sscanf(arg, "%u%c", &tr1, &c)) 770 goto play_track; 771 772 printf("%s: Invalid command arguments\n", __progname); 773 return (0); 774 775 play_track: 776 if (tr1 > n || tr2 > n) { 777 printf("Track number must be between 0 and %u\n", n); 778 return (0); 779 } else if (tr2 == 0) 780 tr2 = h.ending_track; 781 782 if (tr1 > tr2) { 783 printf("starting_track > ending_track\n"); 784 return (0); 785 } 786 787 return (play_track(tr1, i1, tr2, i2)); 788 } 789 790 /* 791 * Play MSF [tr1] m1:s1[.f1] [tr2] [m2:s2[.f2]] 792 * 793 * Start Time End Time 794 * ---------- -------- 795 * tr1 m1:s1.f1 tr2 m2:s2.f2 796 * tr1 m1:s1 tr2 m2:s2.f2 797 * tr1 m1:s1.f1 tr2 m2:s2 798 * tr1 m1:s1 tr2 m2:s2 799 * m1:s1.f1 tr2 m2:s2.f2 800 * m1:s1 tr2 m2:s2.f2 801 * m1:s1.f1 tr2 m2:s2 802 * m1:s1 tr2 m2:s2 803 * tr1 m1:s1.f1 m2:s2.f2 804 * tr1 m1:s1 m2:s2.f2 805 * tr1 m1:s1.f1 m2:s2 806 * tr1 m1:s1 m2:s2 807 * m1:s1.f1 m2:s2.f2 808 * m1:s1 m2:s2.f2 809 * m1:s1.f1 m2:s2 810 * m1:s1 m2:s2 811 * tr1 m1:s1.f1 tr2 812 * tr1 m1:s1 tr2 813 * m1:s1.f1 tr2 814 * m1:s1 tr2 815 * tr1 m1:s1.f1 <end of disc> 816 * tr1 m1:s1 <end of disc> 817 * m1:s1.f1 <end of disc> 818 * m1:s1 <end of disc> 819 */ 820 821 /* tr1 m1:s1.f1 tr2 m2:s2.f2 */ 822 if (8 == sscanf(arg, "%u%u:%u.%u%u%u:%u.%u%c", 823 &tr1, &m1, &s1, &f1, &tr2, &m2, &s2, &f2, &c)) 824 goto play_msf; 825 826 /* tr1 m1:s1 tr2 m2:s2.f2 */ 827 f1 = 0; 828 if (7 == sscanf(arg, "%u%u:%u%u%u:%u.%u%c", 829 &tr1, &m1, &s1, &tr2, &m2, &s2, &f2, &c)) 830 goto play_msf; 831 832 /* tr1 m1:s1.f1 tr2 m2:s2 */ 833 f2 =0; 834 if (7 == sscanf(arg, "%u%u:%u.%u%u%u:%u%c", 835 &tr1, &m1, &s1, &f1, &tr2, &m2, &s2, &c)) 836 goto play_msf; 837 838 /* m1:s1.f1 tr2 m2:s2.f2 */ 839 tr1 = 0; 840 if (7 == sscanf(arg, "%u:%u.%u%u%u:%u.%u%c", 841 &m1, &s1, &f1, &tr2, &m2, &s2, &f2, &c)) 842 goto play_msf; 843 844 /* tr1 m1:s1.f1 m2:s2.f2 */ 845 tr2 = 0; 846 if (7 == sscanf(arg, "%u%u:%u.%u%u:%u.%u%c", 847 &tr1, &m1, &s1, &f1, &m2, &s2, &f2, &c)) 848 goto play_msf; 849 850 /* m1:s1 tr2 m2:s2.f2 */ 851 tr1 = f1 = 0; 852 if (6 == sscanf(arg, "%u:%u%u%u:%u.%u%c", 853 &m1, &s1, &tr2, &m2, &s2, &f2, &c)) 854 goto play_msf; 855 856 /* m1:s1.f1 tr2 m2:s2 */ 857 tr1 = f2 = 0; 858 if (6 == sscanf(arg, "%u:%u.%u%u%u:%u%c", 859 &m1, &s1, &f1, &tr2, &m2, &s2, &c)) 860 goto play_msf; 861 862 /* m1:s1.f1 m2:s2.f2 */ 863 tr1 = tr2 = 0; 864 if (6 == sscanf(arg, "%u:%u.%u%u:%u.%u%c", 865 &m1, &s1, &f1, &m2, &s2, &f2, &c)) 866 goto play_msf; 867 868 /* tr1 m1:s1.f1 m2:s2 */ 869 tr2 = f2 = 0; 870 if (6 == sscanf(arg, "%u%u:%u.%u%u:%u%c", 871 &tr1, &m1, &s1, &f1, &m2, &s2, &c)) 872 goto play_msf; 873 874 /* tr1 m1:s1 m2:s2.f2 */ 875 tr2 = f1 = 0; 876 if (6 == sscanf(arg, "%u%u:%u%u:%u.%u%c", 877 &tr1, &m1, &s1, &m2, &s2, &f2, &c)) 878 goto play_msf; 879 880 /* tr1 m1:s1 tr2 m2:s2 */ 881 f1 = f2 = 0; 882 if (6 == sscanf(arg, "%u%u:%u%u%u:%u%c", 883 &tr1, &m1, &s1, &tr2, &m2, &s2, &c)) 884 goto play_msf; 885 886 /* m1:s1 tr2 m2:s2 */ 887 tr1 = f1 = f2 = 0; 888 if (5 == sscanf(arg, "%u:%u%u%u:%u%c", &m1, &s1, &tr2, &m2, &s2, &c)) 889 goto play_msf; 890 891 /* tr1 m1:s1 m2:s2 */ 892 f1 = tr2 = f2 = 0; 893 if (5 == sscanf(arg, "%u%u:%u%u:%u%c", &tr1, &m1, &s1, &m2, &s2, &c)) 894 goto play_msf; 895 896 /* m1:s1 m2:s2.f2 */ 897 tr1 = f1 = tr2 = 0; 898 if (5 == sscanf(arg, "%u:%u%u:%u.%u%c", &m1, &s1, &m2, &s2, &f2, &c)) 899 goto play_msf; 900 901 /* m1:s1.f1 m2:s2 */ 902 tr1 = tr2 = f2 = 0; 903 if (5 == sscanf(arg, "%u:%u.%u%u:%u%c", &m1, &s1, &f1, &m2, &s2, &c)) 904 goto play_msf; 905 906 /* tr1 m1:s1.f1 tr2 */ 907 m2 = s2 = f2 = 0; 908 if (5 == sscanf(arg, "%u%u:%u.%u%u%c", &tr1, &m1, &s1, &f1, &tr2, &c)) 909 goto play_msf; 910 911 /* m1:s1 m2:s2 */ 912 tr1 = f1 = tr2 = f2 = 0; 913 if (4 == sscanf(arg, "%u:%u%u:%u%c", &m1, &s1, &m2, &s2, &c)) 914 goto play_msf; 915 916 /* tr1 m1:s1.f1 <end of disc> */ 917 tr2 = m2 = s2 = f2 = 0; 918 if (4 == sscanf(arg, "%u%u:%u.%u%c", &tr1, &m1, &s1, &f1, &c)) 919 goto play_msf; 920 921 /* tr1 m1:s1 tr2 */ 922 f1 = m2 = s2 = f2 = 0; 923 if (4 == sscanf(arg, "%u%u:%u%u%c", &tr1, &m1, &s1, &tr2, &c)) 924 goto play_msf; 925 926 /* m1:s1.f1 tr2 */ 927 tr1 = m2 = s2 = f2 = 0; 928 if (4 == sscanf(arg, "%u%u:%u%u%c", &m1, &s1, &f1, &tr2, &c)) 929 goto play_msf; 930 931 /* m1:s1.f1 <end of disc> */ 932 tr1 = tr2 = m2 = s2 = f2 = 0; 933 if (3 == sscanf(arg, "%u:%u.%u%c", &m1, &s1, &f1, &c)) 934 goto play_msf; 935 936 /* tr1 m1:s1 <end of disc> */ 937 f1 = tr2 = m2 = s2 = f2 = 0; 938 if (3 == sscanf(arg, "%u%u:%u%c", &tr1, &m1, &s1, &c)) 939 goto play_msf; 940 941 /* m1:s1 tr2 */ 942 tr1 = f1 = m2 = s2 = f2 = 0; 943 if (3 == sscanf(arg, "%u:%u%u%c", &m1, &s1, &tr2, &c)) 944 goto play_msf; 945 946 /* m1:s1 <end of disc> */ 947 tr1 = f1 = tr2 = m2 = s2 = f2 = 0; 948 if (2 == sscanf(arg, "%u:%u%c", &m1, &s1, &c)) 949 goto play_msf; 950 951 printf("%s: Invalid command arguments\n", __progname); 952 return (0); 953 954 play_msf: 955 if (tr1 > n || tr2 > n) { 956 printf("Track number must be between 0 and %u\n", n); 957 return (0); 958 } else if (m1 > 99 || m2 > 99) { 959 printf("Minutes must be between 0 and 99\n"); 960 return (0); 961 } else if (s1 > 59 || s2 > 59) { 962 printf("Seconds must be between 0 and 59\n"); 963 return (0); 964 } else if (f1 > 74 || f2 > 74) { 965 printf("Frames number must be between 0 and 74\n"); 966 return (0); 967 } 968 969 if (tr1 > 0) { 970 /* 971 * Start time is relative to tr1, Add start time of tr1 972 * to (m1,s1,f1) to yield absolute start time. 973 */ 974 toc2msf(tr1, &tm, &ts, &tf); 975 addmsf(&m1, &s1, &f1, tm, ts, tf); 976 977 /* Compare (m1,s1,f1) to start time of next track. */ 978 toc2msf(tr1+1, &tm, &ts, &tf); 979 if (cmpmsf(m1, s1, f1, tm, ts, tf) == 1) { 980 printf("Track %u is not that long.\n", tr1); 981 return (0); 982 } 983 } 984 985 toc2msf(n+1, &tm, &ts, &tf); 986 if (cmpmsf(m1, s1, f1, tm, ts, tf) == 1) { 987 printf("Start time is after end of disc.\n"); 988 return (0); 989 } 990 991 if (tr2 > 0) { 992 /* 993 * End time is relative to tr2, Add start time of tr2 994 * to (m2,s2,f2) to yield absolute end time. 995 */ 996 toc2msf(tr2, &tm, &ts, &tf); 997 addmsf(&m2, &s2, &f2, tm, ts, tf); 998 999 /* Compare (m2,s2,f2) to start time of next track. */ 1000 toc2msf(tr2+1, &tm, &ts, &tf); 1001 if (cmpmsf(m2, s2, f2, tm, ts, tf) == 1) { 1002 printf("Track %u is not that long.\n", tr2); 1003 return (0); 1004 } 1005 } 1006 1007 toc2msf(n+1, &tm, &ts, &tf); 1008 1009 if (!(tr2 || m2 || s2 || f2)) { 1010 /* Play to end of disc. */ 1011 m2 = tm; 1012 s2 = ts; 1013 f2 = tf; 1014 } else if (cmpmsf(m2, s2, f2, tm, ts, tf) == 1) { 1015 printf("End time is after end of disc.\n"); 1016 return (0); 1017 } 1018 1019 if (cmpmsf(m1, s1, f1, m2, s2, f2) == 1) { 1020 printf("Start time is after end time.\n"); 1021 return (0); 1022 } 1023 1024 return play_msf(m1, s1, f1, m2, s2, f2); 1025 } 1026 1027 /* ARGSUSED */ 1028 int 1029 play_prev(char *arg) 1030 { 1031 int trk, min, sec, frm, rc; 1032 struct ioc_toc_header h; 1033 1034 if (status(&trk, &min, &sec, &frm) >= 0) { 1035 trk--; 1036 1037 rc = ioctl(fd, CDIOREADTOCHEADER, &h); 1038 if (rc == -1) { 1039 warn("getting toc header"); 1040 return (rc); 1041 } 1042 1043 if (trk < h.starting_track) 1044 return play_track(h.starting_track, 1, 1045 h.ending_track + 1, 1); 1046 return play_track(trk, 1, h.ending_track, 1); 1047 } 1048 1049 return (0); 1050 } 1051 1052 /* ARGSUSED */ 1053 int 1054 play_same(char *arg) 1055 { 1056 int trk, min, sec, frm, rc; 1057 struct ioc_toc_header h; 1058 1059 if (status (&trk, &min, &sec, &frm) >= 0) { 1060 rc = ioctl(fd, CDIOREADTOCHEADER, &h); 1061 if (rc == -1) { 1062 warn("getting toc header"); 1063 return (rc); 1064 } 1065 1066 return play_track(trk, 1, h.ending_track, 1); 1067 } 1068 1069 return (0); 1070 } 1071 1072 /* ARGSUSED */ 1073 int 1074 play_next(char *arg) 1075 { 1076 int trk, min, sec, frm, rc; 1077 struct ioc_toc_header h; 1078 1079 if (status(&trk, &min, &sec, &frm) >= 0) { 1080 trk++; 1081 rc = ioctl(fd, CDIOREADTOCHEADER, &h); 1082 if (rc == -1) { 1083 warn("getting toc header"); 1084 return (rc); 1085 } 1086 1087 if (trk > h.ending_track) { 1088 printf("%s: end of CD\n", __progname); 1089 1090 rc = ioctl(fd, CDIOCSTOP); 1091 1092 (void) ioctl(fd, CDIOCALLOW); 1093 1094 return (rc); 1095 } 1096 1097 return play_track(trk, 1, h.ending_track, 1); 1098 } 1099 1100 return (0); 1101 } 1102 1103 char * 1104 strstatus(int sts) 1105 { 1106 switch (sts) { 1107 case ASTS_INVALID: 1108 return ("invalid"); 1109 case ASTS_PLAYING: 1110 return ("playing"); 1111 case ASTS_PAUSED: 1112 return ("paused"); 1113 case ASTS_COMPLETED: 1114 return ("completed"); 1115 case ASTS_ERROR: 1116 return ("error"); 1117 case ASTS_VOID: 1118 return ("void"); 1119 default: 1120 return ("??"); 1121 } 1122 } 1123 1124 /* ARGSUSED */ 1125 int 1126 pstatus(char *arg) 1127 { 1128 struct ioc_vol v; 1129 struct ioc_read_subchannel ss; 1130 struct cd_sub_channel_info data; 1131 int rc, trk, m, s, f; 1132 char vis_catalog[1 + 4 * 15]; 1133 1134 rc = status(&trk, &m, &s, &f); 1135 if (rc >= 0) { 1136 if (verbose) { 1137 if (track_names) 1138 printf("Audio status = %d<%s>, " 1139 "current track = %d (%s)\n" 1140 "\tcurrent position = %d:%02d.%02d\n", 1141 rc, strstatus(rc), trk, 1142 trk ? track_names[trk-1] : "", m, s, f); 1143 else 1144 printf("Audio status = %d<%s>, " 1145 "current track = %d, " 1146 "current position = %d:%02d.%02d\n", 1147 rc, strstatus(rc), trk, m, s, f); 1148 } else 1149 printf("%d %d %d:%02d.%02d\n", rc, trk, m, s, f); 1150 } else 1151 printf("No current status info available\n"); 1152 1153 bzero(&ss, sizeof (ss)); 1154 ss.data = &data; 1155 ss.data_len = sizeof (data); 1156 ss.address_format = msf ? CD_MSF_FORMAT : CD_LBA_FORMAT; 1157 ss.data_format = CD_MEDIA_CATALOG; 1158 rc = ioctl(fd, CDIOCREADSUBCHANNEL, (char *) &ss); 1159 if (rc >= 0) { 1160 printf("Media catalog is %sactive", 1161 ss.data->what.media_catalog.mc_valid ? "": "in"); 1162 if (ss.data->what.media_catalog.mc_valid && 1163 ss.data->what.media_catalog.mc_number[0]) { 1164 strvisx(vis_catalog, 1165 (char *)ss.data->what.media_catalog.mc_number, 1166 15, VIS_SAFE); 1167 printf(", number \"%.15s\"", vis_catalog); 1168 } 1169 putchar('\n'); 1170 } else 1171 printf("No media catalog info available\n"); 1172 1173 rc = ioctl(fd, CDIOCGETVOL, &v); 1174 if (rc >= 0) { 1175 if (verbose) 1176 printf("Left volume = %d, right volume = %d\n", 1177 v.vol[0], v.vol[1]); 1178 else 1179 printf("%d %d\n", v.vol[0], v.vol[1]); 1180 } else 1181 printf("No volume level info available\n"); 1182 return(0); 1183 } 1184 1185 int 1186 cdid(void) 1187 { 1188 unsigned long id; 1189 struct ioc_toc_header h; 1190 int rc, n; 1191 1192 rc = ioctl(fd, CDIOREADTOCHEADER, &h); 1193 if (rc == -1) { 1194 warn("getting toc header"); 1195 return (rc); 1196 } 1197 1198 n = h.ending_track - h.starting_track + 1; 1199 rc = read_toc_entrys((n + 1) * sizeof (struct cd_toc_entry)); 1200 if (rc < 0) 1201 return (rc); 1202 1203 id = cddb_discid(n, toc_buffer); 1204 if (id) { 1205 if (verbose) 1206 printf("CDID="); 1207 printf("%08lx\n", id); 1208 } 1209 return id ? 0 : 1; 1210 } 1211 1212 /* ARGSUSED */ 1213 int 1214 info(char *arg) 1215 { 1216 struct ioc_toc_header h; 1217 int rc, i, n; 1218 1219 if (get_media_capabilities(mediacap, 1) == -1) 1220 errx(1, "Can't determine media type"); 1221 1222 rc = ioctl(fd, CDIOREADTOCHEADER, &h); 1223 if (rc >= 0) { 1224 if (verbose) 1225 printf("Starting track = %d, ending track = %d, TOC size = %d bytes\n", 1226 h.starting_track, h.ending_track, h.len); 1227 else 1228 printf("%d %d %d\n", h.starting_track, 1229 h.ending_track, h.len); 1230 } else { 1231 warn("getting toc header"); 1232 return (rc); 1233 } 1234 1235 n = h.ending_track - h.starting_track + 1; 1236 rc = read_toc_entrys((n + 1) * sizeof (struct cd_toc_entry)); 1237 if (rc < 0) 1238 return (rc); 1239 1240 if (verbose) { 1241 printf("track start duration block length type\n"); 1242 printf("-------------------------------------------------\n"); 1243 } 1244 1245 for (i = 0; i < n; i++) { 1246 printf("%5d ", toc_buffer[i].track); 1247 prtrack(toc_buffer + i, 0, NULL); 1248 } 1249 printf("%5d ", toc_buffer[n].track); 1250 prtrack(toc_buffer + n, 1, NULL); 1251 return (0); 1252 } 1253 1254 int 1255 cddbinfo(char *arg) 1256 { 1257 struct ioc_toc_header h; 1258 int rc, i, n; 1259 1260 rc = ioctl(fd, CDIOREADTOCHEADER, &h); 1261 if (rc == -1) { 1262 warn("getting toc header"); 1263 return (rc); 1264 } 1265 1266 n = h.ending_track - h.starting_track + 1; 1267 rc = read_toc_entrys((n + 1) * sizeof (struct cd_toc_entry)); 1268 if (rc < 0) 1269 return (rc); 1270 1271 if (track_names) 1272 free_names(track_names); 1273 track_names = NULL; 1274 1275 track_names = cddb(cddb_host, n, toc_buffer, arg); 1276 if (!track_names) 1277 return(0); 1278 1279 printf("-------------------------------------------------\n"); 1280 1281 for (i = 0; i < n; i++) { 1282 printf("%5d ", toc_buffer[i].track); 1283 prtrack(toc_buffer + i, 0, track_names[i]); 1284 } 1285 printf("%5d ", toc_buffer[n].track); 1286 prtrack(toc_buffer + n, 1, ""); 1287 return (0); 1288 } 1289 1290 void 1291 lba2msf(unsigned long lba, u_char *m, u_char *s, u_char *f) 1292 { 1293 lba += 150; /* block start offset */ 1294 lba &= 0xffffff; /* negative lbas use only 24 bits */ 1295 *m = lba / (60 * 75); 1296 lba %= (60 * 75); 1297 *s = lba / 75; 1298 *f = lba % 75; 1299 } 1300 1301 unsigned int 1302 msf2lba(u_char m, u_char s, u_char f) 1303 { 1304 return (((m * 60) + s) * 75 + f) - 150; 1305 } 1306 1307 unsigned long 1308 entry2time(struct cd_toc_entry *e) 1309 { 1310 int block; 1311 u_char m, s, f; 1312 1313 if (msf) { 1314 return (e->addr.msf.minute * 60 + e->addr.msf.second); 1315 } else { 1316 block = e->addr.lba; 1317 lba2msf(block, &m, &s, &f); 1318 return (m*60+s); 1319 } 1320 } 1321 1322 unsigned long 1323 entry2frames(struct cd_toc_entry *e) 1324 { 1325 int block; 1326 unsigned char m, s, f; 1327 1328 if (msf) { 1329 return e->addr.msf.frame + e->addr.msf.second * 75 + 1330 e->addr.msf.minute * 60 * 75; 1331 } else { 1332 block = e->addr.lba; 1333 lba2msf(block, &m, &s, &f); 1334 return f + s * 75 + m * 60 * 75; 1335 } 1336 } 1337 1338 void 1339 prtrack(struct cd_toc_entry *e, int lastflag, char *name) 1340 { 1341 int block, next, len; 1342 u_char m, s, f; 1343 1344 if (msf) { 1345 if (!name || lastflag) 1346 /* Print track start */ 1347 printf("%2d:%02d.%02d ", e->addr.msf.minute, 1348 e->addr.msf.second, e->addr.msf.frame); 1349 1350 block = msf2lba(e->addr.msf.minute, e->addr.msf.second, 1351 e->addr.msf.frame); 1352 } else { 1353 block = e->addr.lba; 1354 if (!name || lastflag) { 1355 lba2msf(block, &m, &s, &f); 1356 /* Print track start */ 1357 printf("%2d:%02d.%02d ", m, s, f); 1358 } 1359 } 1360 if (lastflag) { 1361 if (!name) 1362 /* Last track -- print block */ 1363 printf(" - %6d - -\n", block); 1364 else 1365 printf("\n"); 1366 return; 1367 } 1368 1369 if (msf) 1370 next = msf2lba(e[1].addr.msf.minute, e[1].addr.msf.second, 1371 e[1].addr.msf.frame); 1372 else 1373 next = e[1].addr.lba; 1374 len = next - block; 1375 lba2msf(len - 150, &m, &s, &f); 1376 1377 if (name) 1378 printf("%2d:%02d.%02d %s\n", m, s, f, name); 1379 /* Print duration, block, length, type */ 1380 else 1381 printf("%2d:%02d.%02d %6d %6d %5s\n", m, s, f, block, len, 1382 (e->control & 4) ? "data" : "audio"); 1383 } 1384 1385 int 1386 play_track(int tstart, int istart, int tend, int iend) 1387 { 1388 struct ioc_play_track t; 1389 1390 t.start_track = tstart; 1391 t.start_index = istart; 1392 t.end_track = tend; 1393 t.end_index = iend; 1394 1395 return ioctl(fd, CDIOCPLAYTRACKS, &t); 1396 } 1397 1398 int 1399 play_blocks(int blk, int len) 1400 { 1401 struct ioc_play_blocks t; 1402 1403 t.blk = blk; 1404 t.len = len; 1405 1406 return ioctl(fd, CDIOCPLAYBLOCKS, &t); 1407 } 1408 1409 int 1410 setvol(int left, int right) 1411 { 1412 struct ioc_vol v; 1413 1414 v.vol[0] = left; 1415 v.vol[1] = right; 1416 v.vol[2] = 0; 1417 v.vol[3] = 0; 1418 1419 return ioctl(fd, CDIOCSETVOL, &v); 1420 } 1421 1422 int 1423 read_toc_entrys(int len) 1424 { 1425 struct ioc_read_toc_entry t; 1426 1427 if (toc_buffer) { 1428 free(toc_buffer); 1429 toc_buffer = 0; 1430 } 1431 1432 toc_buffer = malloc(len); 1433 1434 if (!toc_buffer) { 1435 errno = ENOMEM; 1436 return (-1); 1437 } 1438 1439 t.address_format = msf ? CD_MSF_FORMAT : CD_LBA_FORMAT; 1440 t.starting_track = 0; 1441 t.data_len = len; 1442 t.data = toc_buffer; 1443 1444 return (ioctl(fd, CDIOREADTOCENTRYS, (char *) &t)); 1445 } 1446 1447 int 1448 play_msf(int start_m, int start_s, int start_f, int end_m, int end_s, int end_f) 1449 { 1450 struct ioc_play_msf a; 1451 1452 a.start_m = start_m; 1453 a.start_s = start_s; 1454 a.start_f = start_f; 1455 a.end_m = end_m; 1456 a.end_s = end_s; 1457 a.end_f = end_f; 1458 1459 return ioctl(fd, CDIOCPLAYMSF, (char *) &a); 1460 } 1461 1462 int 1463 status(int *trk, int *min, int *sec, int *frame) 1464 { 1465 struct ioc_read_subchannel s; 1466 struct cd_sub_channel_info data; 1467 u_char mm, ss, ff; 1468 1469 bzero(&s, sizeof (s)); 1470 s.data = &data; 1471 s.data_len = sizeof (data); 1472 s.address_format = msf ? CD_MSF_FORMAT : CD_LBA_FORMAT; 1473 s.data_format = CD_CURRENT_POSITION; 1474 1475 if (ioctl(fd, CDIOCREADSUBCHANNEL, (char *) &s) == -1) 1476 return -1; 1477 1478 *trk = s.data->what.position.track_number; 1479 if (msf) { 1480 *min = s.data->what.position.reladdr.msf.minute; 1481 *sec = s.data->what.position.reladdr.msf.second; 1482 *frame = s.data->what.position.reladdr.msf.frame; 1483 } else { 1484 /* 1485 * NOTE: CDIOCREADSUBCHANNEL does not put the lba info into 1486 * host order like CDIOREADTOCENTRYS does. 1487 */ 1488 lba2msf(betoh32(s.data->what.position.reladdr.lba), &mm, &ss, 1489 &ff); 1490 *min = mm; 1491 *sec = ss; 1492 *frame = ff; 1493 } 1494 1495 return s.data->header.audio_status; 1496 } 1497 1498 void 1499 sigint_handler(int signo_arg) 1500 { 1501 signo = signo_arg; 1502 } 1503 1504 char * 1505 input(int *cmd) 1506 { 1507 struct sigaction sa; 1508 char *buf; 1509 int siz = 0; 1510 char *p; 1511 HistEvent hev; 1512 1513 memset(&sa, 0, sizeof(sa)); 1514 do { 1515 signo = 0; 1516 sa.sa_handler = sigint_handler; 1517 if (sigaction(SIGINT, &sa, NULL) == -1) 1518 err(1, "sigaction"); 1519 buf = (char *)el_gets(el, &siz); 1520 sa.sa_handler = SIG_DFL; 1521 if (sigaction(SIGINT, &sa, NULL) == -1) 1522 err(1, "sigaction"); 1523 if (buf == NULL || siz <= 0) { 1524 fprintf(stderr, "\r\n"); 1525 if (siz < 0 && errno == EINTR && signo == SIGINT) 1526 continue; 1527 *cmd = CMD_QUIT; 1528 return (0); 1529 } 1530 if (strlen(buf) > 1) 1531 history(hist, &hev, H_ENTER, buf); 1532 p = parse(buf, cmd); 1533 } while (!p); 1534 return (p); 1535 } 1536 1537 char * 1538 parse(char *buf, int *cmd) 1539 { 1540 struct cmdtab *c; 1541 char *p; 1542 size_t len; 1543 1544 for (p=buf; isspace((unsigned char)*p); p++) 1545 continue; 1546 1547 if (isdigit((unsigned char)*p) || 1548 (p[0] == '#' && isdigit((unsigned char)p[1]))) { 1549 *cmd = CMD_PLAY; 1550 return (p); 1551 } 1552 1553 for (buf = p; *p && ! isspace((unsigned char)*p); p++) 1554 continue; 1555 1556 len = p - buf; 1557 if (!len) 1558 return (0); 1559 1560 if (*p) { /* It must be a spacing character! */ 1561 char *q; 1562 1563 *p++ = 0; 1564 for (q=p; *q && *q != '\n' && *q != '\r'; q++) 1565 continue; 1566 *q = 0; 1567 } 1568 1569 *cmd = -1; 1570 for (c=cmdtab; c->name; ++c) { 1571 /* Is it an exact match? */ 1572 if (!strcasecmp(buf, c->name)) { 1573 *cmd = c->command; 1574 break; 1575 } 1576 1577 /* Try short hand forms then... */ 1578 if (len >= c->min && ! strncasecmp(buf, c->name, len)) { 1579 if (*cmd != -1 && *cmd != c->command) { 1580 fprintf(stderr, "Ambiguous command\n"); 1581 return (0); 1582 } 1583 *cmd = c->command; 1584 } 1585 } 1586 1587 if (*cmd == -1) { 1588 fprintf(stderr, "%s: Invalid command, enter ``help'' for commands.\n", 1589 __progname); 1590 return (0); 1591 } 1592 1593 while (isspace((unsigned char)*p)) 1594 p++; 1595 return p; 1596 } 1597 1598 int 1599 open_cd(char *dev, int needwrite) 1600 { 1601 char *realdev; 1602 int tries; 1603 1604 if (fd > -1) { 1605 if (needwrite && !writeperm) { 1606 close(fd); 1607 fd = -1; 1608 } else 1609 return (1); 1610 } 1611 1612 for (tries = 0; fd < 0 && tries < 10; tries++) { 1613 if (needwrite) 1614 fd = opendev(dev, O_RDWR, OPENDEV_PART, &realdev); 1615 else 1616 fd = opendev(dev, O_RDONLY, OPENDEV_PART, &realdev); 1617 if (fd == -1) { 1618 if (errno == ENXIO) { 1619 /* ENXIO has an overloaded meaning here. 1620 * The original "Device not configured" should 1621 * be interpreted as "No disc in drive %s". */ 1622 warnx("No disc in drive %s.", realdev); 1623 return (0); 1624 } else if (errno != EIO) { 1625 /* EIO may simply mean the device is not ready 1626 * yet which is common with CD changers. */ 1627 warn("Can't open %s", realdev); 1628 return (0); 1629 } 1630 } 1631 sleep(1); 1632 } 1633 if (fd == -1) { 1634 warn("Can't open %s", realdev); 1635 return (0); 1636 } 1637 writeperm = needwrite; 1638 return (1); 1639 } 1640 1641 char * 1642 prompt(void) 1643 { 1644 return (verbose ? "cdio> " : ""); 1645 } 1646 1647 void 1648 switch_el(void) 1649 { 1650 HistEvent hev; 1651 1652 if (el == NULL && hist == NULL) { 1653 el = el_init(__progname, stdin, stdout, stderr); 1654 hist = history_init(); 1655 history(hist, &hev, H_SETSIZE, 100); 1656 el_set(el, EL_HIST, history, hist); 1657 el_set(el, EL_EDITOR, "emacs"); 1658 el_set(el, EL_PROMPT, prompt); 1659 el_set(el, EL_SIGNAL, 1); 1660 el_source(el, NULL); 1661 1662 } else { 1663 if (hist != NULL) { 1664 history_end(hist); 1665 hist = NULL; 1666 } 1667 if (el != NULL) { 1668 el_end(el); 1669 el = NULL; 1670 } 1671 } 1672 } 1673 1674 void 1675 addmsf(u_int *m, u_int *s, u_int *f, u_char m_inc, u_char s_inc, u_char f_inc) 1676 { 1677 *f += f_inc; 1678 if (*f > 75) { 1679 *s += *f / 75; 1680 *f %= 75; 1681 } 1682 1683 *s += s_inc; 1684 if (*s > 60) { 1685 *m += *s / 60; 1686 *s %= 60; 1687 } 1688 1689 *m += m_inc; 1690 } 1691 1692 int 1693 cmpmsf(u_char m1, u_char s1, u_char f1, u_char m2, u_char s2, u_char f2) 1694 { 1695 if (m1 > m2) 1696 return (1); 1697 else if (m1 < m2) 1698 return (-1); 1699 1700 if (s1 > s2) 1701 return (1); 1702 else if (s1 < s2) 1703 return (-1); 1704 1705 if (f1 > f2) 1706 return (1); 1707 else if (f1 < f2) 1708 return (-1); 1709 1710 return (0); 1711 } 1712 1713 void 1714 toc2msf(u_int track, u_char *m, u_char *s, u_char *f) 1715 { 1716 struct cd_toc_entry *ctep; 1717 1718 ctep = &toc_buffer[track - 1]; 1719 1720 if (msf) { 1721 *m = ctep->addr.msf.minute; 1722 *s = ctep->addr.msf.second; 1723 *f = ctep->addr.msf.frame; 1724 } else 1725 lba2msf(ctep->addr.lba, m, s, f); 1726 } 1727