sound/drivers/mts64.c

   1 /*
   2  *   ALSA Driver for Ego Systems Inc. (ESI) Miditerminal 4140
   3  *   Copyright (c) 2006 by Matthias König <mk@phasorlab.de>
   4  *
   5  *   This program is free software; you can redistribute it and/or modify
   6  *   it under the terms of the GNU General Public License as published by
   7  *   the Free Software Foundation; either version 2 of the License, or
   8  *   (at your option) any later version.
   9  *
  10  *   This program is distributed in the hope that it will be useful,
  11  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  *   GNU General Public License for more details.
  14  *
  15  *   You should have received a copy of the GNU General Public License
  16  *   along with this program; if not, write to the Free Software
  17  *   Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  18  *
  19  */
  20
  21 #include <linux/init.h>
  22 #include <linux/platform_device.h>
  23 #include <linux/parport.h>
  24 #include <linux/spinlock.h>
  25 #include <linux/delay.h>
  26 #include <sound/core.h>
  27 #include <sound/initval.h>
  28 #include <sound/rawmidi.h>
  29 #include <sound/control.h>
  30
  31 #define CARD_NAME "Miditerminal 4140"
  32 #define DRIVER_NAME "MTS64"
  33 #define PLATFORM_DRIVER "snd_mts64"
  34
  35 static int index[SNDRV_CARDS]  = SNDRV_DEFAULT_IDX;
  36 static char *id[SNDRV_CARDS]   = SNDRV_DEFAULT_STR;
  37 static int enable[SNDRV_CARDS] = SNDRV_DEFAULT_ENABLE_PNP;
  38
  39 static struct platform_device *platform_devices[SNDRV_CARDS];
  40 static int device_count;
  41
  42 module_param_array(index, int, NULL, S_IRUGO);
  43 MODULE_PARM_DESC(index, "Index value for " CARD_NAME " soundcard.");
  44 module_param_array(id, charp, NULL, S_IRUGO);
  45 MODULE_PARM_DESC(id, "ID string for " CARD_NAME " soundcard.");
  46 module_param_array(enable, bool, NULL, S_IRUGO);
  47 MODULE_PARM_DESC(enable, "Enable " CARD_NAME " soundcard.");
  48
  49 MODULE_AUTHOR("Matthias Koenig <mk@phasorlab.de>");
  50 MODULE_DESCRIPTION("ESI Miditerminal 4140");
  51 MODULE_LICENSE("GPL");
  52 MODULE_SUPPORTED_DEVICE("{{ESI,Miditerminal 4140}}");
  53
  54 /*********************************************************************
  55  * Chip specific
  56  *********************************************************************/
  57 #define MTS64_NUM_INPUT_PORTS 5
  58 #define MTS64_NUM_OUTPUT_PORTS 4
  59 #define MTS64_SMPTE_SUBSTREAM 4
  60
  61 struct mts64 {
  62         spinlock_t lock;
  63         struct snd_card *card;
  64         struct snd_rawmidi *rmidi;
  65         struct pardevice *pardev;
  66         int pardev_claimed;
  67
  68         int open_count;
  69         int current_midi_output_port;
  70         int current_midi_input_port;
  71         u8 mode[MTS64_NUM_INPUT_PORTS];
  72         struct snd_rawmidi_substream *midi_input_substream[MTS64_NUM_INPUT_PORTS];
  73         int smpte_switch;
  74         u8 time[4]; /* [0]=hh, [1]=mm, [2]=ss, [3]=ff */
  75         u8 fps;
  76 };
  77
  78 static int snd_mts64_free(struct mts64 *mts)
  79 {
  80         kfree(mts);
  81         return 0;
  82 }
  83
  84 static int __devinit snd_mts64_create(struct snd_card *card,
  85                                       struct pardevice *pardev,
  86                                       struct mts64 **rchip)
  87 {
  88         struct mts64 *mts;
  89
  90         *rchip = NULL;
  91
  92         mts = kzalloc(sizeof(struct mts64), GFP_KERNEL);
  93         if (mts == NULL)
  94                 return -ENOMEM;
  95
  96         /* Init chip specific data */
  97         spin_lock_init(&mts->lock);
  98         mts->card = card;
  99         mts->pardev = pardev;
 100         mts->current_midi_output_port = -1;
 101         mts->current_midi_input_port = -1;
 102
 103         *rchip = mts;
 104
 105         return 0;
 106 }
 107
 108 /*********************************************************************
 109  * HW register related constants
 110  *********************************************************************/
 111
 112 /* Status Bits */
 113 #define MTS64_STAT_BSY             0x80
 114 #define MTS64_STAT_BIT_SET         0x20  /* readout process, bit is set */
 115 #define MTS64_STAT_PORT            0x10  /* read byte is a port number */
 116
 117 /* Control Bits */
 118 #define MTS64_CTL_READOUT          0x08  /* enable readout */
 119 #define MTS64_CTL_WRITE_CMD        0x06
 120 #define MTS64_CTL_WRITE_DATA       0x02
 121 #define MTS64_CTL_STROBE           0x01
 122
 123 /* Command */
 124 #define MTS64_CMD_RESET            0xfe
 125 #define MTS64_CMD_PROBE            0x8f  /* Used in probing procedure */
 126 #define MTS64_CMD_SMPTE_SET_TIME   0xe8
 127 #define MTS64_CMD_SMPTE_SET_FPS    0xee
 128 #define MTS64_CMD_SMPTE_STOP       0xef
 129 #define MTS64_CMD_SMPTE_FPS_24     0xe3
 130 #define MTS64_CMD_SMPTE_FPS_25     0xe2
 131 #define MTS64_CMD_SMPTE_FPS_2997   0xe4
 132 #define MTS64_CMD_SMPTE_FPS_30D    0xe1
 133 #define MTS64_CMD_SMPTE_FPS_30     0xe0
 134 #define MTS64_CMD_COM_OPEN         0xf8  /* setting the communication mode */
 135 #define MTS64_CMD_COM_CLOSE1       0xff  /* clearing communication mode */
 136 #define MTS64_CMD_COM_CLOSE2       0xf5
 137
 138 /*********************************************************************
 139  * Hardware specific functions
 140  *********************************************************************/
 141 static void mts64_enable_readout(struct parport *p);
 142 static void mts64_disable_readout(struct parport *p);
 143 static int mts64_device_ready(struct parport *p);
 144 static int mts64_device_init(struct parport *p);
 145 static int mts64_device_open(struct mts64 *mts);
 146 static int mts64_device_close(struct mts64 *mts);
 147 static u8 mts64_map_midi_input(u8 c);
 148 static int mts64_probe(struct parport *p);
 149 static u16 mts64_read(struct parport *p);
 150 static u8 mts64_read_char(struct parport *p);
 151 static void mts64_smpte_start(struct parport *p,
 152                               u8 hours, u8 minutes,
 153                               u8 seconds, u8 frames,
 154                               u8 idx);
 155 static void mts64_smpte_stop(struct parport *p);
 156 static void mts64_write_command(struct parport *p, u8 c);
 157 static void mts64_write_data(struct parport *p, u8 c);
 158 static void mts64_write_midi(struct mts64 *mts, u8 c, int midiport);
 159
 160
 161 /*  Enables the readout procedure
 162  *
 163  *  Before we can read a midi byte from the device, we have to set
 164  *  bit 3 of control port.
 165  */
 166 static void mts64_enable_readout(struct parport *p)
 167 {
 168         u8 c;
 169
 170         c = parport_read_control(p);
 171         c |= MTS64_CTL_READOUT;
 172         parport_write_control(p, c);
 173 }
 174
 175 /*  Disables readout
 176  *
 177  *  Readout is disabled by clearing bit 3 of control
 178  */
 179 static void mts64_disable_readout(struct parport *p)
 180 {
 181         u8 c;
 182
 183         c = parport_read_control(p);
 184         c &= ~MTS64_CTL_READOUT;
 185         parport_write_control(p, c);
 186 }
 187
 188 /*  waits for device ready
 189  *
 190  *  Checks if BUSY (Bit 7 of status) is clear
 191  *  1 device ready
 192  *  0 failure
 193  */
 194 static int mts64_device_ready(struct parport *p)
 195 {
 196         int i;
 197         u8 c;
 198
 199         for (i = 0; i < 0xffff; ++i) {
 200                 c = parport_read_status(p);
 201                 c &= MTS64_STAT_BSY;
 202                 if (c != 0)
 203                         return 1;
 204         }
 205
 206         return 0;
 207 }
 208
 209 /*  Init device (LED blinking startup magic)
 210  *
 211  *  Returns:
 212  *  0 init ok
 213  *  -EIO failure
 214  */
 215 static int __devinit mts64_device_init(struct parport *p)
 216 {
 217         int i;
 218
 219         mts64_write_command(p, MTS64_CMD_RESET);
 220
 221         for (i = 0; i < 64; ++i) {
 222                 msleep(100);
 223
 224                 if (mts64_probe(p) == 0) {
 225                         /* success */
 226                         mts64_disable_readout(p);
 227                         return 0;
 228                 }
 229         }
 230         mts64_disable_readout(p);
 231
 232         return -EIO;
 233 }
 234
 235 /*
 236  *  Opens the device (set communication mode)
 237  */
 238 static int mts64_device_open(struct mts64 *mts)
 239 {
 240         int i;
 241         struct parport *p = mts->pardev->port;
 242
 243         for (i = 0; i < 5; ++i)
 244                 mts64_write_command(p, MTS64_CMD_COM_OPEN);
 245
 246         return 0;
 247 }
 248
 249 /*
 250  *  Close device (clear communication mode)
 251  */
 252 static int mts64_device_close(struct mts64 *mts)
 253 {
 254         int i;
 255         struct parport *p = mts->pardev->port;
 256
 257         for (i = 0; i < 5; ++i) {
 258                 mts64_write_command(p, MTS64_CMD_COM_CLOSE1);
 259                 mts64_write_command(p, MTS64_CMD_COM_CLOSE2);
 260         }
 261
 262         return 0;
 263 }
 264
 265 /*  map hardware port to substream number
 266  *
 267  *  When reading a byte from the device, the device tells us
 268  *  on what port the byte is. This HW port has to be mapped to
 269  *  the midiport (substream number).
 270  *  substream 0-3 are Midiports 1-4
 271  *  substream 4 is SMPTE Timecode
 272  *  The mapping is done by the table:
 273  *  HW | 0 | 1 | 2 | 3 | 4
 274  *  SW | 0 | 1 | 4 | 2 | 3
 275  */
 276 static u8 mts64_map_midi_input(u8 c)
 277 {
 278         static u8 map[] = { 0, 1, 4, 2, 3 };
 279
 280         return map[c];
 281 }
 282
 283
 284 /*  Probe parport for device
 285  *
 286  *  Do we have a Miditerminal 4140 on parport?
 287  *  Returns:
 288  *  0       device found
 289  *  -ENODEV no device
 290  */
 291 static int __devinit mts64_probe(struct parport *p)
 292 {
 293         u8 c;
 294
 295         mts64_smpte_stop(p);
 296         mts64_write_command(p, MTS64_CMD_PROBE);
 297
 298         msleep(50);
 299
 300         c = mts64_read(p);
 301
 302         c &= 0x00ff;
 303         if (c != MTS64_CMD_PROBE)
 304                 return -ENODEV;
 305         else
 306                 return 0;
 307
 308 }
 309
 310 /*  Read byte incl. status from device
 311  *
 312  *  Returns:
 313  *  data in lower 8 bits and status in upper 8 bits
 314  */
 315 static u16 mts64_read(struct parport *p)
 316 {
 317         u8 data, status;
 318
 319         mts64_device_ready(p);
 320         mts64_enable_readout(p);
 321         status = parport_read_status(p);
 322         data = mts64_read_char(p);
 323         mts64_disable_readout(p);
 324
 325         return (status << 8) | data;
 326 }
 327
 328 /*  Read a byte from device
 329  *
 330  *  Note, that readout mode has to be enabled.
 331  *  readout procedure is as follows:
 332  *  - Write number of the Bit to read to DATA
 333  *  - Read STATUS
 334  *  - Bit 5 of STATUS indicates if Bit is set
 335  *
 336  *  Returns:
 337  *  Byte read from device
 338  */
 339 static u8 mts64_read_char(struct parport *p)
 340 {
 341         u8 c = 0;
 342         u8 status;
 343         u8 i;
 344
 345         for (i = 0; i < 8; ++i) {
 346                 parport_write_data(p, i);
 347                 c >>= 1;
 348                 status = parport_read_status(p);
 349                 if (status & MTS64_STAT_BIT_SET)
 350                         c |= 0x80;
 351         }
 352
 353         return c;
 354 }
 355
 356 /*  Starts SMPTE Timecode generation
 357  *
 358  *  The device creates SMPTE Timecode by hardware.
 359  *  0 24 fps
 360  *  1 25 fps
 361  *  2 29.97 fps
 362  *  3 30 fps (Drop-frame)
 363  *  4 30 fps
 364  */
 365 static void mts64_smpte_start(struct parport *p,
 366                               u8 hours, u8 minutes,
 367                               u8 seconds, u8 frames,
 368                               u8 idx)
 369 {
 370         static u8 fps[5] = { MTS64_CMD_SMPTE_FPS_24,
 371                              MTS64_CMD_SMPTE_FPS_25,
 372                              MTS64_CMD_SMPTE_FPS_2997,
 373                              MTS64_CMD_SMPTE_FPS_30D,
 374                              MTS64_CMD_SMPTE_FPS_30    };
 375
 376         mts64_write_command(p, MTS64_CMD_SMPTE_SET_TIME);
 377         mts64_write_command(p, frames);
 378         mts64_write_command(p, seconds);
 379         mts64_write_command(p, minutes);
 380         mts64_write_command(p, hours);
 381
 382         mts64_write_command(p, MTS64_CMD_SMPTE_SET_FPS);
 383         mts64_write_command(p, fps[idx]);
 384 }
 385
 386 /*  Stops SMPTE Timecode generation
 387  */
 388 static void mts64_smpte_stop(struct parport *p)
 389 {
 390         mts64_write_command(p, MTS64_CMD_SMPTE_STOP);
 391 }
 392
 393 /*  Write a command byte to device
 394  */
 395 static void mts64_write_command(struct parport *p, u8 c)
 396 {
 397         mts64_device_ready(p);
 398
 399         parport_write_data(p, c);
 400
 401         parport_write_control(p, MTS64_CTL_WRITE_CMD);
 402         parport_write_control(p, MTS64_CTL_WRITE_CMD | MTS64_CTL_STROBE);
 403         parport_write_control(p, MTS64_CTL_WRITE_CMD);
 404 }
 405
 406 /*  Write a data byte to device
 407  */
 408 static void mts64_write_data(struct parport *p, u8 c)
 409 {
 410         mts64_device_ready(p);
 411
 412         parport_write_data(p, c);
 413
 414         parport_write_control(p, MTS64_CTL_WRITE_DATA);
 415         parport_write_control(p, MTS64_CTL_WRITE_DATA | MTS64_CTL_STROBE);
 416         parport_write_control(p, MTS64_CTL_WRITE_DATA);
 417 }
 418
 419 /*  Write a MIDI byte to midiport
 420  *
 421  *  midiport ranges from 0-3 and maps to Ports 1-4
 422  *  assumptions: communication mode is on
 423  */
 424 static void mts64_write_midi(struct mts64 *mts, u8 c,
 425                              int midiport)
 426 {
 427         struct parport *p = mts->pardev->port;
 428
 429         /* check current midiport */
 430         if (mts->current_midi_output_port != midiport)
 431                 mts64_write_command(p, midiport);
 432
 433         /* write midi byte */
 434         mts64_write_data(p, c);
 435 }
 436
 437 /*********************************************************************
 438  * Control elements
 439  *********************************************************************/
 440
 441 /* SMPTE Switch */
 442 #define snd_mts64_ctl_smpte_switch_info         snd_ctl_boolean_mono_info
 443
 444 static int snd_mts64_ctl_smpte_switch_get(struct snd_kcontrol* kctl,
 445                                           struct snd_ctl_elem_value *uctl)
 446 {
 447         struct mts64 *mts = snd_kcontrol_chip(kctl);
 448
 449         spin_lock_irq(&mts->lock);
 450         uctl->value.integer.value[0] = mts->smpte_switch;
 451         spin_unlock_irq(&mts->lock);
 452
 453         return 0;
 454 }
 455
 456 /* smpte_switch is not accessed from IRQ handler, so we just need
 457    to protect the HW access */
 458 static int snd_mts64_ctl_smpte_switch_put(struct snd_kcontrol* kctl,
 459                                           struct snd_ctl_elem_value *uctl)
 460 {
 461         struct mts64 *mts = snd_kcontrol_chip(kctl);
 462         int changed = 0;
 463         int val = !!uctl->value.integer.value[0];
 464
 465         spin_lock_irq(&mts->lock);
 466         if (mts->smpte_switch == val)
 467                 goto __out;
 468
 469         changed = 1;
 470         mts->smpte_switch = val;
 471         if (mts->smpte_switch) {
 472                 mts64_smpte_start(mts->pardev->port,
 473                                   mts->time[0], mts->time[1],
 474                                   mts->time[2], mts->time[3],
 475                                   mts->fps);
 476         } else {
 477                 mts64_smpte_stop(mts->pardev->port);
 478         }
 479 __out:
 480         spin_unlock_irq(&mts->lock);
 481         return changed;
 482 }
 483
 484 static struct snd_kcontrol_new mts64_ctl_smpte_switch __devinitdata = {
 485         .iface = SNDRV_CTL_ELEM_IFACE_RAWMIDI,
 486         .name  = "SMPTE Playback Switch",
 487         .index = 0,
 488         .access = SNDRV_CTL_ELEM_ACCESS_READWRITE,
 489         .private_value = 0,
 490         .info = snd_mts64_ctl_smpte_switch_info,
 491         .get  = snd_mts64_ctl_smpte_switch_get,
 492         .put  = snd_mts64_ctl_smpte_switch_put
 493 };
 494
 495 /* Time */
 496 static int snd_mts64_ctl_smpte_time_h_info(struct snd_kcontrol *kctl,
 497                                            struct snd_ctl_elem_info *uinfo)
 498 {
 499         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
 500         uinfo->count = 1;
 501         uinfo->value.integer.min = 0;
 502         uinfo->value.integer.max = 23;
 503         return 0;
 504 }
 505
 506 static int snd_mts64_ctl_smpte_time_f_info(struct snd_kcontrol *kctl,
 507                                            struct snd_ctl_elem_info *uinfo)
 508 {
 509         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
 510         uinfo->count = 1;
 511         uinfo->value.integer.min = 0;
 512         uinfo->value.integer.max = 99;
 513         return 0;
 514 }
 515
 516 static int snd_mts64_ctl_smpte_time_info(struct snd_kcontrol *kctl,
 517                                          struct snd_ctl_elem_info *uinfo)
 518 {
 519         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
 520         uinfo->count = 1;
 521         uinfo->value.integer.min = 0;
 522         uinfo->value.integer.max = 59;
 523         return 0;
 524 }
 525
 526 static int snd_mts64_ctl_smpte_time_get(struct snd_kcontrol *kctl,
 527                                         struct snd_ctl_elem_value *uctl)
 528 {
 529         struct mts64 *mts = snd_kcontrol_chip(kctl);
 530         int idx = kctl->private_value;
 531
 532         spin_lock_irq(&mts->lock);
 533         uctl->value.integer.value[0] = mts->time[idx];
 534         spin_unlock_irq(&mts->lock);
 535
 536         return 0;
 537 }
 538
 539 static int snd_mts64_ctl_smpte_time_put(struct snd_kcontrol *kctl,
 540                                         struct snd_ctl_elem_value *uctl)
 541 {
 542         struct mts64 *mts = snd_kcontrol_chip(kctl);
 543         int idx = kctl->private_value;
 544         unsigned int time = uctl->value.integer.value[0] % 60;
 545         int changed = 0;
 546
 547         spin_lock_irq(&mts->lock);
 548         if (mts->time[idx] != time) {
 549                 changed = 1;
 550                 mts->time[idx] = time;
 551         }
 552         spin_unlock_irq(&mts->lock);
 553
 554         return changed;
 555 }
 556
 557 static struct snd_kcontrol_new mts64_ctl_smpte_time_hours __devinitdata = {
 558         .iface = SNDRV_CTL_ELEM_IFACE_RAWMIDI,
 559         .name  = "SMPTE Time Hours",
 560         .index = 0,
 561         .access = SNDRV_CTL_ELEM_ACCESS_READWRITE,
 562         .private_value = 0,
 563         .info = snd_mts64_ctl_smpte_time_h_info,
 564         .get  = snd_mts64_ctl_smpte_time_get,
 565         .put  = snd_mts64_ctl_smpte_time_put
 566 };
 567
 568 static struct snd_kcontrol_new mts64_ctl_smpte_time_minutes __devinitdata = {
 569         .iface = SNDRV_CTL_ELEM_IFACE_RAWMIDI,
 570         .name  = "SMPTE Time Minutes",
 571         .index = 0,
 572         .access = SNDRV_CTL_ELEM_ACCESS_READWRITE,
 573         .private_value = 1,
 574         .info = snd_mts64_ctl_smpte_time_info,
 575         .get  = snd_mts64_ctl_smpte_time_get,
 576         .put  = snd_mts64_ctl_smpte_time_put
 577 };
 578
 579 static struct snd_kcontrol_new mts64_ctl_smpte_time_seconds __devinitdata = {
 580         .iface = SNDRV_CTL_ELEM_IFACE_RAWMIDI,
 581         .name  = "SMPTE Time Seconds",
 582         .index = 0,
 583         .access = SNDRV_CTL_ELEM_ACCESS_READWRITE,
 584         .private_value = 2,
 585         .info = snd_mts64_ctl_smpte_time_info,
 586         .get  = snd_mts64_ctl_smpte_time_get,
 587         .put  = snd_mts64_ctl_smpte_time_put
 588 };
 589
 590 static struct snd_kcontrol_new mts64_ctl_smpte_time_frames __devinitdata = {
 591         .iface = SNDRV_CTL_ELEM_IFACE_RAWMIDI,
 592         .name  = "SMPTE Time Frames",
 593         .index = 0,
 594         .access = SNDRV_CTL_ELEM_ACCESS_READWRITE,
 595         .private_value = 3,
 596         .info = snd_mts64_ctl_smpte_time_f_info,
 597         .get  = snd_mts64_ctl_smpte_time_get,
 598         .put  = snd_mts64_ctl_smpte_time_put
 599 };
 600
 601 /* FPS */
 602 static int snd_mts64_ctl_smpte_fps_info(struct snd_kcontrol *kctl,
 603                                         struct snd_ctl_elem_info *uinfo)
 604 {
 605         static char *texts[5] = { "24",
 606                                   "25",
 607                                   "29.97",
 608                                   "30D",
 609                                   "30"    };
 610
 611         uinfo->type = SNDRV_CTL_ELEM_TYPE_ENUMERATED;
 612         uinfo->count = 1;
 613         uinfo->value.enumerated.items = 5;
 614         if (uinfo->value.enumerated.item > 4)
 615                 uinfo->value.enumerated.item = 4;
 616         strcpy(uinfo->value.enumerated.name,
 617                texts[uinfo->value.enumerated.item]);
 618
 619         return 0;
 620 }
 621
 622 static int snd_mts64_ctl_smpte_fps_get(struct snd_kcontrol *kctl,
 623                                        struct snd_ctl_elem_value *uctl)
 624 {
 625         struct mts64 *mts = snd_kcontrol_chip(kctl);
 626
 627         spin_lock_irq(&mts->lock);
 628         uctl->value.enumerated.item[0] = mts->fps;
 629         spin_unlock_irq(&mts->lock);
 630
 631         return 0;
 632 }
 633
 634 static int snd_mts64_ctl_smpte_fps_put(struct snd_kcontrol *kctl,
 635                                        struct snd_ctl_elem_value *uctl)
 636 {
 637         struct mts64 *mts = snd_kcontrol_chip(kctl);
 638         int changed = 0;
 639
 640         if (uctl->value.enumerated.item[0] >= 5)
 641                 return -EINVAL;
 642         spin_lock_irq(&mts->lock);
 643         if (mts->fps != uctl->value.enumerated.item[0]) {
 644                 changed = 1;
 645                 mts->fps = uctl->value.enumerated.item[0];
 646         }
 647         spin_unlock_irq(&mts->lock);
 648
 649         return changed;
 650 }
 651
 652 static struct snd_kcontrol_new mts64_ctl_smpte_fps __devinitdata = {
 653         .iface = SNDRV_CTL_ELEM_IFACE_RAWMIDI,
 654         .name  = "SMPTE Fps",
 655         .index = 0,
 656         .access = SNDRV_CTL_ELEM_ACCESS_READWRITE,
 657         .private_value = 0,
 658         .info  = snd_mts64_ctl_smpte_fps_info,
 659         .get   = snd_mts64_ctl_smpte_fps_get,
 660         .put   = snd_mts64_ctl_smpte_fps_put
 661 };
 662
 663
 664 static int __devinit snd_mts64_ctl_create(struct snd_card *card,
 665                                           struct mts64 *mts)
 666 {
 667         int err, i;
 668         static struct snd_kcontrol_new *control[] __devinitdata = {
 669                 &mts64_ctl_smpte_switch,
 670                 &mts64_ctl_smpte_time_hours,
 671                 &mts64_ctl_smpte_time_minutes,
 672                 &mts64_ctl_smpte_time_seconds,
 673                 &mts64_ctl_smpte_time_frames,
 674                 &mts64_ctl_smpte_fps,
 675                 NULL  };
 676
 677         for (i = 0; control[i]; ++i) {
 678                 err = snd_ctl_add(card, snd_ctl_new1(control[i], mts));
 679                 if (err < 0) {
 680                         snd_printd("Cannot create control: %s\n",
 681                                    control[i]->name);
 682                         return err;
 683                 }
 684         }
 685
 686         return 0;
 687 }
 688
 689 /*********************************************************************
 690  * Rawmidi
 691  *********************************************************************/
 692 #define MTS64_MODE_INPUT_TRIGGERED 0x01
 693
 694 static int snd_mts64_rawmidi_open(struct snd_rawmidi_substream *substream)
 695 {
 696         struct mts64 *mts = substream->rmidi->private_data;
 697
 698         if (mts->open_count == 0) {
 699                 /* We don't need a spinlock here, because this is just called
 700                    if the device has not been opened before.
 701                    So there aren't any IRQs from the device */
 702                 mts64_device_open(mts);
 703
 704                 msleep(50);
 705         }
 706         ++(mts->open_count);
 707
 708         return 0;
 709 }
 710
 711 static int snd_mts64_rawmidi_close(struct snd_rawmidi_substream *substream)
 712 {
 713         struct mts64 *mts = substream->rmidi->private_data;
 714         unsigned long flags;
 715
 716         --(mts->open_count);
 717         if (mts->open_count == 0) {
 718                 /* We need the spinlock_irqsave here because we can still
 719                    have IRQs at this point */
 720                 spin_lock_irqsave(&mts->lock, flags);
 721                 mts64_device_close(mts);
 722                 spin_unlock_irqrestore(&mts->lock, flags);
 723
 724                 msleep(500);
 725
 726         } else if (mts->open_count < 0)
 727                 mts->open_count = 0;
 728
 729         return 0;
 730 }
 731
 732 static void snd_mts64_rawmidi_output_trigger(struct snd_rawmidi_substream *substream,
 733                                              int up)
 734 {
 735         struct mts64 *mts = substream->rmidi->private_data;
 736         u8 data;
 737         unsigned long flags;
 738
 739         spin_lock_irqsave(&mts->lock, flags);
 740         while (snd_rawmidi_transmit_peek(substream, &data, 1) == 1) {
 741                 mts64_write_midi(mts, data, substream->number+1);
 742                 snd_rawmidi_transmit_ack(substream, 1);
 743         }
 744         spin_unlock_irqrestore(&mts->lock, flags);
 745 }
 746
 747 static void snd_mts64_rawmidi_input_trigger(struct snd_rawmidi_substream *substream,
 748                                             int up)
 749 {
 750         struct mts64 *mts = substream->rmidi->private_data;
 751         unsigned long flags;
 752
 753         spin_lock_irqsave(&mts->lock, flags);
 754         if (up)
 755                 mts->mode[substream->number] |= MTS64_MODE_INPUT_TRIGGERED;
 756         else
 757                 mts->mode[substream->number] &= ~MTS64_MODE_INPUT_TRIGGERED;
 758
 759         spin_unlock_irqrestore(&mts->lock, flags);
 760 }
 761
 762 static struct snd_rawmidi_ops snd_mts64_rawmidi_output_ops = {
 763         .open    = snd_mts64_rawmidi_open,
 764         .close   = snd_mts64_rawmidi_close,
 765         .trigger = snd_mts64_rawmidi_output_trigger
 766 };
 767
 768 static struct snd_rawmidi_ops snd_mts64_rawmidi_input_ops = {
 769         .open    = snd_mts64_rawmidi_open,
 770         .close   = snd_mts64_rawmidi_close,
 771         .trigger = snd_mts64_rawmidi_input_trigger
 772 };
 773
 774 /* Create and initialize the rawmidi component */
 775 static int __devinit snd_mts64_rawmidi_create(struct snd_card *card)
 776 {
 777         struct mts64 *mts = card->private_data;
 778         struct snd_rawmidi *rmidi;
 779         struct snd_rawmidi_substream *substream;
 780         struct list_head *list;
 781         int err;
 782
 783         err = snd_rawmidi_new(card, CARD_NAME, 0,
 784                               MTS64_NUM_OUTPUT_PORTS,
 785                               MTS64_NUM_INPUT_PORTS,
 786                               &rmidi);
 787         if (err < 0)
 788                 return err;
 789
 790         rmidi->private_data = mts;
 791         strcpy(rmidi->name, CARD_NAME);
 792         rmidi->info_flags = SNDRV_RAWMIDI_INFO_OUTPUT |
 793                             SNDRV_RAWMIDI_INFO_INPUT |
 794                             SNDRV_RAWMIDI_INFO_DUPLEX;
 795
 796         mts->rmidi = rmidi;
 797
 798         /* register rawmidi ops */
 799         snd_rawmidi_set_ops(rmidi, SNDRV_RAWMIDI_STREAM_OUTPUT,
 800                             &snd_mts64_rawmidi_output_ops);
 801         snd_rawmidi_set_ops(rmidi, SNDRV_RAWMIDI_STREAM_INPUT,
 802                             &snd_mts64_rawmidi_input_ops);
 803
 804         /* name substreams */
 805         /* output */
 806         list_for_each(list,
 807                       &rmidi->streams[SNDRV_RAWMIDI_STREAM_OUTPUT].substreams) {
 808                 substream = list_entry(list, struct snd_rawmidi_substream, list);
 809                 sprintf(substream->name,
 810                         "Miditerminal %d", substream->number+1);
 811         }
 812         /* input */
 813         list_for_each(list,
 814                       &rmidi->streams[SNDRV_RAWMIDI_STREAM_INPUT].substreams) {
 815                 substream = list_entry(list, struct snd_rawmidi_substream, list);
 816                 mts->midi_input_substream[substream->number] = substream;
 817                 switch(substream->number) {
 818                 case MTS64_SMPTE_SUBSTREAM:
 819                         strcpy(substream->name, "Miditerminal SMPTE");
 820                         break;
 821                 default:
 822                         sprintf(substream->name,
 823                                 "Miditerminal %d", substream->number+1);
 824                 }
 825         }
 826
 827         /* controls */
 828         err = snd_mts64_ctl_create(card, mts);
 829
 830         return err;
 831 }
 832
 833 /*********************************************************************
 834  * parport stuff
 835  *********************************************************************/
 836 static void snd_mts64_interrupt(void *private)
 837 {
 838         struct mts64 *mts = ((struct snd_card*)private)->private_data;
 839         u16 ret;
 840         u8 status, data;
 841         struct snd_rawmidi_substream *substream;
 842
 843         spin_lock(&mts->lock);
 844         ret = mts64_read(mts->pardev->port);
 845         data = ret & 0x00ff;
 846         status = ret >> 8;
 847
 848         if (status & MTS64_STAT_PORT) {
 849                 mts->current_midi_input_port = mts64_map_midi_input(data);
 850         } else {
 851                 if (mts->current_midi_input_port == -1)
 852                         goto __out;
 853                 substream = mts->midi_input_substream[mts->current_midi_input_port];
 854                 if (mts->mode[substream->number] & MTS64_MODE_INPUT_TRIGGERED)
 855                         snd_rawmidi_receive(substream, &data, 1);
 856         }
 857 __out:
 858         spin_unlock(&mts->lock);
 859 }
 860
 861 static int __devinit snd_mts64_probe_port(struct parport *p)
 862 {
 863         struct pardevice *pardev;
 864         int res;
 865
 866         pardev = parport_register_device(p, DRIVER_NAME,
 867                                          NULL, NULL, NULL,
 868                                          0, NULL);
 869         if (!pardev)
 870                 return -EIO;
 871
 872         if (parport_claim(pardev)) {
 873                 parport_unregister_device(pardev);
 874                 return -EIO;
 875         }
 876
 877         res = mts64_probe(p);
 878
 879         parport_release(pardev);
 880         parport_unregister_device(pardev);
 881
 882         return res;
 883 }
 884
 885 static void __devinit snd_mts64_attach(struct parport *p)
 886 {
 887         struct platform_device *device;
 888
 889         device = platform_device_alloc(PLATFORM_DRIVER, device_count);
 890         if (!device)
 891                 return;
 892
 893         /* Temporary assignment to forward the parport */
 894         platform_set_drvdata(device, p);
 895
 896         if (platform_device_add(device) < 0) {
 897                 platform_device_put(device);
 898                 return;
 899         }
 900
 901         /* Since we dont get the return value of probe
 902          * We need to check if device probing succeeded or not */
 903         if (!platform_get_drvdata(device)) {
 904                 platform_device_unregister(device);
 905                 return;
 906         }
 907
 908         /* register device in global table */
 909         platform_devices[device_count] = device;
 910         device_count++;
 911 }
 912
 913 static void snd_mts64_detach(struct parport *p)
 914 {
 915         /* nothing to do here */
 916 }
 917
 918 static struct parport_driver mts64_parport_driver = {
 919         .name   = "mts64",
 920         .attach = snd_mts64_attach,
 921         .detach = snd_mts64_detach
 922 };
 923
 924 /*********************************************************************
 925  * platform stuff
 926  *********************************************************************/
 927 static void snd_mts64_card_private_free(struct snd_card *card)
 928 {
 929         struct mts64 *mts = card->private_data;
 930         struct pardevice *pardev = mts->pardev;
 931
 932         if (pardev) {
 933                 if (mts->pardev_claimed)
 934                         parport_release(pardev);
 935                 parport_unregister_device(pardev);
 936         }
 937
 938         snd_mts64_free(mts);
 939 }
 940
 941 static int __devinit snd_mts64_probe(struct platform_device *pdev)
 942 {
 943         struct pardevice *pardev;
 944         struct parport *p;
 945         int dev = pdev->id;
 946         struct snd_card *card = NULL;
 947         struct mts64 *mts = NULL;
 948         int err;
 949
 950         p = platform_get_drvdata(pdev);
 951         platform_set_drvdata(pdev, NULL);
 952
 953         if (dev >= SNDRV_CARDS)
 954                 return -ENODEV;
 955         if (!enable[dev])
 956                 return -ENOENT;
 957         if ((err = snd_mts64_probe_port(p)) < 0)
 958                 return err;
 959
 960         card = snd_card_new(index[dev], id[dev], THIS_MODULE, 0);
 961         if (card == NULL) {
 962                 snd_printd("Cannot create card\n");
 963                 return -ENOMEM;
 964         }
 965         strcpy(card->driver, DRIVER_NAME);
 966         strcpy(card->shortname, "ESI " CARD_NAME);
 967         sprintf(card->longname,  "%s at 0x%lx, irq %i",
 968                 card->shortname, p->base, p->irq);
 969
 970         pardev = parport_register_device(p,                   /* port */
 971                                          DRIVER_NAME,         /* name */
 972                                          NULL,                /* preempt */
 973                                          NULL,                /* wakeup */
 974                                          snd_mts64_interrupt, /* ISR */
 975                                          PARPORT_DEV_EXCL,    /* flags */
 976                                          (void *)card);       /* private */
 977         if (pardev == NULL) {
 978                 snd_printd("Cannot register pardevice\n");
 979                 err = -EIO;
 980                 goto __err;
 981         }
 982
 983         if ((err = snd_mts64_create(card, pardev, &mts)) < 0) {
 984                 snd_printd("Cannot create main component\n");
 985                 parport_unregister_device(pardev);
 986                 goto __err;
 987         }
 988         card->private_data = mts;
 989         card->private_free = snd_mts64_card_private_free;
 990
 991         if ((err = snd_mts64_rawmidi_create(card)) < 0) {
 992                 snd_printd("Creating Rawmidi component failed\n");
 993                 goto __err;
 994         }
 995
 996         /* claim parport */
 997         if (parport_claim(pardev)) {
 998                 snd_printd("Cannot claim parport 0x%lx\n", pardev->port->base);
 999                 err = -EIO;
1000                 goto __err;
1001         }
1002         mts->pardev_claimed = 1;
1003
1004         /* init device */
1005         if ((err = mts64_device_init(p)) < 0)
1006                 goto __err;
1007
1008         platform_set_drvdata(pdev, card);
1009
1010         snd_card_set_dev(card, &pdev->dev);
1011
1012         /* At this point card will be usable */
1013         if ((err = snd_card_register(card)) < 0) {
1014                 snd_printd("Cannot register card\n");
1015                 goto __err;
1016         }
1017
1018         snd_printk("ESI Miditerminal 4140 on 0x%lx\n", p->base);
1019         return 0;
1020
1021 __err:
1022         snd_card_free(card);
1023         return err;
1024 }
1025
1026 static int __devexit snd_mts64_remove(struct platform_device *pdev)
1027 {
1028         struct snd_card *card = platform_get_drvdata(pdev);
1029
1030         if (card)
1031                 snd_card_free(card);
1032
1033         return 0;
1034 }
1035
1036
1037 static struct platform_driver snd_mts64_driver = {
1038         .probe  = snd_mts64_probe,
1039         .remove = __devexit_p(snd_mts64_remove),
1040         .driver = {
1041                 .name = PLATFORM_DRIVER
1042         }
1043 };
1044
1045 /*********************************************************************
1046  * module init stuff
1047  *********************************************************************/
1048 static void snd_mts64_unregister_all(void)
1049 {
1050         int i;
1051
1052         for (i = 0; i < SNDRV_CARDS; ++i) {
1053                 if (platform_devices[i]) {
1054                         platform_device_unregister(platform_devices[i]);
1055                         platform_devices[i] = NULL;
1056                 }
1057         }
1058         platform_driver_unregister(&snd_mts64_driver);
1059         parport_unregister_driver(&mts64_parport_driver);
1060 }
1061
1062 static int __init snd_mts64_module_init(void)
1063 {
1064         int err;
1065
1066         if ((err = platform_driver_register(&snd_mts64_driver)) < 0)
1067                 return err;
1068
1069         if (parport_register_driver(&mts64_parport_driver) != 0) {
1070                 platform_driver_unregister(&snd_mts64_driver);
1071                 return -EIO;
1072         }
1073
1074         if (device_count == 0) {
1075                 snd_mts64_unregister_all();
1076                 return -ENODEV;
1077         }
1078
1079         return 0;
1080 }
1081
1082 static void __exit snd_mts64_module_exit(void)
1083 {
1084         snd_mts64_unregister_all();
1085 }
1086
1087 module_init(snd_mts64_module_init);
1088 module_exit(snd_mts64_module_exit);