 b769f49463
			
		
	
	
	b769f49463
	
	
	
		
			
			Was: [PATCH] sound/oss/midi_synth: prevent underflow, use of uninitialized value, and signedness issue The offset passed to midi_synth_load_patch() can be essentially arbitrary. If it's greater than the header length, this will result in a copy_from_user(dst, src, negative_val). While this will just return -EFAULT on x86, on other architectures this may cause memory corruption. Additionally, the length field of the sysex_info structure may not be initialized prior to its use. Finally, a signed comparison may result in an unintentionally large loop. On suggestion by Takashi Iwai, version two removes the offset argument from the load_patch callbacks entirely, which also resolves similar issues in opl3. Compile tested only. v3 adjusts comments and hopefully gets copy offsets right. Signed-off-by: Dan Rosenberg <drosenberg@vsecurity.com> Signed-off-by: Takashi Iwai <tiwai@suse.de>
		
			
				
	
	
		
			712 lines
		
	
	
	
		
			15 KiB
			
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			712 lines
		
	
	
	
		
			15 KiB
			
		
	
	
	
		
			C
		
	
	
	
	
	
| /*
 | |
|  * sound/oss/midi_synth.c
 | |
|  *
 | |
|  * High level midi sequencer manager for dumb MIDI interfaces.
 | |
|  */
 | |
| /*
 | |
|  * Copyright (C) by Hannu Savolainen 1993-1997
 | |
|  *
 | |
|  * OSS/Free for Linux is distributed under the GNU GENERAL PUBLIC LICENSE (GPL)
 | |
|  * Version 2 (June 1991). See the "COPYING" file distributed with this software
 | |
|  * for more info.
 | |
|  */
 | |
| /*
 | |
|  * Thomas Sailer   : ioctl code reworked (vmalloc/vfree removed)
 | |
|  * Andrew Veliath  : fixed running status in MIDI input state machine
 | |
|  */
 | |
| #define USE_SEQ_MACROS
 | |
| #define USE_SIMPLE_MACROS
 | |
| 
 | |
| #include "sound_config.h"
 | |
| 
 | |
| #define _MIDI_SYNTH_C_
 | |
| 
 | |
| #include "midi_synth.h"
 | |
| 
 | |
| static int      midi2synth[MAX_MIDI_DEV];
 | |
| static int      sysex_state[MAX_MIDI_DEV] =
 | |
| {0};
 | |
| static unsigned char prev_out_status[MAX_MIDI_DEV];
 | |
| 
 | |
| #define STORE(cmd) \
 | |
| { \
 | |
|   int len; \
 | |
|   unsigned char obuf[8]; \
 | |
|   cmd; \
 | |
|   seq_input_event(obuf, len); \
 | |
| }
 | |
| 
 | |
| #define _seqbuf obuf
 | |
| #define _seqbufptr 0
 | |
| #define _SEQ_ADVBUF(x) len=x
 | |
| 
 | |
| void
 | |
| do_midi_msg(int synthno, unsigned char *msg, int mlen)
 | |
