Blob


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 */
17 #include <sys/mman.h>
18 #include <sys/stat.h>
19 #include <sys/types.h>
20 #include <sys/queue.h>
21 #include <sys/uio.h>
23 #include <err.h>
24 #include <event.h>
25 #include <fcntl.h>
26 #include <limits.h>
27 #include <sndio.h>
28 #include <stdio.h>
29 #include <stdint.h>
30 #include <imsg.h>
31 #include <unistd.h>
33 #include <mad.h>
35 #include "amused.h"
37 struct mad_stream mad_stream;
38 struct mad_frame mad_frame;
39 struct mad_synth mad_synth;
41 struct buffer {
42 const void *start;
43 size_t length;
44 int sample_rate;
45 int channels;
46 };
48 static enum mad_flow
49 input(void *d, struct mad_stream *stream)
50 {
51 struct buffer *buffer = d;
53 if (buffer->length == 0)
54 return MAD_FLOW_STOP;
56 printf("decode time! start=%p, len=%zu\n", buffer->start, buffer->length);
57 mad_stream_buffer(stream, buffer->start, buffer->length);
58 buffer->length = 0;
59 buffer->sample_rate = 0;
60 buffer->channels = 0;
61 return MAD_FLOW_CONTINUE;
62 }
64 /* scale a mad sample to 16 bits */
65 static inline int
66 scale(mad_fixed_t sample)
67 {
68 /* round */
69 sample += (1L << (MAD_F_FRACBITS - 16));
71 /* clip */
72 if (sample >= MAD_F_ONE)
73 sample = MAD_F_ONE - 1;
74 else if (sample < -MAD_F_ONE)
75 sample -= MAD_F_ONE;
77 /* quantize */
78 return sample >> (MAD_F_FRACBITS + 1 - 16);
79 }
81 static enum mad_flow
82 output(void *data, const struct mad_header *header, struct mad_pcm *pcm)
83 {
84 static uint8_t buf[BUFSIZ];
85 size_t len;
86 struct buffer *buffer = data;
87 int nsamples, i;
88 uint16_t sample;
89 const mad_fixed_t *leftch, *rightch;
91 if (player_shouldstop())
92 return MAD_FLOW_STOP;
94 nsamples = pcm->length;
95 leftch = pcm->samples[0];
96 rightch = pcm->samples[1];
98 if (buffer->sample_rate != pcm->samplerate ||
99 buffer->channels != pcm->channels) {
100 buffer->sample_rate = pcm->samplerate;
101 buffer->channels = pcm->channels;
102 if (player_setup(pcm->samplerate, pcm->channels) == -1)
103 err(1, "player_setrate");
106 for (i = 0, len = 0; i < nsamples; ++i) {
107 if (len+4 >= sizeof(buf)) {
108 sio_write(hdl, buf, len);
109 /* fwrite(buf, 1, len, stdout); */
110 len = 0;
113 sample = scale(*leftch++);
114 buf[len++] = sample & 0xff;
115 buf[len++] = (sample >> 8) & 0xff;
117 if (pcm->channels == 2) {
118 sample = scale(*rightch++);
119 buf[len++] = sample & 0xff;
120 buf[len++] = (sample >> 8) & 0xff;
124 if (len != 0)
125 /* fwrite(buf, 1, len, stdout); */
126 sio_write(hdl, buf, len);
128 return MAD_FLOW_CONTINUE;
131 static enum mad_flow
132 error(void *d, struct mad_stream *stream, struct mad_frame *frame)
134 struct buffer *buffer = d;
136 warnx("decoding error 0x%04x (%s) at byte offset %zu",
137 stream->error, mad_stream_errorstr(stream),
138 stream->this_frame - (const unsigned char *)buffer->start);
140 return MAD_FLOW_CONTINUE;
143 static int
144 decode(void *m, size_t len)
146 struct buffer buffer;
147 struct mad_decoder decoder;
148 int result;
150 /* initialize our private message structure; */
151 buffer.start = m;
152 buffer.length = len;
154 /* configure input, output and error functions */
155 mad_decoder_init(&decoder, &buffer, input, 0 /* header */,
156 0 /* filter */, output, error, 0 /* message */);
158 /* start decoding */
159 result = mad_decoder_run(&decoder, MAD_DECODER_MODE_SYNC);
161 /* release the decoder */
162 mad_decoder_finish(&decoder);
164 return result;
167 void
168 play_mp3(int fd)
170 struct stat stat;
171 void *m;
173 if (fstat(fd, &stat) == -1)
174 err(1, "fstat");
175 warnx("file size %lld", stat.st_size);
177 m = mmap(NULL, stat.st_size, PROT_READ, MAP_PRIVATE, fd, 0);
178 if (m == MAP_FAILED)
179 err(1, "mmap");
181 decode(m, stat.st_size);
182 munmap(m, stat.st_size);