~ [ source navigation ] ~ [ diff markup ] ~ [ identifier search ] ~

TOMOYO Linux Cross Reference
Linux/sound/core/seq/oss/seq_oss_event.c

Version: ~ [ linux-5.5-rc7 ] ~ [ linux-5.4.13 ] ~ [ linux-5.3.18 ] ~ [ linux-5.2.21 ] ~ [ linux-5.1.21 ] ~ [ linux-5.0.21 ] ~ [ linux-4.20.17 ] ~ [ linux-4.19.97 ] ~ [ linux-4.18.20 ] ~ [ linux-4.17.19 ] ~ [ linux-4.16.18 ] ~ [ linux-4.15.18 ] ~ [ linux-4.14.166 ] ~ [ linux-4.13.16 ] ~ [ linux-4.12.14 ] ~ [ linux-4.11.12 ] ~ [ linux-4.10.17 ] ~ [ linux-4.9.210 ] ~ [ linux-4.8.17 ] ~ [ linux-4.7.10 ] ~ [ linux-4.6.7 ] ~ [ linux-4.5.7 ] ~ [ linux-4.4.210 ] ~ [ linux-4.3.6 ] ~ [ linux-4.2.8 ] ~ [ linux-4.1.52 ] ~ [ linux-4.0.9 ] ~ [ linux-3.19.8 ] ~ [ linux-3.18.140 ] ~ [ linux-3.17.8 ] ~ [ linux-3.16.81 ] ~ [ linux-3.15.10 ] ~ [ linux-3.14.79 ] ~ [ linux-3.13.11 ] ~ [ linux-3.12.74 ] ~ [ linux-3.11.10 ] ~ [ linux-3.10.108 ] ~ [ linux-3.9.11 ] ~ [ linux-3.8.13 ] ~ [ linux-3.7.10 ] ~ [ linux-3.6.11 ] ~ [ linux-3.5.7 ] ~ [ linux-3.4.113 ] ~ [ linux-3.3.8 ] ~ [ linux-3.2.102 ] ~ [ linux-3.1.10 ] ~ [ linux-3.0.101 ] ~ [ linux-2.6.32.71 ] ~ [ linux-2.6.0 ] ~ [ linux-2.4.37.11 ] ~ [ unix-v6-master ] ~ [ ccs-tools-1.8.5 ] ~ [ policy-sample ] ~
Architecture: ~ [ i386 ] ~ [ alpha ] ~ [ m68k ] ~ [ mips ] ~ [ ppc ] ~ [ sparc ] ~ [ sparc64 ] ~

  1 /*
  2  * OSS compatible sequencer driver
  3  *
  4  * Copyright (C) 1998,99 Takashi Iwai <tiwai@suse.de>
  5  *
  6  * This program is free software; you can redistribute it and/or modify
  7  * it under the terms of the GNU General Public License as published by
  8  * the Free Software Foundation; either version 2 of the License, or
  9  * (at your option) any later version.
 10  *
 11  * This program is distributed in the hope that it will be useful,
 12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
 13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 14  * GNU General Public License for more details.
 15  *
 16  * You should have received a copy of the GNU General Public License
 17  * along with this program; if not, write to the Free Software
 18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
 19  */
 20 
 21 #include "seq_oss_device.h"
 22 #include "seq_oss_synth.h"
 23 #include "seq_oss_midi.h"
 24 #include "seq_oss_event.h"
 25 #include "seq_oss_timer.h"
 26 #include <sound/seq_oss_legacy.h>
 27 #include "seq_oss_readq.h"
 28 #include "seq_oss_writeq.h"
 29 
 30 
 31 /*
 32  * prototypes
 33  */
 34 static int extended_event(struct seq_oss_devinfo *dp, union evrec *q, struct snd_seq_event *ev);
 35 static int chn_voice_event(struct seq_oss_devinfo *dp, union evrec *event_rec, struct snd_seq_event *ev);
 36 static int chn_common_event(struct seq_oss_devinfo *dp, union evrec *event_rec, struct snd_seq_event *ev);
 37 static int timing_event(struct seq_oss_devinfo *dp, union evrec *event_rec, struct snd_seq_event *ev);
 38 static int local_event(struct seq_oss_devinfo *dp, union evrec *event_rec, struct snd_seq_event *ev);
 39 static int old_event(struct seq_oss_devinfo *dp, union evrec *q, struct snd_seq_event *ev);
 40 static int note_on_event(struct seq_oss_devinfo *dp, int dev, int ch, int note, int vel, struct snd_seq_event *ev);
 41 static int note_off_event(struct seq_oss_devinfo *dp, int dev, int ch, int note, int vel, struct snd_seq_event *ev);
 42 static int set_note_event(struct seq_oss_devinfo *dp, int dev, int type, int ch, int note, int vel, struct snd_seq_event *ev);
 43 static int set_control_event(struct seq_oss_devinfo *dp, int dev, int type, int ch, int param, int val, struct snd_seq_event *ev);
 44 static int set_echo_event(struct seq_oss_devinfo *dp, union evrec *rec, struct snd_seq_event *ev);
 45 
 46 
 47 /*
 48  * convert an OSS event to ALSA event
 49  * return 0 : enqueued
 50  *        non-zero : invalid - ignored
 51  */
 52 
 53 int
 54 snd_seq_oss_process_event(struct seq_oss_devinfo *dp, union evrec *q, struct snd_seq_event *ev)
 55 {
 56         switch (q->s.code) {
 57         case SEQ_EXTENDED:
 58                 return extended_event(dp, q, ev);
 59 
 60         case EV_CHN_VOICE:
 61                 return chn_voice_event(dp, q, ev);
 62 
 63         case EV_CHN_COMMON:
 64                 return chn_common_event(dp, q, ev);
 65 
 66         case EV_TIMING:
 67                 return timing_event(dp, q, ev);
 68 
 69         case EV_SEQ_LOCAL:
 70                 return local_event(dp, q, ev);
 71 
 72         case EV_SYSEX:
 73                 return snd_seq_oss_synth_sysex(dp, q->x.dev, q->x.buf, ev);
 74 
 75         case SEQ_MIDIPUTC:
 76                 if (dp->seq_mode == SNDRV_SEQ_OSS_MODE_MUSIC)
 77                         return -EINVAL;
 78                 /* put a midi byte */
 79                 if (! is_write_mode(dp->file_mode))
 80                         break;
 81                 if (snd_seq_oss_midi_open(dp, q->s.dev, SNDRV_SEQ_OSS_FILE_WRITE))
 82                         break;
 83                 if (snd_seq_oss_midi_filemode(dp, q->s.dev) & SNDRV_SEQ_OSS_FILE_WRITE)
 84                         return snd_seq_oss_midi_putc(dp, q->s.dev, q->s.parm1, ev);
 85                 break;
 86 
 87         case SEQ_ECHO:
 88                 if (dp->seq_mode == SNDRV_SEQ_OSS_MODE_MUSIC)
 89                         return -EINVAL;
 90                 return set_echo_event(dp, q, ev);
 91 
 92         case SEQ_PRIVATE:
 93                 if (dp->seq_mode == SNDRV_SEQ_OSS_MODE_MUSIC)
 94                         return -EINVAL;
 95                 return snd_seq_oss_synth_raw_event(dp, q->c[1], q->c, ev);
 96 
 97         default:
 98                 if (dp->seq_mode == SNDRV_SEQ_OSS_MODE_MUSIC)
 99                         return -EINVAL;
100                 return old_event(dp, q, ev);
101         }
102         return -EINVAL;
103 }
104 
105 /* old type events: mode1 only */
106 static int
107 old_event(struct seq_oss_devinfo *dp, union evrec *q, struct snd_seq_event *ev)
108 {
109         switch (q->s.code) {
110         case SEQ_NOTEOFF:
111                 return note_off_event(dp, 0, q->n.chn, q->n.note, q->n.vel, ev);
112 
113         case SEQ_NOTEON:
114                 return note_on_event(dp, 0, q->n.chn, q->n.note, q->n.vel, ev);
115 
116         case SEQ_WAIT:
117                 /* skip */
118                 break;
119 
120         case SEQ_PGMCHANGE:
121                 return set_control_event(dp, 0, SNDRV_SEQ_EVENT_PGMCHANGE,
122                                          q->n.chn, 0, q->n.note, ev);
123 
124         case SEQ_SYNCTIMER:
125                 return snd_seq_oss_timer_reset(dp->timer);
126         }
127 
128         return -EINVAL;
129 }
130 
131 /* 8bytes extended event: mode1 only */
132 static int
133 extended_event(struct seq_oss_devinfo *dp, union evrec *q, struct snd_seq_event *ev)
134 {
135         int val;
136 
137         switch (q->e.cmd) {
138         case SEQ_NOTEOFF:
139                 return note_off_event(dp, q->e.dev, q->e.chn, q->e.p1, q->e.p2, ev);
140 
141         case SEQ_NOTEON:
142                 return note_on_event(dp, q->e.dev, q->e.chn, q->e.p1, q->e.p2, ev);
143 
144         case SEQ_PGMCHANGE:
145                 return set_control_event(dp, q->e.dev, SNDRV_SEQ_EVENT_PGMCHANGE,
146                                          q->e.chn, 0, q->e.p1, ev);
147 
148         case SEQ_AFTERTOUCH:
149                 return set_control_event(dp, q->e.dev, SNDRV_SEQ_EVENT_CHANPRESS,
150                                          q->e.chn, 0, q->e.p1, ev);
151 
152         case SEQ_BALANCE:
153                 /* convert -128:127 to 0:127 */
154                 val = (char)q->e.p1;
155                 val = (val + 128) / 2;
156                 return set_control_event(dp, q->e.dev, SNDRV_SEQ_EVENT_CONTROLLER,
157                                          q->e.chn, CTL_PAN, val, ev);
158 
159         case SEQ_CONTROLLER:
160                 val = ((short)q->e.p3 << 8) | (short)q->e.p2;
161                 switch (q->e.p1) {
162                 case CTRL_PITCH_BENDER: /* SEQ1 V2 control */
163                         /* -0x2000:0x1fff */
164                         return set_control_event(dp, q->e.dev,
165                                                  SNDRV_SEQ_EVENT_PITCHBEND,
166                                                  q->e.chn, 0, val, ev);
167                 case CTRL_PITCH_BENDER_RANGE:
168                         /* conversion: 100/semitone -> 128/semitone */
169                         return set_control_event(dp, q->e.dev,
170                                                  SNDRV_SEQ_EVENT_REGPARAM,
171                                                  q->e.chn, 0, val*128/100, ev);
172                 default:
173                         return set_control_event(dp, q->e.dev,
174                                                   SNDRV_SEQ_EVENT_CONTROL14,
175                                                   q->e.chn, q->e.p1, val, ev);
176                 }
177 
178         case SEQ_VOLMODE:
179                 return snd_seq_oss_synth_raw_event(dp, q->e.dev, q->c, ev);
180 
181         }
182         return -EINVAL;
183 }
184 
185 /* channel voice events: mode1 and 2 */
186 static int
187 chn_voice_event(struct seq_oss_devinfo *dp, union evrec *q, struct snd_seq_event *ev)
188 {
189         if (q->v.chn >= 32)
190                 return -EINVAL;
191         switch (q->v.cmd) {
192         case MIDI_NOTEON:
193                 return note_on_event(dp, q->v.dev, q->v.chn, q->v.note, q->v.parm, ev);
194 
195         case MIDI_NOTEOFF:
196                 return note_off_event(dp, q->v.dev, q->v.chn, q->v.note, q->v.parm, ev);
197 
198         case MIDI_KEY_PRESSURE:
199                 return set_note_event(dp, q->v.dev, SNDRV_SEQ_EVENT_KEYPRESS,
200                                        q->v.chn, q->v.note, q->v.parm, ev);
201 
202         }
203         return -EINVAL;
204 }
205 
206 /* channel common events: mode1 and 2 */
207 static int
208 chn_common_event(struct seq_oss_devinfo *dp, union evrec *q, struct snd_seq_event *ev)
209 {
210         if (q->l.chn >= 32)
211                 return -EINVAL;
212         switch (q->l.cmd) {
213         case MIDI_PGM_CHANGE:
214                 return set_control_event(dp, q->l.dev, SNDRV_SEQ_EVENT_PGMCHANGE,
215                                           q->l.chn, 0, q->l.p1, ev);
216 
217         case MIDI_CTL_CHANGE:
218                 return set_control_event(dp, q->l.dev, SNDRV_SEQ_EVENT_CONTROLLER,
219                                           q->l.chn, q->l.p1, q->l.val, ev);
220 
221         case MIDI_PITCH_BEND:
222                 /* conversion: 0:0x3fff -> -0x2000:0x1fff */
223                 return set_control_event(dp, q->l.dev, SNDRV_SEQ_EVENT_PITCHBEND,
224                                           q->l.chn, 0, q->l.val - 8192, ev);
225                 
226         case MIDI_CHN_PRESSURE:
227                 return set_control_event(dp, q->l.dev, SNDRV_SEQ_EVENT_CHANPRESS,
228                                           q->l.chn, 0, q->l.val, ev);
229         }
230         return -EINVAL;
231 }
232 
233 /* timer events: mode1 and mode2 */
234 static int
235 timing_event(struct seq_oss_devinfo *dp, union evrec *q, struct snd_seq_event *ev)
236 {
237         switch (q->t.cmd) {
238         case TMR_ECHO:
239                 if (dp->seq_mode == SNDRV_SEQ_OSS_MODE_MUSIC)
240                         return set_echo_event(dp, q, ev);
241                 else {
242                         union evrec tmp;
243                         memset(&tmp, 0, sizeof(tmp));
244                         /* XXX: only for little-endian! */
245                         tmp.echo = (q->t.time << 8) | SEQ_ECHO;
246                         return set_echo_event(dp, &tmp, ev);
247                 } 
248 
249         case TMR_STOP:
250                 if (dp->seq_mode)
251                         return snd_seq_oss_timer_stop(dp->timer);
252                 return 0;
253 
254         case TMR_CONTINUE:
255                 if (dp->seq_mode)
256                         return snd_seq_oss_timer_continue(dp->timer);
257                 return 0;
258 
259         case TMR_TEMPO:
260                 if (dp->seq_mode)
261                         return snd_seq_oss_timer_tempo(dp->timer, q->t.time);
262                 return 0;
263         }
264 
265         return -EINVAL;
266 }
267 
268 /* local events: mode1 and 2 */
269 static int
270 local_event(struct seq_oss_devinfo *dp, union evrec *q, struct snd_seq_event *ev)
271 {
272         return -EINVAL;
273 }
274 
275 /*
276  * process note-on event for OSS synth
277  * three different modes are available:
278  * - SNDRV_SEQ_OSS_PROCESS_EVENTS  (for one-voice per channel mode)
279  *      Accept note 255 as volume change.
280  * - SNDRV_SEQ_OSS_PASS_EVENTS
281  *      Pass all events to lowlevel driver anyway
282  * - SNDRV_SEQ_OSS_PROCESS_KEYPRESS  (mostly for Emu8000)
283  *      Use key-pressure if note >= 128
284  */
285 static int
286 note_on_event(struct seq_oss_devinfo *dp, int dev, int ch, int note, int vel, struct snd_seq_event *ev)
287 {
288         struct seq_oss_synthinfo *info;
289 
290         if (!snd_seq_oss_synth_is_valid(dp, dev))
291                 return -ENXIO;
292 
293         info = &dp->synths[dev];
294         switch (info->arg.event_passing) {
295         case SNDRV_SEQ_OSS_PROCESS_EVENTS:
296                 if (! info->ch || ch < 0 || ch >= info->nr_voices) {
297                         /* pass directly */
298                         return set_note_event(dp, dev, SNDRV_SEQ_EVENT_NOTEON, ch, note, vel, ev);
299                 }
300 
301                 if (note == 255 && info->ch[ch].note >= 0) {
302                         /* volume control */
303                         int type;
304                         //if (! vel)
305                                 /* set volume to zero -- note off */
306                         //      type = SNDRV_SEQ_EVENT_NOTEOFF;
307                         //else
308                                 if (info->ch[ch].vel)
309                                 /* sample already started -- volume change */
310                                 type = SNDRV_SEQ_EVENT_KEYPRESS;
311                         else
312                                 /* sample not started -- start now */
313                                 type = SNDRV_SEQ_EVENT_NOTEON;
314                         info->ch[ch].vel = vel;
315                         return set_note_event(dp, dev, type, ch, info->ch[ch].note, vel, ev);
316                 } else if (note >= 128)
317                         return -EINVAL; /* invalid */
318 
319                 if (note != info->ch[ch].note && info->ch[ch].note >= 0)
320                         /* note changed - note off at beginning */
321                         set_note_event(dp, dev, SNDRV_SEQ_EVENT_NOTEOFF, ch, info->ch[ch].note, 0, ev);
322                 /* set current status */
323                 info->ch[ch].note = note;
324                 info->ch[ch].vel = vel;
325                 if (vel) /* non-zero velocity - start the note now */
326                         return set_note_event(dp, dev, SNDRV_SEQ_EVENT_NOTEON, ch, note, vel, ev);
327                 return -EINVAL;
328                 
329         case SNDRV_SEQ_OSS_PASS_EVENTS:
330                 /* pass the event anyway */
331                 return set_note_event(dp, dev, SNDRV_SEQ_EVENT_NOTEON, ch, note, vel, ev);
332 
333         case SNDRV_SEQ_OSS_PROCESS_KEYPRESS:
334                 if (note >= 128) /* key pressure: shifted by 128 */
335                         return set_note_event(dp, dev, SNDRV_SEQ_EVENT_KEYPRESS, ch, note - 128, vel, ev);
336                 else /* normal note-on event */
337                         return set_note_event(dp, dev, SNDRV_SEQ_EVENT_NOTEON, ch, note, vel, ev);
338         }
339         return -EINVAL;
340 }
341 
342 /*
343  * process note-off event for OSS synth
344  */
345 static int
346 note_off_event(struct seq_oss_devinfo *dp, int dev, int ch, int note, int vel, struct snd_seq_event *ev)
347 {
348         struct seq_oss_synthinfo *info;
349 
350         if (!snd_seq_oss_synth_is_valid(dp, dev))
351                 return -ENXIO;
352 
353         info = &dp->synths[dev];
354         switch (info->arg.event_passing) {
355         case SNDRV_SEQ_OSS_PROCESS_EVENTS:
356                 if (! info->ch || ch < 0 || ch >= info->nr_voices) {
357                         /* pass directly */
358                         return set_note_event(dp, dev, SNDRV_SEQ_EVENT_NOTEON, ch, note, vel, ev);
359                 }
360 
361                 if (info->ch[ch].note >= 0) {
362                         note = info->ch[ch].note;
363                         info->ch[ch].vel = 0;
364                         info->ch[ch].note = -1;
365                         return set_note_event(dp, dev, SNDRV_SEQ_EVENT_NOTEOFF, ch, note, vel, ev);
366                 }
367                 return -EINVAL; /* invalid */
368 
369         case SNDRV_SEQ_OSS_PASS_EVENTS:
370         case SNDRV_SEQ_OSS_PROCESS_KEYPRESS:
371                 /* pass the event anyway */
372                 return set_note_event(dp, dev, SNDRV_SEQ_EVENT_NOTEOFF, ch, note, vel, ev);
373 
374         }
375         return -EINVAL;
376 }
377 
378 /*
379  * create a note event
380  */
381 static int
382 set_note_event(struct seq_oss_devinfo *dp, int dev, int type, int ch, int note, int vel, struct snd_seq_event *ev)
383 {
384         if (! snd_seq_oss_synth_is_valid(dp, dev))
385                 return -ENXIO;
386         
387         ev->type = type;
388         snd_seq_oss_synth_addr(dp, dev, ev);
389         ev->data.note.channel = ch;
390         ev->data.note.note = note;
391         ev->data.note.velocity = vel;
392 
393         return 0;
394 }
395 
396 /*
397  * create a control event
398  */
399 static int
400 set_control_event(struct seq_oss_devinfo *dp, int dev, int type, int ch, int param, int val, struct snd_seq_event *ev)
401 {
402         if (! snd_seq_oss_synth_is_valid(dp, dev))
403                 return -ENXIO;
404         
405         ev->type = type;
406         snd_seq_oss_synth_addr(dp, dev, ev);
407         ev->data.control.channel = ch;
408         ev->data.control.param = param;
409         ev->data.control.value = val;
410 
411         return 0;
412 }
413 
414 /*
415  * create an echo event
416  */
417 static int
418 set_echo_event(struct seq_oss_devinfo *dp, union evrec *rec, struct snd_seq_event *ev)
419 {
420         ev->type = SNDRV_SEQ_EVENT_ECHO;
421         /* echo back to itself */
422         snd_seq_oss_fill_addr(dp, ev, dp->addr.client, dp->addr.port);
423         memcpy(&ev->data, rec, LONG_EVENT_SIZE);
424         return 0;
425 }
426 
427 /*
428  * event input callback from ALSA sequencer:
429  * the echo event is processed here.
430  */
431 int
432 snd_seq_oss_event_input(struct snd_seq_event *ev, int direct, void *private_data,
433                         int atomic, int hop)
434 {
435         struct seq_oss_devinfo *dp = (struct seq_oss_devinfo *)private_data;
436         union evrec *rec;
437 
438         if (ev->type != SNDRV_SEQ_EVENT_ECHO)
439                 return snd_seq_oss_midi_input(ev, direct, private_data);
440 
441         if (ev->source.client != dp->cseq)
442                 return 0; /* ignored */
443 
444         rec = (union evrec*)&ev->data;
445         if (rec->s.code == SEQ_SYNCTIMER) {
446                 /* sync echo back */
447                 snd_seq_oss_writeq_wakeup(dp->writeq, rec->t.time);
448                 
449         } else {
450                 /* echo back event */
451                 if (dp->readq == NULL)
452                         return 0;
453                 snd_seq_oss_readq_put_event(dp->readq, rec);
454         }
455         return 0;
456 }
457 
458 

~ [ source navigation ] ~ [ diff markup ] ~ [ identifier search ] ~

kernel.org | git.kernel.org | LWN.net | Project Home | Wiki (Japanese) | Wiki (English) | SVN repository | Mail admin

Linux® is a registered trademark of Linus Torvalds in the United States and other countries.
TOMOYO® is a registered trademark of NTT DATA CORPORATION.

osdn.jp