Logo Search packages:      
Sourcecode: alsa-driver version File versions

mts64.c

/*     
 *   ALSA Driver for Ego Systems Inc. (ESI) Miditerminal 4140
 *   Copyright (c) 2006 by Matthias K├Ânig <mk@phasorlab.de>
 *
 *   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., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 *
 */

#include <linux/init.h>
#include <linux/platform_device.h>
#include <linux/parport.h>
#include <linux/spinlock.h>
#include <linux/delay.h>
#include <sound/core.h>
#include <sound/initval.h>
#include <sound/rawmidi.h>
#include <sound/control.h>

#define CARD_NAME "Miditerminal 4140"
#define DRIVER_NAME "MTS64"
#define PLATFORM_DRIVER "snd_mts64"

static int index[SNDRV_CARDS]  = SNDRV_DEFAULT_IDX;
static char *id[SNDRV_CARDS]   = SNDRV_DEFAULT_STR;
static int enable[SNDRV_CARDS] = SNDRV_DEFAULT_ENABLE_PNP;

static struct platform_device *platform_devices[SNDRV_CARDS]; 
static int device_count;

module_param_array(index, int, NULL, S_IRUGO);
MODULE_PARM_DESC(index, "Index value for " CARD_NAME " soundcard.");
module_param_array(id, charp, NULL, S_IRUGO);
MODULE_PARM_DESC(id, "ID string for " CARD_NAME " soundcard.");
module_param_array(enable, bool, NULL, S_IRUGO);
MODULE_PARM_DESC(enable, "Enable " CARD_NAME " soundcard.");

MODULE_AUTHOR("Matthias Koenig <mk@phasorlab.de>");
MODULE_DESCRIPTION("ESI Miditerminal 4140");
MODULE_LICENSE("GPL");
MODULE_SUPPORTED_DEVICE("{{ESI,Miditerminal 4140}}");

/*********************************************************************
 * Chip specific
 *********************************************************************/
#define MTS64_NUM_INPUT_PORTS 5
#define MTS64_NUM_OUTPUT_PORTS 4
#define MTS64_SMPTE_SUBSTREAM 4

struct mts64 {
      spinlock_t lock;
      struct snd_card *card;
      struct snd_rawmidi *rmidi;
      struct pardevice *pardev;
      int pardev_claimed;

      int open_count;
      int current_midi_output_port;
      int current_midi_input_port;
      u8 mode[MTS64_NUM_INPUT_PORTS];
      struct snd_rawmidi_substream *midi_input_substream[MTS64_NUM_INPUT_PORTS];
      int smpte_switch;
      u8 time[4]; /* [0]=hh, [1]=mm, [2]=ss, [3]=ff */
      u8 fps;
};

static int snd_mts64_free(struct mts64 *mts)
{
      kfree(mts);
      return 0;
}

static int __devinit snd_mts64_create(struct snd_card *card, 
                              struct pardevice *pardev, 
                              struct mts64 **rchip)
{
      struct mts64 *mts;

      *rchip = NULL;

      mts = kzalloc(sizeof(struct mts64), GFP_KERNEL);
      if (mts == NULL) 
            return -ENOMEM;

      /* Init chip specific data */
      spin_lock_init(&mts->lock);
      mts->card = card;
      mts->pardev = pardev;
      mts->current_midi_output_port = -1;
      mts->current_midi_input_port = -1;

      *rchip = mts;

      return 0;
}

/*********************************************************************
 * HW register related constants
 *********************************************************************/

/* Status Bits */
#define MTS64_STAT_BSY             0x80
#define MTS64_STAT_BIT_SET         0x20  /* readout process, bit is set */
#define MTS64_STAT_PORT            0x10  /* read byte is a port number */

/* Control Bits */
#define MTS64_CTL_READOUT          0x08  /* enable readout */
#define MTS64_CTL_WRITE_CMD        0x06  
#define MTS64_CTL_WRITE_DATA       0x02  
#define MTS64_CTL_STROBE           0x01  

