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