Chris@1: /* example_c_encode_file - Simple FLAC file encoder using libFLAC
Chris@1:  * Copyright (C) 2007  Josh Coalson
Chris@1:  *
Chris@1:  * This program is free software; you can redistribute it and/or
Chris@1:  * modify it under the terms of the GNU General Public License
Chris@1:  * as published by the Free Software Foundation; either version 2
Chris@1:  * of the License, or (at your option) any later version.
Chris@1:  *
Chris@1:  * This program is distributed in the hope that it will be useful,
Chris@1:  * but WITHOUT ANY WARRANTY; without even the implied warranty of
Chris@1:  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
Chris@1:  * GNU General Public License for more details.
Chris@1:  *
Chris@1:  * You should have received a copy of the GNU General Public License
Chris@1:  * along with this program; if not, write to the Free Software
Chris@1:  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
Chris@1:  */
Chris@1: 
Chris@1: /*
Chris@1:  * This example shows how to use libFLAC to encode a WAVE file to a FLAC
Chris@1:  * file.  It only supports 16-bit stereo files in canonical WAVE format.
Chris@1:  *
Chris@1:  * Complete API documentation can be found at:
Chris@1:  *   http://flac.sourceforge.net/api/
Chris@1:  */
Chris@1: 
Chris@1: #if HAVE_CONFIG_H
Chris@1: #  include <config.h>
Chris@1: #endif
Chris@1: 
Chris@1: #include <stdio.h>
Chris@1: #include <stdlib.h>
Chris@1: #include <string.h>
Chris@1: #include "FLAC/metadata.h"
Chris@1: #include "FLAC/stream_encoder.h"
Chris@1: 
Chris@1: static void progress_callback(const FLAC__StreamEncoder *encoder, FLAC__uint64 bytes_written, FLAC__uint64 samples_written, unsigned frames_written, unsigned total_frames_estimate, void *client_data);
Chris@1: 
Chris@1: #define READSIZE 1024
Chris@1: 
Chris@1: static unsigned total_samples = 0; /* can use a 32-bit number due to WAVE size limitations */
Chris@1: static FLAC__byte buffer[READSIZE/*samples*/ * 2/*bytes_per_sample*/ * 2/*channels*/]; /* we read the WAVE data into here */
Chris@1: static FLAC__int32 pcm[READSIZE/*samples*/ * 2/*channels*/];
Chris@1: 
Chris@1: int main(int argc, char *argv[])
Chris@1: {
Chris@1: 	FLAC__bool ok = true;
Chris@1: 	FLAC__StreamEncoder *encoder = 0;
Chris@1: 	FLAC__StreamEncoderInitStatus init_status;
Chris@1: 	FLAC__StreamMetadata *metadata[2];
Chris@1: 	FLAC__StreamMetadata_VorbisComment_Entry entry;
Chris@1: 	FILE *fin;
Chris@1: 	unsigned sample_rate = 0;
Chris@1: 	unsigned channels = 0;
Chris@1: 	unsigned bps = 0;
Chris@1: 
Chris@1: 	if(argc != 3) {
Chris@1: 		fprintf(stderr, "usage: %s infile.wav outfile.flac\n", argv[0]);
Chris@1: 		return 1;
Chris@1: 	}
Chris@1: 
Chris@1: 	if((fin = fopen(argv[1], "rb")) == NULL) {
Chris@1: 		fprintf(stderr, "ERROR: opening %s for output\n", argv[1]);
Chris@1: 		return 1;
Chris@1: 	}
Chris@1: 
Chris@1: 	/* read wav header and validate it */
Chris@1: 	if(
Chris@1: 		fread(buffer, 1, 44, fin) != 44 ||
Chris@1: 		memcmp(buffer, "RIFF", 4) ||
Chris@1: 		memcmp(buffer+8, "WAVEfmt \020\000\000\000\001\000\002\000", 16) ||
Chris@1: 		memcmp(buffer+32, "\004\000\020\000data", 8)
Chris@1: 	) {
Chris@1: 		fprintf(stderr, "ERROR: invalid/unsupported WAVE file, only 16bps stereo WAVE in canonical form allowed\n");
Chris@1: 		fclose(fin);
Chris@1: 		return 1;
Chris@1: 	}
Chris@1: 	sample_rate = ((((((unsigned)buffer[27] << 8) | buffer[26]) << 8) | buffer[25]) << 8) | buffer[24];
Chris@1: 	channels = 2;
Chris@1: 	bps = 16;
Chris@1: 	total_samples = (((((((unsigned)buffer[43] << 8) | buffer[42]) << 8) | buffer[41]) << 8) | buffer[40]) / 4;
Chris@1:    
Chris@1: 	/* allocate the encoder */
Chris@1: 	if((encoder = FLAC__stream_encoder_new()) == NULL) {
Chris@1: 		fprintf(stderr, "ERROR: allocating encoder\n");
Chris@1: 		fclose(fin);
Chris@1: 		return 1;
Chris@1: 	}
Chris@1: 
Chris@1: 	ok &= FLAC__stream_encoder_set_verify(encoder, true);
Chris@1: 	ok &= FLAC__stream_encoder_set_compression_level(encoder, 5);
Chris@1: 	ok &= FLAC__stream_encoder_set_channels(encoder, channels);
Chris@1: 	ok &= FLAC__stream_encoder_set_bits_per_sample(encoder, bps);
Chris@1: 	ok &= FLAC__stream_encoder_set_sample_rate(encoder, sample_rate);
Chris@1: 	ok &= FLAC__stream_encoder_set_total_samples_estimate(encoder, total_samples);
Chris@1: 
Chris@1: 	/* now add some metadata; we'll add some tags and a padding block */
Chris@1: 	if(ok) {
Chris@1: 		if(
Chris@1: 			(metadata[0] = FLAC__metadata_object_new(FLAC__METADATA_TYPE_VORBIS_COMMENT)) == NULL ||
Chris@1: 			(metadata[1] = FLAC__metadata_object_new(FLAC__METADATA_TYPE_PADDING)) == NULL ||
Chris@1: 			/* there are many tag (vorbiscomment) functions but these are convenient for this particular use: */
Chris@1: 			!FLAC__metadata_object_vorbiscomment_entry_from_name_value_pair(&entry, "ARTIST", "Some Artist") ||
Chris@1: 			!FLAC__metadata_object_vorbiscomment_append_comment(metadata[0], entry, /*copy=*/false) || /* copy=false: let metadata object take control of entry's allocated string */
Chris@1: 			!FLAC__metadata_object_vorbiscomment_entry_from_name_value_pair(&entry, "YEAR", "1984") ||
Chris@1: 			!FLAC__metadata_object_vorbiscomment_append_comment(metadata[0], entry, /*copy=*/false)
Chris@1: 		) {
Chris@1: 			fprintf(stderr, "ERROR: out of memory or tag error\n");
Chris@1: 			ok = false;
Chris@1: 		}
Chris@1: 
Chris@1: 		metadata[1]->length = 1234; /* set the padding length */
Chris@1: 
Chris@1: 		ok = FLAC__stream_encoder_set_metadata(encoder, metadata, 2);
Chris@1: 	}
Chris@1: 
Chris@1: 	/* initialize encoder */
Chris@1: 	if(ok) {
Chris@1: 		init_status = FLAC__stream_encoder_init_file(encoder, argv[2], progress_callback, /*client_data=*/NULL);
Chris@1: 		if(init_status != FLAC__STREAM_ENCODER_INIT_STATUS_OK) {
Chris@1: 			fprintf(stderr, "ERROR: initializing encoder: %s\n", FLAC__StreamEncoderInitStatusString[init_status]);
Chris@1: 			ok = false;
Chris@1: 		}
Chris@1: 	}
Chris@1: 
Chris@1: 	/* read blocks of samples from WAVE file and feed to encoder */
Chris@1: 	if(ok) {
Chris@1: 		size_t left = (size_t)total_samples;
Chris@1: 		while(ok && left) {
Chris@1: 			size_t need = (left>READSIZE? (size_t)READSIZE : (size_t)left);
Chris@1: 			if(fread(buffer, channels*(bps/8), need, fin) != need) {
Chris@1: 				fprintf(stderr, "ERROR: reading from WAVE file\n");
Chris@1: 				ok = false;
Chris@1: 			}
Chris@1: 			else {
Chris@1: 				/* convert the packed little-endian 16-bit PCM samples from WAVE into an interleaved FLAC__int32 buffer for libFLAC */
Chris@1: 				size_t i;
Chris@1: 				for(i = 0; i < need*channels; i++) {
Chris@1: 					/* inefficient but simple and works on big- or little-endian machines */
Chris@1: 					pcm[i] = (FLAC__int32)(((FLAC__int16)(FLAC__int8)buffer[2*i+1] << 8) | (FLAC__int16)buffer[2*i]);
Chris@1: 				}
Chris@1: 				/* feed samples to encoder */
Chris@1: 				ok = FLAC__stream_encoder_process_interleaved(encoder, pcm, need);
Chris@1: 			}
Chris@1: 			left -= need;
Chris@1: 		}
Chris@1: 	}
Chris@1: 
Chris@1: 	ok &= FLAC__stream_encoder_finish(encoder);
Chris@1: 
Chris@1: 	fprintf(stderr, "encoding: %s\n", ok? "succeeded" : "FAILED");
Chris@1: 	fprintf(stderr, "   state: %s\n", FLAC__StreamEncoderStateString[FLAC__stream_encoder_get_state(encoder)]);
Chris@1: 
Chris@1: 	/* now that encoding is finished, the metadata can be freed */
Chris@1: 	FLAC__metadata_object_delete(metadata[0]);
Chris@1: 	FLAC__metadata_object_delete(metadata[1]);
Chris@1: 
Chris@1: 	FLAC__stream_encoder_delete(encoder);
Chris@1: 	fclose(fin);
Chris@1: 
Chris@1: 	return 0;
Chris@1: }
Chris@1: 
Chris@1: void progress_callback(const FLAC__StreamEncoder *encoder, FLAC__uint64 bytes_written, FLAC__uint64 samples_written, unsigned frames_written, unsigned total_frames_estimate, void *client_data)
Chris@1: {
Chris@1: 	(void)encoder, (void)client_data;
Chris@1: 
Chris@1: #ifdef _MSC_VER
Chris@1: 	fprintf(stderr, "wrote %I64u bytes, %I64u/%u samples, %u/%u frames\n", bytes_written, samples_written, total_samples, frames_written, total_frames_estimate);
Chris@1: #else
Chris@1: 	fprintf(stderr, "wrote %llu bytes, %llu/%u samples, %u/%u frames\n", bytes_written, samples_written, total_samples, frames_written, total_frames_estimate);
Chris@1: #endif
Chris@1: }