/* Command */
#define MTS64_CMD_RESET            0xfe
#define MTS64_CMD_PROBE            0x8f  /* Used in probing procedure */
#define MTS64_CMD_SMPTE_SET_TIME   0xe8
#define MTS64_CMD_SMPTE_SET_FPS    0xee
#define MTS64_CMD_SMPTE_STOP       0xef
#define MTS64_CMD_SMPTE_FPS_24     0xe3
#define MTS64_CMD_SMPTE_FPS_25     0xe2
#define MTS64_CMD_SMPTE_FPS_2997   0xe4 
#define MTS64_CMD_SMPTE_FPS_30D    0xe1
#define MTS64_CMD_SMPTE_FPS_30     0xe0
#define MTS64_CMD_COM_OPEN         0xf8  /* setting the communication mode */
#define MTS64_CMD_COM_CLOSE1       0xff  /* clearing communication mode */
#define MTS64_CMD_COM_CLOSE2       0xf5

/*********************************************************************
 * Hardware specific functions
 *********************************************************************/
static void mts64_enable_readout(struct parport *p);
static void mts64_disable_readout(struct parport *p);
static int mts64_device_ready(struct parport *p);
static int mts64_device_init(struct parport *p);
static int mts64_device_open(struct mts64 *mts);
static int mts64_device_close(struct mts64 *mts);
static u8 mts64_map_midi_input(u8 c);
static int mts64_probe(struct parport *p);
static u16 mts64_read(struct parport *p);
static u8 mts64_read_char(struct parport *p);
static void mts64_smpte_start(struct parport *p,
                        u8 hours, u8 minutes,
                        u8 seconds, u8 frames,
                        u8 idx);
static void mts64_smpte_stop(struct parport *p);
static void mts64_write_command(struct parport *p, u8 c);
static void mts64_write_data(struct parport *p, u8 c);
static void mts64_write_midi(struct mts64 *mts, u8 c, int midiport);


/*  Enables the readout procedure
 *
 *  Before we can read a midi byte from the device, we have to set
 *  bit 3 of control port.
 */
static void mts64_enable_readout(struct parport *p)
{
      u8 c;

      c = parport_read_control(p);
      c |= MTS64_CTL_READOUT;
      parport_write_control(p, c); 
}

/*  Disables readout 
 *
 *  Readout is disabled by clearing bit 3 of control
 */
static void mts64_disable_readout(struct parport *p)
{
      u8 c;

      c = parport_read_control(p);
      c &= ~MTS64_CTL_READOUT;
      parport_write_control(p, c);
}

/*  waits for device ready
 *
 *  Checks if BUSY (Bit 7 of status) is clear
 *  1 device ready
 *  0 failure
 */
static int mts64_device_ready(struct parport *p)
{
      int i;
      u8 c;

      for (i = 0; i < 0xffff; ++i) {
            c = parport_read_status(p);
            c &= MTS64_STAT_BSY;
            if (c != 0) 
                  return 1;
      } 

      return 0;
}

/*  Init device (LED blinking startup magic)
 *
 *  Returns:
 *  0 init ok
 *  -EIO failure
 */
static int __devinit mts64_device_init(struct parport *p)
{
      int i;

      mts64_write_command(p, MTS64_CMD_RESET);

      for (i = 0; i < 64; ++i) {
            msleep(100);

            if (mts64_probe(p) == 0) {
                  /* success */
                  mts64_disable_readout(p);
                  return 0;
            }
      }
      mts64_disable_readout(p);

      return -EIO;
}

/* 
 *  Opens the device (set communication mode)
 */
static int mts64_device_open(struct mts64 *mts)
{
      int i;
      struct parport *p = mts->pardev->port;

      for (i = 0; i < 5; ++i)
            mts64_write_command(p, MTS64_CMD_COM_OPEN);

      return 0;
}

/*  
 *  Close device (clear communication mode)
 */
static int mts64_device_close(struct mts64 *mts)
{
      int i;
      struct parport *p = mts->pardev->port;

      for (i = 0; i < 5; ++i) {
            mts64_write_command(p, MTS64_CMD_COM_CLOSE1);
            mts64_write_command(p, MTS64_CMD_COM_CLOSE2);
      }

      return 0;
}

/*  map hardware port to substream number
 * 
 *  When reading a byte from the device, the device tells us
 *  on what port the byte is. This HW port has to be mapped to
 *  the midiport (substream number).
 *  substream 0-3 are Midiports 1-4
 *  substream 4 is SMPTE Timecode
 *  The mapping is done by the table:
 *  HW | 0 | 1 | 2 | 3 | 4 
 *  SW | 0 | 1 | 4 | 2 | 3
 */
