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