/*
 *	TwoLAME: an optimized MPEG Audio Layer Two encoder
 *
 *	Copyright (C) 2004-2007 The TwoLAME Project
 *
 *	This library is free software; you can redistribute it and/or
 *	modify it under the terms of the GNU Lesser General Public
 *	License as published by the Free Software Foundation; either
 *	version 2.1 of the License, or (at your option) any later version.
 *
 *	This library 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
 *	Lesser General Public License for more details.
 *
 *	You should have received a copy of the GNU Lesser General Public
 *	License along with this library; if not, write to the Free Software
 *	Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
 *  $Id: audioin_raw.c,v 1.1 2008-02-01 19:44:25 richardash1981 Exp $
 *
 */

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <errno.h>
#include "frontend.h"


/* We still use libsndfiles' SF_INFO structure for convenience */


static void print_info_raw(struct audioin_s *audioin )
{

	fprintf(stderr, "Raw input format: %d channels, %d-bit, %d Hz\n",
		audioin->sfinfo->channels, audioin->samplesize, audioin->sfinfo->samplerate );
	
}


/* Read in some audio samples into buffer */
static int read_raw( audioin_t* audioin, short *buffer, int samples) 
{
	FILE* file = audioin->file;
	
	if (audioin->samplesize==16) {
		return fread( buffer, 2, samples, file );
	} else {
		fprintf(stderr, "Error: sorry %d-bit samples are not supported at the moment.\n", audioin->samplesize);
	}
	
	// Error
	return -1;
}


/* Return error string (or NULL) */
static const char* error_str_raw( audioin_t* audioin )
{
	FILE* file = audioin->file;
	int error = ferror( file );
	if (error==0) return NULL;
	return strerror(error);
}


static int close_raw( audioin_t* audioin )
{
	FILE* file = audioin->file;

	free( audioin );
	
	return fclose( file );
}


audioin_t* open_audioin_raw( char* filename, SF_INFO *sfinfo, int samplesize )
{
	audioin_t* audioin = NULL;


	// Allocate memory for structure
	audioin = malloc( sizeof( audioin_t ) );
	if (audioin==NULL) {
		fprintf(stderr, "Failed to allocate memory for audioin_t structure.\n");
		exit(ERR_MEM_ALLOC);
	}
	
	// Open the input file by filename
	if (strcmp(filename, "-") == 0) {
		// Use STDIN
		audioin->file = stdin;
	} else {
		audioin->file = fopen(filename, "rb");
	}

	// Check for errors
	if (audioin->file == NULL) {
		fprintf(stderr, "Failed to open input file (%s):\n", filename);
		fprintf(stderr, "  %s\n", strerror(errno));
		exit(ERR_OPENING_INPUT);
	}

	// Fill-in data structure
	audioin->samplesize = samplesize;
	audioin->sfinfo = sfinfo;
	audioin->print_info = print_info_raw;
	audioin->read = read_raw;
	audioin->error_str = error_str_raw;
	audioin->close = close_raw;


	return audioin;
}