static u8 mts64_map_midi_input(u8 c)
{
      static u8 map[] = { 0, 1, 4, 2, 3 };

      return map[c];
}


/*  Probe parport for device
 *
 *  Do we have a Miditerminal 4140 on parport? 
 *  Returns:
 *  0       device found
 *  -ENODEV no device
 */
static int __devinit mts64_probe(struct parport *p)
{
      u8 c;

      mts64_smpte_stop(p);
      mts64_write_command(p, MTS64_CMD_PROBE);

      msleep(50);
      
      c = mts64_read(p);

      c &= 0x00ff;
      if (c != MTS64_CMD_PROBE) 
            return -ENODEV;
      else 
            return 0;

}

/*  Read byte incl. status from device
 *
 *  Returns:
 *  data in lower 8 bits and status in upper 8 bits
 */
static u16 mts64_read(struct parport *p)
{
      u8 data, status;

      mts64_device_ready(p);
      mts64_enable_readout(p);
      status = parport_read_status(p);
      data = mts64_read_char(p);
      mts64_disable_readout(p);

      return (status << 8) | data;
}

/*  Read a byte from device
 *
 *  Note, that readout mode has to be enabled.
 *  readout procedure is as follows: 
 *  - Write number of the Bit to read to DATA
 *  - Read STATUS
 *  - Bit 5 of STATUS indicates if Bit is set
 *
 *  Returns:
 *  Byte read from device
 */
static u8 mts64_read_char(struct parport *p)
{
      u8 c = 0;
      u8 status;
      u8 i;

      for (i = 0; i < 8; ++i) {
            parport_write_data(p, i);
            c >>= 1;
            status = parport_read_status(p);
            if (status & MTS64_STAT_BIT_SET) 
                  c |= 0x80;
      }
      
      return c;
}

/*  Starts SMPTE Timecode generation
 *
 *  The device creates SMPTE Timecode by hardware.
 *  0 24 fps
 *  1 25 fps
 *  2 29.97 fps
 *  3 30 fps (Drop-frame)
 *  4 30 fps
 */
static void mts64_smpte_start(struct parport *p,
                        u8 hours, u8 minutes,
                        u8 seconds, u8 frames,
                        u8 idx)
{
      static u8 fps[5] = { MTS64_CMD_SMPTE_FPS_24, 
                       MTS64_CMD_SMPTE_FPS_25,
                       MTS64_CMD_SMPTE_FPS_2997, 
                       MTS64_CMD_SMPTE_FPS_30D,
                       MTS64_CMD_SMPTE_FPS_30    };

      mts64_write_command(p, MTS64_CMD_SMPTE_SET_TIME);
      mts64_write_command(p, frames);
      mts64_write_command(p, seconds);
      mts64_write_command(p, minutes);
      mts64_write_command(p, hours);

      mts64_write_command(p, MTS64_CMD_SMPTE_SET_FPS);
      mts64_write_command(p, fps[idx]);
}

/*  Stops SMPTE Timecode generation
 */
static void mts64_smpte_stop(struct parport *p)
{
      mts64_write_command(p, MTS64_CMD_SMPTE_STOP);
}

/*  Write a command byte to device
 */
static void mts64_write_command(struct parport *p, u8 c)
{
      mts64_device_ready(p);

      parport_write_data(p, c);

      parport_write_control(p, MTS64_CTL_WRITE_CMD);
      parport_write_control(p, MTS64_CTL_WRITE_CMD | MTS64_CTL_STROBE);
      parport_write_control(p, MTS64_CTL_WRITE_CMD);
}

/*  Write a data byte to device 
 */
static void mts64_write_data(struct parport *p, u8 c)
{
      mts64_device_ready(p);

      parport_write_data(p, c);

      parport_write_control(p, MTS64_CTL_WRITE_DATA);
      parport_write_control(p, MTS64_CTL_WRITE_DATA | MTS64_CTL_STROBE);
      parport_write_control(p, MTS64_CTL_WRITE_DATA);
}

/*  Write a MIDI byte to midiport
 *
 *  midiport ranges from 0-3 and maps to Ports 1-4
 *  assumptions: communication mode is on
 */