| {
 | |
| 	switch (msg[0] & 0xf0)
 | |
| 	  {
 | |
| 	  case 0x90:
 | |
| 		  if (msg[2] != 0)
 | |
| 		    {
 | |
| 			    STORE(SEQ_START_NOTE(synthno, msg[0] & 0x0f, msg[1], msg[2]));
 | |
| 			    break;
 | |
| 		    }
 | |
| 		  msg[2] = 64;
 | |
| 
 | |
| 	  case 0x80:
 | |
| 		  STORE(SEQ_STOP_NOTE(synthno, msg[0] & 0x0f, msg[1], msg[2]));
 | |
| 		  break;
 | |
| 
 | |
| 	  case 0xA0:
 | |
| 		  STORE(SEQ_KEY_PRESSURE(synthno, msg[0] & 0x0f, msg[1], msg[2]));
 | |
| 		  break;
 | |
| 
 | |
| 	  case 0xB0:
 | |
| 		  STORE(SEQ_CONTROL(synthno, msg[0] & 0x0f,
 | |
| 				    msg[1], msg[2]));
 | |
| 		  break;
 | |
| 
 | |
| 	  case 0xC0:
 | |
| 		  STORE(SEQ_SET_PATCH(synthno, msg[0] & 0x0f, msg[1]));
 | |
| 		  break;
 | |
| 
 | |
| 	  case 0xD0:
 | |
| 		  STORE(SEQ_CHN_PRESSURE(synthno, msg[0] & 0x0f, msg[1]));
 | |
| 		  break;
 | |
| 
 | |
| 	  case 0xE0:
 | |
| 		  STORE(SEQ_BENDER(synthno, msg[0] & 0x0f,
 | |
| 			      (msg[1] & 0x7f) | ((msg[2] & 0x7f) << 7)));
 | |
| 		  break;
 | |
| 
 | |
| 	  default:
 | |
| 		  /* printk( "MPU: Unknown midi channel message %02x\n",  msg[0]); */
 | |
| 		  ;
 | |
| 	  }
 | |
| }
 | |
| EXPORT_SYMBOL(do_midi_msg);
 | |
| 
 | |
| static void
 | |
| midi_outc(int midi_dev, int data)
 | |
| {
 | |
| 	int             timeout;
 | |
| 
 | |
| 	for (timeout = 0; timeout < 3200; timeout++)
 | |
| 		if (midi_devs[midi_dev]->outputc(midi_dev, (unsigned char) (data & 0xff)))
 | |
| 		  {
 | |
| 			  if (data & 0x80)	/*
 | |
| 						 * Status byte
 | |
| 						 */
 | |
| 				  prev_out_status[midi_dev] =
 | |
| 				      (unsigned char) (data & 0xff);	/*
 | |
| 									 * Store for running status
 | |
| 									 */
 | |
| 			  return;	/*
 | |
| 					 * Mission complete
 | |
| 					 */
 | |
| 		  }
 | |
| 	/*
 | |
| 	 * Sorry! No space on buffers.
 | |
| 	 */
 | |
| 	printk("Midi send timed out\n");
 | |
| }
 | |
| 
 | |
| static int
 | |
| prefix_cmd(int midi_dev, unsigned char status)
 | |
| {
 | |
| 	if ((char *) midi_devs[midi_dev]->prefix_cmd == NULL)
 | |
| 		return 1;
 | |
| 
 | |
| 	return midi_devs[midi_dev]->prefix_cmd(midi_dev, status);
 | |
| }
 | |
| 
 | |
| static void
 | |
| midi_synth_input(int orig_dev, unsigned char data)
 | |
