cregit-Linux how code gets into the kernel

Release 4.14 sound/oss/midi_synth.c

Directory: sound/oss
/*
 * 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]); */ ; } }

Contributors

PersonTokensPropCommitsCommitProp
Linus Torvalds (pre-git)253100.00%4100.00%
Total253100.00%4100.00%

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"); }

Contributors

PersonTokensPropCommitsCommitProp
Linus Torvalds (pre-git)83100.00%3100.00%
Total83100.00%3100.00%


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); }

Contributors

PersonTokensPropCommitsCommitProp
Linus Torvalds (pre-git)44100.00%2100.00%
Total44100.00%2100.00%


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; } }

Contributors

PersonTokensPropCommitsCommitProp
Linus Torvalds (pre-git)513100.00%4100.00%
Total513100.00%4100.00%


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; }

Contributors

PersonTokensPropCommitsCommitProp
Linus Torvalds (pre-git)69100.00%3100.00%
Total69100.00%3100.00%


static void midi_synth_output(int dev) { /* * Currently NOP */ }

Contributors

PersonTokensPropCommitsCommitProp
Linus Torvalds (pre-git)10100.00%3100.00%
Total10100.00%3100.00%


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; } }

Contributors

PersonTokensPropCommitsCommitProp
Linus Torvalds (pre-git)6295.38%685.71%
Al Viro34.62%114.29%
Total65100.00%7100.00%

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; }

Contributors

PersonTokensPropCommitsCommitProp
Linus Torvalds (pre-git)281100.00%3100.00%
Total281100.00%3100.00%

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; }

Contributors

PersonTokensPropCommitsCommitProp
Linus Torvalds (pre-git)99100.00%3100.00%
Total99100.00%3100.00%

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; }

Contributors

PersonTokensPropCommitsCommitProp
Linus Torvalds (pre-git)194100.00%3100.00%
Total194100.00%3100.00%

EXPORT_SYMBOL(midi_synth_start_note);
void midi_synth_reset(int dev) { leave_sysex(dev); }

Contributors

PersonTokensPropCommitsCommitProp
Linus Torvalds (pre-git)13100.00%2100.00%
Total13100.00%2100.00%

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; }

Contributors

PersonTokensPropCommitsCommitProp
Linus Torvalds (pre-git)14097.90%466.67%
Peter Wächtler21.40%116.67%
Roel Kluin10.70%116.67%
Total143100.00%6100.00%

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); }

Contributors

PersonTokensPropCommitsCommitProp
Linus Torvalds (pre-git)46100.00%4100.00%
Total46100.00%4100.00%

EXPORT_SYMBOL(midi_synth_close);
void midi_synth_hw_control(int dev, unsigned char *event) { }

Contributors

PersonTokensPropCommitsCommitProp
Linus Torvalds (pre-git)12100.00%1100.00%
Total12100.00%1100.00%

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; }

Contributors

PersonTokensPropCommitsCommitProp
Linus Torvalds (pre-git)31393.99%1076.92%
Dan Rosenberg103.00%17.69%
Vasiliy Kulikov82.40%17.69%
Al Viro20.60%17.69%
Total333100.00%13100.00%

EXPORT_SYMBOL(midi_synth_load_patch);
void midi_synth_panning(int dev, int channel, int pressure) { }

Contributors

PersonTokensPropCommitsCommitProp
Linus Torvalds (pre-git)13100.00%2100.00%
Total13100.00%2100.00%

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); }

Contributors

PersonTokensPropCommitsCommitProp
Linus Torvalds (pre-git)137100.00%4100.00%
Total137100.00%4100.00%

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); }

Contributors

PersonTokensPropCommitsCommitProp
Linus Torvalds (pre-git)147100.00%3100.00%
Total147100.00%3100.00%

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); }

Contributors

PersonTokensPropCommitsCommitProp
Linus Torvalds (pre-git)153100.00%3100.00%
Total153100.00%3100.00%

EXPORT_SYMBOL(midi_synth_bender);
void midi_synth_setup_voice(int dev, int voice, int channel) { }

Contributors

PersonTokensPropCommitsCommitProp
Linus Torvalds (pre-git)13100.00%1100.00%
Total13100.00%1100.00%

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; }

Contributors

PersonTokensPropCommitsCommitProp
Linus Torvalds (pre-git)220100.00%3100.00%
Total220100.00%3100.00%

EXPORT_SYMBOL(midi_synth_send_sysex);

Overall Contributors

PersonTokensPropCommitsCommitProp
Linus Torvalds (pre-git)288196.42%1770.83%
Adrian Bunk802.68%14.17%
Dan Rosenberg100.33%14.17%
Vasiliy Kulikov80.27%14.17%
Al Viro50.17%14.17%
Peter Wächtler20.07%14.17%
Roel Kluin10.03%14.17%
Uwe Zeisberger10.03%14.17%
Total2988100.00%24100.00%
Directory: sound/oss
Information contained on this website is for historical information purposes only and does not indicate or represent copyright ownership.
Created with cregit.