static void mts64_write_midi(struct mts64 *mts, u8 c,
                       int midiport)
{
      struct parport *p = mts->pardev->port;

      /* check current midiport */
      if (mts->current_midi_output_port != midiport)
            mts64_write_command(p, midiport);

      /* write midi byte */
      mts64_write_data(p, c);
}

/*********************************************************************
 * Control elements
 *********************************************************************/

/* SMPTE Switch */
#define snd_mts64_ctl_smpte_switch_info         snd_ctl_boolean_mono_info

static int snd_mts64_ctl_smpte_switch_get(struct snd_kcontrol* kctl,
                                struct snd_ctl_elem_value *uctl)
{
      struct mts64 *mts = snd_kcontrol_chip(kctl);

      spin_lock_irq(&mts->lock);
      uctl->value.integer.value[0] = mts->smpte_switch;
      spin_unlock_irq(&mts->lock);

      return 0;
}

/* smpte_switch is not accessed from IRQ handler, so we just need
   to protect the HW access */
static int snd_mts64_ctl_smpte_switch_put(struct snd_kcontrol* kctl,
                                struct snd_ctl_elem_value *uctl)
{
      struct mts64 *mts = snd_kcontrol_chip(kctl);
      int changed = 0;
      int val = !!uctl->value.integer.value[0];

      spin_lock_irq(&mts->lock);
      if (mts->smpte_switch == val)
            goto __out;

      changed = 1;
      mts->smpte_switch = val;
      if (mts->smpte_switch) {
            mts64_smpte_start(mts->pardev->port,
                          mts->time[0], mts->time[1],
                          mts->time[2], mts->time[3],
                          mts->fps);
      } else {
            mts64_smpte_stop(mts->pardev->port);
      }
__out:
      spin_unlock_irq(&mts->lock);
      return changed;
}

static struct snd_kcontrol_new mts64_ctl_smpte_switch __devinitdata = {
      .iface = SNDRV_CTL_ELEM_IFACE_RAWMIDI,
      .name  = "SMPTE Playback Switch",
      .index = 0,
      .access = SNDRV_CTL_ELEM_ACCESS_READWRITE,
      .private_value = 0,
      .info = snd_mts64_ctl_smpte_switch_info,
      .get  = snd_mts64_ctl_smpte_switch_get,
      .put  = snd_mts64_ctl_smpte_switch_put
};

/* Time */
static int snd_mts64_ctl_smpte_time_h_info(struct snd_kcontrol *kctl,
                                 struct snd_ctl_elem_info *uinfo)
{
      uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
      uinfo->count = 1;
      uinfo->value.integer.min = 0;
      uinfo->value.integer.max = 23;
      return 0;
}

static int snd_mts64_ctl_smpte_time_f_info(struct snd_kcontrol *kctl,
                                 struct snd_ctl_elem_info *uinfo)
{
      uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
      uinfo->count = 1;
      uinfo->value.integer.min = 0;
      uinfo->value.integer.max = 99;
      return 0;
}

static int snd_mts64_ctl_smpte_time_info(struct snd_kcontrol *kctl,
                               struct snd_ctl_elem_info *uinfo)
{
      uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
      uinfo->count = 1;
      uinfo->value.integer.min = 0;
      uinfo->value.integer.max = 59;
      return 0;
}

static int snd_mts64_ctl_smpte_time_get(struct snd_kcontrol *kctl,
                              struct snd_ctl_elem_value *uctl)
{
      struct mts64 *mts = snd_kcontrol_chip(kctl);
      int idx = kctl->private_value;

      spin_lock_irq(&mts->lock);
      uctl->value.integer.value[0] = mts->time[idx];
      spin_unlock_irq(&mts->lock);

      return 0;
}

static int snd_mts64_ctl_smpte_time_put(struct snd_kcontrol *kctl,
                              struct snd_ctl_elem_value *uctl)
{
      struct mts64 *mts = snd_kcontrol_chip(kctl);
      int idx = kctl->private_value;
      unsigned int time = uctl->value.integer.value[0] % 60;
      int changed = 0;

      spin_lock_irq(&mts->lock);
      if (mts->time[idx] != time) {
            changed = 1;
            mts->time[idx] = time;
      }
      spin_unlock_irq(&mts->lock);

      return changed;
}