| {
 | |
| 	int             dev;
 | |
| 	struct midi_input_info *inc;
 | |
| 
 | |
| 	static unsigned char len_tab[] =	/* # of data bytes following a status
 | |
| 						 */
 | |
| 	{
 | |
| 		2,		/* 8x */
 | |
| 		2,		/* 9x */
 | |
| 		2,		/* Ax */
 | |
| 		2,		/* Bx */
 | |
| 		1,		/* Cx */
 | |
| 		1,		/* Dx */
 | |
| 		2,		/* Ex */
 | |
| 		0		/* Fx */
 | |
| 	};
 | |
| 
 | |
| 	if (orig_dev < 0 || orig_dev > num_midis || midi_devs[orig_dev] == NULL)
 | |
| 		return;
 | |
| 
 | |
| 	if (data == 0xfe)	/* Ignore active sensing */
 | |
| 		return;
 | |
| 
 | |
| 	dev = midi2synth[orig_dev];
 | |
| 	inc = &midi_devs[orig_dev]->in_info;
 | |
| 
 | |
| 	switch (inc->m_state)
 | |
| 	  {
 | |
| 	  case MST_INIT:
 | |
| 		  if (data & 0x80)	/* MIDI status byte */
 | |
| 		    {
 | |
| 			    if ((data & 0xf0) == 0xf0)	/* Common message */
 | |
| 			      {
 | |
| 				      switch (data)
 | |
| 					{
 | |
| 					case 0xf0:	/* Sysex */
 | |
| 						inc->m_state = MST_SYSEX;
 | |
| 						break;	/* Sysex */
 | |
| 
 | |
| 					case 0xf1:	/* MTC quarter frame */
 | |
| 					case 0xf3:	/* Song select */
 | |
| 						inc->m_state = MST_DATA;
 | |
| 						inc->m_ptr = 1;
 | |
| 						inc->m_left = 1;
 | |
| 						inc->m_buf[0] = data;
 | |
| 						break;
 | |
| 
 | |
| 					case 0xf2:	/* Song position pointer */
 | |
| 						inc->m_state = MST_DATA;
 | |
| 						inc->m_ptr = 1;
 | |
| 						inc->m_left = 2;
 | |
| 						inc->m_buf[0] = data;
 | |
| 						break;
 | |
| 
 | |
| 					default:
 | |
| 						inc->m_buf[0] = data;
 | |
| 						inc->m_ptr = 1;
 | |
| 						do_midi_msg(dev, inc->m_buf, inc->m_ptr);
 | |
| 						inc->m_ptr = 0;
 | |
| 						inc->m_left = 0;
 | |
| 					}
 | |
| 			    } else
 | |
| 			      {
 | |
| 				      inc->m_state = MST_DATA;
 | |
| 				      inc->m_ptr = 1;
 | |
| 				      inc->m_left = len_tab[(data >> 4) - 8];
 | |
| 				      inc->m_buf[0] = inc->m_prev_status = data;
 | |
| 			      }
 | |
| 		    } else if (inc->m_prev_status & 0x80) {
 | |
| 			    /* Data byte (use running status) */
 | |
| 			    inc->m_ptr = 2;
 | |
| 			    inc->m_buf[1] = data;
 | |
| 			    inc->m_buf[0] = inc->m_prev_status;
 | |
| 			    inc->m_left = len_tab[(inc->m_buf[0] >> 4) - 8] - 1;
 | |
| 			    if (inc->m_left > 0)
 | |
| 				    inc->m_state = MST_DATA; /* Not done yet */
 | |
| 			    else {
 | |
| 				    inc->m_state = MST_INIT;
 | |
| 				    do_midi_msg(dev, inc->m_buf, inc->m_ptr);
 | |
| 				    inc->m_ptr = 0;
 | |
| 			    }
 | |
| 		    }
 | |
| 		  break;	/* MST_INIT */
 | |
| 
 | |
| 	  case MST_DATA:
 | |
| 		  inc->m_buf[inc->m_ptr++] = data;
 | |
| 		  if (--inc->m_left <= 0)
 | |
| 		    {
 | |
| 			    inc->m_state = MST_INIT;
 | |
| 			    do_midi_msg(dev, inc->m_buf, inc->m_ptr);
 | |
| 			    inc->m_ptr = 0;
 | |
| 		    }
 | |
| 		  break;	/* MST_DATA */
 | |
| 
 | |
| 	  case MST_SYSEX:
 | |
| 		  if (data == 0xf7)	/* Sysex end */
 | |
| 		    {
 | |
| 			    inc->m_state = MST_INIT;
 | |
| 			    inc->m_left = 0;
 | |
| 			    inc->m_ptr = 0;
 | |
| 		    }
 | |
| 		  break;	/* MST_SYSEX */
 | |
| 
 | |
| 	  default:
 | |
| 		  printk("MIDI%d: Unexpected state %d (%02x)\n", orig_dev, inc->m_state, (int) data);
 | |
| 		  inc->m_state = MST_INIT;
 | |
| 	  }
 | |
| }
 | |
| 
 | |
| static void
 | |
| leave_sysex(int dev)
 | |
| {
 | |
| 	int             orig_dev = synth_devs[dev]->midi_dev;
 | |
| 	int             timeout = 0;
 | |
| 
 | |
| 	if (!sysex_state[dev])
 | |
| 		return;
 | |
| 
 | |
| 	sysex_state[dev] = 0;
 | |
| 
 | |
| 	while (!midi_devs[orig_dev]->outputc(orig_dev, 0xf7) &&
 | |
| 	       timeout < 1000)
 | |
| 		timeout++;
 | |
| 
 | |
| 	sysex_state[dev] = 0;
 | |
| }
 | |
