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