static struct snd_kcontrol_new mts64_ctl_smpte_time_hours __devinitdata = {
      .iface = SNDRV_CTL_ELEM_IFACE_RAWMIDI,
      .name  = "SMPTE Time Hours",
      .index = 0,
      .access = SNDRV_CTL_ELEM_ACCESS_READWRITE,
      .private_value = 0,
      .info = snd_mts64_ctl_smpte_time_h_info,
      .get  = snd_mts64_ctl_smpte_time_get,
      .put  = snd_mts64_ctl_smpte_time_put
};

static struct snd_kcontrol_new mts64_ctl_smpte_time_minutes __devinitdata = {
      .iface = SNDRV_CTL_ELEM_IFACE_RAWMIDI,
      .name  = "SMPTE Time Minutes",
      .index = 0,
      .access = SNDRV_CTL_ELEM_ACCESS_READWRITE,
      .private_value = 1,
      .info = snd_mts64_ctl_smpte_time_info,
      .get  = snd_mts64_ctl_smpte_time_get,
      .put  = snd_mts64_ctl_smpte_time_put
};

static struct snd_kcontrol_new mts64_ctl_smpte_time_seconds __devinitdata = {
      .iface = SNDRV_CTL_ELEM_IFACE_RAWMIDI,
      .name  = "SMPTE Time Seconds",
      .index = 0,
      .access = SNDRV_CTL_ELEM_ACCESS_READWRITE,
      .private_value = 2,
      .info = snd_mts64_ctl_smpte_time_info,
      .get  = snd_mts64_ctl_smpte_time_get,
      .put  = snd_mts64_ctl_smpte_time_put
};

static struct snd_kcontrol_new mts64_ctl_smpte_time_frames __devinitdata = {
      .iface = SNDRV_CTL_ELEM_IFACE_RAWMIDI,
      .name  = "SMPTE Time Frames",
      .index = 0,
      .access = SNDRV_CTL_ELEM_ACCESS_READWRITE,
      .private_value = 3,
      .info = snd_mts64_ctl_smpte_time_f_info,
      .get  = snd_mts64_ctl_smpte_time_get,
      .put  = snd_mts64_ctl_smpte_time_put
};

/* FPS */
static int snd_mts64_ctl_smpte_fps_info(struct snd_kcontrol *kctl,
                              struct snd_ctl_elem_info *uinfo)
{
      static char *texts[5] = { "24",
                          "25",
                          "29.97",
                          "30D",
                          "30"    };

      uinfo->type = SNDRV_CTL_ELEM_TYPE_ENUMERATED;
      uinfo->count = 1;
      uinfo->value.enumerated.items = 5;
      if (uinfo->value.enumerated.item > 4)
            uinfo->value.enumerated.item = 4;
      strcpy(uinfo->value.enumerated.name,
             texts[uinfo->value.enumerated.item]);
      
      return 0;
}

static int snd_mts64_ctl_smpte_fps_get(struct snd_kcontrol *kctl,
                               struct snd_ctl_elem_value *uctl)
{
      struct mts64 *mts = snd_kcontrol_chip(kctl);

      spin_lock_irq(&mts->lock);
      uctl->value.enumerated.item[0] = mts->fps;
      spin_unlock_irq(&mts->lock);

      return 0;
}

static int snd_mts64_ctl_smpte_fps_put(struct snd_kcontrol *kctl,
                               struct snd_ctl_elem_value *uctl)
{
      struct mts64 *mts = snd_kcontrol_chip(kctl);
      int changed = 0;

      if (uctl->value.enumerated.item[0] >= 5)
            return -EINVAL;
      spin_lock_irq(&mts->lock);
      if (mts->fps != uctl->value.enumerated.item[0]) {
            changed = 1;
            mts->fps = uctl->value.enumerated.item[0];
      }
      spin_unlock_irq(&mts->lock);

      return changed;
}

static struct snd_kcontrol_new mts64_ctl_smpte_fps __devinitdata = {
      .iface = SNDRV_CTL_ELEM_IFACE_RAWMIDI,
      .name  = "SMPTE Fps",
      .index = 0,
      .access = SNDRV_CTL_ELEM_ACCESS_READWRITE,
      .private_value = 0,
      .info  = snd_mts64_ctl_smpte_fps_info,
      .get   = snd_mts64_ctl_smpte_fps_get,
      .put   = snd_mts64_ctl_smpte_fps_put
};