| 
 | |
| static void
 | |
| midi_synth_output(int dev)
 | |
| {
 | |
| 	/*
 | |
| 	 * Currently NOP
 | |
| 	 */
 | |
| }
 | |
| 
 | |
| int midi_synth_ioctl(int dev, unsigned int cmd, void __user *arg)
 | |
| {
 | |
| 	/*
 | |
| 	 * int orig_dev = synth_devs[dev]->midi_dev;
 | |
| 	 */
 | |
| 
 | |
| 	switch (cmd) {
 | |
| 
 | |
| 	case SNDCTL_SYNTH_INFO:
 | |
| 		if (__copy_to_user(arg, synth_devs[dev]->info, sizeof(struct synth_info)))
 | |
| 			return -EFAULT;
 | |
| 		return 0;
 | |
| 		
 | |
| 	case SNDCTL_SYNTH_MEMAVL:
 | |
| 		return 0x7fffffff;
 | |
| 
 | |
| 	default:
 | |
| 		return -EINVAL;
 | |
| 	}
 | |
| }
 | |
| EXPORT_SYMBOL(midi_synth_ioctl);
 | |
| 
 | |
| int
 | |
| midi_synth_kill_note(int dev, int channel, int note, int velocity)
 | |
| {
 | |
| 	int             orig_dev = synth_devs[dev]->midi_dev;
 | |
| 	int             msg, chn;
 | |
| 
 | |
| 	if (note < 0 || note > 127)
 | |
| 		return 0;
 | |
| 	if (channel < 0 || channel > 15)
 | |
| 		return 0;
 | |
| 	if (velocity < 0)
 | |
| 		velocity = 0;
 | |
| 	if (velocity > 127)
 | |
| 		velocity = 127;
 | |
| 
 | |
| 	leave_sysex(dev);
 | |
| 
 | |
| 	msg = prev_out_status[orig_dev] & 0xf0;
 | |
| 	chn = prev_out_status[orig_dev] & 0x0f;
 | |
| 
 | |
| 	if (chn == channel && ((msg == 0x90 && velocity == 64) || msg == 0x80))
 | |
| 	  {			/*
 | |
| 				 * Use running status
 | |
| 				 */
 | |
| 		  if (!prefix_cmd(orig_dev, note))
 | |
| 			  return 0;
 | |
| 
 | |
| 		  midi_outc(orig_dev, note);
 | |
| 
 | |
| 		  if (msg == 0x90)	/*
 | |
| 					 * Running status = Note on
 | |
| 					 */
 | |
| 			  midi_outc(orig_dev, 0);	/*
 | |
| 							   * Note on with velocity 0 == note
 | |
| 							   * off
 | |
| 							 */
 | |
| 		  else
 | |
| 			  midi_outc(orig_dev, velocity);
 | |
| 	} else
 | |
| 	  {
 | |
| 		  if (velocity == 64)
 | |
| 		    {
 | |
| 			    if (!prefix_cmd(orig_dev, 0x90 | (channel & 0x0f)))
 | |
| 				    return 0;
 | |
| 			    midi_outc(orig_dev, 0x90 | (channel & 0x0f));	/*
 | |
| 										 * Note on
 | |
| 										 */
 | |
| 			    midi_outc(orig_dev, note);
 | |
| 			    midi_outc(orig_dev, 0);	/*
 | |
| 							 * Zero G
 | |
| 							 */
 | |
| 		  } else
 | |
| 		    {
 | |
| 			    if (!prefix_cmd(orig_dev, 0x80 | (channel & 0x0f)))
 | |
| 				    return 0;
 | |
| 			    midi_outc(orig_dev, 0x80 | (channel & 0x0f));	/*
 | |
| 										 * Note off
 | |
| 										 */
 | |
| 			    midi_outc(orig_dev, note);
 | |
| 			    midi_outc(orig_dev, velocity);
 | |
| 		    }
 | |
| 	  }
 | |
| 
 | |
| 	return 0;
 | |
| }
 | |
