1 /*
2  * Copyright (c) 2022 Omar Polo <op@openbsd.org>
3  *
4  * Permission to use, copy, modify, and distribute this software for any
5  * purpose with or without fee is hereby granted, provided that the above
6  * copyright notice and this permission notice appear in all copies.
7  *
8  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
9  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
10  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
11  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
12  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
13  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
14  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
15  */
16 
17 #include "config.h"
18 
19 #include <fcntl.h>
20 #include <math.h>
21 #include <inttypes.h>
22 #include <limits.h>
23 #include <stdio.h>
24 #include <stdint.h>
25 #include <unistd.h>
26 
27 #include <opusfile.h>
28 
29 #include "amused.h"
30 #include "log.h"
31 
32 #ifndef nitems
33 #define nitems(x) (sizeof(x)/sizeof(x[0]))
34 #endif
35 
36 int
37 play_opus(int fd, const char **errstr)
38 {
39 	static uint16_t pcm[BUFSIZ];
40 	static uint8_t out[BUFSIZ * 2];
41 	OggOpusFile *of;
42 	void *f;
43 	int64_t seek = -1;
44 	int r, ret = 0;
45 	OpusFileCallbacks cb = {NULL, NULL, NULL, NULL};
46 	int i, li, prev_li = -1, duration_set = 0;
47 
48 	if ((f = op_fdopen(&cb, fd, "r")) == NULL)
49 		err(1, "fdopen");
50 
51 	of = op_open_callbacks(f, &cb, NULL, 0, &r);
52 	if (of == NULL) {
53 		fclose(f);
54 		return -1;
55 	}
56 
57 	for (;;) {
58 		if (seek != -1) {
59 			r = op_pcm_seek(of, seek);
60 			if (r != 0)
61 				break;
62 			player_setpos(seek);
63 		}
64 
65 		/* NB: will downmix multichannels files into two channels */
66 		r = op_read_stereo(of, pcm, nitems(pcm));
67 		if (r == OP_HOLE) /* corrupt file segment? */
68 			continue;
69 		if (r < 0) {
70 			*errstr = "opus decoding error";
71 			ret = -1;
72 			break;
73 		}
74 		if (r == 0)
75 			break; /* eof */
76 
77 		li = op_current_link(of);
78 		if (li != prev_li) {
79 			const OpusHead *head;
80 
81 			prev_li = li;
82 			head = op_head(of, li);
83 			if (head->input_sample_rate &&
84 			    player_setup(16, head->input_sample_rate, 2) == -1)
85 				err(1, "player_setup");
86 
87 			if (!duration_set) {
88 				duration_set = 1;
89 				player_setduration(op_pcm_total(of, -1));
90 			}
91 		}
92 
93 		for (i = 0; i < 2*r; ++i) {
94 			out[2*i+0] = pcm[i] & 0xFF;
95 			out[2*i+1] = (pcm[i] >> 8) & 0xFF;
96 		}
97 
98 		if (!play(out, 4*r, &seek)) {
99 			ret = 1;
100 			break;
101 		}
102 	}
103 
104 	op_free(of);
105 	return ret;
106 }