static int __devinit snd_mts64_ctl_create(struct snd_card *card, 
                                struct mts64 *mts) 
{
      int err, i;
      static struct snd_kcontrol_new *control[] __devinitdata = {
            &mts64_ctl_smpte_switch,
            &mts64_ctl_smpte_time_hours,
            &mts64_ctl_smpte_time_minutes,
            &mts64_ctl_smpte_time_seconds,
            &mts64_ctl_smpte_time_frames,
            &mts64_ctl_smpte_fps,
              NULL  };

      for (i = 0; control[i]; ++i) {
            err = snd_ctl_add(card, snd_ctl_new1(control[i], mts));
            if (err < 0) {
                  snd_printd("Cannot create control: %s\n", 
                           control[i]->name);
                  return err;
            }
      }

      return 0;
}

/*********************************************************************
 * Rawmidi
 *********************************************************************/
#define MTS64_MODE_INPUT_TRIGGERED 0x01

static int snd_mts64_rawmidi_open(struct snd_rawmidi_substream *substream)
{
      struct mts64 *mts = substream->rmidi->private_data;

      if (mts->open_count == 0) {
            /* We don't need a spinlock here, because this is just called 
               if the device has not been opened before. 
               So there aren't any IRQs from the device */
            mts64_device_open(mts);

            msleep(50);
      }
      ++(mts->open_count);

      return 0;
}

static int snd_mts64_rawmidi_close(struct snd_rawmidi_substream *substream)
{
      struct mts64 *mts = substream->rmidi->private_data;
      unsigned long flags;

      --(mts->open_count);
      if (mts->open_count == 0) {
            /* We need the spinlock_irqsave here because we can still
               have IRQs at this point */
            spin_lock_irqsave(&mts->lock, flags);
            mts64_device_close(mts);
            spin_unlock_irqrestore(&mts->lock, flags);

            msleep(500);

      } else if (mts->open_count < 0)
            mts->open_count = 0;

      return 0;
}

static void snd_mts64_rawmidi_output_trigger(struct snd_rawmidi_substream *substream,
                                   int up)
{
      struct mts64 *mts = substream->rmidi->private_data;
      u8 data;
      unsigned long flags;

      spin_lock_irqsave(&mts->lock, flags);
      while (snd_rawmidi_transmit_peek(substream, &data, 1) == 1) {
            mts64_write_midi(mts, data, substream->number+1);
            snd_rawmidi_transmit_ack(substream, 1);
      }
      spin_unlock_irqrestore(&mts->lock, flags);
}

static void snd_mts64_rawmidi_input_trigger(struct snd_rawmidi_substream *substream,
                                  int up)
{
      struct mts64 *mts = substream->rmidi->private_data;
      unsigned long flags;

      spin_lock_irqsave(&mts->lock, flags);
      if (up)
            mts->mode[substream->number] |= MTS64_MODE_INPUT_TRIGGERED;
      else
            mts->mode[substream->number] &= ~MTS64_MODE_INPUT_TRIGGERED;
      
      spin_unlock_irqrestore(&mts->lock, flags);
}

static struct snd_rawmidi_ops snd_mts64_rawmidi_output_ops = {
      .open    = snd_mts64_rawmidi_open,
      .close   = snd_mts64_rawmidi_close,
      .trigger = snd_mts64_rawmidi_output_trigger
};

static struct snd_rawmidi_ops snd_mts64_rawmidi_input_ops = {
      .open    = snd_mts64_rawmidi_open,
      .close   = snd_mts64_rawmidi_close,
      .trigger = snd_mts64_rawmidi_input_trigger
};

