cdplay.c revision 1.8
1 /* $NetBSD: cdplay.c,v 1.8 2000/06/15 21:07:37 msaitoh 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.8 2000/06/15 21:07:37 msaitoh 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 warnx("invalid command arguments"); 399 return (0); 400 } 401 return (setvol(l, r)); 402 403 case CMD_HELP: 404 default: 405 help(); 406 return (0); 407 408 } 409 } 410 411 int 412 play(arg) 413 char *arg; 414 { 415 int rc, n, start, end, istart, iend, blk, len; 416 struct ioc_toc_header h; 417 418 if ((rc = ioctl(fd, CDIOREADTOCHEADER, &h)) < 0) 419 return (rc); 420 421 end = 0; 422 istart = iend = 1; 423 n = h.ending_track - h.starting_track + 1; 424 rc = read_toc_entrys((n + 1) * sizeof(struct cd_toc_entry)); 425 426 if (rc < 0) 427 return (rc); 428 429 if (!arg || !*arg) { 430 /* Play the whole disc */ 431 return (play_track(h.starting_track, 1, h.ending_track, 1)); 432 } 433 434 if (strchr(arg, '#')) { 435 /* Play block #blk [ len ] */ 436 len = 0; 437 438 if (2 != sscanf(arg, "#%d%d", &blk, &len) && 439 1 != sscanf(arg, "#%d", &blk)) 440 goto Clean_up; 441 442 if (len == 0) { 443 if (msf) 444 len = msf2lba(toc_buffer[n].addr.msf.minute, 445 toc_buffer[n].addr.msf.second, 446 toc_buffer[n].addr.msf.frame) - blk; 447 else 448 len = be32toh(toc_buffer[n].addr.lba) - blk; 449 } 450 return (play_blocks(blk, len)); 451 } 452 453 if (strchr(arg, ':')) { 454 /* 455 * Play MSF m1:s1 [ .f1 ] [ m2:s2 [ .f2 ] ] 456 * 457 * Will now also undestand timed addresses relative 458 * to the beginning of a track in the form... 459 * 460 * tr1 m1:s1[.f1] [[tr2] [m2:s2[.f2]]] 461 */ 462 unsigned tr1, tr2; 463 unsigned m1, m2, s1, s2, f1, f2; 464 unsigned char tm, ts, tf; 465 466 tr2 = m2 = s2 = f2 = f1 = 0; 467 if (8 == sscanf(arg, "%d %d:%d.%d %d %d:%d.%d", &tr1, &m1, 468 &s1, &f1, &tr2, &m2, &s2, &f2)) 469 goto Play_Relative_Addresses; 470 471 tr2 = m2 = s2 = f2 = f1 = 0; 472 if (7 == sscanf(arg, "%d %d:%d %d %d:%d.%d", &tr1, &m1, &s1, 473 &tr2, &m2, &s2, &f2)) 474 goto Play_Relative_Addresses; 475 476 tr2 = m2 = s2 = f2 = f1 = 0; 477 if (7 == sscanf(arg, "%d %d:%d.%d %d %d:%d", &tr1, &m1, &s1, 478 &f1, &tr2, &m2, &s2)) 479 goto Play_Relative_Addresses; 480 481 tr2 = m2 = s2 = f2 = f1 = 0; 482 if (7 == sscanf(arg, "%d %d:%d.%d %d:%d.%d", &tr1, &m1, &s1, 483 &f1, &m2, &s2, &f2)) 484 goto Play_Relative_Addresses; 485 486 tr2 = m2 = s2 = f2 = f1 = 0; 487 if (6 == sscanf(arg, "%d %d:%d.%d %d:%d", &tr1, &m1, &s1, &f1, 488 &m2, &s2)) 489 goto Play_Relative_Addresses; 490 491 tr2 = m2 = s2 = f2 = f1 = 0; 492 if (6 == sscanf(arg, "%d %d:%d %d:%d.%d", &tr1, &m1, &s1, &m2, 493 &s2, &f2)) 494 goto Play_Relative_Addresses; 495 496 tr2 = m2 = s2 = f2 = f1 = 0; 497 if (6 == sscanf(arg, "%d %d:%d.%d %d %d", &tr1, &m1, &s1, &f1, 498 &tr2, &m2)) 499 goto Play_Relative_Addresses; 500 501 tr2 = m2 = s2 = f2 = f1 = 0; 502 if (5 == sscanf(arg, "%d %d:%d %d:%d", &tr1, &m1, &s1, &m2, 503 &s2)) 504 goto Play_Relative_Addresses; 505 506 tr2 = m2 = s2 = f2 = f1 = 0; 507 if (5 == sscanf(arg, "%d %d:%d %d %d", &tr1, &m1, &s1, &tr2, 508 &m2)) 509 goto Play_Relative_Addresses; 510 511 tr2 = m2 = s2 = f2 = f1 = 0; 512 if (5 == sscanf(arg, "%d %d:%d.%d %d", &tr1, &m1, &s1, &f1, 513 &tr2)) 514 goto Play_Relative_Addresses; 515 516 tr2 = m2 = s2 = f2 = f1 = 0; 517 if (4 == sscanf(arg, "%d %d:%d %d", &tr1, &m1, &s1, &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, &f1)) 522 goto Play_Relative_Addresses; 523 524 tr2 = m2 = s2 = f2 = f1 = 0; 525 if (3 == sscanf(arg, "%d %d:%d", &tr1, &m1, &s1)) 526 goto Play_Relative_Addresses; 527 528 tr2 = m2 = s2 = f2 = f1 = 0; 529 goto Try_Absolute_Timed_Addresses; 530 531 Play_Relative_Addresses: 532 if (!tr1) 533 tr1 = 1; 534 else if (tr1 > n) 535 tr1 = n; 536 537 if (msf) { 538 tm = toc_buffer[tr1].addr.msf.minute; 539 ts = toc_buffer[tr1].addr.msf.second; 540 tf = toc_buffer[tr1].addr.msf.frame; 541 } else 542 lba2msf(be32toh(toc_buffer[tr1].addr.lba), &tm, &ts, &tf); 543 if ((m1 > tm) || ((m1 == tm) && ((s1 > ts) || ((s1 == ts) && 544 (f1 > tf))))) { 545 printf("Track %d is not that long.\n", tr1); 546 return (0); 547 } 548 tr1--; 549 550 f1 += tf; 551 if (f1 >= 75) { 552 s1 += f1 / 75; 553 f1 %= 75; 554 } 555 s1 += ts; 556 if (s1 >= 60) { 557 m1 += s1 / 60; 558 s1 %= 60; 559 } 560 m1 += tm; 561 562 if (!tr2) { 563 if (m2 || s2 || f2) { 564 tr2 = tr1; 565 f2 += f1; 566 if (f2 >= 75) { 567 s2 += f2 / 75; 568 f2 %= 75; 569 } 570 s2 += s1; 571 if (s2 > 60) { 572 m2 += s2 / 60; 573 s2 %= 60; 574 } 575 m2 += m1; 576 } else { 577 tr2 = n; 578 if (msf) { 579 m2 = toc_buffer[n].addr.msf.minute; 580 s2 = toc_buffer[n].addr.msf.second; 581 f2 = toc_buffer[n].addr.msf.frame; 582 } else { 583 lba2msf(be32toh(toc_buffer[n].addr.lba), 584 &tm, &ts, &tf); 585 m2 = tm; 586 s2 = ts; 587 f2 = tf; 588 } 589 } 590 } else { 591 if (tr2 > n) { 592 tr2 = n; 593 m2 = s2 = f2 = 0; 594 } else { 595 if (m2 || s2 || f2) 596 tr2--; 597 if (msf) { 598 tm = toc_buffer[tr2].addr.msf.minute; 599 ts = toc_buffer[tr2].addr.msf.second; 600 tf = toc_buffer[tr2].addr.msf.frame; 601 } else 602 lba2msf(be32toh(toc_buffer[tr2].addr.lba), 603 &tm, &ts, &tf); 604 f2 += tf; 605 if (f2 >= 75) { 606 s2 += f2 / 75; 607 f2 %= 75; 608 } 609 s2 += ts; 610 if (s2 > 60) { 611 m2 += s2 / 60; 612 s2 %= 60; 613 } 614 m2 += tm; 615 } 616 } 617 618 if (msf) { 619 tm = toc_buffer[n].addr.msf.minute; 620 ts = toc_buffer[n].addr.msf.second; 621 tf = toc_buffer[n].addr.msf.frame; 622 } else 623 lba2msf(be32toh(toc_buffer[n].addr.lba), &tm, &ts, &tf); 624 625 if ((tr2 < n) && ((m2 > tm) || ((m2 == tm) && ((s2 > ts) || 626 ((s2 == ts) && (f2 > tf)))))) { 627 printf("The playing time of the disc is not that long.\n"); 628 return (0); 629 } 630 631 return (play_msf(m1, s1, f1, m2, s2, f2)); 632 633 Try_Absolute_Timed_Addresses: 634 if (6 != sscanf(arg, "%d:%d.%d%d:%d.%d", 635 &m1, &s1, &f1, &m2, &s2, &f2) && 636 5 != sscanf(arg, "%d:%d.%d%d:%d", &m1, &s1, &f1, &m2, &s2) && 637 5 != sscanf(arg, "%d:%d%d:%d.%d", &m1, &s1, &m2, &s2, &f2) && 638 3 != sscanf(arg, "%d:%d.%d", &m1, &s1, &f1) && 639 4 != sscanf(arg, "%d:%d%d:%d", &m1, &s1, &m2, &s2) && 640 2 != sscanf(arg, "%d:%d", &m1, &s1)) 641 goto Clean_up; 642 643 if (m2 == 0) { 644 if (msf) { 645 m2 = toc_buffer[n].addr.msf.minute; 646 s2 = toc_buffer[n].addr.msf.second; 647 f2 = toc_buffer[n].addr.msf.frame; 648 } else { 649 lba2msf(be32toh(toc_buffer[n].addr.lba), 650 &tm, &ts, &tf); 651 m2 = tm; 652 s2 = ts; 653 f2 = tf; 654 } 655 } 656 return (play_msf(m1, s1, f1, m2, s2, f2)); 657 } 658 /* 659 * Play track trk1 [ .idx1 ] [ trk2 [ .idx2 ] ] 660 */ 661 if (4 != sscanf(arg, "%d.%d%d.%d", &start, &istart, &end, &iend) && 662 3 != sscanf(arg, "%d.%d%d", &start, &istart, &end) && 663 3 != sscanf(arg, "%d%d.%d", &start, &end, &iend) && 664 2 != sscanf(arg, "%d.%d", &start, &istart) && 665 2 != sscanf(arg, "%d%d", &start, &end) && 666 1 != sscanf(arg, "%d", &start)) 667 goto Clean_up; 668 669 if (end == 0) 670 end = n; 671 return (play_track(start, istart, end, iend)); 672 673 Clean_up: 674 warnx("invalid command arguments"); 675 return (0); 676 } 677 678 char * 679 strstatus(sts) 680 int sts; 681 { 682 683 switch (sts) { 684 case ASTS_INVALID: 685 return ("invalid"); 686 case ASTS_PLAYING: 687 return ("playing"); 688 case ASTS_PAUSED: 689 return ("paused"); 690 case ASTS_COMPLETED: 691 return ("completed"); 692 case ASTS_ERROR: 693 return ("error"); 694 case ASTS_VOID: 695 return ("not playing"); 696 default: 697 return ("??"); 698 } 699 } 700 701 int 702 pstatus(arg) 703 char *arg; 704 { 705 struct cd_sub_channel_info data; 706 struct ioc_read_subchannel ss; 707 int rc, trk, m, s, f; 708 struct ioc_vol v; 709 int what = 0; 710 char *p; 711 712 while ((p = strtok(arg, " \t"))) { 713 arg = 0; 714 if (!strncasecmp(p, "audio", strlen(p))) 715 what |= STATUS_AUDIO; 716 else { 717 if (!strncasecmp(p, "media", strlen(p))) 718 what |= STATUS_MEDIA; 719 else { 720 if (!strncasecmp(p, "volume", strlen(p))) 721 what |= STATUS_VOLUME; 722 else { 723 warnx("invalid command arguments"); 724 return 0; 725 } 726 } 727 } 728 } 729 if (!what) 730 what = STATUS_AUDIO | STATUS_MEDIA | STATUS_VOLUME; 731 if (what & STATUS_AUDIO) { 732 rc = status(&trk, &m, &s, &f); 733 if (rc >= 0) { 734 printf("Audio status:\t%s\n", strstatus(rc)); 735 printf("Current track:\t%d\n", trk); 736 printf("Position:\t%d:%02d.%02d\n", m, s, f); 737 } else 738 printf("Audio status:\tno info available\n"); 739 } 740 if (what & STATUS_MEDIA) { 741 bzero(&ss, sizeof(ss)); 742 ss.data = &data; 743 ss.data_len = sizeof(data); 744 ss.address_format = msf ? CD_MSF_FORMAT : CD_LBA_FORMAT; 745 ss.data_format = CD_MEDIA_CATALOG; 746 rc = ioctl(fd, CDIOCREADSUBCHANNEL, (char *) &ss); 747 if (rc >= 0) { 748 printf("Media catalog:\t%sactive", 749 ss.data->what.media_catalog.mc_valid ? "" : "in"); 750 if (ss.data->what.media_catalog.mc_valid && 751 ss.data->what.media_catalog.mc_number[0]) 752 printf(" (%.15s)", 753 ss.data->what.media_catalog.mc_number); 754 putchar('\n'); 755 } else 756 printf("Media catalog:\tnone\n"); 757 } 758 if (what & STATUS_VOLUME) { 759 rc = ioctl(fd, CDIOCGETVOL, &v); 760 if (rc >= 0) { 761 printf("Left volume:\t%d\n", v.vol[0]); 762 printf("Right volume:\t%d\n", v.vol[1]); 763 } else { 764 printf("Left volume:\tnot available\n"); 765 printf("Right volume:\tnot available\n"); 766 } 767 } 768 return (0); 769 } 770 771 int 772 info(arg) 773 char *arg; 774 { 775 struct ioc_toc_header h; 776 int rc, i, n; 777 778 if ((rc = ioctl(fd, CDIOREADTOCHEADER, &h)) < 0) { 779 warn("getting toc header"); 780 return (rc); 781 } 782 783 n = h.ending_track - h.starting_track + 1; 784 rc = read_toc_entrys((n + 1) * sizeof(struct cd_toc_entry)); 785 if (rc < 0) 786 return (rc); 787 788 printf("track start duration block length type\n"); 789 printf("-------------------------------------------------\n"); 790 791 for (i = 0; i < n; i++) { 792 printf("%5d ", toc_buffer[i].track); 793 prtrack(toc_buffer + i, 0); 794 } 795 printf("%5d ", toc_buffer[n].track); 796 prtrack(toc_buffer + n, 1); 797 return (0); 798 } 799 800 void 801 lba2msf(lba, m, s, f) 802 u_long lba; 803 u_char *m, *s, *f; 804 { 805 806 lba += 150; /* block start offset */ 807 lba &= 0xffffff; /* negative lbas use only 24 bits */ 808 *m = lba / (60 * 75); 809 lba %= (60 * 75); 810 *s = lba / 75; 811 *f = lba % 75; 812 } 813 814 u_int 815 msf2lba(m, s, f) 816 u_char m, s, f; 817 { 818 819 return (((m * 60) + s) * 75 + f) - 150; 820 } 821 822 void 823 prtrack(e, lastflag) 824 struct cd_toc_entry *e; 825 int lastflag; 826 { 827 int block, next, len; 828 u_char m, s, f; 829 830 if (msf) { 831 /* Print track start */ 832 printf("%2d:%02d.%02d ", e->addr.msf.minute, 833 e->addr.msf.second, e->addr.msf.frame); 834 835 block = msf2lba(e->addr.msf.minute, e->addr.msf.second, 836 e->addr.msf.frame); 837 } else { 838 block = e->addr.lba; 839 lba2msf(block, &m, &s, &f); 840 /* Print track start */ 841 printf("%2d:%02d.%02d ", m, s, f); 842 } 843 if (lastflag) { 844 /* Last track -- print block */ 845 printf(" - %6d - -\n", block); 846 return; 847 } 848 if (msf) 849 next = msf2lba(e[1].addr.msf.minute, e[1].addr.msf.second, 850 e[1].addr.msf.frame); 851 else 852 next = e[1].addr.lba; 853 len = next - block; 854 lba2msf(len, &m, &s, &f); 855 856 /* Print duration, block, length, type */ 857 printf("%2d:%02d.%02d %6d %6d %5s\n", m, s, f, block, len, 858 (e->control & 4) ? "data" : "audio"); 859 } 860 861 int 862 play_track(tstart, istart, tend, iend) 863 int tstart, istart, tend, iend; 864 { 865 struct ioc_play_track t; 866 867 t.start_track = tstart; 868 t.start_index = istart; 869 t.end_track = tend; 870 t.end_index = iend; 871 872 return (ioctl(fd, CDIOCPLAYTRACKS, &t)); 873 } 874 875 int 876 play_blocks(blk, len) 877 int blk, len; 878 { 879 struct ioc_play_blocks t; 880 881 t.blk = blk; 882 t.len = len; 883 884 return (ioctl(fd, CDIOCPLAYBLOCKS, &t)); 885 } 886 887 int 888 setvol(left, right) 889 int left, right; 890 { 891 struct ioc_vol v; 892 893 v.vol[0] = left; 894 v.vol[1] = right; 895 v.vol[2] = 0; 896 v.vol[3] = 0; 897 898 return (ioctl(fd, CDIOCSETVOL, &v)); 899 } 900 901 int 902 read_toc_entrys(len) 903 int len; 904 { 905 struct ioc_read_toc_entry t; 906 907 t.address_format = msf ? CD_MSF_FORMAT : CD_LBA_FORMAT; 908 t.starting_track = 0; 909 t.data_len = len; 910 t.data = toc_buffer; 911 912 return (ioctl(fd, CDIOREADTOCENTRYS, (char *)&t)); 913 } 914 915 int 916 play_msf(start_m, start_s, start_f, end_m, end_s, end_f) 917 int start_m, start_s, start_f, end_m, end_s, end_f; 918 { 919 struct ioc_play_msf a; 920 921 a.start_m = start_m; 922 a.start_s = start_s; 923 a.start_f = start_f; 924 a.end_m = end_m; 925 a.end_s = end_s; 926 a.end_f = end_f; 927 928 return (ioctl(fd, CDIOCPLAYMSF, (char *) &a)); 929 } 930 931 int 932 status(trk, min, sec, frame) 933 int *trk, *min, *sec, *frame; 934 { 935 struct ioc_read_subchannel s; 936 struct cd_sub_channel_info data; 937 u_char mm, ss, ff; 938 939 bzero(&s, sizeof(s)); 940 s.data = &data; 941 s.data_len = sizeof(data); 942 s.address_format = msf ? CD_MSF_FORMAT : CD_LBA_FORMAT; 943 s.data_format = CD_CURRENT_POSITION; 944 945 if (ioctl(fd, CDIOCREADSUBCHANNEL, (char *) &s) < 0) 946 return -1; 947 948 *trk = s.data->what.position.track_number; 949 if (msf) { 950 *min = s.data->what.position.reladdr.msf.minute; 951 *sec = s.data->what.position.reladdr.msf.second; 952 *frame = s.data->what.position.reladdr.msf.frame; 953 } else { 954 lba2msf(be32toh(s.data->what.position.reladdr.lba), &mm, &ss, &ff); 955 *min = mm; 956 *sec = ss; 957 *frame = ff; 958 } 959 960 return (s.data->header.audio_status); 961 } 962 963 char * 964 prompt() 965 { 966 return ("cdplay> "); 967 } 968 969 char * 970 parse(buf, cmd) 971 char *buf; 972 int *cmd; 973 { 974 struct cmdtab *c; 975 char *p, *q; 976 int len; 977 978 for (p = buf; isspace(*p); p++) 979 continue; 980 981 if (isdigit(*p) || (p[0] == '#' && isdigit(p[1]))) { 982 *cmd = CMD_PLAY; 983 return (p); 984 } 985 986 for (buf = p; *p && !isspace(*p); p++) 987 continue; 988 989 len = p - buf; 990 if (!len) 991 return (0); 992 993 if (*p) { /* It must be a spacing character! */ 994 *p++ = 0; 995 for (q = p; *q && *q != '\n' && *q != '\r'; q++) 996 continue; 997 *q = 0; 998 } 999 1000 *cmd = -1; 1001 1002 for (c = cmdtab; c->name; ++c) { 1003 /* Is it an exact match? */ 1004 if (!strcasecmp(buf, c->name)) { 1005 *cmd = c->command; 1006 break; 1007 } 1008 /* Try short hand forms then... */ 1009 if (len >= c->min && !strncasecmp(buf, c->name, len)) { 1010 if (*cmd != -1 && *cmd != c->command) { 1011 warnx("ambiguous command"); 1012 return (0); 1013 } 1014 *cmd = c->command; 1015 } 1016 } 1017 1018 if (*cmd == -1) { 1019 warnx("invalid command, enter ``help'' for commands"); 1020 return (0); 1021 } 1022 1023 while (isspace(*p)) 1024 p++; 1025 1026 return (p); 1027 } 1028 1029 int 1030 opencd() 1031 { 1032 char devbuf[80]; 1033 size_t len; 1034 1035 if (fd > -1) 1036 return (1); 1037 1038 if (*cdname == '/') 1039 strcpy(devbuf, cdname); 1040 else 1041 if (*cdname == 'r') 1042 len = sprintf(devbuf, "/dev/%s", cdname); 1043 else 1044 len = sprintf(devbuf, "/dev/r%s", cdname); 1045 1046 fd = open(devbuf, O_RDONLY); 1047 1048 if (fd < 0 && errno == ENOENT) { 1049 devbuf[len] = 'a' + RAW_PART; 1050 devbuf[len + 1] = '\0'; 1051 fd = open(devbuf, O_RDONLY); 1052 } 1053 1054 if (fd < 0) { 1055 if (errno == ENXIO) { 1056 /* ENXIO has an overloaded meaning here. The original 1057 * "Device not configured" should be interpreted as 1058 * "No disc in drive %s". */ 1059 warnx("no disc in drive %s", devbuf); 1060 return (0); 1061 } 1062 err(1, "%s", devbuf); 1063 } 1064 1065 return (1); 1066 } 1067
Indexes created Wed Oct 01 07:09:59 GMT 2025