/* 

    TiMidity -- Experimental MIDI to WAVE converter
    Copyright (C) 1995 Tuukka Toivonen <toivonen@clinet.fi>

    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., 675 Mass Ave, Cambridge, MA 02139, USA.

    dumb_c.c
    Minimal control mode -- no interaction, just prints out messages.
    */

#include <stdio.h>
#include <stdlib.h>
#include <stdarg.h>

#include "config.h"
#include "common.h"
#include "output.h"
#include "controls.h"
#include "instrum.h"
#include "playmidi.h"

static void ctl_refresh(void);
static void ctl_total_time(int tt);
static void ctl_master_volume(int mv);
static void ctl_file_name(char *name);
static void ctl_current_time(int ct);
static void ctl_note(int v);
static void ctl_program(int ch, int val);
static void ctl_volume(int channel, int val);
static void ctl_expression(int channel, int val);
static void ctl_panning(int channel, int val);
static void ctl_sustain(int channel, int val);
static void ctl_pitch_bend(int channel, int val);
static void ctl_reset(void);
static int ctl_open(int using_stdin, int using_stdout);
static void ctl_close(void);
static int ctl_read(int32 *valp);
static int cmsg(int type, int verbosity_level, char *fmt, ...);

/**********************************/
/* export the interface functions */

#define ctl beos_control_mode

ControlMode ctl= 
{
  "dumb interface", 'd',
  1,0,0,
  ctl_open,dumb_pass_playing_list, ctl_close, ctl_read, cmsg,
  ctl_refresh, ctl_reset, ctl_file_name, ctl_total_time, ctl_current_time, 
  ctl_note, 
  ctl_master_volume, ctl_program, ctl_volume, 
  ctl_expression, ctl_panning, ctl_sustain, ctl_pitch_bend
};

static FILE *infp=stdin, *outfp=stdout; /* infp isn't actually used yet */

static int ctl_open(int using_stdin, int using_stdout)
{
  	if (using_stdin && using_stdout)
  	{
    	infp=outfp=stderr;
    }
  	else if (using_stdout)
  	{
    	outfp=stderr;
    }
  	else if (using_stdin)
  	{
    	infp=stdout;
    }

  	ctl.verbosity=VERB_NORMAL;
  	ctl.opened=1;
  	return 0;
}

static void ctl_close(void)
{ 
  	fflush(outfp);
  	ctl.opened=0;
}

#define BEOS_JUMP 	1
#define BEOS_VOLUME	2
#define BEOS_LOOP	3

extern ulong beos_flags;
extern ulong beos_volume;
extern ulong beos_jump;

static int ctl_read(int32 *valp)
{
	if(beos_flags&(1<<BEOS_JUMP))
	{
		*valp=beos_jump;
		beos_flags&=~(1<<BEOS_JUMP);
		return RC_JUMP;
	}
	if(beos_flags&(1<<BEOS_VOLUME))
	{
		*valp=beos_volume;
		beos_flags&=~(1<<BEOS_VOLUME);
		return RC_VOLUME;
	}
  	return RC_NONE;
}

static int cmsg(int type, int verbosity_level, char *fmt, ...)
{
  va_list ap;
  if ((type==CMSG_TEXT || type==CMSG_INFO || type==CMSG_WARNING) &&
      ctl.verbosity<verbosity_level)
    return 0;
  va_start(ap, fmt);
  if (!ctl.opened)
    {
      vfprintf(stderr, fmt, ap);
      fprintf(stderr, "\n");
    }
  else
    {
      vfprintf(outfp, fmt, ap);
      fprintf(outfp, "\n");
    }
  va_end(ap);
  return 0;
}

static void ctl_refresh(void) 
{ 
}

static void ctl_total_time(int tt)
{
  	int mins, secs;
  	if (ctl.trace_playing)
    {
      	secs=tt/play_mode->rate;
      	mins=secs/60;
      	secs-=mins*60;
//     	fprintf(outfp, "Total playing time: %3d min %02d s\n", mins, secs);
    }
}

static void ctl_master_volume(int mv) 
{
}

static void ctl_file_name(char *name)
{
  	if (ctl.verbosity>=0 || ctl.trace_playing)
  	{
//    	fprintf(outfp, "Playing %s\n", name);
    }
}

static void ctl_current_time(int ct)
{
  	int mins, secs;
  	if (ctl.trace_playing)
    {
      	secs=ct/play_mode->rate;
      	mins=secs/60;
      	secs-=mins*60;
      	fprintf(outfp, "\r%3d:%02d", mins, secs);
      	fflush(outfp);
    }
}

static void ctl_note(int v) {}

static void ctl_program(int ch, int val) {}

static void ctl_volume(int channel, int val) {}

static void ctl_expression(int channel, int val) {}

static void ctl_panning(int channel, int val) {}

static void ctl_sustain(int channel, int val) {}

static void ctl_pitch_bend(int channel, int val) {}

static void ctl_reset(void) {}