/* Create and initialize the rawmidi component */
static int __devinit snd_mts64_rawmidi_create(struct snd_card *card)
{
      struct mts64 *mts = card->private_data;
      struct snd_rawmidi *rmidi;
      struct snd_rawmidi_substream *substream;
      struct list_head *list;
      int err;
      
      err = snd_rawmidi_new(card, CARD_NAME, 0, 
                        MTS64_NUM_OUTPUT_PORTS, 
                        MTS64_NUM_INPUT_PORTS, 
                        &rmidi);
      if (err < 0) 
            return err;

      rmidi->private_data = mts;
      strcpy(rmidi->name, CARD_NAME);
      rmidi->info_flags = SNDRV_RAWMIDI_INFO_OUTPUT |
                        SNDRV_RAWMIDI_INFO_INPUT |
                            SNDRV_RAWMIDI_INFO_DUPLEX;

      mts->rmidi = rmidi;

      /* register rawmidi ops */
      snd_rawmidi_set_ops(rmidi, SNDRV_RAWMIDI_STREAM_OUTPUT, 
                      &snd_mts64_rawmidi_output_ops);
      snd_rawmidi_set_ops(rmidi, SNDRV_RAWMIDI_STREAM_INPUT, 
                      &snd_mts64_rawmidi_input_ops);

      /* name substreams */
      /* output */
      list_for_each(list, 
                  &rmidi->streams[SNDRV_RAWMIDI_STREAM_OUTPUT].substreams) {
            substream = list_entry(list, struct snd_rawmidi_substream, list);
            sprintf(substream->name,
                  "Miditerminal %d", substream->number+1);
      }
      /* input */
      list_for_each(list, 
                  &rmidi->streams[SNDRV_RAWMIDI_STREAM_INPUT].substreams) {
            substream = list_entry(list, struct snd_rawmidi_substream, list);
            mts->midi_input_substream[substream->number] = substream;
            switch(substream->number) {
            case MTS64_SMPTE_SUBSTREAM:
                  strcpy(substream->name, "Miditerminal SMPTE");
                  break;
            default:
                  sprintf(substream->name,
                        "Miditerminal %d", substream->number+1);
            }
      }

      /* controls */
      err = snd_mts64_ctl_create(card, mts);

      return err;
}

/*********************************************************************
 * parport stuff
 *********************************************************************/
static void snd_mts64_interrupt(void *private)
{
      struct mts64 *mts = ((struct snd_card*)private)->private_data;
      u16 ret;
      u8 status, data;
      struct snd_rawmidi_substream *substream;

      spin_lock(&mts->lock);
      ret = mts64_read(mts->pardev->port);
      data = ret & 0x00ff;
      status = ret >> 8;

      if (status & MTS64_STAT_PORT) {
            mts->current_midi_input_port = mts64_map_midi_input(data);
      } else {
            if (mts->current_midi_input_port == -1) 
                  goto __out;
            substream = mts->midi_input_substream[mts->current_midi_input_port];
            if (mts->mode[substream->number] & MTS64_MODE_INPUT_TRIGGERED)
                  snd_rawmidi_receive(substream, &data, 1);
      }
__out:
      spin_unlock(&mts->lock);
}

static int __devinit snd_mts64_probe_port(struct parport *p)
{
      struct pardevice *pardev;
      int res;

      pardev = parport_register_device(p, DRIVER_NAME,
                               NULL, NULL, NULL,
                               0, NULL);
      if (!pardev)
            return -EIO;
      
      if (parport_claim(pardev)) {
            parport_unregister_device(pardev);
            return -EIO;
      }

      res = mts64_probe(p);

      parport_release(pardev);
      parport_unregister_device(pardev);

      return res;
}

static void __devinit snd_mts64_attach(struct parport *p)
{
      struct platform_device *device;

      device = platform_device_alloc(PLATFORM_DRIVER, device_count);
      if (!device)
            return;

      /* Temporary assignment to forward the parport */
      platform_set_drvdata(device, p);

      if (platform_device_add(device) < 0) {
            platform_device_put(device);
            return;
      }

      /* Since we dont get the return value of probe
       * We need to check if device probing succeeded or not */
      if (!platform_get_drvdata(device)) {
            platform_device_unregister(device);
            return;
      }

      /* register device in global table */
      platform_devices[device_count] = device;
      device_count++;
}

static void snd_mts64_detach(struct parport *p)
{
      /* nothing to do here */
}

static struct parport_driver mts64_parport_driver = {
      .name   = "mts64",
      .attach = snd_mts64_attach,
      .detach = snd_mts64_detach
};

/*********************************************************************
 * platform stuff
 *********************************************************************/
static void snd_mts64_card_private_free(struct snd_card *card)
{
      struct mts64 *mts = card->private_data;
      struct pardevice *pardev = mts->pardev;

      if (pardev) {
            if (mts->pardev_claimed)
                  parport_release(pardev);
            parport_unregister_device(pardev);
      }

      snd_mts64_free(mts);
}