| EXPORT_SYMBOL(midi_synth_kill_note);
 | |
| 
 | |
| int
 | |
| midi_synth_set_instr(int dev, int channel, int instr_no)
 | |
| {
 | |
| 	int             orig_dev = synth_devs[dev]->midi_dev;
 | |
| 
 | |
| 	if (instr_no < 0 || instr_no > 127)
 | |
| 		instr_no = 0;
 | |
| 	if (channel < 0 || channel > 15)
 | |
| 		return 0;
 | |
| 
 | |
| 	leave_sysex(dev);
 | |
| 
 | |
| 	if (!prefix_cmd(orig_dev, 0xc0 | (channel & 0x0f)))
 | |
| 		return 0;
 | |
| 	midi_outc(orig_dev, 0xc0 | (channel & 0x0f));	/*
 | |
| 							 * Program change
 | |
| 							 */
 | |
| 	midi_outc(orig_dev, instr_no);
 | |
| 
 | |
| 	return 0;
 | |
| }
 | |
| EXPORT_SYMBOL(midi_synth_set_instr);
 | |
| 
 | |
| int
 | |
| midi_synth_start_note(int dev, int channel, int note, int velocity)
 | |
| {
 | |
| 	int             orig_dev = synth_devs[dev]->midi_dev;
 | |
| 	int             msg, chn;
 | |
| 
 | |
| 	if (note < 0 || note > 127)
 | |
| 		return 0;
 | |
| 	if (channel < 0 || channel > 15)
 | |
| 		return 0;
 | |
| 	if (velocity < 0)
 | |
| 		velocity = 0;
 | |
| 	if (velocity > 127)
 | |
| 		velocity = 127;
 | |
| 
 | |
| 	leave_sysex(dev);
 | |
| 
 | |
| 	msg = prev_out_status[orig_dev] & 0xf0;
 | |
| 	chn = prev_out_status[orig_dev] & 0x0f;
 | |
| 
 | |
| 	if (chn == channel && msg == 0x90)
 | |
| 	  {			/*
 | |
| 				 * Use running status
 | |
| 				 */
 | |
| 		  if (!prefix_cmd(orig_dev, note))
 | |
| 			  return 0;
 | |
| 		  midi_outc(orig_dev, note);
 | |
| 		  midi_outc(orig_dev, velocity);
 | |
| 	} else
 | |
| 	  {
 | |
| 		  if (!prefix_cmd(orig_dev, 0x90 | (channel & 0x0f)))
 | |
| 			  return 0;
 | |
| 		  midi_outc(orig_dev, 0x90 | (channel & 0x0f));		/*
 | |
| 									 * Note on
 | |
| 									 */
 | |
| 		  midi_outc(orig_dev, note);
 | |
| 		  midi_outc(orig_dev, velocity);
 | |
| 	  }
 | |
| 	return 0;
 | |
| }
 | |
| EXPORT_SYMBOL(midi_synth_start_note);
 | |
| 
 | |
| void
 | |
| midi_synth_reset(int dev)
 | |
| {
 | |
| 
 | |
| 	leave_sysex(dev);
 | |
| }
 | |
| EXPORT_SYMBOL(midi_synth_reset);
 | |
| 
 | |
| int
 | |
| midi_synth_open(int dev, int mode)
 | |
