1 files changed, 377 insertions, 0 deletions
diff --git a/src/encoder/VorbisEncoderPlugin.cxx b/src/encoder/VorbisEncoderPlugin.cxx
new file mode 100644
index 00000000..dc7ef0d5
--- /dev/null
+++ b/src/encoder/VorbisEncoderPlugin.cxx
@@ -0,0 +1,377 @@
+/*
+ * Copyright (C) 2003-2012 The Music Player Daemon Project
+ * http://www.musicpd.org
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License along
+ * with this program; if not, write to the Free Software Foundation, Inc.,
+ * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+ */
+
+#include "config.h"
+#include "VorbisEncoderPlugin.hxx"
+#include "OggStream.hxx"
+#include "encoder_api.h"
+#include "encoder_plugin.h"
+#include "tag.h"
+#include "audio_format.h"
+#include "mpd_error.h"
+
+#include <vorbis/vorbisenc.h>
+
+#include <assert.h>
+
+#undef G_LOG_DOMAIN
+#define G_LOG_DOMAIN "vorbis_encoder"
+
+struct vorbis_encoder {
+	/** the base class */
+	struct encoder encoder;
+
+	/* configuration */
+
+	float quality;
+	int bitrate;
+
+	/* runtime information */
+
+	struct audio_format audio_format;
+
+	vorbis_dsp_state vd;
+	vorbis_block vb;
+	vorbis_info vi;
+
+	OggStream stream;
+
+	vorbis_encoder() {
+		encoder_struct_init(&encoder, &vorbis_encoder_plugin);
+	}
+};
+
+static inline GQuark
+vorbis_encoder_quark(void)
+{
+	return g_quark_from_static_string("vorbis_encoder");
+}
+
+static bool
+vorbis_encoder_configure(struct vorbis_encoder *encoder,
+			 const struct config_param *param, GError **error)
+{
+	const char *value = config_get_block_string(param, "quality", nullptr);
+	if (value != nullptr) {
+		/* a quality was configured (VBR) */
+
+		char *endptr;
+		encoder->quality = g_ascii_strtod(value, &endptr);
+
+		if (*endptr != '\0' || encoder->quality < -1.0 ||
+		    encoder->quality > 10.0) {
+			g_set_error(error, vorbis_encoder_quark(), 0,
+				    "quality \"%s\" is not a number in the "
+				    "range -1 to 10, line %i",
+				    value, param->line);
+			return false;
+		}
+
+		if (config_get_block_string(param, "bitrate", nullptr) != nullptr) {
+			g_set_error(error, vorbis_encoder_quark(), 0,
+				    "quality and bitrate are "
+				    "both defined (line %i)",
+				    param->line);
+			return false;
+		}
+	} else {
+		/* a bit rate was configured */
+
+		value = config_get_block_string(param, "bitrate", nullptr);
+		if (value == nullptr) {
+			g_set_error(error, vorbis_encoder_quark(), 0,
+				    "neither bitrate nor quality defined "
+				    "at line %i",
+				    param->line);
+			return false;
+		}
+
+		encoder->quality = -2.0;
+
+		char *endptr;
+		encoder->bitrate = g_ascii_strtoll(value, &endptr, 10);
+		if (*endptr != '\0' || encoder->bitrate <= 0) {
+			g_set_error(error, vorbis_encoder_quark(), 0,
+				    "bitrate at line %i should be a positive integer",
+				    param->line);
+			return false;
+		}
+	}
+
+	return true;
+}
+
+static struct encoder *
+vorbis_encoder_init(const struct config_param *param, GError **error)
+{
+	vorbis_encoder *encoder = new vorbis_encoder();
+
+	/* load configuration from "param" */
+	if (!vorbis_encoder_configure(encoder, param, error)) {
+		/* configuration has failed, roll back and return error */
+		delete encoder;
+		return nullptr;
+	}
+
+	return &encoder->encoder;
+}
+
+static void
+vorbis_encoder_finish(struct encoder *_encoder)
+{
+	struct vorbis_encoder *encoder = (struct vorbis_encoder *)_encoder;
+
+	/* the real libvorbis/libogg cleanup was already performed by
+	   vorbis_encoder_close(), so no real work here */
+	delete encoder;
+}
+
+static bool
+vorbis_encoder_reinit(struct vorbis_encoder *encoder, GError **error)
+{
+	vorbis_info_init(&encoder->vi);
+
+	if (encoder->quality >= -1.0) {
+		/* a quality was configured (VBR) */
+
+		if (0 != vorbis_encode_init_vbr(&encoder->vi,
+						encoder->audio_format.channels,
+						encoder->audio_format.sample_rate,
+						encoder->quality * 0.1)) {
+			g_set_error(error, vorbis_encoder_quark(), 0,
+				    "error initializing vorbis vbr");
+			vorbis_info_clear(&encoder->vi);
+			return false;
+		}
+	} else {
+		/* a bit rate was configured */
+
+		if (0 != vorbis_encode_init(&encoder->vi,
+					    encoder->audio_format.channels,
+					    encoder->audio_format.sample_rate, -1.0,
+					    encoder->bitrate * 1000, -1.0)) {
+			g_set_error(error, vorbis_encoder_quark(), 0,
+				    "error initializing vorbis encoder");
+			vorbis_info_clear(&encoder->vi);
+			return false;
+		}
+	}
+
+	vorbis_analysis_init(&encoder->vd, &encoder->vi);
+	vorbis_block_init(&encoder->vd, &encoder->vb);
+	encoder->stream.Initialize(g_random_int());
+
+	return true;
+}
+
+static void
+vorbis_encoder_headerout(struct vorbis_encoder *encoder, vorbis_comment *vc)
+{
+	ogg_packet packet, comments, codebooks;
+
+	vorbis_analysis_headerout(&encoder->vd, vc,
+				  &packet, &comments, &codebooks);
+
+	encoder->stream.PacketIn(packet);
+	encoder->stream.PacketIn(comments);
+	encoder->stream.PacketIn(codebooks);
+}
+
+static void
+vorbis_encoder_send_header(struct vorbis_encoder *encoder)
+{
+	vorbis_comment vc;
+
+	vorbis_comment_init(&vc);
+	vorbis_encoder_headerout(encoder, &vc);
+	vorbis_comment_clear(&vc);
+}
+
+static bool
+vorbis_encoder_open(struct encoder *_encoder,
+		    struct audio_format *audio_format,
+		    GError **error)
+{
+	struct vorbis_encoder *encoder = (struct vorbis_encoder *)_encoder;
+
+	audio_format->format = SAMPLE_FORMAT_FLOAT;
+
+	encoder->audio_format = *audio_format;
+
+	if (!vorbis_encoder_reinit(encoder, error))
+		return false;
+
+	vorbis_encoder_send_header(encoder);
+
+	return true;
+}
+
+static void
+vorbis_encoder_clear(struct vorbis_encoder *encoder)
+{
+	encoder->stream.Deinitialize();
+	vorbis_block_clear(&encoder->vb);
+	vorbis_dsp_clear(&encoder->vd);
+	vorbis_info_clear(&encoder->vi);
+}
+
+static void
+vorbis_encoder_close(struct encoder *_encoder)
+{
+	struct vorbis_encoder *encoder = (struct vorbis_encoder *)_encoder;
+
+	vorbis_encoder_clear(encoder);
+}
+
+static void
+vorbis_encoder_blockout(struct vorbis_encoder *encoder)
+{
+	while (vorbis_analysis_blockout(&encoder->vd, &encoder->vb) == 1) {
+		vorbis_analysis(&encoder->vb, nullptr);
+		vorbis_bitrate_addblock(&encoder->vb);
+
+		ogg_packet packet;
+		while (vorbis_bitrate_flushpacket(&encoder->vd, &packet))
+			encoder->stream.PacketIn(packet);
+	}
+}
+
+static bool
+vorbis_encoder_flush(struct encoder *_encoder, G_GNUC_UNUSED GError **error)
+{
+	struct vorbis_encoder *encoder = (struct vorbis_encoder *)_encoder;
+
+	encoder->stream.Flush();
+	return true;
+}
+
+static bool
+vorbis_encoder_pre_tag(struct encoder *_encoder, G_GNUC_UNUSED GError **error)
+{
+	struct vorbis_encoder *encoder = (struct vorbis_encoder *)_encoder;
+
+	vorbis_analysis_wrote(&encoder->vd, 0);
+	vorbis_encoder_blockout(encoder);
+
+	/* reinitialize vorbis_dsp_state and vorbis_block to reset the
+	   end-of-stream marker */
+	vorbis_block_clear(&encoder->vb);
+	vorbis_dsp_clear(&encoder->vd);
+	vorbis_analysis_init(&encoder->vd, &encoder->vi);
+	vorbis_block_init(&encoder->vd, &encoder->vb);
+
+	encoder->stream.Flush();
+	return true;
+}
+
+static void
+copy_tag_to_vorbis_comment(vorbis_comment *vc, const struct tag *tag)
+{
+	for (unsigned i = 0; i < tag->num_items; i++) {
+		struct tag_item *item = tag->items[i];
+		char *name = g_ascii_strup(tag_item_names[item->type], -1);
+		vorbis_comment_add_tag(vc, name, item->value);
+		g_free(name);
+	}
+}
+
+static bool
+vorbis_encoder_tag(struct encoder *_encoder, const struct tag *tag,
+		   G_GNUC_UNUSED GError **error)
+{
+	struct vorbis_encoder *encoder = (struct vorbis_encoder *)_encoder;
+	vorbis_comment comment;
+
+	/* write the vorbis_comment object */
+
+	vorbis_comment_init(&comment);
+	copy_tag_to_vorbis_comment(&comment, tag);
+
+	/* reset ogg_stream_state and begin a new stream */
+
+	encoder->stream.Reinitialize(g_random_int());
+
+	/* send that vorbis_comment to the ogg_stream_state */
+
+	vorbis_encoder_headerout(encoder, &comment);
+	vorbis_comment_clear(&comment);
+
+	return true;
+}
+
+static void
+interleaved_to_vorbis_buffer(float **dest, const float *src,
+			     unsigned num_frames, unsigned num_channels)
+{
+	for (unsigned i = 0; i < num_frames; i++)
+		for (unsigned j = 0; j < num_channels; j++)
+			dest[j][i] = *src++;
+}
+
+static bool
+vorbis_encoder_write(struct encoder *_encoder,
+		     const void *data, size_t length,
+		     G_GNUC_UNUSED GError **error)
+{
+	struct vorbis_encoder *encoder = (struct vorbis_encoder *)_encoder;
+
+	unsigned num_frames = length
+		/ audio_format_frame_size(&encoder->audio_format);
+
+	/* this is for only 16-bit audio */
+
+	interleaved_to_vorbis_buffer(vorbis_analysis_buffer(&encoder->vd,
+							    num_frames),
+				     (const float *)data,
+				     num_frames,
+				     encoder->audio_format.channels);
+
+	vorbis_analysis_wrote(&encoder->vd, num_frames);
+	vorbis_encoder_blockout(encoder);
+	return true;
+}
+
+static size_t
+vorbis_encoder_read(struct encoder *_encoder, void *dest, size_t length)
+{
+	struct vorbis_encoder *encoder = (struct vorbis_encoder *)_encoder;
+
+	return encoder->stream.PageOut(dest, length);
+}
+
+static const char *
+vorbis_encoder_get_mime_type(G_GNUC_UNUSED struct encoder *_encoder)
+{
+	return  "audio/ogg";
+}
+
+const struct encoder_plugin vorbis_encoder_plugin = {
+	"vorbis",
+	vorbis_encoder_init,
+	vorbis_encoder_finish,
+	vorbis_encoder_open,
+	vorbis_encoder_close,
+	vorbis_encoder_pre_tag,
+	vorbis_encoder_flush,
+	vorbis_encoder_pre_tag,
+	vorbis_encoder_tag,
+	vorbis_encoder_write,
+	vorbis_encoder_read,
+	vorbis_encoder_get_mime_type,
+};