static int __devinit snd_mts64_probe(struct platform_device *pdev)
{
      struct pardevice *pardev;
      struct parport *p;
      int dev = pdev->id;
      struct snd_card *card = NULL;
      struct mts64 *mts = NULL;
      int err;

      p = platform_get_drvdata(pdev);
      platform_set_drvdata(pdev, NULL);

      if (dev >= SNDRV_CARDS)
            return -ENODEV;
      if (!enable[dev]) 
            return -ENOENT;
      if ((err = snd_mts64_probe_port(p)) < 0)
            return err;

      err = snd_card_create(index[dev], id[dev], THIS_MODULE, 0, &card);
      if (err < 0) {
            snd_printd("Cannot create card\n");
            return err;
      }
      strcpy(card->driver, DRIVER_NAME);
      strcpy(card->shortname, "ESI " CARD_NAME);
      sprintf(card->longname,  "%s at 0x%lx, irq %i", 
            card->shortname, p->base, p->irq);

      pardev = parport_register_device(p,                   /* port */
                               DRIVER_NAME,         /* name */
                               NULL,                /* preempt */
                               NULL,                /* wakeup */
                               snd_mts64_interrupt, /* ISR */
                               PARPORT_DEV_EXCL,    /* flags */
                               (void *)card);       /* private */
      if (pardev == NULL) {
            snd_printd("Cannot register pardevice\n");
            err = -EIO;
            goto __err;
      }

      if ((err = snd_mts64_create(card, pardev, &mts)) < 0) {
            snd_printd("Cannot create main component\n");
            parport_unregister_device(pardev);
            goto __err;
      }
      card->private_data = mts;
      card->private_free = snd_mts64_card_private_free;
      
      if ((err = snd_mts64_rawmidi_create(card)) < 0) {
            snd_printd("Creating Rawmidi component failed\n");
            goto __err;
      }

      /* claim parport */
      if (parport_claim(pardev)) {
            snd_printd("Cannot claim parport 0x%lx\n", pardev->port->base);
            err = -EIO;
            goto __err;
      }
      mts->pardev_claimed = 1;

      /* init device */
      if ((err = mts64_device_init(p)) < 0)
            goto __err;

      platform_set_drvdata(pdev, card);

      snd_card_set_dev(card, &pdev->dev);

      /* At this point card will be usable */
      if ((err = snd_card_register(card)) < 0) {
            snd_printd("Cannot register card\n");
            goto __err;
      }

      snd_printk("ESI Miditerminal 4140 on 0x%lx\n", p->base);
      return 0;

__err:
      snd_card_free(card);
      return err;
}

static int __devexit snd_mts64_remove(struct platform_device *pdev)
{
      struct snd_card *card = platform_get_drvdata(pdev);

      if (card)
            snd_card_free(card);

      return 0;
}


static struct platform_driver snd_mts64_driver = {
      .probe  = snd_mts64_probe,
      .remove = __devexit_p(snd_mts64_remove),
      .driver = {
            .name = PLATFORM_DRIVER
      }
};

/*********************************************************************
 * module init stuff
 *********************************************************************/
static void snd_mts64_unregister_all(void)
{
      int i;

      for (i = 0; i < SNDRV_CARDS; ++i) {
            if (platform_devices[i]) {
                  platform_device_unregister(platform_devices[i]);
                  platform_devices[i] = NULL;
            }
      }           
      platform_driver_unregister(&snd_mts64_driver);
      parport_unregister_driver(&mts64_parport_driver);
}

static int __init snd_mts64_module_init(void)
{
      int err;

      if ((err = platform_driver_register(&snd_mts64_driver)) < 0)
            return err;

      if (parport_register_driver(&mts64_parport_driver) != 0) {
            platform_driver_unregister(&snd_mts64_driver);
            return -EIO;
      }

      if (device_count == 0) {
            snd_mts64_unregister_all();
            return -ENODEV;
      }

      return 0;
}

static void __exit snd_mts64_module_exit(void)
{
      snd_mts64_unregister_all();
}

module_init(snd_mts64_module_init);
module_exit(snd_mts64_module_exit);

Generated by  Doxygen 1.6.0   Back to index