| {
 | |
| 	int             orig_dev = synth_devs[dev]->midi_dev;
 | |
| 	int             err;
 | |
| 	struct midi_input_info *inc;
 | |
| 
 | |
| 	if (orig_dev < 0 || orig_dev >= num_midis || midi_devs[orig_dev] == NULL)
 | |
| 		return -ENXIO;
 | |
| 
 | |
| 	midi2synth[orig_dev] = dev;
 | |
| 	sysex_state[dev] = 0;
 | |
| 	prev_out_status[orig_dev] = 0;
 | |
| 
 | |
| 	if ((err = midi_devs[orig_dev]->open(orig_dev, mode,
 | |
| 			       midi_synth_input, midi_synth_output)) < 0)
 | |
| 		return err;
 | |
| 	inc = &midi_devs[orig_dev]->in_info;
 | |
| 
 | |
| 	/* save_flags(flags);
 | |
| 	cli(); 
 | |
| 	don't know against what irqhandler to protect*/
 | |
| 	inc->m_busy = 0;
 | |
| 	inc->m_state = MST_INIT;
 | |
| 	inc->m_ptr = 0;
 | |
| 	inc->m_left = 0;
 | |
| 	inc->m_prev_status = 0x00;
 | |
| 	/* restore_flags(flags); */
 | |
| 
 | |
| 	return 1;
 | |
| }
 | |
| EXPORT_SYMBOL(midi_synth_open);
 | |
| 
 | |
| void
 | |
| midi_synth_close(int dev)
 | |
| {
 | |
| 	int             orig_dev = synth_devs[dev]->midi_dev;
 | |
| 
 | |
| 	leave_sysex(dev);
 | |
| 
 | |
| 	/*
 | |
| 	 * Shut up the synths by sending just single active sensing message.
 | |
| 	 */
 | |
| 	midi_devs[orig_dev]->outputc(orig_dev, 0xfe);
 | |
| 
 | |
| 	midi_devs[orig_dev]->close(orig_dev);
 | |
| }
 | |
| EXPORT_SYMBOL(midi_synth_close);
 | |
| 
 | |
| void
 | |
| midi_synth_hw_control(int dev, unsigned char *event)
 | |
| {
 | |
| }
 | |
| EXPORT_SYMBOL(midi_synth_hw_control);
 | |
| 
 | |
| int
 | |
| midi_synth_load_patch(int dev, int format, const char __user *addr,
 | |
| 		      int count, int pmgr_flag)
 | |
| {
 | |
| 	int             orig_dev = synth_devs[dev]->midi_dev;
 | |
| 
 | |
| 	struct sysex_info sysex;
 | |
| 	int             i;
 | |
| 	unsigned long   left, src_offs, eox_seen = 0;
 | |
| 	int             first_byte = 1;
 | |
| 	int             hdr_size = (unsigned long) &sysex.data[0] - (unsigned long) &sysex;
 | |
| 
 | |
| 	leave_sysex(dev);
 | |
| 
 | |
| 	if (!prefix_cmd(orig_dev, 0xf0))
 | |
| 		return 0;
 | |
| 
 | |
| 	/* Invalid patch format */
 | |
| 	if (format != SYSEX_PATCH)
 | |
| 		  return -EINVAL;
 | |
| 
 | |
| 	/* Patch header too short */
 | |
| 	if (count < hdr_size)
 | |
| 		return -EINVAL;
 | |
| 
 | |
| 	count -= hdr_size;
 | |
| 
 | |
| 	/*
 | |
| 	 * Copy the header from user space
 | |
| 	 */
 | |
| 
 | |
| 	if (copy_from_user(&sysex, addr, hdr_size))
 | |
| 		return -EFAULT;
 | |
| 
 | |
| 	/* Sysex record too short */
 | |
| 	if ((unsigned)count < (unsigned)sysex.len)
 | |
| 		sysex.len = count;
 | |
| 
 | |
| 	left = sysex.len;
 | |
| 	src_offs = 0;
 | |
| 
 | |
| 	for (i = 0; i < left && !signal_pending(current); i++)
 | |
| 	{
 | |
| 		unsigned char   data;
 | |
| 
 | |
| 		if (get_user(data,
 | |
| 		    (unsigned char __user *)(addr + hdr_size + i)))
 | |
| 			return -EFAULT;
 | |
| 
 | |
| 		eox_seen = (i > 0 && data & 0x80);	/* End of sysex */
 | |
| 
 | |
| 		if (eox_seen && data != 0xf7)
 | |
| 			data = 0xf7;
 | |
| 
 | |
| 		if (i == 0)
 | |
| 		{
 | |
| 			if (data != 0xf0)
 | |
| 			{
 | |
| 				printk(KERN_WARNING "midi_synth: Sysex start missing\n");
 | |
| 				return -EINVAL;
 | |
| 			}
 | |
| 		}
 | |
| 		while (!midi_devs[orig_dev]->outputc(orig_dev, (unsigned char) (data & 0xff)) &&
 | |
| 			!signal_pending(current))
 | |
| 			schedule();
 | |
| 
 | |
| 		if (!first_byte && data & 0x80)
 | |
| 			return 0;
 | |
| 		first_byte = 0;
 | |
| 	}
 | |
| 
 | |
| 	if (!eox_seen)
 | |
| 		midi_outc(orig_dev, 0xf7);
 | |
| 	return 0;
 | |
| }
 | |
