cdplay.c revision 1.17
1 /* $NetBSD: cdplay.c,v 1.17 2001/08/20 12:37:21 ad Exp $ */ 2 3 /* 4 * Copyright (c) 1999, 2000, 2001 Andrew Doran. 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 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 * 16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 19 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 26 * SUCH DAMAGE. 27 * 28 */ 29 30 /* 31 * Compact Disc Control Utility, originally by Serge V. Vakulenko 32 * <vak (at) cronyx.ru>. First appeared in FreeBSD under the guise of 33 * cdcontrol(1). Based on the non-X based CD player by Jean-Marc 34 * Zucconi and Andrey A. Chernov. Fixed and further modified on 35 * by Jukka Ukkonen <jau (at) funet.fi>. Lots of fixes and improvements 36 * made subsequently by The NetBSD Project. 37 * 38 * from FreeBSD: cdcontrol.c,v 1.17.2.1 1999/01/31 15:36:01 billf Exp 39 */ 40 41 #include <sys/cdefs.h> 42 #ifndef lint 43 __RCSID("$NetBSD: cdplay.c,v 1.17 2001/08/20 12:37:21 ad Exp $"); 44 #endif /* not lint */ 45 46 #include <sys/endian.h> 47 #include <sys/ioctl.h> 48 #include <sys/file.h> 49 #include <sys/cdio.h> 50 51 #include <ctype.h> 52 #include <err.h> 53 #include <errno.h> 54 #include <histedit.h> 55 #include <signal.h> 56 #include <stdio.h> 57 #include <stdlib.h> 58 #include <string.h> 59 #include <unistd.h> 60 #include <util.h> 61 62 enum cmd { 63 CMD_CLOSE, 64 CMD_EJECT, 65 CMD_HELP, 66 CMD_INFO, 67 CMD_NEXT, 68 CMD_PAUSE, 69 CMD_PLAY, 70 CMD_PREV, 71 CMD_QUIT, 72 CMD_RESET, 73 CMD_RESUME, 74 CMD_SET, 75 CMD_SHUFFLE, 76 CMD_SKIP, 77 CMD_STATUS, 78 CMD_STOP, 79 CMD_VOLUME, 80 }; 81 82 struct cmdtab { 83 enum cmd command; 84 const char *name; 85 unsigned int min; 86 const char *args; 87 } const cmdtab[] = { 88 { CMD_HELP, "?", 1, 0 }, 89 { CMD_CLOSE, "close", 1, NULL }, 90 { CMD_EJECT, "eject", 1, NULL }, 91 { CMD_HELP, "help", 1, NULL }, 92 { CMD_INFO, "info", 1, NULL }, 93 { CMD_NEXT, "next", 1, NULL }, 94 { CMD_PAUSE, "pause", 2, NULL }, 95 { CMD_PLAY, "play", 1, "min1:sec1[.fram1] [min2:sec2[.fram2]]" }, 96 { CMD_PLAY, "play", 1, "track1[.index1] [track2[.index2]]" }, 97 { CMD_PLAY, "play", 1, "tr1 m1:s1[.f1] [[tr2] [m2:s2[.f2]]]" }, 98 { CMD_PLAY, "play", 1, "[#block [len]]" }, 99 { CMD_PREV, "prev", 2, NULL }, 100 { CMD_QUIT, "quit", 1, NULL }, 101 { CMD_RESET, "reset", 4, NULL }, 102 { CMD_RESUME, "resume", 4, NULL }, 103 { CMD_SET, "set", 2, "msf | lba" }, 104 { CMD_SHUFFLE, "shuffle", 2, NULL }, 105 { CMD_SKIP, "skip", 2, NULL }, 106 { CMD_STATUS, "status", 3, NULL }, 107 { CMD_STOP, "stop", 3, NULL }, 108 { CMD_VOLUME, "volume", 1, "<l> <r>|left|right|mute|mono|stereo" }, 109 }; 110 111 struct cd_toc_entry toc_buffer[100]; 112 113 const char *cdname; 114 int fd = -1; 115 int msf = 1; 116 int shuffle; 117 int interactive = 1; 118 struct itimerval itv_timer; 119 120 History *hist; 121 HistEvent he; 122 EditLine *elptr; 123 124 int get_vol(int *, int *); 125 int get_status(int *, int *, int *, int *, int *); 126 void help(void); 127 int info(const char *); 128 void lba2msf(u_long, u_int *, u_int *, u_int *); 129 int main(int, char **); 130 u_int msf2lba(u_int, u_int, u_int); 131 int opencd(void); 132 const char *parse(char *, int *); 133 int play(const char *, int); 134 int play_blocks(int, int); 135 int play_msf(int, int, int, int, int, int); 136 int play_track(int, int, int, int); 137 int print_status(const char *); 138 void print_track(struct cd_toc_entry *, int); 139 const char *prompt(void); 140 int read_toc_entrys(int); 141 int run(int, const char *); 142 int setvol(int, int); 143 void sig_timer(int, int, struct sigcontext *); 144 int skip(int, int); 145 const char *strstatus(int); 146 void usage(void); 147 148 int 149 main(int argc, char **argv) 150 { 151 const char *arg; 152 char buf[80], *p; 153 static char defdev[16]; 154 int cmd, len, c; 155 char *line; 156 const char *elline; 157 int scratch, rv; 158 struct sigaction sa_timer; 159 160 cdname = getenv("MUSIC_CD"); 161 if (cdname == NULL) 162 cdname = getenv("CD_DRIVE"); 163 if (cdname == NULL) 164 cdname = getenv("DISC"); 165 if (cdname == NULL) 166 cdname = getenv("CDPLAY"); 167 168 while ((c = getopt(argc, argv, "f:h")) != -1) 169 switch (c) { 170 case 'f': 171 cdname = optarg; 172 continue; 173 case 'h': 174 default: 175 usage(); 176 /* NOTREACHED */ 177 } 178 argc -= optind; 179 argv += optind; 180 181 if (argc > 0 && strcasecmp(*argv, "help") != 0) 182 usage(); 183 184 if (cdname == NULL) { 185 sprintf(defdev, "cd0%c", 'a' + getrawpartition()); 186 cdname = defdev; 187 } 188 189 opencd(); 190 srandom(time(NULL)); 191 192 if (argc > 0) { 193 interactive = 0; 194 for (p = buf; argc-- > 0; argv++) { 195 len = strlen(*argv); 196 197 if (p + len >= buf + sizeof(buf) - 1) 198 usage(); 199 if (p > buf) 200 *p++ = ' '; 201 202 strcpy(p, *argv); 203 p += len; 204 } 205 *p = '\0'; 206 arg = parse(buf, &cmd); 207 return (run(cmd, arg)); 208 } 209 210 printf("Type `?' for command list\n\n"); 211 212 hist = history_init(); 213 history(hist, &he, H_SETSIZE, 100); /* 100 elt history buffer */ 214 elptr = el_init(getprogname(), stdin, stdout, stderr); 215 el_set(elptr, EL_EDITOR, "emacs"); 216 el_set(elptr, EL_PROMPT, prompt); 217 el_set(elptr, EL_HIST, history, hist); 218 el_source(elptr, NULL); 219 220 sigemptyset(&sa_timer.sa_mask); 221 sa_timer.sa_handler = (void (*)(int))sig_timer; 222 sa_timer.sa_flags = SA_RESTART; 223 if ((rv = sigaction(SIGALRM, &sa_timer, NULL)) < 0) 224 err(EXIT_FAILURE, "sigaction()"); 225 226 for (;;) { 227 line = NULL; 228 do { 229 if (((elline = el_gets(elptr, &scratch)) != NULL) 230 && (scratch != 0)){ 231 history(hist, &he, H_ENTER, elline); 232 line = strdup(elline); 233 arg = parse(line, &cmd); 234 } else { 235 cmd = CMD_QUIT; 236 fprintf(stderr, "\r\n"); 237 arg = 0; 238 break; 239 } 240 } while (arg == NULL); 241 242 if (run(cmd, arg) < 0) { 243 if (fd != -1) 244 close(fd); 245 fd = -1; 246 } 247 fflush(stdout); 248 if (line != NULL) 249 free(line); 250 } 251 252 el_end(elptr); 253 history_end(hist); 254 exit(EXIT_SUCCESS); 255 /* NOTREACHED */ 256 } 257 258 void 259 usage(void) 260 { 261 262 fprintf(stderr, "usage: cdplay [-f device] [command ...]\n"); 263 exit(EXIT_FAILURE); 264 /* NOTREACHED */ 265 } 266 267 void 268 help(void) 269 { 270 const struct cmdtab *c, *mc; 271 const char *s; 272 int i, n; 273 274 mc = cmdtab + sizeof(cmdtab) / sizeof(cmdtab[0]); 275 for (c = cmdtab; c < mc; c++) { 276 for (i = c->min, s = c->name; *s != '\0'; s++, i--) { 277 n = (i > 0 ? toupper(*s) : *s); 278 putchar(n); 279 } 280 if (c->args != NULL) 281 printf(" %s", c->args); 282 putchar('\n'); 283 } 284 printf( 285 "\nThe word \"play\" is not required for the play commands.\n" 286 "The plain target address is taken as a synonym for play.\n"); 287 } 288 289 int 290 run(int cmd, const char *arg) 291 { 292 int l, r, rv; 293 294 if (cmd == CMD_QUIT) { 295 close(fd); 296 exit(EXIT_SUCCESS); 297 /* NOTREACHED */ 298 } 299 300 if (fd < 0 && !opencd()) 301 return (0); 302 303 switch (cmd) { 304 case CMD_INFO: 305 rv = info(arg); 306 break; 307 308 case CMD_STATUS: 309 rv = print_status(arg); 310 break; 311 312 case CMD_PAUSE: 313 if ((rv = ioctl(fd, CDIOCPAUSE)) < 0) 314 warn("ioctl(CDIOCPAUSE)"); 315 break; 316 317 case CMD_RESUME: 318 if ((rv = ioctl(fd, CDIOCRESUME)) < 0) 319 warn("ioctl(CDIOCRESUME)"); 320 break; 321 322 case CMD_STOP: 323 if ((rv = ioctl(fd, CDIOCSTOP)) < 0) 324 warn("ioctl(CDIOCSTOP)"); 325 if (ioctl(fd, CDIOCALLOW) < 0) 326 warn("ioctl(CDIOCALLOW)"); 327 break; 328 329 case CMD_RESET: 330 if ((rv = ioctl(fd, CDIOCRESET)) >= 0) { 331 close(fd); 332 fd = -1; 333 } else 334 warn("ioctl(CDIOCRESET)"); 335 return (0); 336 337 case CMD_EJECT: 338 if (shuffle) 339 run(CMD_SHUFFLE, NULL); 340 if (ioctl(fd, CDIOCALLOW) < 0) 341 warn("ioctl(CDIOCALLOW)"); 342 if ((rv = ioctl(fd, CDIOCEJECT)) < 0) 343 warn("ioctl(CDIOCEJECT)"); 344 break; 345 346 case CMD_CLOSE: 347 ioctl(fd, CDIOCALLOW); 348 if ((rv = ioctl(fd, CDIOCCLOSE)) >= 0) { 349 close(fd); 350 fd = -1; 351 } else 352 warn("ioctl(CDIOCCLOSE)"); 353 break; 354 355 case CMD_PLAY: 356 while (isspace(*arg)) 357 arg++; 358 rv = play(arg, 1); 359 break; 360 361 case CMD_PREV: 362 rv = skip(-1, 1); 363 break; 364 365 case CMD_NEXT: 366 rv = skip(1, 1); 367 break; 368 369 case CMD_SHUFFLE: 370 if (interactive == 0) 371 errx(EXIT_FAILURE, 372 "`shuffle' valid only in interactive mode"); 373 if (shuffle == 0) { 374 itv_timer.it_interval.tv_sec = 1; 375 itv_timer.it_interval.tv_usec = 0; 376 itv_timer.it_value.tv_sec = 1; 377 itv_timer.it_value.tv_usec = 0; 378 if (setitimer(ITIMER_REAL, &itv_timer, NULL) == 0) { 379 shuffle = 1; 380 skip(0, 1); 381 } 382 } else { 383 itv_timer.it_interval.tv_sec = 0; 384 itv_timer.it_interval.tv_usec = 0; 385 itv_timer.it_value.tv_sec = 0; 386 itv_timer.it_value.tv_usec = 0; 387 if (setitimer(ITIMER_REAL, &itv_timer, NULL) == 0) 388 shuffle = 0; 389 } 390 printf("shuffle play:\t%s\n", shuffle ? "on" : "off"); 391 rv = 0; 392 break; 393 394 case CMD_SKIP: 395 if (!interactive) 396 errx(EXIT_FAILURE, 397 "`skip' valid only in interactive mode"); 398 if (!shuffle) 399 warnx("`skip' valid only in shuffle mode"); 400 else 401 skip(0, 1); 402 break; 403 404 case CMD_SET: 405 if (strcasecmp(arg, "msf") == 0) 406 msf = 1; 407 else if (strcasecmp(arg, "lba") == 0) 408 msf = 0; 409 else 410 warnx("invalid command arguments"); 411 break; 412 413 case CMD_VOLUME: 414 if (strncasecmp(arg, "left", strlen(arg)) == 0) 415 rv = ioctl(fd, CDIOCSETLEFT); 416 else if (strncasecmp(arg, "right", strlen(arg)) == 0) 417 rv = ioctl(fd, CDIOCSETRIGHT); 418 else if (strncasecmp(arg, "mono", strlen(arg)) == 0) 419 rv = ioctl(fd, CDIOCSETMONO); 420 else if (strncasecmp(arg, "stereo", strlen(arg)) == 0) 421 rv = ioctl(fd, CDIOCSETSTEREO); 422 else if (strncasecmp(arg, "mute", strlen(arg)) == 0) 423 rv = ioctl(fd, CDIOCSETMUTE); 424 else { 425 rv = 0; 426 if (sscanf(arg, "%d %d", &l, &r) != 2) { 427 if (sscanf(arg, "%d", &l) == 1) 428 r = l; 429 else { 430 warnx("invalid command arguments"); 431 break; 432 } 433 } 434 rv = setvol(l, r); 435 } 436 break; 437 438 case CMD_HELP: 439 default: 440 help(); 441 rv = 0; 442 break; 443 } 444 445 return (rv); 446 } 447 448 int 449 play(const char *arg, int fromuser) 450 { 451 int rv, n, start, end, istart, iend, blk, len; 452 u_int tr1, tr2, m1, m2, s1, s2, f1, f2, tm, ts, tf; 453 struct ioc_toc_header h; 454 455 if (shuffle && fromuser) { 456 warnx("`play' not valid in shuffle mode"); 457 return (0); 458 } 459 460 if ((rv = ioctl(fd, CDIOREADTOCHEADER, &h)) < 0) { 461 warn("ioctl(CDIOREADTOCHEADER)"); 462 return (rv); 463 } 464 465 end = 0; 466 istart = iend = 1; 467 n = h.ending_track - h.starting_track + 1; 468 rv = read_toc_entrys((n + 1) * sizeof(struct cd_toc_entry)); 469 if (rv < 0) 470 return (rv); 471 472 if (arg == NULL || *arg == '\0') { 473 /* Play the whole disc */ 474 return (play_track(h.starting_track, 1, h.ending_track, 99)); 475 } 476 477 if (strchr(arg, '#') != NULL) { 478 /* Play block #blk [ len ] */ 479 len = 0; 480 481 if (2 != sscanf(arg, "#%d%d", &blk, &len) && 482 1 != sscanf(arg, "#%d", &blk)) 483 goto Clean_up; 484 485 if (len == 0) { 486 if (msf) 487 len = msf2lba(toc_buffer[n].addr.msf.minute, 488 toc_buffer[n].addr.msf.second, 489 toc_buffer[n].addr.msf.frame) - blk; 490 else 491 len = be32toh(toc_buffer[n].addr.lba) - blk; 492 } 493 return (play_blocks(blk, len)); 494 } 495 496 if (strchr(arg, ':') != NULL) { 497 /* 498 * Play MSF m1:s1 [ .f1 ] [ m2:s2 [ .f2 ] ] 499 * 500 * Will now also undestand timed addresses relative 501 * to the beginning of a track in the form... 502 * 503 * tr1 m1:s1[.f1] [[tr2] [m2:s2[.f2]]] 504 */ 505 tr2 = m2 = s2 = f2 = f1 = 0; 506 if (8 == sscanf(arg, "%d %d:%d.%d %d %d:%d.%d", &tr1, &m1, 507 &s1, &f1, &tr2, &m2, &s2, &f2)) 508 goto Play_Relative_Addresses; 509 510 tr2 = m2 = s2 = f2 = f1 = 0; 511 if (7 == sscanf(arg, "%d %d:%d %d %d:%d.%d", &tr1, &m1, &s1, 512 &tr2, &m2, &s2, &f2)) 513 goto Play_Relative_Addresses; 514 515 tr2 = m2 = s2 = f2 = f1 = 0; 516 if (7 == sscanf(arg, "%d %d:%d.%d %d %d:%d", &tr1, &m1, &s1, 517 &f1, &tr2, &m2, &s2)) 518 goto Play_Relative_Addresses; 519 520 tr2 = m2 = s2 = f2 = f1 = 0; 521 if (7 == sscanf(arg, "%d %d:%d.%d %d:%d.%d", &tr1, &m1, &s1, 522 &f1, &m2, &s2, &f2)) 523 goto Play_Relative_Addresses; 524 525 tr2 = m2 = s2 = f2 = f1 = 0; 526 if (6 == sscanf(arg, "%d %d:%d.%d %d:%d", &tr1, &m1, &s1, &f1, 527 &m2, &s2)) 528 goto Play_Relative_Addresses; 529 530 tr2 = m2 = s2 = f2 = f1 = 0; 531 if (6 == sscanf(arg, "%d %d:%d %d:%d.%d", &tr1, &m1, &s1, &m2, 532 &s2, &f2)) 533 goto Play_Relative_Addresses; 534 535 tr2 = m2 = s2 = f2 = f1 = 0; 536 if (6 == sscanf(arg, "%d %d:%d.%d %d %d", &tr1, &m1, &s1, &f1, 537 &tr2, &m2)) 538 goto Play_Relative_Addresses; 539 540 tr2 = m2 = s2 = f2 = f1 = 0; 541 if (5 == sscanf(arg, "%d %d:%d %d:%d", &tr1, &m1, &s1, &m2, 542 &s2)) 543 goto Play_Relative_Addresses; 544 545 tr2 = m2 = s2 = f2 = f1 = 0; 546 if (5 == sscanf(arg, "%d %d:%d %d %d", &tr1, &m1, &s1, &tr2, 547 &m2)) 548 goto Play_Relative_Addresses; 549 550 tr2 = m2 = s2 = f2 = f1 = 0; 551 if (5 == sscanf(arg, "%d %d:%d.%d %d", &tr1, &m1, &s1, &f1, 552 &tr2)) 553 goto Play_Relative_Addresses; 554 555 tr2 = m2 = s2 = f2 = f1 = 0; 556 if (4 == sscanf(arg, "%d %d:%d %d", &tr1, &m1, &s1, &tr2)) 557 goto Play_Relative_Addresses; 558 559 tr2 = m2 = s2 = f2 = f1 = 0; 560 if (4 == sscanf(arg, "%d %d:%d.%d", &tr1, &m1, &s1, &f1)) 561 goto Play_Relative_Addresses; 562 563 tr2 = m2 = s2 = f2 = f1 = 0; 564 if (3 == sscanf(arg, "%d %d:%d", &tr1, &m1, &s1)) 565 goto Play_Relative_Addresses; 566 567 tr2 = m2 = s2 = f2 = f1 = 0; 568 goto Try_Absolute_Timed_Addresses; 569 570 Play_Relative_Addresses: 571 if (!tr1) 572 tr1 = 1; 573 else if (tr1 > n) 574 tr1 = n; 575 576 if (msf) { 577 tm = toc_buffer[tr1].addr.msf.minute; 578 ts = toc_buffer[tr1].addr.msf.second; 579 tf = toc_buffer[tr1].addr.msf.frame; 580 } else 581 lba2msf(be32toh(toc_buffer[tr1].addr.lba), &tm, &ts, &tf); 582 if ((m1 > tm) || ((m1 == tm) && ((s1 > ts) || ((s1 == ts) && 583 (f1 > tf))))) { 584 warnx("Track %d is not that long.\n", tr1); 585 return (0); 586 } 587 tr1--; 588 589 f1 += tf; 590 if (f1 >= 75) { 591 s1 += f1 / 75; 592 f1 %= 75; 593 } 594 s1 += ts; 595 if (s1 >= 60) { 596 m1 += s1 / 60; 597 s1 %= 60; 598 } 599 m1 += tm; 600 601 if (!tr2) { 602 if (m2 || s2 || f2) { 603 tr2 = tr1; 604 f2 += f1; 605 if (f2 >= 75) { 606 s2 += f2 / 75; 607 f2 %= 75; 608 } 609 s2 += s1; 610 if (s2 > 60) { 611 m2 += s2 / 60; 612 s2 %= 60; 613 } 614 m2 += m1; 615 } else { 616 tr2 = n; 617 if (msf) { 618 m2 = toc_buffer[n].addr.msf.minute; 619 s2 = toc_buffer[n].addr.msf.second; 620 f2 = toc_buffer[n].addr.msf.frame; 621 } else { 622 lba2msf(be32toh(toc_buffer[n].addr.lba), 623 &tm, &ts, &tf); 624 m2 = tm; 625 s2 = ts; 626 f2 = tf; 627 } 628 } 629 } else { 630 if (tr2 > n) { 631 tr2 = n; 632 m2 = s2 = f2 = 0; 633 } else { 634 if (m2 || s2 || f2) 635 tr2--; 636 if (msf) { 637 tm = toc_buffer[tr2].addr.msf.minute; 638 ts = toc_buffer[tr2].addr.msf.second; 639 tf = toc_buffer[tr2].addr.msf.frame; 640 } else 641 lba2msf(be32toh(toc_buffer[tr2].addr.lba), 642 &tm, &ts, &tf); 643 f2 += tf; 644 if (f2 >= 75) { 645 s2 += f2 / 75; 646 f2 %= 75; 647 } 648 s2 += ts; 649 if (s2 > 60) { 650 m2 += s2 / 60; 651 s2 %= 60; 652 } 653 m2 += tm; 654 } 655 } 656 657 if (msf) { 658 tm = toc_buffer[n].addr.msf.minute; 659 ts = toc_buffer[n].addr.msf.second; 660 tf = toc_buffer[n].addr.msf.frame; 661 } else 662 lba2msf(be32toh(toc_buffer[n].addr.lba), &tm, &ts, &tf); 663 664 if ((tr2 < n) && ((m2 > tm) || ((m2 == tm) && ((s2 > ts) || 665 ((s2 == ts) && (f2 > tf)))))) { 666 warnx("The playing time of the disc is not that long.\n"); 667 return (0); 668 } 669 670 return (play_msf(m1, s1, f1, m2, s2, f2)); 671 672 Try_Absolute_Timed_Addresses: 673 if (6 != sscanf(arg, "%d:%d.%d%d:%d.%d", 674 &m1, &s1, &f1, &m2, &s2, &f2) && 675 5 != sscanf(arg, "%d:%d.%d%d:%d", &m1, &s1, &f1, &m2, &s2) && 676 5 != sscanf(arg, "%d:%d%d:%d.%d", &m1, &s1, &m2, &s2, &f2) && 677 3 != sscanf(arg, "%d:%d.%d", &m1, &s1, &f1) && 678 4 != sscanf(arg, "%d:%d%d:%d", &m1, &s1, &m2, &s2) && 679 2 != sscanf(arg, "%d:%d", &m1, &s1)) 680 goto Clean_up; 681 682 if (m2 == 0) { 683 if (msf) { 684 m2 = toc_buffer[n].addr.msf.minute; 685 s2 = toc_buffer[n].addr.msf.second; 686 f2 = toc_buffer[n].addr.msf.frame; 687 } else { 688 lba2msf(be32toh(toc_buffer[n].addr.lba), 689 &tm, &ts, &tf); 690 m2 = tm; 691 s2 = ts; 692 f2 = tf; 693 } 694 } 695 return (play_msf(m1, s1, f1, m2, s2, f2)); 696 } 697 698 /* 699 * Play track trk1 [ .idx1 ] [ trk2 [ .idx2 ] ] 700 */ 701 if (4 != sscanf(arg, "%d.%d%d.%d", &start, &istart, &end, &iend) && 702 3 != sscanf(arg, "%d.%d%d", &start, &istart, &end) && 703 3 != sscanf(arg, "%d%d.%d", &start, &end, &iend) && 704 2 != sscanf(arg, "%d.%d", &start, &istart) && 705 2 != sscanf(arg, "%d%d", &start, &end) && 706 1 != sscanf(arg, "%d", &start)) 707 goto Clean_up; 708 709 if (end == 0) 710 end = n; 711 return (play_track(start, istart, end, iend)); 712 713 Clean_up: 714 warnx("invalid command arguments"); 715 return (0); 716 } 717 718 void 719 sig_timer(int sig, int code, struct sigcontext *scp) 720 { 721 sigset_t anymore; 722 723 sigpending(&anymore); 724 if (sigismember(&anymore, SIGALRM)) 725 return; 726 setitimer(ITIMER_REAL, &itv_timer, NULL); 727 if (fd != -1) 728 skip(0, 0); 729 } 730 731 int 732 skip(int dir, int fromuser) 733 { 734 char str[16]; 735 int rv, trk, idx, m, s, f; 736 struct ioc_toc_header h; 737 738 if ((rv = ioctl(fd, CDIOREADTOCHEADER, &h)) < 0) { 739 warn("ioctl(CDIOREADTOCHEADER)"); 740 return (rv); 741 } 742 if ((rv = get_status(&trk, &idx, &m, &s, &f)) < 0) 743 return (rv); 744 745 if (dir == 0) { 746 if (fromuser || (rv != CD_AS_PLAY_IN_PROGRESS && 747 rv != CD_AS_PLAY_PAUSED)) 748 trk = h.starting_track + 749 random() % (h.ending_track - h.starting_track + 1); 750 else 751 return (0); 752 } else { 753 trk += dir; 754 if (trk > h.ending_track) 755 trk = h.starting_track; 756 else if(trk < h.starting_track) 757 trk = h.ending_track; 758 } 759 760 if (shuffle) 761 sprintf(str, "%d %d", trk, trk); 762 else 763 sprintf(str, "%d", trk); 764 765 return (play(str, 0)); 766 } 767 768 const char * 769 strstatus(int sts) 770 { 771 const char *str; 772 773 switch (sts) { 774 case CD_AS_AUDIO_INVALID: 775 str = "invalid"; 776 break; 777 case CD_AS_PLAY_IN_PROGRESS: 778 str = "playing"; 779 break; 780 case CD_AS_PLAY_PAUSED: 781 str = "paused"; 782 break; 783 case CD_AS_PLAY_COMPLETED: 784 str = "completed"; 785 break; 786 case CD_AS_PLAY_ERROR: 787 str = "error"; 788 break; 789 case CD_AS_NO_STATUS: 790 str = "not playing"; 791 break; 792 default: 793 str = "<unknown>"; 794 break; 795 } 796 797 return (str); 798 } 799 800 int 801 print_status(const char *arg) 802 { 803 struct cd_sub_channel_info data; 804 struct ioc_read_subchannel ss; 805 int rv, trk, idx, m, s, f; 806 struct ioc_vol v; 807 808 if ((rv = get_status(&trk, &idx, &m, &s, &f)) >= 0) { 809 printf("audio status:\t%s\n", strstatus(rv)); 810 printf("current track:\t%d\n", trk); 811 printf("current index:\t%d\n", idx); 812 printf("position:\t%d:%02d.%02d\n", m, s, f); 813 } else 814 printf("audio status:\tno info available\n"); 815 816 printf("shuffle play:\t%s\n", shuffle ? "on" : "off"); 817 818 bzero(&ss, sizeof(ss)); 819 ss.data = &data; 820 ss.data_len = sizeof(data); 821 ss.address_format = msf ? CD_MSF_FORMAT : CD_LBA_FORMAT; 822 ss.data_format = CD_MEDIA_CATALOG; 823 824 if (ioctl(fd, CDIOCREADSUBCHANNEL, (char *)&ss) >= 0) { 825 printf("media catalog:\t%sactive", 826 ss.data->what.media_catalog.mc_valid ? "" : "in"); 827 if (ss.data->what.media_catalog.mc_valid && 828 ss.data->what.media_catalog.mc_number[0]) 829 printf(" (%.15s)", 830 ss.data->what.media_catalog.mc_number); 831 putchar('\n'); 832 } else 833 printf("media catalog:\tnone\n"); 834 835 if (ioctl(fd, CDIOCGETVOL, &v) >= 0) { 836 printf("left volume:\t%d\n", v.vol[0]); 837 printf("right volume:\t%d\n", v.vol[1]); 838 } else { 839 printf("left volume:\tnot available\n"); 840 printf("right volume:\tnot available\n"); 841 } 842 843 ; return (0); 844 } 845 846 int 847 info(const char *arg) 848 { 849 struct ioc_toc_header h; 850 int rc, i, n; 851 852 if ((rc = ioctl(fd, CDIOREADTOCHEADER, &h)) < 0) { 853 warn("ioctl(CDIOREADTOCHEADER)"); 854 return (rc); 855 } 856 857 n = h.ending_track - h.starting_track + 1; 858 rc = read_toc_entrys((n + 1) * sizeof(struct cd_toc_entry)); 859 if (rc < 0) 860 return (rc); 861 862 printf("track start duration block length type\n"); 863 printf("-------------------------------------------------\n"); 864 865 for (i = 0; i < n; i++) { 866 printf("%5d ", toc_buffer[i].track); 867 print_track(toc_buffer + i, 0); 868 } 869 printf("%5d ", toc_buffer[n].track); 870 print_track(toc_buffer + n, 1); 871 return (0); 872 } 873 874 void 875 lba2msf(u_long lba, u_int *m, u_int *s, u_int *f) 876 { 877 878 lba += 150; /* block start offset */ 879 lba &= 0xffffff; /* negative lbas use only 24 bits */ 880 *m = lba / (60 * 75); 881 lba %= (60 * 75); 882 *s = lba / 75; 883 *f = lba % 75; 884 } 885 886 u_int 887 msf2lba(u_int m, u_int s, u_int f) 888 { 889 890 return (((m * 60) + s) * 75 + f) - 150; 891 } 892 893 void 894 print_track(struct cd_toc_entry *e, int lastflag) 895 { 896 int block, next, len; 897 u_int m, s, f; 898 899 if (msf) { 900 /* Print track start */ 901 printf("%2d:%02d.%02d ", e->addr.msf.minute, 902 e->addr.msf.second, e->addr.msf.frame); 903 904 block = msf2lba(e->addr.msf.minute, e->addr.msf.second, 905 e->addr.msf.frame); 906 } else { 907 block = e->addr.lba; 908 lba2msf(block, &m, &s, &f); 909 /* Print track start */ 910 printf("%2d:%02d.%02d ", m, s, f); 911 } 912 if (lastflag) { 913 /* Last track -- print block */ 914 printf(" - %6d - -\n", block); 915 return; 916 } 917 if (msf) 918 next = msf2lba(e[1].addr.msf.minute, e[1].addr.msf.second, 919 e[1].addr.msf.frame); 920 else 921 next = e[1].addr.lba; 922 len = next - block; 923 lba2msf(len, &m, &s, &f); 924 925 /* Print duration, block, length, type */ 926 printf("%2d:%02d.%02d %6d %6d %5s\n", m, s, f, block, len, 927 (e->control & 4) ? "data" : "audio"); 928 } 929 930 int 931 play_track(int tstart, int istart, int tend, int iend) 932 { 933 struct ioc_play_track t; 934 int rv; 935 936 t.start_track = tstart; 937 t.start_index = istart; 938 t.end_track = tend; 939 t.end_index = iend; 940 941 if ((rv = ioctl(fd, CDIOCPLAYTRACKS, &t)) < 0) 942 warn("ioctl(CDIOCPLAYTRACKS)"); 943 return (rv); 944 } 945 946 int 947 play_blocks(int blk, int len) 948 { 949 struct ioc_play_blocks t; 950 int rv; 951 952 t.blk = blk; 953 t.len = len; 954 955 if ((rv = ioctl(fd, CDIOCPLAYBLOCKS, &t)) < 0) 956 warn("ioctl(CDIOCPLAYBLOCKS"); 957 return (rv); 958 } 959 960 int 961 setvol(int left, int right) 962 { 963 struct ioc_vol v; 964 int rv; 965 966 v.vol[0] = left; 967 v.vol[1] = right; 968 v.vol[2] = 0; 969 v.vol[3] = 0; 970 971 if ((rv = ioctl(fd, CDIOCSETVOL, &v)) < 0) 972 warn("ioctl(CDIOCSETVOL)"); 973 return (rv); 974 } 975 976 int 977 read_toc_entrys(int len) 978 { 979 struct ioc_read_toc_entry t; 980 int rv; 981 982 t.address_format = msf ? CD_MSF_FORMAT : CD_LBA_FORMAT; 983 t.starting_track = 0; 984 t.data_len = len; 985 t.data = toc_buffer; 986 987 if ((rv = ioctl(fd, CDIOREADTOCENTRYS, &t)) < 0) 988 warn("ioctl(CDIOREADTOCENTRYS)"); 989 return (rv); 990 } 991 992 int 993 play_msf(int start_m, int start_s, int start_f, int end_m, int end_s, 994 int end_f) 995 { 996 struct ioc_play_msf a; 997 int rv; 998 999 a.start_m = start_m; 1000 a.start_s = start_s; 1001 a.start_f = start_f; 1002 a.end_m = end_m; 1003 a.end_s = end_s; 1004 a.end_f = end_f; 1005 1006 if ((rv = ioctl(fd, CDIOCPLAYMSF, &a)) < 0) 1007 warn("ioctl(CDIOREADTOCENTRYS)"); 1008 return (rv); 1009 } 1010 1011 int 1012 get_status(int *trk, int *idx, int *min, int *sec, int *frame) 1013 { 1014 struct ioc_read_subchannel s; 1015 struct cd_sub_channel_info data; 1016 u_int mm, ss, ff; 1017 int rv; 1018 1019 bzero(&s, sizeof(s)); 1020 s.data = &data; 1021 s.data_len = sizeof(data); 1022 s.address_format = msf ? CD_MSF_FORMAT : CD_LBA_FORMAT; 1023 s.data_format = CD_CURRENT_POSITION; 1024 1025 if ((rv = ioctl(fd, CDIOCREADSUBCHANNEL, &s)) < 0) { 1026 warn("ioctl(CDIOCREADSUBCHANNEL)"); 1027 return (rv); 1028 } 1029 1030 *trk = s.data->what.position.track_number; 1031 *idx = s.data->what.position.index_number; 1032 if (msf) { 1033 *min = s.data->what.position.reladdr.msf.minute; 1034 *sec = s.data->what.position.reladdr.msf.second; 1035 *frame = s.data->what.position.reladdr.msf.frame; 1036 } else { 1037 lba2msf(be32toh(s.data->what.position.reladdr.lba), &mm, 1038 &ss, &ff); 1039 *min = mm; 1040 *sec = ss; 1041 *frame = ff; 1042 } 1043 1044 return (s.data->header.audio_status); 1045 } 1046 1047 const char * 1048 prompt(void) 1049 { 1050 1051 return ("cdplay> "); 1052 } 1053 1054 const char * 1055 parse(char *buf, int *cmd) 1056 { 1057 const struct cmdtab *c, *mc; 1058 char *p, *q; 1059 int len; 1060 1061 for (p = buf; isspace(*p); p++) 1062 continue; 1063 1064 if (isdigit(*p) || (p[0] == '#' && isdigit(p[1]))) { 1065 *cmd = CMD_PLAY; 1066 return (p); 1067 } 1068 1069 for (buf = p; *p != '\0' && !isspace(*p); p++) 1070 continue; 1071 1072 if ((len = p - buf) == 0) 1073 return (0); 1074 1075 if (*p != '\0') { /* It must be a spacing character! */ 1076 *p++ = 0; 1077 for (q = p; *q != '\0' && *q != '\n' && *q != '\r'; q++) 1078 continue; 1079 *q = 0; 1080 } 1081 1082 *cmd = -1; 1083 1084 mc = cmdtab + sizeof(cmdtab) / sizeof(cmdtab[0]); 1085 for (c = cmdtab; c < mc; c++) { 1086 /* Is it an exact match? */ 1087 if (strcasecmp(buf, c->name) == 0) { 1088 *cmd = c->command; 1089 break; 1090 } 1091 /* Try short hand forms then... */ 1092 if (len >= c->min && strncasecmp(buf, c->name, len) == 0) { 1093 if (*cmd != -1 && *cmd != c->command) { 1094 warnx("ambiguous command"); 1095 return (0); 1096 } 1097 *cmd = c->command; 1098 } 1099 } 1100 1101 if (*cmd == -1) { 1102 warnx("invalid command, enter ``help'' for commands"); 1103 return (0); 1104 } 1105 1106 while (isspace(*p)) 1107 p++; 1108 return (p); 1109 } 1110 1111 int 1112 opencd(void) 1113 { 1114 char devbuf[80]; 1115 1116 if (fd > -1) 1117 return (1); 1118 1119 fd = opendisk(cdname, O_RDONLY, devbuf, sizeof(devbuf), 0); 1120 if (fd < 0) { 1121 if (errno == ENXIO) { 1122 /* 1123 * ENXIO has an overloaded meaning here. The 1124 * original "Device not configured" should be 1125 * interpreted as "No disc in drive %s". 1126 */ 1127 warnx("no disc in drive %s", devbuf); 1128 return (0); 1129 } 1130 err(EXIT_FAILURE, "%s", devbuf); 1131 } 1132 1133 return (1); 1134 } 1135
Indexes created Wed Oct 01 13:09:50 GMT 2025