patch from Steven Richman: adds support for streaming http transport to xmms plugin
[flac.git] / src / plugin_xmms / plugin.c
1 /* libxmms-flac - XMMS FLAC input plugin
2  * Copyright (C) 2000,2001,2002,2003,2004  Josh Coalson
3  *
4  * This program is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU General Public License
6  * as published by the Free Software Foundation; either version 2
7  * of the License, or (at your option) any later version.
8  *
9  * This program is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  * GNU General Public License for more details.
13  *
14  * You should have received a copy of the GNU General Public License
15  * along with this program; if not, write to the Free Software
16  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
17  */
18
19 #include <pthread.h>
20 #include <stdlib.h>
21 #include <string.h>
22 #include <stdio.h>
23 #include <glib.h>
24 #include <pwd.h>
25 #include <sys/types.h>
26 #include <unistd.h>
27
28 #include <xmms/plugin.h>
29 #include <xmms/util.h>
30 #include <xmms/configfile.h>
31 #include <xmms/titlestring.h>
32
33 #ifdef HAVE_CONFIG_H
34 #include <config.h>
35 #endif
36
37 #ifdef HAVE_LANGINFO_CODESET
38 #include <langinfo.h>
39 #endif
40
41 #include "FLAC/all.h"
42 #include "plugin_common/all.h"
43 #include "share/grabbag.h"
44 #include "share/replaygain_synthesis.h"
45 #include "configure.h"
46 #include "charset.h"
47 #include "http.h"
48 #include "tag.h"
49
50 #ifdef min
51 #undef min
52 #endif
53 #define min(x,y) ((x)<(y)?(x):(y))
54
55 /* adjust for compilers that can't understand using LLU suffix for uint64_t literals */
56 #ifdef _MSC_VER
57 #define FLAC__U64L(x) x
58 #else
59 #define FLAC__U64L(x) x##LLU
60 #endif
61
62 extern void FLAC_XMMS__file_info_box(char *filename);
63
64 typedef struct {
65         FLAC__bool abort_flag;
66         FLAC__bool is_playing;
67         FLAC__bool eof;
68         FLAC__bool play_thread_open; /* if true, is_playing must also be true */
69         unsigned total_samples;
70         unsigned bits_per_sample;
71         unsigned channels;
72         unsigned sample_rate;
73         unsigned length_in_msec;
74         gchar *title;
75         AFormat sample_format;
76         unsigned sample_format_bytes_per_sample;
77         int seek_to_in_sec;
78         FLAC__bool has_replaygain;
79         double replay_scale;
80         DitherContext dither_context;
81 } file_info_struct;
82
83 typedef FLAC__StreamDecoderWriteStatus (*WriteCallback) (const void *decoder, const FLAC__Frame *frame, const FLAC__int32 * const buffer[], void *client_data);
84 typedef void (*MetadataCallback) (const void *decoder, const FLAC__StreamMetadata *metadata, void *client_data);
85 typedef void (*ErrorCallback) (const void *decoder, FLAC__StreamDecoderErrorStatus status, void *client_data);
86
87 typedef struct {
88         FLAC__bool seekable;
89         void* (*new_decoder) (void);
90         FLAC__bool (*set_md5_checking) (void *decoder, FLAC__bool value);
91         FLAC__bool (*set_source) (void *decoder, const char* source);
92         FLAC__bool (*set_metadata_ignore_all) (void *decoder);
93         FLAC__bool (*set_metadata_respond) (void *decoder, FLAC__MetadataType type);
94         FLAC__bool (*set_write_callback) (void *decoder, WriteCallback value);
95         FLAC__bool (*set_metadata_callback) (void *decoder, MetadataCallback value);
96         FLAC__bool (*set_error_callback) (void *decoder, ErrorCallback value);
97         FLAC__bool (*set_client_data) (void *decoder, void *value);
98         FLAC__bool (*decoder_init) (void *decoder);
99         void (*safe_decoder_finish) (void *decoder);
100         void (*safe_decoder_delete) (void *decoder);
101         FLAC__bool (*process_until_end_of_metadata) (void *decoder);
102         FLAC__bool (*process_single) (void *decoder);
103         FLAC__bool (*is_eof) (void *decoder);
104 } decoder_funcs_t;
105
106 #define NUM_DECODER_TYPES 2
107 typedef enum {
108         DECODER_FILE,
109         DECODER_HTTP
110 } decoder_t;
111
112 static void FLAC_XMMS__init();
113 static int  FLAC_XMMS__is_our_file(char *filename);
114 static void FLAC_XMMS__play_file(char *filename);
115 static void FLAC_XMMS__stop();
116 static void FLAC_XMMS__pause(short p);
117 static void FLAC_XMMS__seek(int time);
118 static int  FLAC_XMMS__get_time();
119 static void FLAC_XMMS__cleanup();
120 static void FLAC_XMMS__get_song_info(char *filename, char **title, int *length);
121
122 static void *play_loop_(void *arg);
123
124 static FLAC__bool safe_decoder_init_(const char *filename, void **decoderp, decoder_funcs_t const ** fnsp);
125 static void file_decoder_safe_decoder_finish_(void *decoder);
126 static void file_decoder_safe_decoder_delete_(void *decoder);
127 static FLAC__StreamDecoderWriteStatus write_callback_(const void *decoder, const FLAC__Frame *frame, const FLAC__int32 * const buffer[], void *client_data);
128 static void metadata_callback_(const void *decoder, const FLAC__StreamMetadata *metadata, void *client_data);
129 static void error_callback_(const void *decoder, FLAC__StreamDecoderErrorStatus status, void *client_data);
130
131 static void init_decoder_func_tables();
132 static decoder_t source_to_decoder_type (const char *source);
133
134 InputPlugin flac_ip =
135 {
136         NULL,
137         NULL,
138         "Reference FLAC Player v" VERSION,
139         FLAC_XMMS__init,
140         FLAC_XMMS__aboutbox,
141         FLAC_XMMS__configure,
142         FLAC_XMMS__is_our_file,
143         NULL,
144         FLAC_XMMS__play_file,
145         FLAC_XMMS__stop,
146         FLAC_XMMS__pause,
147         FLAC_XMMS__seek,
148         NULL,
149         FLAC_XMMS__get_time,
150         NULL,
151         NULL,
152         FLAC_XMMS__cleanup,
153         NULL,
154         NULL,
155         NULL,
156         NULL,
157         FLAC_XMMS__get_song_info,
158         FLAC_XMMS__file_info_box,
159         NULL
160 };
161
162 #define SAMPLES_PER_WRITE 512
163 #define SAMPLE_BUFFER_SIZE ((FLAC__MAX_BLOCK_SIZE + SAMPLES_PER_WRITE) * FLAC_PLUGIN__MAX_SUPPORTED_CHANNELS * (24/8))
164 static FLAC__byte sample_buffer_[SAMPLE_BUFFER_SIZE];
165 static unsigned sample_buffer_first_, sample_buffer_last_;
166
167 static void *decoder_ = 0;
168 static file_info_struct file_info_;
169 static pthread_t decode_thread_;
170 static FLAC__bool audio_error_ = false;
171 static FLAC__bool is_big_endian_host_;
172
173 #define BITRATE_HIST_SEGMENT_MSEC 500
174 /* 500ms * 50 = 25s should be enough */
175 #define BITRATE_HIST_SIZE 50
176 static unsigned bitrate_history_[BITRATE_HIST_SIZE];
177
178 /* A table of sets of decoder functions, indexed by decoder_t */
179 static const decoder_funcs_t* DECODER_FUNCS[NUM_DECODER_TYPES];
180
181 static decoder_funcs_t const * decoder_func_table_;
182
183
184 InputPlugin *get_iplugin_info()
185 {
186         flac_ip.description = g_strdup_printf("Reference FLAC Player v%s", FLAC__VERSION_STRING);
187         return &flac_ip;
188 }
189
190 void set_track_info(const char* title, int length_in_msec)
191 {
192         if (file_info_.is_playing) {
193                 flac_ip.set_info((char*) title, length_in_msec, file_info_.sample_rate * file_info_.channels * file_info_.bits_per_sample, file_info_.sample_rate, file_info_.channels);
194         }
195 }
196
197 static gchar* homedir()
198 {
199         gchar *result;
200         char *env_home = getenv("HOME");
201         if (env_home) {
202                 result = g_strdup (env_home);
203         } else {
204                 uid_t uid = getuid();
205                 struct passwd *pwent;
206                 do {
207                         pwent = getpwent();
208                 } while (pwent && pwent->pw_uid != uid);
209                 result = pwent ? g_strdup (pwent->pw_dir) : NULL;
210                 endpwent();
211         }
212         return result;
213 }
214
215 void FLAC_XMMS__init()
216 {
217         ConfigFile *cfg;
218         FLAC__uint32 test = 1;
219
220         is_big_endian_host_ = (*((FLAC__byte*)(&test)))? false : true;
221
222         flac_cfg.title.tag_override = FALSE;
223         g_free(flac_cfg.title.tag_format);
224         flac_cfg.title.convert_char_set = FALSE;
225
226         cfg = xmms_cfg_open_default_file();
227
228         /* title */
229
230         xmms_cfg_read_boolean(cfg, "flac", "title.tag_override", &flac_cfg.title.tag_override);
231
232         if(!xmms_cfg_read_string(cfg, "flac", "title.tag_format", &flac_cfg.title.tag_format))
233                 flac_cfg.title.tag_format = g_strdup("%p - %t");
234
235         xmms_cfg_read_boolean(cfg, "flac", "title.convert_char_set", &flac_cfg.title.convert_char_set);
236
237         if(!xmms_cfg_read_string(cfg, "flac", "title.user_char_set", &flac_cfg.title.user_char_set))
238                 flac_cfg.title.user_char_set = FLAC_plugin__charset_get_current();
239
240         /* replaygain */
241
242         xmms_cfg_read_boolean(cfg, "flac", "output.replaygain.enable", &flac_cfg.output.replaygain.enable);
243
244         xmms_cfg_read_boolean(cfg, "flac", "output.replaygain.album_mode", &flac_cfg.output.replaygain.album_mode);
245
246         if(!xmms_cfg_read_int(cfg, "flac", "output.replaygain.preamp", &flac_cfg.output.replaygain.preamp))
247                 flac_cfg.output.replaygain.preamp = 0;
248
249         xmms_cfg_read_boolean(cfg, "flac", "output.replaygain.hard_limit", &flac_cfg.output.replaygain.hard_limit);
250
251         xmms_cfg_read_boolean(cfg, "flac", "output.resolution.normal.dither_24_to_16", &flac_cfg.output.resolution.normal.dither_24_to_16);
252         xmms_cfg_read_boolean(cfg, "flac", "output.resolution.replaygain.dither", &flac_cfg.output.resolution.replaygain.dither);
253
254         if(!xmms_cfg_read_int(cfg, "flac", "output.resolution.replaygain.noise_shaping", &flac_cfg.output.resolution.replaygain.noise_shaping))
255                 flac_cfg.output.resolution.replaygain.noise_shaping = 1;
256
257         if(!xmms_cfg_read_int(cfg, "flac", "output.resolution.replaygain.bps_out", &flac_cfg.output.resolution.replaygain.bps_out))
258                 flac_cfg.output.resolution.replaygain.bps_out = 16;
259
260         /* stream */
261
262         xmms_cfg_read_int(cfg, "flac", "stream.http_buffer_size", &flac_cfg.stream.http_buffer_size);
263         xmms_cfg_read_int(cfg, "flac", "stream.http_prebuffer", &flac_cfg.stream.http_prebuffer);
264         xmms_cfg_read_boolean(cfg, "flac", "stream.use_proxy", &flac_cfg.stream.use_proxy);
265         xmms_cfg_read_string(cfg, "flac", "stream.proxy_host", &flac_cfg.stream.proxy_host);
266         xmms_cfg_read_int(cfg, "flac", "stream.proxy_port", &flac_cfg.stream.proxy_port);
267         xmms_cfg_read_boolean(cfg, "flac", "stream.proxy_use_auth", &flac_cfg.stream.proxy_use_auth);
268         xmms_cfg_read_string(cfg, "flac", "stream.proxy_user", &flac_cfg.stream.proxy_user);
269         xmms_cfg_read_string(cfg, "flac", "stream.proxy_pass", &flac_cfg.stream.proxy_pass);
270         xmms_cfg_read_boolean(cfg, "flac", "stream.save_http_stream", &flac_cfg.stream.save_http_stream);
271         if (!xmms_cfg_read_string(cfg, "flac", "stream.save_http_path", &flac_cfg.stream.save_http_path) ||
272                  ! *flac_cfg.stream.save_http_path) {
273                 if (flac_cfg.stream.save_http_path)
274                         g_free (flac_cfg.stream.save_http_path);
275                 flac_cfg.stream.save_http_path = homedir();
276         }
277         xmms_cfg_read_boolean(cfg, "flac", "stream.cast_title_streaming", &flac_cfg.stream.cast_title_streaming);
278         xmms_cfg_read_boolean(cfg, "flac", "stream.use_udp_channel", &flac_cfg.stream.use_udp_channel);
279
280         init_decoder_func_tables();
281         decoder_func_table_ = DECODER_FUNCS [DECODER_FILE];
282         decoder_ = decoder_func_table_ -> new_decoder();
283
284         xmms_cfg_free(cfg);
285 }
286
287 int FLAC_XMMS__is_our_file(char *filename)
288 {
289         char *ext;
290
291         ext = strrchr(filename, '.');
292         if(ext)
293                 if(!strcasecmp(ext, ".flac") || !strcasecmp(ext, ".fla"))
294                         return 1;
295         return 0;
296 }
297
298 void FLAC_XMMS__play_file(char *filename)
299 {
300         FILE *f;
301
302         sample_buffer_first_ = sample_buffer_last_ = 0;
303         audio_error_ = false;
304         file_info_.abort_flag = false;
305         file_info_.is_playing = false;
306         file_info_.eof = false;
307         file_info_.play_thread_open = false;
308         file_info_.has_replaygain = false;
309
310         if (source_to_decoder_type (filename) == DECODER_FILE) {
311                 if(0 == (f = fopen(filename, "r")))
312                         return;
313                 fclose(f);
314         }
315
316         if(decoder_ == 0)
317                 return;
318
319         if(!safe_decoder_init_(filename, &decoder_, &decoder_func_table_))
320                 return;
321
322         if(file_info_.has_replaygain && flac_cfg.output.replaygain.enable) {
323                 if(flac_cfg.output.resolution.replaygain.bps_out == 8) {
324                         file_info_.sample_format = FMT_U8;
325                         file_info_.sample_format_bytes_per_sample = 1;
326                 }
327                 else if(flac_cfg.output.resolution.replaygain.bps_out == 16) {
328                         file_info_.sample_format = (is_big_endian_host_) ? FMT_S16_BE : FMT_S16_LE;
329                         file_info_.sample_format_bytes_per_sample = 2;
330                 }
331                 else {
332                         /*@@@ need some error here like wa2: MessageBox(mod_.hMainWindow, "ERROR: plugin can only handle 8/16-bit samples\n", "ERROR: plugin can only handle 8/16-bit samples", 0); */
333                         fprintf(stderr, "libxmms-flac: can't handle %d bit output\n", flac_cfg.output.resolution.replaygain.bps_out);
334                         decoder_func_table_ -> safe_decoder_finish(decoder_);
335                         return;
336                 }
337         }
338         else {
339                 if(file_info_.bits_per_sample == 8) {
340                         file_info_.sample_format = FMT_U8;
341                         file_info_.sample_format_bytes_per_sample = 1;
342                 }
343                 else if(file_info_.bits_per_sample == 16 || (file_info_.bits_per_sample == 24 && flac_cfg.output.resolution.normal.dither_24_to_16)) {
344                         file_info_.sample_format = (is_big_endian_host_) ? FMT_S16_BE : FMT_S16_LE;
345                         file_info_.sample_format_bytes_per_sample = 2;
346                 }
347                 else {
348                         /*@@@ need some error here like wa2: MessageBox(mod_.hMainWindow, "ERROR: plugin can only handle 8/16-bit samples\n", "ERROR: plugin can only handle 8/16-bit samples", 0); */
349                         fprintf(stderr, "libxmms-flac: can't handle %d bit output\n", file_info_.bits_per_sample);
350                         decoder_func_table_ -> safe_decoder_finish(decoder_);
351                         return;
352                 }
353         }
354         FLAC__replaygain_synthesis__init_dither_context(&file_info_.dither_context, file_info_.sample_format_bytes_per_sample * 8, flac_cfg.output.resolution.replaygain.noise_shaping);
355         file_info_.is_playing = true;
356
357         if(flac_ip.output->open_audio(file_info_.sample_format, file_info_.sample_rate, file_info_.channels) == 0) {
358                 audio_error_ = true;
359                 decoder_func_table_ -> safe_decoder_finish(decoder_);
360                 return;
361         }
362
363         file_info_.title = flac_format_song_title(filename);
364         flac_ip.set_info(file_info_.title, file_info_.length_in_msec, file_info_.sample_rate * file_info_.channels * file_info_.bits_per_sample, file_info_.sample_rate, file_info_.channels);
365
366         file_info_.seek_to_in_sec = -1;
367         file_info_.play_thread_open = true;
368         pthread_create(&decode_thread_, NULL, play_loop_, NULL);
369 }
370
371 void FLAC_XMMS__stop()
372 {
373         if(file_info_.is_playing) {
374                 file_info_.is_playing = false;
375                 if(file_info_.play_thread_open) {
376                         file_info_.play_thread_open = false;
377                         pthread_join(decode_thread_, NULL);
378                 }
379                 flac_ip.output->close_audio();
380                 decoder_func_table_ -> safe_decoder_finish (decoder_);
381         }
382 }
383
384 void FLAC_XMMS__pause(short p)
385 {
386         flac_ip.output->pause(p);
387 }
388
389 void FLAC_XMMS__seek(int time)
390 {
391         if (decoder_func_table_->seekable) {
392                 file_info_.seek_to_in_sec = time;
393                 file_info_.eof = false;
394
395                 while(file_info_.seek_to_in_sec != -1)
396                         xmms_usleep(10000);
397         }
398 }
399
400 int FLAC_XMMS__get_time()
401 {
402         if(audio_error_)
403                 return -2;
404         if(!file_info_.is_playing || (file_info_.eof && !flac_ip.output->buffer_playing()))
405                 return -1;
406         else
407                 return flac_ip.output->output_time();
408 }
409
410 void FLAC_XMMS__cleanup()
411 {
412         decoder_func_table_ -> safe_decoder_delete(decoder_);
413         decoder_ = 0;
414 }
415
416 void FLAC_XMMS__get_song_info(char *filename, char **title, int *length_in_msec)
417 {
418         FLAC__StreamMetadata streaminfo;
419
420         if(0 == filename)
421                 filename = "";
422
423         if(!FLAC__metadata_get_streaminfo(filename, &streaminfo)) {
424                 /* @@@ how to report the error? */
425                 if(title) {
426                         if (source_to_decoder_type (filename) == DECODER_FILE) {
427                                 static const char *errtitle = "Invalid FLAC File: ";
428                                 *title = g_malloc(strlen(errtitle) + 1 + strlen(filename) + 1 + 1);
429                                 sprintf(*title, "%s\"%s\"", errtitle, filename);
430                         } else {
431                                 *title = NULL;
432                         }
433                 }
434                 if(length_in_msec)
435                         *length_in_msec = -1;
436                 return;
437         }
438
439         if(title) {
440                 *title = flac_format_song_title(filename);
441         }
442         if(length_in_msec)
443                 *length_in_msec = streaminfo.data.stream_info.total_samples * 10 / (streaminfo.data.stream_info.sample_rate / 100);
444 }
445
446 /***********************************************************************
447  * local routines
448  **********************************************************************/
449
450 void *play_loop_(void *arg)
451 {
452         unsigned written_time_last = 0, bh_index_last_w = 0, bh_index_last_o = BITRATE_HIST_SIZE, blocksize = 1;
453         FLAC__uint64 decode_position_last = 0, decode_position_frame_last = 0, decode_position_frame = 0;
454
455         (void)arg;
456
457         while(file_info_.is_playing) {
458                 if(!file_info_.eof) {
459                         while(sample_buffer_last_ - sample_buffer_first_ < SAMPLES_PER_WRITE) {
460                                 unsigned s;
461
462                                 s = sample_buffer_last_ - sample_buffer_first_;
463                                 if(decoder_func_table_ -> is_eof(decoder_)) {
464                                         file_info_.eof = true;
465                                         break;
466                                 }
467                                 else if (!decoder_func_table_ -> process_single(decoder_)) {
468                                         /*@@@ this should probably be a dialog */
469                                         fprintf(stderr, "libxmms-flac: READ ERROR processing frame\n");
470                                         file_info_.eof = true;
471                                         break;
472                                 }
473                                 blocksize = sample_buffer_last_ - sample_buffer_first_ - s;
474                                 decode_position_frame_last = decode_position_frame;
475                                 if(!decoder_func_table_->seekable || !FLAC__file_decoder_get_decode_position(decoder_, &decode_position_frame))
476                                         decode_position_frame = 0;
477                         }
478                         if(sample_buffer_last_ - sample_buffer_first_ > 0) {
479                                 const unsigned n = min(sample_buffer_last_ - sample_buffer_first_, SAMPLES_PER_WRITE);
480                                 int bytes = n * file_info_.channels * file_info_.sample_format_bytes_per_sample;
481                                 FLAC__byte *sample_buffer_start = sample_buffer_ + sample_buffer_first_ * file_info_.channels * file_info_.sample_format_bytes_per_sample;
482                                 unsigned written_time, bh_index_w;
483                                 FLAC__uint64 decode_position;
484
485                                 sample_buffer_first_ += n;
486                                 flac_ip.add_vis_pcm(flac_ip.output->written_time(), file_info_.sample_format, file_info_.channels, bytes, sample_buffer_start);
487                                 while(flac_ip.output->buffer_free() < (int)bytes && file_info_.is_playing && file_info_.seek_to_in_sec == -1)
488                                         xmms_usleep(10000);
489                                 if(file_info_.is_playing && file_info_.seek_to_in_sec == -1)
490                                         flac_ip.output->write_audio(sample_buffer_start, bytes);
491
492                                 /* compute current bitrate */
493
494                                 written_time = flac_ip.output->written_time();
495                                 bh_index_w = written_time / BITRATE_HIST_SEGMENT_MSEC % BITRATE_HIST_SIZE;
496                                 if(bh_index_w != bh_index_last_w) {
497                                         bh_index_last_w = bh_index_w;
498                                         decode_position = decode_position_frame - (double)(sample_buffer_last_ - sample_buffer_first_) * (double)(decode_position_frame - decode_position_frame_last) / (double)blocksize;
499                                         bitrate_history_[(bh_index_w + BITRATE_HIST_SIZE - 1) % BITRATE_HIST_SIZE] =
500                                                 decode_position > decode_position_last && written_time > written_time_last ?
501                                                         8000 * (decode_position - decode_position_last) / (written_time - written_time_last) :
502                                                         file_info_.sample_rate * file_info_.channels * file_info_.bits_per_sample;
503                                         decode_position_last = decode_position;
504                                         written_time_last = written_time;
505                                 }
506                         }
507                         else {
508                                 file_info_.eof = true;
509                                 xmms_usleep(10000);
510                         }
511                 }
512                 else
513                         xmms_usleep(10000);
514                 if(decoder_func_table_->seekable && file_info_.seek_to_in_sec != -1) {
515                         const double distance = (double)file_info_.seek_to_in_sec * 1000.0 / (double)file_info_.length_in_msec;
516                         unsigned target_sample = (unsigned)(distance * (double)file_info_.total_samples);
517                         if(FLAC__file_decoder_seek_absolute(decoder_, (FLAC__uint64)target_sample)) {
518                                 flac_ip.output->flush(file_info_.seek_to_in_sec * 1000);
519                                 bh_index_last_w = bh_index_last_o = flac_ip.output->output_time() / BITRATE_HIST_SEGMENT_MSEC % BITRATE_HIST_SIZE;
520                                 if(!FLAC__file_decoder_get_decode_position(decoder_, &decode_position_frame))
521                                         decode_position_frame = 0;
522                                 file_info_.seek_to_in_sec = -1;
523                                 file_info_.eof = false;
524                                 sample_buffer_first_ = sample_buffer_last_ = 0;
525                         }
526                 }
527                 else {
528                         /* display the right bitrate from history */
529                         unsigned bh_index_o = flac_ip.output->output_time() / BITRATE_HIST_SEGMENT_MSEC % BITRATE_HIST_SIZE;
530                         if(bh_index_o != bh_index_last_o && bh_index_o != bh_index_last_w && bh_index_o != (bh_index_last_w + 1) % BITRATE_HIST_SIZE) {
531                                 bh_index_last_o = bh_index_o;
532                                 flac_ip.set_info(file_info_.title, file_info_.length_in_msec, bitrate_history_[bh_index_o], file_info_.sample_rate, file_info_.channels);
533                         }
534                 }
535         }
536
537         decoder_func_table_ -> safe_decoder_finish(decoder_);
538
539         /* are these two calls necessary? */
540         flac_ip.output->buffer_free();
541         flac_ip.output->buffer_free();
542
543         g_free(file_info_.title);
544
545         pthread_exit(NULL);
546         return 0; /* to silence the compiler warning about not returning a value */
547 }
548
549 /*********** File decoder functions */
550
551 static FLAC__bool file_decoder_init (void *decoder)
552 {
553         return FLAC__file_decoder_init( (FLAC__FileDecoder*) decoder) == FLAC__FILE_DECODER_OK;
554 }
555
556 static void file_decoder_safe_decoder_finish_(void *decoder)
557 {
558         if(decoder && FLAC__file_decoder_get_state((FLAC__FileDecoder *) decoder) != FLAC__FILE_DECODER_UNINITIALIZED)
559                 FLAC__file_decoder_finish((FLAC__FileDecoder *) decoder);
560 }
561
562 static void file_decoder_safe_decoder_delete_(void *decoder)
563 {
564         if(decoder) {
565                 file_decoder_safe_decoder_finish_(decoder);
566                 FLAC__file_decoder_delete( (FLAC__FileDecoder *) decoder);
567         }
568 }
569
570 static FLAC__bool file_decoder_is_eof(void *decoder)
571 {
572         return FLAC__file_decoder_get_state((FLAC__FileDecoder *) decoder) == FLAC__FILE_DECODER_END_OF_FILE;
573 }
574
575 static const decoder_funcs_t FILE_DECODER_FUNCTIONS = {
576         true,
577         (void* (*) (void)) FLAC__file_decoder_new,
578         (FLAC__bool (*) (void *, FLAC__bool)) FLAC__file_decoder_set_md5_checking,
579         (FLAC__bool (*) (void *, const char*)) FLAC__file_decoder_set_filename,
580         (FLAC__bool (*) (void *)) FLAC__file_decoder_set_metadata_ignore_all,
581         (FLAC__bool (*) (void *, FLAC__MetadataType)) FLAC__file_decoder_set_metadata_respond,
582         (FLAC__bool (*) (void *, WriteCallback)) FLAC__file_decoder_set_write_callback,
583         (FLAC__bool (*) (void *, MetadataCallback)) FLAC__file_decoder_set_metadata_callback,
584         (FLAC__bool (*) (void *, ErrorCallback)) FLAC__file_decoder_set_error_callback,
585         (FLAC__bool (*) (void *, void *)) FLAC__file_decoder_set_client_data,
586         (FLAC__bool (*) (void *)) file_decoder_init,
587         (void (*) (void *)) file_decoder_safe_decoder_finish_,
588         (void (*) (void *)) file_decoder_safe_decoder_delete_,
589         (FLAC__bool (*) (void *)) FLAC__file_decoder_process_until_end_of_metadata,
590         (FLAC__bool (*) (void *)) FLAC__file_decoder_process_single,
591         file_decoder_is_eof
592 };
593
594 /*********** HTTP decoder functions */
595
596 static gchar *url_;
597
598 static FLAC__bool http_decoder_set_md5_checking (void *decoder, FLAC__bool value)
599 {
600         (void) value;
601         // operation unsupported
602         return FLAC__stream_decoder_get_state ((const FLAC__StreamDecoder *) decoder) ==
603                 FLAC__STREAM_DECODER_UNINITIALIZED;
604 }
605
606 static FLAC__bool http_decoder_set_url (void *decoder, const char* url)
607 {
608         (void) decoder;
609         url_ = g_strdup (url);
610         return true;
611 }
612
613 static FLAC__StreamDecoderReadStatus http_decoder_read_callback (const FLAC__StreamDecoder *decoder, FLAC__byte buffer[], unsigned *bytes, void *client_data)
614 {
615         (void) decoder;
616         (void) client_data;
617         *bytes = flac_http_read (buffer, *bytes);
618         return *bytes ? FLAC__STREAM_DECODER_READ_STATUS_CONTINUE : FLAC__STREAM_DECODER_READ_STATUS_END_OF_STREAM;
619 }
620
621 static FLAC__bool http_decoder_init (void *decoder)
622 {
623         flac_http_open (url_, 0);
624         g_free (url_);
625         FLAC__stream_decoder_set_read_callback (decoder, http_decoder_read_callback);
626         return FLAC__stream_decoder_init( (FLAC__StreamDecoder*) decoder) == FLAC__STREAM_DECODER_SEARCH_FOR_METADATA;
627 }
628
629 static void http_decoder_safe_decoder_finish_(void *decoder)
630 {
631         if(decoder && FLAC__stream_decoder_get_state((FLAC__StreamDecoder *) decoder) != FLAC__STREAM_DECODER_UNINITIALIZED) {
632                 FLAC__stream_decoder_finish((FLAC__StreamDecoder *) decoder);
633                 flac_http_close();
634         }
635 }
636
637 static void http_decoder_safe_decoder_delete_(void *decoder)
638 {
639         if(decoder) {
640                 http_decoder_safe_decoder_finish_(decoder);
641                 FLAC__stream_decoder_delete( (FLAC__StreamDecoder *) decoder);
642         }
643 }
644
645 static FLAC__bool http_decoder_is_eof(void *decoder)
646 {
647         return FLAC__stream_decoder_get_state((FLAC__StreamDecoder *) decoder) == FLAC__STREAM_DECODER_END_OF_STREAM;
648 }
649
650 static const decoder_funcs_t HTTP_DECODER_FUNCTIONS = {
651         false,
652         (void* (*) (void)) FLAC__stream_decoder_new,
653         http_decoder_set_md5_checking,
654         (FLAC__bool (*) (void *, const char*)) http_decoder_set_url,
655         (FLAC__bool (*) (void *)) FLAC__stream_decoder_set_metadata_ignore_all,
656         (FLAC__bool (*) (void *, FLAC__MetadataType)) FLAC__stream_decoder_set_metadata_respond,
657         (FLAC__bool (*) (void *, WriteCallback)) FLAC__stream_decoder_set_write_callback,
658         (FLAC__bool (*) (void *, MetadataCallback)) FLAC__stream_decoder_set_metadata_callback,
659         (FLAC__bool (*) (void *, ErrorCallback)) FLAC__stream_decoder_set_error_callback,
660         (FLAC__bool (*) (void *, void *)) FLAC__stream_decoder_set_client_data,
661         (FLAC__bool (*) (void *)) http_decoder_init,
662         (void (*) (void *)) http_decoder_safe_decoder_finish_,
663         (void (*) (void *)) http_decoder_safe_decoder_delete_,
664         (FLAC__bool (*) (void *)) FLAC__stream_decoder_process_until_end_of_metadata,
665         (FLAC__bool (*) (void *)) FLAC__stream_decoder_process_single,
666         http_decoder_is_eof
667 };
668
669 static decoder_funcs_t const *decoder_func_table_;
670
671 static void init_decoder_func_tables()
672 {
673         DECODER_FUNCS [DECODER_FILE] = & FILE_DECODER_FUNCTIONS;
674         DECODER_FUNCS [DECODER_HTTP] = & HTTP_DECODER_FUNCTIONS;
675 }
676
677 static decoder_t source_to_decoder_type (const char *source)
678 {
679         return strncasecmp(source, "http://", 7) ? DECODER_FILE : DECODER_HTTP;
680 }
681
682 static void change_decoder_if_needed (decoder_t new_decoder_type, void **decoderp, decoder_funcs_t const ** fntabp)
683 {
684         const decoder_funcs_t *new_fn_table = DECODER_FUNCS [new_decoder_type];
685         if (*fntabp != new_fn_table) {
686                 (*fntabp)->safe_decoder_delete(*decoderp);
687                 *fntabp = new_fn_table;
688                 *decoderp = new_fn_table -> new_decoder();
689         }
690 }
691
692 FLAC__bool safe_decoder_init_(const char *filename, void **decoderp, decoder_funcs_t const ** fntabp)
693 {
694         if(decoderp == 0 || *decoderp == 0)
695                 return false;
696
697         (*fntabp)->safe_decoder_finish(*decoderp);
698
699         change_decoder_if_needed(source_to_decoder_type(filename), decoderp, fntabp);
700
701         {
702                 decoder_funcs_t const *fntab = *fntabp;
703                 void *decoder = *decoderp;
704
705                 decoder = *decoderp;
706                 fntab = *fntabp;
707
708                 fntab -> set_md5_checking(decoder, false);
709                 fntab -> set_source(decoder, filename);
710                 fntab -> set_metadata_ignore_all(decoder);
711                 fntab -> set_metadata_respond(decoder, FLAC__METADATA_TYPE_STREAMINFO);
712                 fntab -> set_metadata_respond(decoder, FLAC__METADATA_TYPE_VORBIS_COMMENT);
713                 fntab -> set_write_callback(decoder, write_callback_);
714                 fntab -> set_metadata_callback(decoder, metadata_callback_);
715                 fntab -> set_error_callback(decoder, error_callback_);
716                 fntab -> set_client_data(decoder, &file_info_);
717                 if(!fntab -> decoder_init(decoder))
718                         return false;
719
720                 if(!fntab -> process_until_end_of_metadata(decoder))
721                         return false;
722         }
723
724         return true;
725 }
726
727 FLAC__StreamDecoderWriteStatus write_callback_(const void *decoder, const FLAC__Frame *frame, const FLAC__int32 * const buffer[], void *client_data)
728 {
729         file_info_struct *file_info = (file_info_struct *)client_data;
730         const unsigned channels = file_info->channels, wide_samples = frame->header.blocksize;
731         const unsigned bits_per_sample = file_info->bits_per_sample;
732         FLAC__byte *sample_buffer_start;
733
734         (void)decoder;
735
736         if(file_info->abort_flag)
737                 return FLAC__STREAM_DECODER_WRITE_STATUS_ABORT;
738
739         if((sample_buffer_last_ + wide_samples) > (SAMPLE_BUFFER_SIZE / (channels * file_info->sample_format_bytes_per_sample))) {
740                 memmove(sample_buffer_, sample_buffer_ + sample_buffer_first_ * channels * file_info->sample_format_bytes_per_sample, (sample_buffer_last_ - sample_buffer_first_) * channels * file_info->sample_format_bytes_per_sample);
741                 sample_buffer_last_ -= sample_buffer_first_;
742                 sample_buffer_first_ = 0;
743         }
744         sample_buffer_start = sample_buffer_ + sample_buffer_last_ * channels * file_info->sample_format_bytes_per_sample;
745         if(file_info->has_replaygain && flac_cfg.output.replaygain.enable) {
746                 FLAC__replaygain_synthesis__apply_gain(
747                                 sample_buffer_start,
748                                 !is_big_endian_host_,
749                                 file_info->sample_format_bytes_per_sample == 1, /* unsigned_data_out */
750                                 buffer,
751                                 wide_samples,
752                                 channels,
753                                 bits_per_sample,
754                                 file_info->sample_format_bytes_per_sample * 8,
755                                 file_info->replay_scale,
756                                 flac_cfg.output.replaygain.hard_limit,
757                                 flac_cfg.output.resolution.replaygain.dither,
758                                 &file_info->dither_context
759                 );
760         }
761         else if(is_big_endian_host_) {
762                 FLAC__plugin_common__pack_pcm_signed_big_endian(
763                         sample_buffer_start,
764                         buffer,
765                         wide_samples,
766                         channels,
767                         bits_per_sample,
768                         file_info->sample_format_bytes_per_sample * 8
769                 );
770         }
771         else {
772                 FLAC__plugin_common__pack_pcm_signed_little_endian(
773                         sample_buffer_start,
774                         buffer,
775                         wide_samples,
776                         channels,
777                         bits_per_sample,
778                         file_info->sample_format_bytes_per_sample * 8
779                 );
780         }
781
782         sample_buffer_last_ += wide_samples;
783
784         return FLAC__STREAM_DECODER_WRITE_STATUS_CONTINUE;
785 }
786
787 void metadata_callback_(const void *decoder, const FLAC__StreamMetadata *metadata, void *client_data)
788 {
789         file_info_struct *file_info = (file_info_struct *)client_data;
790         (void)decoder;
791         if(metadata->type == FLAC__METADATA_TYPE_STREAMINFO) {
792                 FLAC__ASSERT(metadata->data.stream_info.total_samples < FLAC__U64L(0x100000000)); /* this plugin can only handle < 4 gigasamples */
793                 file_info->total_samples = (unsigned)(metadata->data.stream_info.total_samples&0xffffffff);
794                 file_info->bits_per_sample = metadata->data.stream_info.bits_per_sample;
795                 file_info->channels = metadata->data.stream_info.channels;
796                 file_info->sample_rate = metadata->data.stream_info.sample_rate;
797                 file_info->length_in_msec = (FLAC__uint64)file_info->total_samples * 10 / (file_info->sample_rate / 100);
798         }
799         else if(metadata->type == FLAC__METADATA_TYPE_VORBIS_COMMENT) {
800                 double gain, peak;
801                 if(grabbag__replaygain_load_from_vorbiscomment(metadata, flac_cfg.output.replaygain.album_mode, &gain, &peak)) {
802                         file_info->has_replaygain = true;
803                         file_info->replay_scale = grabbag__replaygain_compute_scale_factor(peak, gain, (double)flac_cfg.output.replaygain.preamp, /*prevent_clipping=*/!flac_cfg.output.replaygain.hard_limit);
804                 }
805         }
806 }
807
808 void error_callback_(const void *decoder, FLAC__StreamDecoderErrorStatus status, void *client_data)
809 {
810         file_info_struct *file_info = (file_info_struct *)client_data;
811         (void)decoder;
812         if(status != FLAC__STREAM_DECODER_ERROR_STATUS_LOST_SYNC)
813                 file_info->abort_flag = true;
814 }