| EXPORT_SYMBOL(midi_synth_load_patch);
 | |
| 
 | |
| void midi_synth_panning(int dev, int channel, int pressure)
 | |
| {
 | |
| }
 | |
| EXPORT_SYMBOL(midi_synth_panning);
 | |
| 
 | |
| void midi_synth_aftertouch(int dev, int channel, int pressure)
 | |
| {
 | |
| 	int             orig_dev = synth_devs[dev]->midi_dev;
 | |
| 	int             msg, chn;
 | |
| 
 | |
| 	if (pressure < 0 || pressure > 127)
 | |
| 		return;
 | |
| 	if (channel < 0 || channel > 15)
 | |
| 		return;
 | |
| 
 | |
| 	leave_sysex(dev);
 | |
| 
 | |
| 	msg = prev_out_status[orig_dev] & 0xf0;
 | |
| 	chn = prev_out_status[orig_dev] & 0x0f;
 | |
| 
 | |
| 	if (msg != 0xd0 || chn != channel)	/*
 | |
| 						 * Test for running status
 | |
| 						 */
 | |
| 	  {
 | |
| 		  if (!prefix_cmd(orig_dev, 0xd0 | (channel & 0x0f)))
 | |
| 			  return;
 | |
| 		  midi_outc(orig_dev, 0xd0 | (channel & 0x0f));		/*
 | |
| 									 * Channel pressure
 | |
| 									 */
 | |
| 	} else if (!prefix_cmd(orig_dev, pressure))
 | |
| 		return;
 | |
| 
 | |
| 	midi_outc(orig_dev, pressure);
 | |
| }
 | |
| EXPORT_SYMBOL(midi_synth_aftertouch);
 | |
| 
 | |
| void
 | |
| midi_synth_controller(int dev, int channel, int ctrl_num, int value)
 | |
| {
 | |
| 	int             orig_dev = synth_devs[dev]->midi_dev;
 | |
| 	int             chn, msg;
 | |
| 
 | |
| 	if (ctrl_num < 0 || ctrl_num > 127)
 | |
| 		return;
 | |
| 	if (channel < 0 || channel > 15)
 | |
| 		return;
 | |
| 
 | |
| 	leave_sysex(dev);
 | |
| 
 | |
| 	msg = prev_out_status[orig_dev] & 0xf0;
 | |
| 	chn = prev_out_status[orig_dev] & 0x0f;
 | |
| 
 | |
| 	if (msg != 0xb0 || chn != channel)
 | |
| 	  {
 | |
| 		  if (!prefix_cmd(orig_dev, 0xb0 | (channel & 0x0f)))
 | |
| 			  return;
 | |
| 		  midi_outc(orig_dev, 0xb0 | (channel & 0x0f));
 | |
| 	} else if (!prefix_cmd(orig_dev, ctrl_num))
 | |
| 		return;
 | |
| 
 | |
| 	midi_outc(orig_dev, ctrl_num);
 | |
| 	midi_outc(orig_dev, value & 0x7f);
 | |
| }
 | |
| EXPORT_SYMBOL(midi_synth_controller);
 | |
| 
 | |
| void
 | |
