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