| midi_synth_bender(int dev, int channel, int value)
 | |
| {
 | |
| 	int             orig_dev = synth_devs[dev]->midi_dev;
 | |
| 	int             msg, prev_chn;
 | |
| 
 | |
| 	if (channel < 0 || channel > 15)
 | |
| 		return;
 | |
| 
 | |
| 	if (value < 0 || value > 16383)
 | |
| 		return;
 | |
| 
 | |
| 	leave_sysex(dev);
 | |
| 
 | |
| 	msg = prev_out_status[orig_dev] & 0xf0;
 | |
| 	prev_chn = prev_out_status[orig_dev] & 0x0f;
 | |
| 
 | |
| 	if (msg != 0xd0 || prev_chn != channel)		/*
 | |
| 							 * Test for running status
 | |
| 							 */
 | |
| 	  {
 | |
| 		  if (!prefix_cmd(orig_dev, 0xe0 | (channel & 0x0f)))
 | |
| 			  return;
 | |
| 		  midi_outc(orig_dev, 0xe0 | (channel & 0x0f));
 | |
| 	} else if (!prefix_cmd(orig_dev, value & 0x7f))
 | |
| 		return;
 | |
| 
 | |
| 	midi_outc(orig_dev, value & 0x7f);
 | |
| 	midi_outc(orig_dev, (value >> 7) & 0x7f);
 | |
| }
 | |
| EXPORT_SYMBOL(midi_synth_bender);
 | |
| 
 | |
| void
 | |
| midi_synth_setup_voice(int dev, int voice, int channel)
 | |
| {
 | |
| }
 | |
| EXPORT_SYMBOL(midi_synth_setup_voice);
 | |
| 
 | |
| int
 | |
| midi_synth_send_sysex(int dev, unsigned char *bytes, int len)
 | |
| {
 | |
| 	int             orig_dev = synth_devs[dev]->midi_dev;
 | |
| 	int             i;
 | |
| 
 | |
| 	for (i = 0; i < len; i++)
 | |
| 	  {
 | |
| 		  switch (bytes[i])
 | |
| 		    {
 | |
| 		    case 0xf0:	/* Start sysex */
 | |
| 			    if (!prefix_cmd(orig_dev, 0xf0))
 | |
| 				    return 0;
 | |
| 			    sysex_state[dev] = 1;
 | |
| 			    break;
 | |
| 
 | |
| 		    case 0xf7:	/* End sysex */
 | |
| 			    if (!sysex_state[dev])	/* Orphan sysex end */
 | |
| 				    return 0;
 | |
| 			    sysex_state[dev] = 0;
 | |
| 			    break;
 | |
| 
 | |
| 		    default:
 | |
| 			    if (!sysex_state[dev])
 | |
| 				    return 0;
 | |
| 
 | |
| 			    if (bytes[i] & 0x80)	/* Error. Another message before sysex end */
 | |
| 			      {
 | |
| 				      bytes[i] = 0xf7;	/* Sysex end */
 | |
| 				      sysex_state[dev] = 0;
 | |
| 			      }
 | |
| 		    }
 | |
| 
 | |
| 		  if (!midi_devs[orig_dev]->outputc(orig_dev, bytes[i]))
 | |
| 		    {
 | |
| /*
 | |
|  * Hardware level buffer is full. Abort the sysex message.
 | |
|  */
 | |
| 
 | |
| 			    int             timeout = 0;
 | |
| 
 | |
| 			    bytes[i] = 0xf7;
 | |
| 			    sysex_state[dev] = 0;
 | |
| 
 | |
| 			    while (!midi_devs[orig_dev]->outputc(orig_dev, bytes[i]) &&
 | |
| 				   timeout < 1000)
 | |
| 				    timeout++;
 | |
| 		    }
 | |
| 		  if (!sysex_state[dev])
 | |
| 			  return 0;
 | |
| 	  }
 | |
| 
 | |
| 	return 0;
 | |
| }
 | |
| EXPORT_SYMBOL(midi_synth_send_sysex);
 | |
| 
 |