projects / linux-2.6-block.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
[ALSA] sound/core/seq: move declarations of globally visible variables to proper...
[linux-2.6-block.git] / sound / core / seq / seq_clientmgr.c
CommitLineData
1da177e4
LT		 1/*
2 * ALSA sequencer Client Manager
3 * Copyright (c) 1998-2001 by Frank van de Pol <fvdpol@coil.demon.nl>
c1017a4c 4 * Jaroslav Kysela <perex@perex.cz>
1da177e4
LT		 5 * Takashi Iwai <tiwai@suse.de>
6 *
7 *
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 2 of the License, or
11 * (at your option) any later version.
12 *
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
17 *
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, write to the Free Software
20 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
21 *
22 */
23
24#include <sound/driver.h>
25#include <linux/init.h>
1da177e4
LT		 26#include <linux/slab.h>
27#include <sound/core.h>
28#include <sound/minors.h>
29#include <linux/kmod.h>
30
31#include <sound/seq_kernel.h>
32#include "seq_clientmgr.h"
33#include "seq_memory.h"
34#include "seq_queue.h"
35#include "seq_timer.h"
36#include "seq_info.h"
37#include "seq_system.h"
38#include <sound/seq_device.h>
39#ifdef CONFIG_COMPAT
40#include <linux/compat.h>
41#endif
42
43/* Client Manager
44
45 * this module handles the connections of userland and kernel clients
46 *
47 */
48
aa1e77e6
CL		 49/*
50 * There are four ranges of client numbers (last two shared):
51 * 0..15: global clients
52 * 16..127: statically allocated client numbers for cards 0..27
53 * 128..191: dynamically allocated client numbers for cards 28..31
54 * 128..191: dynamically allocated client numbers for applications
55 */
56
57/* number of kernel non-card clients */
58#define SNDRV_SEQ_GLOBAL_CLIENTS 16
59/* clients per cards, for static clients */
60#define SNDRV_SEQ_CLIENTS_PER_CARD 4
61/* dynamically allocated client numbers (both kernel drivers and user space) */
62#define SNDRV_SEQ_DYNAMIC_CLIENTS_BEGIN 128
d001544d 63
1da177e4
LT		 64#define SNDRV_SEQ_LFLG_INPUT 0x0001
65#define SNDRV_SEQ_LFLG_OUTPUT 0x0002
66#define SNDRV_SEQ_LFLG_OPEN (SNDRV_SEQ_LFLG_INPUT|SNDRV_SEQ_LFLG_OUTPUT)
67
68static DEFINE_SPINLOCK(clients_lock);
1a60d4c5 69static DEFINE_MUTEX(register_mutex);
1da177e4
LT		 70
71/*
72 * client table
73 */
74static char clienttablock[SNDRV_SEQ_MAX_CLIENTS];
c7e0b5bf
TI		 75static struct snd_seq_client *clienttab[SNDRV_SEQ_MAX_CLIENTS];
76static struct snd_seq_usage client_usage;
1da177e4
LT		 77
78/*
79 * prototypes
80 */
c7e0b5bf
TI		 81static int bounce_error_event(struct snd_seq_client *client,
82 struct snd_seq_event *event,
83 int err, int atomic, int hop);
84static int snd_seq_deliver_single_event(struct snd_seq_client *client,
85 struct snd_seq_event *event,
86 int filter, int atomic, int hop);
1da177e4
LT		 87
88/*
89 */
90
91static inline mm_segment_t snd_enter_user(void)
92{
93 mm_segment_t fs = get_fs();
94 set_fs(get_ds());
95 return fs;
96}
97
98static inline void snd_leave_user(mm_segment_t fs)
99{
100 set_fs(fs);
101}
102
103/*
104 */
105static inline unsigned short snd_seq_file_flags(struct file *file)
106{
107 switch (file->f_mode & (FMODE_READ | FMODE_WRITE)) {
108 case FMODE_WRITE:
109 return SNDRV_SEQ_LFLG_OUTPUT;
110 case FMODE_READ:
111 return SNDRV_SEQ_LFLG_INPUT;
112 default:
113 return SNDRV_SEQ_LFLG_OPEN;
114 }
115}
116
c7e0b5bf 117static inline int snd_seq_write_pool_allocated(struct snd_seq_client *client)
1da177e4
LT		 118{
119 return snd_seq_total_cells(client->pool) > 0;
120}
121
122/* return pointer to client structure for specified id */
c7e0b5bf 123static struct snd_seq_client *clientptr(int clientid)
1da177e4
LT		 124{
125 if (clientid < 0 || clientid >= SNDRV_SEQ_MAX_CLIENTS) {
c7e0b5bf
TI		 126 snd_printd("Seq: oops. Trying to get pointer to client %d\n",
127 clientid);
1da177e4
LT		 128 return NULL;
129 }
130 return clienttab[clientid];
131}
132
c7e0b5bf 133struct snd_seq_client *snd_seq_client_use_ptr(int clientid)
1da177e4
LT		 134{
135 unsigned long flags;
c7e0b5bf 136 struct snd_seq_client *client;
1da177e4
LT		 137
138 if (clientid < 0 || clientid >= SNDRV_SEQ_MAX_CLIENTS) {
c7e0b5bf
TI		 139 snd_printd("Seq: oops. Trying to get pointer to client %d\n",
140 clientid);
1da177e4
LT		 141 return NULL;
142 }
143 spin_lock_irqsave(&clients_lock, flags);
144 client = clientptr(clientid);
145 if (client)
146 goto __lock;
147 if (clienttablock[clientid]) {
148 spin_unlock_irqrestore(&clients_lock, flags);
149 return NULL;
150 }
151 spin_unlock_irqrestore(&clients_lock, flags);
152#ifdef CONFIG_KMOD
153 if (!in_interrupt() && current->fs->root) {
aa1e77e6 154 static char client_requested[SNDRV_SEQ_GLOBAL_CLIENTS];
1da177e4 155 static char card_requested[SNDRV_CARDS];
aa1e77e6 156 if (clientid < SNDRV_SEQ_GLOBAL_CLIENTS) {
1da177e4
LT		 157 int idx;
158
159 if (! client_requested[clientid] && current->fs->root) {
160 client_requested[clientid] = 1;
aa1e77e6 161 for (idx = 0; idx < 15; idx++) {
1da177e4
LT		 162 if (seq_client_load[idx] < 0)
163 break;
164 if (seq_client_load[idx] == clientid) {
c7e0b5bf
TI		 165 request_module("snd-seq-client-%i",
166 clientid);
1da177e4
LT		 167 break;
168 }
169 }
170 }
aa1e77e6
CL		 171 } else if (clientid < SNDRV_SEQ_DYNAMIC_CLIENTS_BEGIN) {
172 int card = (clientid - SNDRV_SEQ_GLOBAL_CLIENTS) /
173 SNDRV_SEQ_CLIENTS_PER_CARD;
1da177e4
LT		 174 if (card < snd_ecards_limit) {
175 if (! card_requested[card]) {
176 card_requested[card] = 1;
177 snd_request_card(card);
178 }
179 snd_seq_device_load_drivers();
180 }
181 }
182 spin_lock_irqsave(&clients_lock, flags);
183 client = clientptr(clientid);
184 if (client)
185 goto __lock;
186 spin_unlock_irqrestore(&clients_lock, flags);
187 }
188#endif
189 return NULL;
190
191 __lock:
192 snd_use_lock_use(&client->use_lock);
193 spin_unlock_irqrestore(&clients_lock, flags);
194 return client;
195}
196
c7e0b5bf 197static void usage_alloc(struct snd_seq_usage *res, int num)
1da177e4
LT		 198{
199 res->cur += num;
200 if (res->cur > res->peak)
201 res->peak = res->cur;
202}
203
c7e0b5bf 204static void usage_free(struct snd_seq_usage *res, int num)
1da177e4
LT		 205{
206 res->cur -= num;
207}
208
209/* initialise data structures */
210int __init client_init_data(void)
211{
212 /* zap out the client table */
213 memset(&clienttablock, 0, sizeof(clienttablock));
214 memset(&clienttab, 0, sizeof(clienttab));
215 return 0;
216}
217
218
aa1e77e6 219static struct snd_seq_client *seq_create_client1(int client_index, int poolsize)
1da177e4
LT		 220{
221 unsigned long flags;
222 int c;
c7e0b5bf 223 struct snd_seq_client *client;
1da177e4
LT		 224
225 /* init client data */
ecca82b4 226 client = kzalloc(sizeof(*client), GFP_KERNEL);
1da177e4
LT		 227 if (client == NULL)
228 return NULL;
229 client->pool = snd_seq_pool_new(poolsize);
230 if (client->pool == NULL) {
231 kfree(client);
232 return NULL;
233 }
234 client->type = NO_CLIENT;
235 snd_use_lock_init(&client->use_lock);
236 rwlock_init(&client->ports_lock);
1a60d4c5 237 mutex_init(&client->ports_mutex);
1da177e4
LT		 238 INIT_LIST_HEAD(&client->ports_list_head);
239
240 /* find free slot in the client table */
241 spin_lock_irqsave(&clients_lock, flags);
242 if (client_index < 0) {
aa1e77e6
CL		 243 for (c = SNDRV_SEQ_DYNAMIC_CLIENTS_BEGIN;
244 c < SNDRV_SEQ_MAX_CLIENTS;
245 c++) {
1da177e4
LT		 246 if (clienttab[c] || clienttablock[c])
247 continue;
248 clienttab[client->number = c] = client;
249 spin_unlock_irqrestore(&clients_lock, flags);
250 return client;
251 }
252 } else {
253 if (clienttab[client_index] == NULL && !clienttablock[client_index]) {
254 clienttab[client->number = client_index] = client;
255 spin_unlock_irqrestore(&clients_lock, flags);
256 return client;
257 }
258 }
259 spin_unlock_irqrestore(&clients_lock, flags);
260 snd_seq_pool_delete(&client->pool);
261 kfree(client);
262 return NULL; /* no free slot found or busy, return failure code */
263}
264
265
c7e0b5bf 266static int seq_free_client1(struct snd_seq_client *client)
1da177e4
LT		 267{
268 unsigned long flags;
269
270 snd_assert(client != NULL, return -EINVAL);
271 snd_seq_delete_all_ports(client);
272 snd_seq_queue_client_leave(client->number);
273 spin_lock_irqsave(&clients_lock, flags);
274 clienttablock[client->number] = 1;
275 clienttab[client->number] = NULL;
276 spin_unlock_irqrestore(&clients_lock, flags);
277 snd_use_lock_sync(&client->use_lock);
278 snd_seq_queue_client_termination(client->number);
279 if (client->pool)
280 snd_seq_pool_delete(&client->pool);
281 spin_lock_irqsave(&clients_lock, flags);
282 clienttablock[client->number] = 0;
283 spin_unlock_irqrestore(&clients_lock, flags);
284 return 0;
285}
286
287
c7e0b5bf 288static void seq_free_client(struct snd_seq_client * client)
1da177e4 289{
1a60d4c5 290 mutex_lock(&register_mutex);
1da177e4
LT		 291 switch (client->type) {
292 case NO_CLIENT:
c7e0b5bf
TI		 293 snd_printk(KERN_WARNING "Seq: Trying to free unused client %d\n",
294 client->number);
1da177e4
LT		 295 break;
296 case USER_CLIENT:
297 case KERNEL_CLIENT:
298 seq_free_client1(client);
299 usage_free(&client_usage, 1);
300 break;
301
302 default:
c7e0b5bf
TI		 303 snd_printk(KERN_ERR "Seq: Trying to free client %d with undefined type = %d\n",
304 client->number, client->type);
1da177e4 305 }
1a60d4c5 306 mutex_unlock(&register_mutex);
1da177e4
LT		 307
308 snd_seq_system_client_ev_client_exit(client->number);
309}
310
311
312
313/* -------------------------------------------------------- */
314
315/* create a user client */
316static int snd_seq_open(struct inode *inode, struct file *file)
317{
318 int c, mode; /* client id */
c7e0b5bf
TI		 319 struct snd_seq_client *client;
320 struct snd_seq_user_client *user;
1da177e4 321
1a60d4c5 322 if (mutex_lock_interruptible(&register_mutex))
1da177e4 323 return -ERESTARTSYS;
aa1e77e6 324 client = seq_create_client1(-1, SNDRV_SEQ_DEFAULT_EVENTS);
1da177e4 325 if (client == NULL) {
1a60d4c5 326 mutex_unlock(&register_mutex);
1da177e4
LT		 327 return -ENOMEM; /* failure code */
328 }
329
330 mode = snd_seq_file_flags(file);
331 if (mode & SNDRV_SEQ_LFLG_INPUT)
332 client->accept_input = 1;
333 if (mode & SNDRV_SEQ_LFLG_OUTPUT)
334 client->accept_output = 1;
335
336 user = &client->data.user;
337 user->fifo = NULL;
338 user->fifo_pool_size = 0;
339
340 if (mode & SNDRV_SEQ_LFLG_INPUT) {
341 user->fifo_pool_size = SNDRV_SEQ_DEFAULT_CLIENT_EVENTS;
342 user->fifo = snd_seq_fifo_new(user->fifo_pool_size);
343 if (user->fifo == NULL) {
344 seq_free_client1(client);
345 kfree(client);
1a60d4c5 346 mutex_unlock(&register_mutex);
1da177e4
LT		 347 return -ENOMEM;
348 }
349 }
350
351 usage_alloc(&client_usage, 1);
352 client->type = USER_CLIENT;
1a60d4c5 353 mutex_unlock(&register_mutex);
1da177e4
LT		 354
355 c = client->number;
356 file->private_data = client;
357
358 /* fill client data */
359 user->file = file;
360 sprintf(client->name, "Client-%d", c);
361
362 /* make others aware this new client */
363 snd_seq_system_client_ev_client_start(c);
364
365 return 0;
366}
367
368/* delete a user client */
369static int snd_seq_release(struct inode *inode, struct file *file)
370{
c7e0b5bf 371 struct snd_seq_client *client = file->private_data;
1da177e4
LT		 372
373 if (client) {
374 seq_free_client(client);
375 if (client->data.user.fifo)
376 snd_seq_fifo_delete(&client->data.user.fifo);
377 kfree(client);
378 }
379
380 return 0;
381}
382
383
384/* handle client read() */
385/* possible error values:
386 * -ENXIO invalid client or file open mode
387 * -ENOSPC FIFO overflow (the flag is cleared after this error report)
388 * -EINVAL no enough user-space buffer to write the whole event
389 * -EFAULT seg. fault during copy to user space
390 */
c7e0b5bf
TI		 391static ssize_t snd_seq_read(struct file *file, char __user *buf, size_t count,
392 loff_t *offset)
1da177e4 393{
c7e0b5bf
TI		 394 struct snd_seq_client *client = file->private_data;
395 struct snd_seq_fifo *fifo;
1da177e4
LT		 396 int err;
397 long result = 0;
c7e0b5bf 398 struct snd_seq_event_cell *cell;
1da177e4
LT		 399
400 if (!(snd_seq_file_flags(file) & SNDRV_SEQ_LFLG_INPUT))
401 return -ENXIO;
402
403 if (!access_ok(VERIFY_WRITE, buf, count))
404 return -EFAULT;
405
406 /* check client structures are in place */
407 snd_assert(client != NULL, return -ENXIO);
408
409 if (!client->accept_input || (fifo = client->data.user.fifo) == NULL)
410 return -ENXIO;
411
412 if (atomic_read(&fifo->overflow) > 0) {
413 /* buffer overflow is detected */
414 snd_seq_fifo_clear(fifo);
415 /* return error code */
416 return -ENOSPC;
417 }
418
419 cell = NULL;
420 err = 0;
421 snd_seq_fifo_lock(fifo);
422
423 /* while data available in queue */
c7e0b5bf 424 while (count >= sizeof(struct snd_seq_event)) {
1da177e4
LT		 425 int nonblock;
426
427 nonblock = (file->f_flags & O_NONBLOCK) || result > 0;
428 if ((err = snd_seq_fifo_cell_out(fifo, &cell, nonblock)) < 0) {
429 break;
430 }
431 if (snd_seq_ev_is_variable(&cell->event)) {
c7e0b5bf 432 struct snd_seq_event tmpev;
1da177e4
LT		 433 tmpev = cell->event;
434 tmpev.data.ext.len &= ~SNDRV_SEQ_EXT_MASK;
c7e0b5bf 435 if (copy_to_user(buf, &tmpev, sizeof(struct snd_seq_event))) {
1da177e4
LT		 436 err = -EFAULT;
437 break;
438 }
c7e0b5bf
TI		 439 count -= sizeof(struct snd_seq_event);
440 buf += sizeof(struct snd_seq_event);
4d23359b
CL		 441 err = snd_seq_expand_var_event(&cell->event, count,
442 (char __force *)buf, 0,
c7e0b5bf 443 sizeof(struct snd_seq_event));
1da177e4
LT		 444 if (err < 0)
445 break;
446 result += err;
447 count -= err;
448 buf += err;
449 } else {
c7e0b5bf 450 if (copy_to_user(buf, &cell->event, sizeof(struct snd_seq_event))) {
1da177e4
LT		 451 err = -EFAULT;
452 break;
453 }
c7e0b5bf
TI		 454 count -= sizeof(struct snd_seq_event);
455 buf += sizeof(struct snd_seq_event);
1da177e4
LT		 456 }
457 snd_seq_cell_free(cell);
458 cell = NULL; /* to be sure */
c7e0b5bf 459 result += sizeof(struct snd_seq_event);
1da177e4
LT		 460 }
461
462 if (err < 0) {
463 if (cell)
464 snd_seq_fifo_cell_putback(fifo, cell);
465 if (err == -EAGAIN && result > 0)
466 err = 0;
467 }
468 snd_seq_fifo_unlock(fifo);
469
470 return (err < 0) ? err : result;
471}
472
473
474/*
475 * check access permission to the port
476 */
c7e0b5bf 477static int check_port_perm(struct snd_seq_client_port *port, unsigned int flags)
1da177e4
LT		 478{
479 if ((port->capability & flags) != flags)
480 return 0;
481 return flags;
482}
483
484/*
485 * check if the destination client is available, and return the pointer
486 * if filter is non-zero, client filter bitmap is tested.
487 */
c7e0b5bf
TI		 488static struct snd_seq_client *get_event_dest_client(struct snd_seq_event *event,
489 int filter)
1da177e4 490{
c7e0b5bf 491 struct snd_seq_client *dest;
1da177e4
LT		 492
493 dest = snd_seq_client_use_ptr(event->dest.client);
494 if (dest == NULL)
495 return NULL;
496 if (! dest->accept_input)
497 goto __not_avail;
498 if ((dest->filter & SNDRV_SEQ_FILTER_USE_EVENT) &&
499 ! test_bit(event->type, dest->event_filter))
500 goto __not_avail;
501 if (filter && !(dest->filter & filter))
502 goto __not_avail;
503
504 return dest; /* ok - accessible */
505__not_avail:
506 snd_seq_client_unlock(dest);
507 return NULL;
508}
509
510
511/*
512 * Return the error event.
513 *
514 * If the receiver client is a user client, the original event is
515 * encapsulated in SNDRV_SEQ_EVENT_BOUNCE as variable length event. If
516 * the original event is also variable length, the external data is
517 * copied after the event record.
518 * If the receiver client is a kernel client, the original event is
519 * quoted in SNDRV_SEQ_EVENT_KERNEL_ERROR, since this requires no extra
520 * kmalloc.
521 */
c7e0b5bf
TI		 522static int bounce_error_event(struct snd_seq_client *client,
523 struct snd_seq_event *event,
1da177e4
LT		 524 int err, int atomic, int hop)
525{
c7e0b5bf 526 struct snd_seq_event bounce_ev;
1da177e4
LT		 527 int result;
528
529 if (client == NULL ||
530 ! (client->filter & SNDRV_SEQ_FILTER_BOUNCE) ||
531 ! client->accept_input)
532 return 0; /* ignored */
533
534 /* set up quoted error */
535 memset(&bounce_ev, 0, sizeof(bounce_ev));
536 bounce_ev.type = SNDRV_SEQ_EVENT_KERNEL_ERROR;
537 bounce_ev.flags = SNDRV_SEQ_EVENT_LENGTH_FIXED;
538 bounce_ev.queue = SNDRV_SEQ_QUEUE_DIRECT;
539 bounce_ev.source.client = SNDRV_SEQ_CLIENT_SYSTEM;
540 bounce_ev.source.port = SNDRV_SEQ_PORT_SYSTEM_ANNOUNCE;
541 bounce_ev.dest.client = client->number;
542 bounce_ev.dest.port = event->source.port;
543 bounce_ev.data.quote.origin = event->dest;
544 bounce_ev.data.quote.event = event;
545 bounce_ev.data.quote.value = -err; /* use positive value */
546 result = snd_seq_deliver_single_event(NULL, &bounce_ev, 0, atomic, hop + 1);
547 if (result < 0) {
548 client->event_lost++;
549 return result;
550 }
551
552 return result;
553}
554
555
556/*
557 * rewrite the time-stamp of the event record with the curren time
558 * of the given queue.
559 * return non-zero if updated.
560 */
c7e0b5bf
TI		 561static int update_timestamp_of_queue(struct snd_seq_event *event,
562 int queue, int real_time)
1da177e4 563{
c7e0b5bf 564 struct snd_seq_queue *q;
1da177e4
LT		 565
566 q = queueptr(queue);
567 if (! q)
568 return 0;
569 event->queue = queue;
570 event->flags &= ~SNDRV_SEQ_TIME_STAMP_MASK;
571 if (real_time) {
572 event->time.time = snd_seq_timer_get_cur_time(q->timer);
573 event->flags |= SNDRV_SEQ_TIME_STAMP_REAL;
574 } else {
575 event->time.tick = snd_seq_timer_get_cur_tick(q->timer);
576 event->flags |= SNDRV_SEQ_TIME_STAMP_TICK;
577 }
578 queuefree(q);
579 return 1;
580}
581
582
583/*
584 * deliver an event to the specified destination.
585 * if filter is non-zero, client filter bitmap is tested.
586 *
587 * RETURN VALUE: 0 : if succeeded
588 * <0 : error
589 */
c7e0b5bf
TI		 590static int snd_seq_deliver_single_event(struct snd_seq_client *client,
591 struct snd_seq_event *event,
1da177e4
LT		 592 int filter, int atomic, int hop)
593{
c7e0b5bf
TI		 594 struct snd_seq_client *dest = NULL;
595 struct snd_seq_client_port *dest_port = NULL;
1da177e4
LT		 596 int result = -ENOENT;
597 int direct;
598
599 direct = snd_seq_ev_is_direct(event);
600
601 dest = get_event_dest_client(event, filter);
602 if (dest == NULL)
603 goto __skip;
604 dest_port = snd_seq_port_use_ptr(dest, event->dest.port);
605 if (dest_port == NULL)
606 goto __skip;
607
608 /* check permission */
609 if (! check_port_perm(dest_port, SNDRV_SEQ_PORT_CAP_WRITE)) {
610 result = -EPERM;
611 goto __skip;
612 }
613
614 if (dest_port->timestamping)
615 update_timestamp_of_queue(event, dest_port->time_queue,
616 dest_port->time_real);
617
618 switch (dest->type) {
619 case USER_CLIENT:
620 if (dest->data.user.fifo)
621 result = snd_seq_fifo_event_in(dest->data.user.fifo, event);
622 break;
623
624 case KERNEL_CLIENT:
625 if (dest_port->event_input == NULL)
626 break;
c7e0b5bf
TI		 627 result = dest_port->event_input(event, direct,
628 dest_port->private_data,
629 atomic, hop);
1da177e4
LT		 630 break;
631 default:
632 break;
633 }
634
635 __skip:
636 if (dest_port)
637 snd_seq_port_unlock(dest_port);
638 if (dest)
639 snd_seq_client_unlock(dest);
640
641 if (result < 0 && !direct) {
642 result = bounce_error_event(client, event, result, atomic, hop);
643 }
644 return result;
645}
646
647
648/*
649 * send the event to all subscribers:
650 */
c7e0b5bf
TI		 651static int deliver_to_subscribers(struct snd_seq_client *client,
652 struct snd_seq_event *event,
1da177e4
LT		 653 int atomic, int hop)
654{
c7e0b5bf 655 struct snd_seq_subscribers *subs;
1da177e4 656 int err = 0, num_ev = 0;
c7e0b5bf
TI		 657 struct snd_seq_event event_saved;
658 struct snd_seq_client_port *src_port;
c7e0b5bf 659 struct snd_seq_port_subs_info *grp;
1da177e4
LT		 660
661 src_port = snd_seq_port_use_ptr(client, event->source.port);
662 if (src_port == NULL)
663 return -EINVAL; /* invalid source port */
664 /* save original event record */
665 event_saved = *event;
666 grp = &src_port->c_src;
667
668 /* lock list */
669 if (atomic)
670 read_lock(&grp->list_lock);
671 else
672 down_read(&grp->list_mutex);
9244b2c3 673 list_for_each_entry(subs, &grp->list_head, src_list) {
1da177e4
LT		 674 event->dest = subs->info.dest;
675 if (subs->info.flags & SNDRV_SEQ_PORT_SUBS_TIMESTAMP)
676 /* convert time according to flag with subscription */
677 update_timestamp_of_queue(event, subs->info.queue,
678 subs->info.flags & SNDRV_SEQ_PORT_SUBS_TIME_REAL);
679 err = snd_seq_deliver_single_event(client, event,
680 0, atomic, hop);
681 if (err < 0)
682 break;
683 num_ev++;
684 /* restore original event record */
685 *event = event_saved;
686 }
687 if (atomic)
688 read_unlock(&grp->list_lock);
689 else
690 up_read(&grp->list_mutex);
691 *event = event_saved; /* restore */
692 snd_seq_port_unlock(src_port);
693 return (err < 0) ? err : num_ev;
694}
695
696
697#ifdef SUPPORT_BROADCAST
698/*
699 * broadcast to all ports:
700 */
c7e0b5bf
TI		 701static int port_broadcast_event(struct snd_seq_client *client,
702 struct snd_seq_event *event,
1da177e4
LT		 703 int atomic, int hop)
704{
705 int num_ev = 0, err = 0;
c7e0b5bf 706 struct snd_seq_client *dest_client;
9244b2c3 707 struct snd_seq_client_port *port;
1da177e4
LT		 708
709 dest_client = get_event_dest_client(event, SNDRV_SEQ_FILTER_BROADCAST);
710 if (dest_client == NULL)
711 return 0; /* no matching destination */
712
713 read_lock(&dest_client->ports_lock);
9244b2c3 714 list_for_each_entry(port, &dest_client->ports_list_head, list) {
1da177e4
LT		 715 event->dest.port = port->addr.port;
716 /* pass NULL as source client to avoid error bounce */
717 err = snd_seq_deliver_single_event(NULL, event,
718 SNDRV_SEQ_FILTER_BROADCAST,
719 atomic, hop);
720 if (err < 0)
721 break;
722 num_ev++;
723 }
724 read_unlock(&dest_client->ports_lock);
725 snd_seq_client_unlock(dest_client);
726 event->dest.port = SNDRV_SEQ_ADDRESS_BROADCAST; /* restore */
727 return (err < 0) ? err : num_ev;
728}
729
730/*
731 * send the event to all clients:
732 * if destination port is also ADDRESS_BROADCAST, deliver to all ports.
733 */
c7e0b5bf
TI		 734static int broadcast_event(struct snd_seq_client *client,
735 struct snd_seq_event *event, int atomic, int hop)
1da177e4
LT		 736{
737 int err = 0, num_ev = 0;
738 int dest;
c7e0b5bf 739 struct snd_seq_addr addr;
1da177e4
LT		 740
741 addr = event->dest; /* save */
742
743 for (dest = 0; dest < SNDRV_SEQ_MAX_CLIENTS; dest++) {
744 /* don't send to itself */
745 if (dest == client->number)
746 continue;
747 event->dest.client = dest;
748 event->dest.port = addr.port;
749 if (addr.port == SNDRV_SEQ_ADDRESS_BROADCAST)
750 err = port_broadcast_event(client, event, atomic, hop);
751 else
752 /* pass NULL as source client to avoid error bounce */
753 err = snd_seq_deliver_single_event(NULL, event,
754 SNDRV_SEQ_FILTER_BROADCAST,
755 atomic, hop);
756 if (err < 0)
757 break;
758 num_ev += err;
759 }
760 event->dest = addr; /* restore */
761 return (err < 0) ? err : num_ev;
762}
763
764
765/* multicast - not supported yet */
c7e0b5bf 766static int multicast_event(struct snd_seq_client *client, struct snd_seq_event *event,
1da177e4
LT		 767 int atomic, int hop)
768{
769 snd_printd("seq: multicast not supported yet.\n");
770 return 0; /* ignored */
771}
772#endif /* SUPPORT_BROADCAST */
773
774
775/* deliver an event to the destination port(s).
776 * if the event is to subscribers or broadcast, the event is dispatched
777 * to multiple targets.
778 *
779 * RETURN VALUE: n > 0 : the number of delivered events.
780 * n == 0 : the event was not passed to any client.
781 * n < 0 : error - event was not processed.
782 */
c7e0b5bf 783static int snd_seq_deliver_event(struct snd_seq_client *client, struct snd_seq_event *event,
1da177e4
LT		 784 int atomic, int hop)
785{
786 int result;
787
788 hop++;
789 if (hop >= SNDRV_SEQ_MAX_HOPS) {
790 snd_printd("too long delivery path (%d:%d->%d:%d)\n",
791 event->source.client, event->source.port,
792 event->dest.client, event->dest.port);
793 return -EMLINK;
794 }
795
796 if (event->queue == SNDRV_SEQ_ADDRESS_SUBSCRIBERS ||
797 event->dest.client == SNDRV_SEQ_ADDRESS_SUBSCRIBERS)
798 result = deliver_to_subscribers(client, event, atomic, hop);
799#ifdef SUPPORT_BROADCAST
800 else if (event->queue == SNDRV_SEQ_ADDRESS_BROADCAST ||
801 event->dest.client == SNDRV_SEQ_ADDRESS_BROADCAST)
802 result = broadcast_event(client, event, atomic, hop);
803 else if (event->dest.client >= SNDRV_SEQ_MAX_CLIENTS)
804 result = multicast_event(client, event, atomic, hop);
805 else if (event->dest.port == SNDRV_SEQ_ADDRESS_BROADCAST)
806 result = port_broadcast_event(client, event, atomic, hop);
807#endif
808 else
809 result = snd_seq_deliver_single_event(client, event, 0, atomic, hop);
810
811 return result;
812}
813
814/*
815 * dispatch an event cell:
816 * This function is called only from queue check routines in timer
817 * interrupts or after enqueued.
818 * The event cell shall be released or re-queued in this function.
819 *
820 * RETURN VALUE: n > 0 : the number of delivered events.
821 * n == 0 : the event was not passed to any client.
822 * n < 0 : error - event was not processed.
823 */
c7e0b5bf 824int snd_seq_dispatch_event(struct snd_seq_event_cell *cell, int atomic, int hop)
1da177e4 825{
c7e0b5bf 826 struct snd_seq_client *client;
1da177e4
LT		 827 int result;
828
829 snd_assert(cell != NULL, return -EINVAL);
830
831 client = snd_seq_client_use_ptr(cell->event.source.client);
832 if (client == NULL) {
833 snd_seq_cell_free(cell); /* release this cell */
834 return -EINVAL;
835 }
836
837 if (cell->event.type == SNDRV_SEQ_EVENT_NOTE) {
838 /* NOTE event:
839 * the event cell is re-used as a NOTE-OFF event and
840 * enqueued again.
841 */
c7e0b5bf 842 struct snd_seq_event tmpev, *ev;
1da177e4
LT		 843
844 /* reserve this event to enqueue note-off later */
845 tmpev = cell->event;
846 tmpev.type = SNDRV_SEQ_EVENT_NOTEON;
847 result = snd_seq_deliver_event(client, &tmpev, atomic, hop);
848
849 /*
850 * This was originally a note event. We now re-use the
851 * cell for the note-off event.
852 */
853
854 ev = &cell->event;
855 ev->type = SNDRV_SEQ_EVENT_NOTEOFF;
856 ev->flags |= SNDRV_SEQ_PRIORITY_HIGH;
857
858 /* add the duration time */
859 switch (ev->flags & SNDRV_SEQ_TIME_STAMP_MASK) {
860 case SNDRV_SEQ_TIME_STAMP_TICK:
861 ev->time.tick += ev->data.note.duration;
862 break;
863 case SNDRV_SEQ_TIME_STAMP_REAL:
864 /* unit for duration is ms */
865 ev->time.time.tv_nsec += 1000000 * (ev->data.note.duration % 1000);
866 ev->time.time.tv_sec += ev->data.note.duration / 1000 +
867 ev->time.time.tv_nsec / 1000000000;
868 ev->time.time.tv_nsec %= 1000000000;
869 break;
870 }
871 ev->data.note.velocity = ev->data.note.off_velocity;
872
873 /* Now queue this cell as the note off event */
874 if (snd_seq_enqueue_event(cell, atomic, hop) < 0)
875 snd_seq_cell_free(cell); /* release this cell */
876
877 } else {
878 /* Normal events:
879 * event cell is freed after processing the event
880 */
881
882 result = snd_seq_deliver_event(client, &cell->event, atomic, hop);
883 snd_seq_cell_free(cell);
884 }
885
886 snd_seq_client_unlock(client);
887 return result;
888}
889
890
891/* Allocate a cell from client pool and enqueue it to queue:
892 * if pool is empty and blocking is TRUE, sleep until a new cell is
893 * available.
894 */
c7e0b5bf
TI		 895static int snd_seq_client_enqueue_event(struct snd_seq_client *client,
896 struct snd_seq_event *event,
1da177e4
LT		 897 struct file *file, int blocking,
898 int atomic, int hop)
899{
c7e0b5bf 900 struct snd_seq_event_cell *cell;
1da177e4
LT		 901 int err;
902
903 /* special queue values - force direct passing */
904 if (event->queue == SNDRV_SEQ_ADDRESS_SUBSCRIBERS) {
905 event->dest.client = SNDRV_SEQ_ADDRESS_SUBSCRIBERS;
906 event->queue = SNDRV_SEQ_QUEUE_DIRECT;
907 } else
908#ifdef SUPPORT_BROADCAST
909 if (event->queue == SNDRV_SEQ_ADDRESS_BROADCAST) {
910 event->dest.client = SNDRV_SEQ_ADDRESS_BROADCAST;
911 event->queue = SNDRV_SEQ_QUEUE_DIRECT;
912 }
913#endif
914 if (event->dest.client == SNDRV_SEQ_ADDRESS_SUBSCRIBERS) {
915 /* check presence of source port */
c7e0b5bf 916 struct snd_seq_client_port *src_port = snd_seq_port_use_ptr(client, event->source.port);
1da177e4
LT		 917 if (src_port == NULL)
918 return -EINVAL;
919 snd_seq_port_unlock(src_port);
920 }
921
922 /* direct event processing without enqueued */
923 if (snd_seq_ev_is_direct(event)) {
924 if (event->type == SNDRV_SEQ_EVENT_NOTE)
925 return -EINVAL; /* this event must be enqueued! */
926 return snd_seq_deliver_event(client, event, atomic, hop);
927 }
928
929 /* Not direct, normal queuing */
930 if (snd_seq_queue_is_used(event->queue, client->number) <= 0)
931 return -EINVAL; /* invalid queue */
932 if (! snd_seq_write_pool_allocated(client))
933 return -ENXIO; /* queue is not allocated */
934
935 /* allocate an event cell */
936 err = snd_seq_event_dup(client->pool, event, &cell, !blocking || atomic, file);
937 if (err < 0)
938 return err;
939
940 /* we got a cell. enqueue it. */
941 if ((err = snd_seq_enqueue_event(cell, atomic, hop)) < 0) {
942 snd_seq_cell_free(cell);
943 return err;
944 }
945
946 return 0;
947}
948
949
950/*
951 * check validity of event type and data length.
952 * return non-zero if invalid.
953 */
c7e0b5bf 954static int check_event_type_and_length(struct snd_seq_event *ev)
1da177e4
LT		 955{
956 switch (snd_seq_ev_length_type(ev)) {
957 case SNDRV_SEQ_EVENT_LENGTH_FIXED:
958 if (snd_seq_ev_is_variable_type(ev))
959 return -EINVAL;
960 break;
961 case SNDRV_SEQ_EVENT_LENGTH_VARIABLE:
962 if (! snd_seq_ev_is_variable_type(ev) ||
963 (ev->data.ext.len & ~SNDRV_SEQ_EXT_MASK) >= SNDRV_SEQ_MAX_EVENT_LEN)
964 return -EINVAL;
965 break;
966 case SNDRV_SEQ_EVENT_LENGTH_VARUSR:
e5723b41 967 if (! snd_seq_ev_is_direct(ev))
1da177e4
LT		 968 return -EINVAL;
969 break;
970 }
971 return 0;
972}
973
974
975/* handle write() */
976/* possible error values:
977 * -ENXIO invalid client or file open mode
978 * -ENOMEM malloc failed
979 * -EFAULT seg. fault during copy from user space
980 * -EINVAL invalid event
981 * -EAGAIN no space in output pool
982 * -EINTR interrupts while sleep
983 * -EMLINK too many hops
984 * others depends on return value from driver callback
985 */
c7e0b5bf
TI		 986static ssize_t snd_seq_write(struct file *file, const char __user *buf,
987 size_t count, loff_t *offset)
1da177e4 988{
c7e0b5bf 989 struct snd_seq_client *client = file->private_data;
1da177e4
LT		 990 int written = 0, len;
991 int err = -EINVAL;
c7e0b5bf 992 struct snd_seq_event event;
1da177e4
LT		 993
994 if (!(snd_seq_file_flags(file) & SNDRV_SEQ_LFLG_OUTPUT))
995 return -ENXIO;
996
997 /* check client structures are in place */
998 snd_assert(client != NULL, return -ENXIO);
999
1000 if (!client->accept_output || client->pool == NULL)
1001 return -ENXIO;
1002
1003 /* allocate the pool now if the pool is not allocated yet */
1004 if (client->pool->size > 0 && !snd_seq_write_pool_allocated(client)) {
1005 if (snd_seq_pool_init(client->pool) < 0)
1006 return -ENOMEM;
1007 }
1008
1009 /* only process whole events */
c7e0b5bf 1010 while (count >= sizeof(struct snd_seq_event)) {
1da177e4
LT		 1011 /* Read in the event header from the user */
1012 len = sizeof(event);
1013 if (copy_from_user(&event, buf, len)) {
1014 err = -EFAULT;
1015 break;
1016 }
1017 event.source.client = client->number; /* fill in client number */
1018 /* Check for extension data length */
1019 if (check_event_type_and_length(&event)) {
1020 err = -EINVAL;
1021 break;
1022 }
1023
1024 /* check for special events */
1025 if (event.type == SNDRV_SEQ_EVENT_NONE)
1026 goto __skip_event;
1027 else if (snd_seq_ev_is_reserved(&event)) {
1028 err = -EINVAL;
1029 break;
1030 }
1031
1032 if (snd_seq_ev_is_variable(&event)) {
1033 int extlen = event.data.ext.len & ~SNDRV_SEQ_EXT_MASK;
1034 if ((size_t)(extlen + len) > count) {
1035 /* back out, will get an error this time or next */
1036 err = -EINVAL;
1037 break;
1038 }
1039 /* set user space pointer */
1040 event.data.ext.len = extlen | SNDRV_SEQ_EXT_USRPTR;
4d23359b 1041 event.data.ext.ptr = (char __force *)buf
c7e0b5bf 1042 + sizeof(struct snd_seq_event);
1da177e4
LT		 1043 len += extlen; /* increment data length */
1044 } else {
1045#ifdef CONFIG_COMPAT
1046 if (client->convert32 && snd_seq_ev_is_varusr(&event)) {
1047 void *ptr = compat_ptr(event.data.raw32.d[1]);
1048 event.data.ext.ptr = ptr;
1049 }
1050#endif
1051 }
1052
1053 /* ok, enqueue it */
1054 err = snd_seq_client_enqueue_event(client, &event, file,
1055 !(file->f_flags & O_NONBLOCK),
1056 0, 0);
1057 if (err < 0)
1058 break;
1059
1060 __skip_event:
1061 /* Update pointers and counts */
1062 count -= len;
1063 buf += len;
1064 written += len;
1065 }
1066
1067 return written ? written : err;
1068}
1069
1070
1071/*
1072 * handle polling
1073 */
1074static unsigned int snd_seq_poll(struct file *file, poll_table * wait)
1075{
c7e0b5bf 1076 struct snd_seq_client *client = file->private_data;
1da177e4
LT		 1077 unsigned int mask = 0;
1078
1079 /* check client structures are in place */
1080 snd_assert(client != NULL, return -ENXIO);
1081
1082 if ((snd_seq_file_flags(file) & SNDRV_SEQ_LFLG_INPUT) &&
1083 client->data.user.fifo) {
1084
1085 /* check if data is available in the outqueue */
1086 if (snd_seq_fifo_poll_wait(client->data.user.fifo, file, wait))
1087 mask |= POLLIN | POLLRDNORM;
1088 }
1089
1090 if (snd_seq_file_flags(file) & SNDRV_SEQ_LFLG_OUTPUT) {
1091
1092 /* check if data is available in the pool */
1093 if (!snd_seq_write_pool_allocated(client) ||
1094 snd_seq_pool_poll_wait(client->pool, file, wait))
1095 mask |= POLLOUT | POLLWRNORM;
1096 }
1097
1098 return mask;
1099}
1100
1101
1102/*-----------------------------------------------------*/
1103
1104
1105/* SYSTEM_INFO ioctl() */
c7e0b5bf 1106static int snd_seq_ioctl_system_info(struct snd_seq_client *client, void __user *arg)
1da177e4 1107{
c7e0b5bf 1108 struct snd_seq_system_info info;
1da177e4
LT		 1109
1110 memset(&info, 0, sizeof(info));
1111 /* fill the info fields */
1112 info.queues = SNDRV_SEQ_MAX_QUEUES;
1113 info.clients = SNDRV_SEQ_MAX_CLIENTS;
1114 info.ports = 256; /* fixed limit */
1115 info.channels = 256; /* fixed limit */
1116 info.cur_clients = client_usage.cur;
1117 info.cur_queues = snd_seq_queue_get_cur_queues();
1118
1119 if (copy_to_user(arg, &info, sizeof(info)))
1120 return -EFAULT;
1121 return 0;
1122}
1123
1124
1125/* RUNNING_MODE ioctl() */
c7e0b5bf 1126static int snd_seq_ioctl_running_mode(struct snd_seq_client *client, void __user *arg)
1da177e4 1127{
c7e0b5bf
TI		 1128 struct snd_seq_running_info info;
1129 struct snd_seq_client *cptr;
1da177e4
LT		 1130 int err = 0;
1131
1132 if (copy_from_user(&info, arg, sizeof(info)))
1133 return -EFAULT;
1134
1135 /* requested client number */
1136 cptr = snd_seq_client_use_ptr(info.client);
1137 if (cptr == NULL)
1138 return -ENOENT; /* don't change !!! */
1139
1140#ifdef SNDRV_BIG_ENDIAN
1141 if (! info.big_endian) {
1142 err = -EINVAL;
1143 goto __err;
1144 }
1145#else
1146 if (info.big_endian) {
1147 err = -EINVAL;
1148 goto __err;
1149 }
1150
1151#endif
1152 if (info.cpu_mode > sizeof(long)) {
1153 err = -EINVAL;
1154 goto __err;
1155 }
1156 cptr->convert32 = (info.cpu_mode < sizeof(long));
1157 __err:
1158 snd_seq_client_unlock(cptr);
1159 return err;
1160}
1161
1162/* CLIENT_INFO ioctl() */
c7e0b5bf
TI		 1163static void get_client_info(struct snd_seq_client *cptr,
1164 struct snd_seq_client_info *info)
1da177e4
LT		 1165{
1166 info->client = cptr->number;
1167
1168 /* fill the info fields */
1169 info->type = cptr->type;
1170 strcpy(info->name, cptr->name);
1171 info->filter = cptr->filter;
1172 info->event_lost = cptr->event_lost;
1173 memcpy(info->event_filter, cptr->event_filter, 32);
1174 info->num_ports = cptr->num_ports;
1175 memset(info->reserved, 0, sizeof(info->reserved));
1176}
1177
c7e0b5bf
TI		 1178static int snd_seq_ioctl_get_client_info(struct snd_seq_client *client,
1179 void __user *arg)
1da177e4 1180{
c7e0b5bf
TI		 1181 struct snd_seq_client *cptr;
1182 struct snd_seq_client_info client_info;
1da177e4
LT		 1183
1184 if (copy_from_user(&client_info, arg, sizeof(client_info)))
1185 return -EFAULT;
1186
1187 /* requested client number */
1188 cptr = snd_seq_client_use_ptr(client_info.client);
1189 if (cptr == NULL)
1190 return -ENOENT; /* don't change !!! */
1191
1192 get_client_info(cptr, &client_info);
1193 snd_seq_client_unlock(cptr);
1194
1195 if (copy_to_user(arg, &client_info, sizeof(client_info)))
1196 return -EFAULT;
1197 return 0;
1198}
1199
1200
1201/* CLIENT_INFO ioctl() */
c7e0b5bf
TI		 1202static int snd_seq_ioctl_set_client_info(struct snd_seq_client *client,
1203 void __user *arg)
1da177e4 1204{
c7e0b5bf 1205 struct snd_seq_client_info client_info;
1da177e4
LT		 1206
1207 if (copy_from_user(&client_info, arg, sizeof(client_info)))
1208 return -EFAULT;
1209
1210 /* it is not allowed to set the info fields for an another client */
1211 if (client->number != client_info.client)
1212 return -EPERM;
1213 /* also client type must be set now */
1214 if (client->type != client_info.type)
1215 return -EINVAL;
1216
1217 /* fill the info fields */
1218 if (client_info.name[0])
1219 strlcpy(client->name, client_info.name, sizeof(client->name));
1220
1221 client->filter = client_info.filter;
1222 client->event_lost = client_info.event_lost;
1223 memcpy(client->event_filter, client_info.event_filter, 32);
1224
1225 return 0;
1226}
1227
1228
1229/*
1230 * CREATE PORT ioctl()
1231 */
c7e0b5bf
TI		 1232static int snd_seq_ioctl_create_port(struct snd_seq_client *client,
1233 void __user *arg)
1da177e4 1234{
c7e0b5bf
TI		 1235 struct snd_seq_client_port *port;
1236 struct snd_seq_port_info info;
1237 struct snd_seq_port_callback *callback;
1da177e4
LT		 1238
1239 if (copy_from_user(&info, arg, sizeof(info)))
1240 return -EFAULT;
1241
1242 /* it is not allowed to create the port for an another client */
1243 if (info.addr.client != client->number)
1244 return -EPERM;
1245
1246 port = snd_seq_create_port(client, (info.flags & SNDRV_SEQ_PORT_FLG_GIVEN_PORT) ? info.addr.port : -1);
1247 if (port == NULL)
1248 return -ENOMEM;
1249
1250 if (client->type == USER_CLIENT && info.kernel) {
1251 snd_seq_delete_port(client, port->addr.port);
1252 return -EINVAL;
1253 }
1254 if (client->type == KERNEL_CLIENT) {
1255 if ((callback = info.kernel) != NULL) {
1256 if (callback->owner)
1257 port->owner = callback->owner;
1258 port->private_data = callback->private_data;
1259 port->private_free = callback->private_free;
1260 port->callback_all = callback->callback_all;
1261 port->event_input = callback->event_input;
1262 port->c_src.open = callback->subscribe;
1263 port->c_src.close = callback->unsubscribe;
1264 port->c_dest.open = callback->use;
1265 port->c_dest.close = callback->unuse;
1266 }
1267 }
1268
1269 info.addr = port->addr;
1270
1271 snd_seq_set_port_info(port, &info);
1272 snd_seq_system_client_ev_port_start(port->addr.client, port->addr.port);
1273
1274 if (copy_to_user(arg, &info, sizeof(info)))
1275 return -EFAULT;
1276
1277 return 0;
1278}
1279
1280/*
1281 * DELETE PORT ioctl()
1282 */
c7e0b5bf
TI		 1283static int snd_seq_ioctl_delete_port(struct snd_seq_client *client,
1284 void __user *arg)
1da177e4 1285{
c7e0b5bf 1286 struct snd_seq_port_info info;
1da177e4
LT		 1287 int err;
1288
1289 /* set passed parameters */
1290 if (copy_from_user(&info, arg, sizeof(info)))
1291 return -EFAULT;
1292
1293 /* it is not allowed to remove the port for an another client */
1294 if (info.addr.client != client->number)
1295 return -EPERM;
1296
1297 err = snd_seq_delete_port(client, info.addr.port);
1298 if (err >= 0)
1299 snd_seq_system_client_ev_port_exit(client->number, info.addr.port);
1300 return err;
1301}
1302
1303
1304/*
1305 * GET_PORT_INFO ioctl() (on any client)
1306 */
c7e0b5bf
TI		 1307static int snd_seq_ioctl_get_port_info(struct snd_seq_client *client,
1308 void __user *arg)
1da177e4 1309{
c7e0b5bf
TI		 1310 struct snd_seq_client *cptr;
1311 struct snd_seq_client_port *port;
1312 struct snd_seq_port_info info;
1da177e4
LT		 1313
1314 if (copy_from_user(&info, arg, sizeof(info)))
1315 return -EFAULT;
1316 cptr = snd_seq_client_use_ptr(info.addr.client);
1317 if (cptr == NULL)
1318 return -ENXIO;
1319
1320 port = snd_seq_port_use_ptr(cptr, info.addr.port);
1321 if (port == NULL) {
1322 snd_seq_client_unlock(cptr);
1323 return -ENOENT; /* don't change */
1324 }
1325
1326 /* get port info */
1327 snd_seq_get_port_info(port, &info);
1328 snd_seq_port_unlock(port);
1329 snd_seq_client_unlock(cptr);
1330
1331 if (copy_to_user(arg, &info, sizeof(info)))
1332 return -EFAULT;
1333 return 0;
1334}
1335
1336
1337/*
1338 * SET_PORT_INFO ioctl() (only ports on this/own client)
1339 */
c7e0b5bf
TI		 1340static int snd_seq_ioctl_set_port_info(struct snd_seq_client *client,
1341 void __user *arg)
1da177e4 1342{
c7e0b5bf
TI		 1343 struct snd_seq_client_port *port;
1344 struct snd_seq_port_info info;
1da177e4
LT		 1345
1346 if (copy_from_user(&info, arg, sizeof(info)))
1347 return -EFAULT;
1348
1349 if (info.addr.client != client->number) /* only set our own ports ! */
1350 return -EPERM;
1351 port = snd_seq_port_use_ptr(client, info.addr.port);
1352 if (port) {
1353 snd_seq_set_port_info(port, &info);
1354 snd_seq_port_unlock(port);
1355 }
1356 return 0;
1357}
1358
1359
1360/*
1361 * port subscription (connection)
1362 */
1363#define PERM_RD (SNDRV_SEQ_PORT_CAP_READ|SNDRV_SEQ_PORT_CAP_SUBS_READ)
1364#define PERM_WR (SNDRV_SEQ_PORT_CAP_WRITE|SNDRV_SEQ_PORT_CAP_SUBS_WRITE)
1365
c7e0b5bf
TI		 1366static int check_subscription_permission(struct snd_seq_client *client,
1367 struct snd_seq_client_port *sport,
1368 struct snd_seq_client_port *dport,
1369 struct snd_seq_port_subscribe *subs)
1da177e4
LT		 1370{
1371 if (client->number != subs->sender.client &&
1372 client->number != subs->dest.client) {
1373 /* connection by third client - check export permission */
1374 if (check_port_perm(sport, SNDRV_SEQ_PORT_CAP_NO_EXPORT))
1375 return -EPERM;
1376 if (check_port_perm(dport, SNDRV_SEQ_PORT_CAP_NO_EXPORT))
1377 return -EPERM;
1378 }
1379
1380 /* check read permission */
1381 /* if sender or receiver is the subscribing client itself,
1382 * no permission check is necessary
1383 */
1384 if (client->number != subs->sender.client) {
1385 if (! check_port_perm(sport, PERM_RD))
1386 return -EPERM;
1387 }
1388 /* check write permission */
1389 if (client->number != subs->dest.client) {
1390 if (! check_port_perm(dport, PERM_WR))
1391 return -EPERM;
1392 }
1393 return 0;
1394}
1395
1396/*
1397 * send an subscription notify event to user client:
1398 * client must be user client.
1399 */
1400int snd_seq_client_notify_subscription(int client, int port,
c7e0b5bf
TI		 1401 struct snd_seq_port_subscribe *info,
1402 int evtype)
1da177e4 1403{
c7e0b5bf 1404 struct snd_seq_event event;
1da177e4
LT		 1405
1406 memset(&event, 0, sizeof(event));
1407 event.type = evtype;
1408 event.data.connect.dest = info->dest;
1409 event.data.connect.sender = info->sender;
1410
1411 return snd_seq_system_notify(client, port, &event); /* non-atomic */
1412}
1413
1414
1415/*
1416 * add to port's subscription list IOCTL interface
1417 */
c7e0b5bf
TI		 1418static int snd_seq_ioctl_subscribe_port(struct snd_seq_client *client,
1419 void __user *arg)
1da177e4
LT		 1420{
1421 int result = -EINVAL;
c7e0b5bf
TI		 1422 struct snd_seq_client *receiver = NULL, *sender = NULL;
1423 struct snd_seq_client_port *sport = NULL, *dport = NULL;
1424 struct snd_seq_port_subscribe subs;
1da177e4
LT		 1425
1426 if (copy_from_user(&subs, arg, sizeof(subs)))
1427 return -EFAULT;
1428
1429 if ((receiver = snd_seq_client_use_ptr(subs.dest.client)) == NULL)
1430 goto __end;
1431 if ((sender = snd_seq_client_use_ptr(subs.sender.client)) == NULL)
1432 goto __end;
1433 if ((sport = snd_seq_port_use_ptr(sender, subs.sender.port)) == NULL)
1434 goto __end;
1435 if ((dport = snd_seq_port_use_ptr(receiver, subs.dest.port)) == NULL)
1436 goto __end;
1437
1438 result = check_subscription_permission(client, sport, dport, &subs);
1439 if (result < 0)
1440 goto __end;
1441
1442 /* connect them */
1443 result = snd_seq_port_connect(client, sender, sport, receiver, dport, &subs);
1444 if (! result) /* broadcast announce */
1445 snd_seq_client_notify_subscription(SNDRV_SEQ_ADDRESS_SUBSCRIBERS, 0,
1446 &subs, SNDRV_SEQ_EVENT_PORT_SUBSCRIBED);
1447 __end:
1448 if (sport)
1449 snd_seq_port_unlock(sport);
1450 if (dport)
1451 snd_seq_port_unlock(dport);
1452 if (sender)
1453 snd_seq_client_unlock(sender);
1454 if (receiver)
1455 snd_seq_client_unlock(receiver);
1456 return result;
1457}
1458
1459
1460/*
1461 * remove from port's subscription list
1462 */
c7e0b5bf
TI		 1463static int snd_seq_ioctl_unsubscribe_port(struct snd_seq_client *client,
1464 void __user *arg)
1da177e4
LT		 1465{
1466 int result = -ENXIO;
c7e0b5bf
TI		 1467 struct snd_seq_client *receiver = NULL, *sender = NULL;
1468 struct snd_seq_client_port *sport = NULL, *dport = NULL;
1469 struct snd_seq_port_subscribe subs;
1da177e4
LT		 1470
1471 if (copy_from_user(&subs, arg, sizeof(subs)))
1472 return -EFAULT;
1473
1474 if ((receiver = snd_seq_client_use_ptr(subs.dest.client)) == NULL)
1475 goto __end;
1476 if ((sender = snd_seq_client_use_ptr(subs.sender.client)) == NULL)
1477 goto __end;
1478 if ((sport = snd_seq_port_use_ptr(sender, subs.sender.port)) == NULL)
1479 goto __end;
1480 if ((dport = snd_seq_port_use_ptr(receiver, subs.dest.port)) == NULL)
1481 goto __end;
1482
1483 result = check_subscription_permission(client, sport, dport, &subs);
1484 if (result < 0)
1485 goto __end;
1486
1487 result = snd_seq_port_disconnect(client, sender, sport, receiver, dport, &subs);
1488 if (! result) /* broadcast announce */
1489 snd_seq_client_notify_subscription(SNDRV_SEQ_ADDRESS_SUBSCRIBERS, 0,
1490 &subs, SNDRV_SEQ_EVENT_PORT_UNSUBSCRIBED);
1491 __end:
1492 if (sport)
1493 snd_seq_port_unlock(sport);
1494 if (dport)
1495 snd_seq_port_unlock(dport);
1496 if (sender)
1497 snd_seq_client_unlock(sender);
1498 if (receiver)
1499 snd_seq_client_unlock(receiver);
1500 return result;
1501}
1502
1503
1504/* CREATE_QUEUE ioctl() */
c7e0b5bf
TI		 1505static int snd_seq_ioctl_create_queue(struct snd_seq_client *client,
1506 void __user *arg)
1da177e4 1507{
c7e0b5bf 1508 struct snd_seq_queue_info info;
1da177e4 1509 int result;
c7e0b5bf 1510 struct snd_seq_queue *q;
1da177e4
LT		 1511
1512 if (copy_from_user(&info, arg, sizeof(info)))
1513 return -EFAULT;
1514
1515 result = snd_seq_queue_alloc(client->number, info.locked, info.flags);
1516 if (result < 0)
1517 return result;
1518
1519 q = queueptr(result);
1520 if (q == NULL)
1521 return -EINVAL;
1522
1523 info.queue = q->queue;
1524 info.locked = q->locked;
1525 info.owner = q->owner;
1526
1527 /* set queue name */
1528 if (! info.name[0])
1529 snprintf(info.name, sizeof(info.name), "Queue-%d", q->queue);
1530 strlcpy(q->name, info.name, sizeof(q->name));
1531 queuefree(q);
1532
1533 if (copy_to_user(arg, &info, sizeof(info)))
1534 return -EFAULT;
1535
1536 return 0;
1537}
1538
1539/* DELETE_QUEUE ioctl() */
c7e0b5bf
TI		 1540static int snd_seq_ioctl_delete_queue(struct snd_seq_client *client,
1541 void __user *arg)
1da177e4 1542{
c7e0b5bf 1543 struct snd_seq_queue_info info;
1da177e4
LT		 1544
1545 if (copy_from_user(&info, arg, sizeof(info)))
1546 return -EFAULT;
1547
1548 return snd_seq_queue_delete(client->number, info.queue);
1549}
1550
1551/* GET_QUEUE_INFO ioctl() */
c7e0b5bf
TI		 1552static int snd_seq_ioctl_get_queue_info(struct snd_seq_client *client,
1553 void __user *arg)
1da177e4 1554{
c7e0b5bf
TI		 1555 struct snd_seq_queue_info info;
1556 struct snd_seq_queue *q;
1da177e4
LT		 1557
1558 if (copy_from_user(&info, arg, sizeof(info)))
1559 return -EFAULT;
1560
1561 q = queueptr(info.queue);
1562 if (q == NULL)
1563 return -EINVAL;
1564
1565 memset(&info, 0, sizeof(info));
1566 info.queue = q->queue;
1567 info.owner = q->owner;
1568 info.locked = q->locked;
1569 strlcpy(info.name, q->name, sizeof(info.name));
1570 queuefree(q);
1571
1572 if (copy_to_user(arg, &info, sizeof(info)))
1573 return -EFAULT;
1574
1575 return 0;
1576}
1577
1578/* SET_QUEUE_INFO ioctl() */
c7e0b5bf
TI		 1579static int snd_seq_ioctl_set_queue_info(struct snd_seq_client *client,
1580 void __user *arg)
1da177e4 1581{
c7e0b5bf
TI		 1582 struct snd_seq_queue_info info;
1583 struct snd_seq_queue *q;
1da177e4
LT		 1584
1585 if (copy_from_user(&info, arg, sizeof(info)))
1586 return -EFAULT;
1587
1588 if (info.owner != client->number)
1589 return -EINVAL;
1590
1591 /* change owner/locked permission */
1592 if (snd_seq_queue_check_access(info.queue, client->number)) {
1593 if (snd_seq_queue_set_owner(info.queue, client->number, info.locked) < 0)
1594 return -EPERM;
1595 if (info.locked)
1596 snd_seq_queue_use(info.queue, client->number, 1);
1597 } else {
1598 return -EPERM;
1599 }
1600
1601 q = queueptr(info.queue);
1602 if (! q)
1603 return -EINVAL;
1604 if (q->owner != client->number) {
1605 queuefree(q);
1606 return -EPERM;
1607 }
1608 strlcpy(q->name, info.name, sizeof(q->name));
1609 queuefree(q);
1610
1611 return 0;
1612}
1613
1614/* GET_NAMED_QUEUE ioctl() */
c7e0b5bf 1615static int snd_seq_ioctl_get_named_queue(struct snd_seq_client *client, void __user *arg)
1da177e4 1616{
c7e0b5bf
TI		 1617 struct snd_seq_queue_info info;
1618 struct snd_seq_queue *q;
1da177e4
LT		 1619
1620 if (copy_from_user(&info, arg, sizeof(info)))
1621 return -EFAULT;
1622
1623 q = snd_seq_queue_find_name(info.name);
1624 if (q == NULL)
1625 return -EINVAL;
1626 info.queue = q->queue;
1627 info.owner = q->owner;
1628 info.locked = q->locked;
1629 queuefree(q);
1630
1631 if (copy_to_user(arg, &info, sizeof(info)))
1632 return -EFAULT;
1633
1634 return 0;
1635}
1636
1637/* GET_QUEUE_STATUS ioctl() */
c7e0b5bf
TI		 1638static int snd_seq_ioctl_get_queue_status(struct snd_seq_client *client,
1639 void __user *arg)
1da177e4 1640{
c7e0b5bf
TI		 1641 struct snd_seq_queue_status status;
1642 struct snd_seq_queue *queue;
1643 struct snd_seq_timer *tmr;
1da177e4
LT		 1644
1645 if (copy_from_user(&status, arg, sizeof(status)))
1646 return -EFAULT;
1647
1648 queue = queueptr(status.queue);
1649 if (queue == NULL)
1650 return -EINVAL;
1651 memset(&status, 0, sizeof(status));
1652 status.queue = queue->queue;
1653
1654 tmr = queue->timer;
1655 status.events = queue->tickq->cells + queue->timeq->cells;
1656
1657 status.time = snd_seq_timer_get_cur_time(tmr);
1658 status.tick = snd_seq_timer_get_cur_tick(tmr);
1659
1660 status.running = tmr->running;
1661
1662 status.flags = queue->flags;
1663 queuefree(queue);
1664
1665 if (copy_to_user(arg, &status, sizeof(status)))
1666 return -EFAULT;
1667 return 0;
1668}
1669
1670
1671/* GET_QUEUE_TEMPO ioctl() */
c7e0b5bf
TI		 1672static int snd_seq_ioctl_get_queue_tempo(struct snd_seq_client *client,
1673 void __user *arg)
1da177e4 1674{
c7e0b5bf
TI		 1675 struct snd_seq_queue_tempo tempo;
1676 struct snd_seq_queue *queue;
1677 struct snd_seq_timer *tmr;
1da177e4
LT		 1678
1679 if (copy_from_user(&tempo, arg, sizeof(tempo)))
1680 return -EFAULT;
1681
1682 queue = queueptr(tempo.queue);
1683 if (queue == NULL)
1684 return -EINVAL;
1685 memset(&tempo, 0, sizeof(tempo));
1686 tempo.queue = queue->queue;
1687
1688 tmr = queue->timer;
1689
1690 tempo.tempo = tmr->tempo;
1691 tempo.ppq = tmr->ppq;
1692 tempo.skew_value = tmr->skew;
1693 tempo.skew_base = tmr->skew_base;
1694 queuefree(queue);
1695
1696 if (copy_to_user(arg, &tempo, sizeof(tempo)))
1697 return -EFAULT;
1698 return 0;
1699}
1700
1701
1702/* SET_QUEUE_TEMPO ioctl() */
c7e0b5bf 1703int snd_seq_set_queue_tempo(int client, struct snd_seq_queue_tempo *tempo)
1da177e4
LT		 1704{
1705 if (!snd_seq_queue_check_access(tempo->queue, client))
1706 return -EPERM;
1707 return snd_seq_queue_timer_set_tempo(tempo->queue, client, tempo);
1708}
1709
91715ed9
TI		 1710EXPORT_SYMBOL(snd_seq_set_queue_tempo);
1711
c7e0b5bf
TI		 1712static int snd_seq_ioctl_set_queue_tempo(struct snd_seq_client *client,
1713 void __user *arg)
1da177e4
LT		 1714{
1715 int result;
c7e0b5bf 1716 struct snd_seq_queue_tempo tempo;
1da177e4
LT		 1717
1718 if (copy_from_user(&tempo, arg, sizeof(tempo)))
1719 return -EFAULT;
1720
1721 result = snd_seq_set_queue_tempo(client->number, &tempo);
1722 return result < 0 ? result : 0;
1723}
1724
1725
1726/* GET_QUEUE_TIMER ioctl() */
c7e0b5bf
TI		 1727static int snd_seq_ioctl_get_queue_timer(struct snd_seq_client *client,
1728 void __user *arg)
1da177e4 1729{
c7e0b5bf
TI		 1730 struct snd_seq_queue_timer timer;
1731 struct snd_seq_queue *queue;
1732 struct snd_seq_timer *tmr;
1da177e4
LT		 1733
1734 if (copy_from_user(&timer, arg, sizeof(timer)))
1735 return -EFAULT;
1736
1737 queue = queueptr(timer.queue);
1738 if (queue == NULL)
1739 return -EINVAL;
1740
1a60d4c5 1741 if (mutex_lock_interruptible(&queue->timer_mutex)) {
1da177e4
LT		 1742 queuefree(queue);
1743 return -ERESTARTSYS;
1744 }
1745 tmr = queue->timer;
1746 memset(&timer, 0, sizeof(timer));
1747 timer.queue = queue->queue;
1748
1749 timer.type = tmr->type;
1750 if (tmr->type == SNDRV_SEQ_TIMER_ALSA) {
1751 timer.u.alsa.id = tmr->alsa_id;
1752 timer.u.alsa.resolution = tmr->preferred_resolution;
1753 }
1a60d4c5 1754 mutex_unlock(&queue->timer_mutex);
1da177e4
LT		 1755 queuefree(queue);
1756
1757 if (copy_to_user(arg, &timer, sizeof(timer)))
1758 return -EFAULT;
1759 return 0;
1760}
1761
1762
1763/* SET_QUEUE_TIMER ioctl() */
c7e0b5bf
TI		 1764static int snd_seq_ioctl_set_queue_timer(struct snd_seq_client *client,
1765 void __user *arg)
1da177e4
LT		 1766{
1767 int result = 0;
c7e0b5bf 1768 struct snd_seq_queue_timer timer;
1da177e4
LT		 1769
1770 if (copy_from_user(&timer, arg, sizeof(timer)))
1771 return -EFAULT;
1772
1773 if (timer.type != SNDRV_SEQ_TIMER_ALSA)
1774 return -EINVAL;
1775
1776 if (snd_seq_queue_check_access(timer.queue, client->number)) {
c7e0b5bf
TI		 1777 struct snd_seq_queue *q;
1778 struct snd_seq_timer *tmr;
1da177e4
LT		 1779
1780 q = queueptr(timer.queue);
1781 if (q == NULL)
1782 return -ENXIO;
1a60d4c5 1783 if (mutex_lock_interruptible(&q->timer_mutex)) {
1da177e4
LT		 1784 queuefree(q);
1785 return -ERESTARTSYS;
1786 }
1787 tmr = q->timer;
1788 snd_seq_queue_timer_close(timer.queue);
1789 tmr->type = timer.type;
1790 if (tmr->type == SNDRV_SEQ_TIMER_ALSA) {
1791 tmr->alsa_id = timer.u.alsa.id;
1792 tmr->preferred_resolution = timer.u.alsa.resolution;
1793 }
1794 result = snd_seq_queue_timer_open(timer.queue);
1a60d4c5 1795 mutex_unlock(&q->timer_mutex);
1da177e4
LT		 1796 queuefree(q);
1797 } else {
1798 return -EPERM;
1799 }
1800
1801 return result;
1802}
1803
1804
1805/* GET_QUEUE_CLIENT ioctl() */
c7e0b5bf
TI		 1806static int snd_seq_ioctl_get_queue_client(struct snd_seq_client *client,
1807 void __user *arg)
1da177e4 1808{
c7e0b5bf 1809 struct snd_seq_queue_client info;
1da177e4
LT		 1810 int used;
1811
1812 if (copy_from_user(&info, arg, sizeof(info)))
1813 return -EFAULT;
1814
1815 used = snd_seq_queue_is_used(info.queue, client->number);
1816 if (used < 0)
1817 return -EINVAL;
1818 info.used = used;
1819 info.client = client->number;
1820
1821 if (copy_to_user(arg, &info, sizeof(info)))
1822 return -EFAULT;
1823 return 0;
1824}
1825
1826
1827/* SET_QUEUE_CLIENT ioctl() */
c7e0b5bf
TI		 1828static int snd_seq_ioctl_set_queue_client(struct snd_seq_client *client,
1829 void __user *arg)
1da177e4
LT		 1830{
1831 int err;
c7e0b5bf 1832 struct snd_seq_queue_client info;
1da177e4
LT		 1833
1834 if (copy_from_user(&info, arg, sizeof(info)))
1835 return -EFAULT;
1836
1837 if (info.used >= 0) {
1838 err = snd_seq_queue_use(info.queue, client->number, info.used);
1839 if (err < 0)
1840 return err;
1841 }
1842
1843 return snd_seq_ioctl_get_queue_client(client, arg);
1844}
1845
1846
1847/* GET_CLIENT_POOL ioctl() */
c7e0b5bf
TI		 1848static int snd_seq_ioctl_get_client_pool(struct snd_seq_client *client,
1849 void __user *arg)
1da177e4 1850{
c7e0b5bf
TI		 1851 struct snd_seq_client_pool info;
1852 struct snd_seq_client *cptr;
1da177e4
LT		 1853
1854 if (copy_from_user(&info, arg, sizeof(info)))
1855 return -EFAULT;
1856
1857 cptr = snd_seq_client_use_ptr(info.client);
1858 if (cptr == NULL)
1859 return -ENOENT;
1860 memset(&info, 0, sizeof(info));
1861 info.output_pool = cptr->pool->size;
1862 info.output_room = cptr->pool->room;
1863 info.output_free = info.output_pool;
e64d2e36 1864 info.output_free = snd_seq_unused_cells(cptr->pool);
1da177e4
LT		 1865 if (cptr->type == USER_CLIENT) {
1866 info.input_pool = cptr->data.user.fifo_pool_size;
1867 info.input_free = info.input_pool;
1868 if (cptr->data.user.fifo)
1869 info.input_free = snd_seq_unused_cells(cptr->data.user.fifo->pool);
1870 } else {
1871 info.input_pool = 0;
1872 info.input_free = 0;
1873 }
1874 snd_seq_client_unlock(cptr);
1875
1876 if (copy_to_user(arg, &info, sizeof(info)))
1877 return -EFAULT;
1878 return 0;
1879}
1880
1881/* SET_CLIENT_POOL ioctl() */
c7e0b5bf
TI		 1882static int snd_seq_ioctl_set_client_pool(struct snd_seq_client *client,
1883 void __user *arg)
1da177e4 1884{
c7e0b5bf 1885 struct snd_seq_client_pool info;
1da177e4
LT		 1886 int rc;
1887
1888 if (copy_from_user(&info, arg, sizeof(info)))
1889 return -EFAULT;
1890
1891 if (client->number != info.client)
1892 return -EINVAL; /* can't change other clients */
1893
1894 if (info.output_pool >= 1 && info.output_pool <= SNDRV_SEQ_MAX_EVENTS &&
1895 (! snd_seq_write_pool_allocated(client) ||
1896 info.output_pool != client->pool->size)) {
1897 if (snd_seq_write_pool_allocated(client)) {
1898 /* remove all existing cells */
1899 snd_seq_queue_client_leave_cells(client->number);
1900 snd_seq_pool_done(client->pool);
1901 }
1902 client->pool->size = info.output_pool;
1903 rc = snd_seq_pool_init(client->pool);
1904 if (rc < 0)
1905 return rc;
1906 }
1907 if (client->type == USER_CLIENT && client->data.user.fifo != NULL &&
1908 info.input_pool >= 1 &&
1909 info.input_pool <= SNDRV_SEQ_MAX_CLIENT_EVENTS &&
1910 info.input_pool != client->data.user.fifo_pool_size) {
1911 /* change pool size */
1912 rc = snd_seq_fifo_resize(client->data.user.fifo, info.input_pool);
1913 if (rc < 0)
1914 return rc;
1915 client->data.user.fifo_pool_size = info.input_pool;
1916 }
1917 if (info.output_room >= 1 &&
1918 info.output_room <= client->pool->size) {
1919 client->pool->room = info.output_room;
1920 }
1921
1922 return snd_seq_ioctl_get_client_pool(client, arg);
1923}
1924
1925
1926/* REMOVE_EVENTS ioctl() */
c7e0b5bf
TI		 1927static int snd_seq_ioctl_remove_events(struct snd_seq_client *client,
1928 void __user *arg)
1da177e4 1929{
c7e0b5bf 1930 struct snd_seq_remove_events info;
1da177e4
LT		 1931
1932 if (copy_from_user(&info, arg, sizeof(info)))
1933 return -EFAULT;
1934
1935 /*
1936 * Input mostly not implemented XXX.
1937 */
1938 if (info.remove_mode & SNDRV_SEQ_REMOVE_INPUT) {
1939 /*
1940 * No restrictions so for a user client we can clear
1941 * the whole fifo
1942 */
1943 if (client->type == USER_CLIENT)
1944 snd_seq_fifo_clear(client->data.user.fifo);
1945 }
1946
1947 if (info.remove_mode & SNDRV_SEQ_REMOVE_OUTPUT)
1948 snd_seq_queue_remove_cells(client->number, &info);
1949
1950 return 0;
1951}
1952
1953
1954/*
1955 * get subscription info
1956 */
c7e0b5bf
TI		 1957static int snd_seq_ioctl_get_subscription(struct snd_seq_client *client,
1958 void __user *arg)
1da177e4
LT		 1959{
1960 int result;
c7e0b5bf
TI		 1961 struct snd_seq_client *sender = NULL;
1962 struct snd_seq_client_port *sport = NULL;
1963 struct snd_seq_port_subscribe subs;
1964 struct snd_seq_subscribers *p;
1da177e4
LT		 1965
1966 if (copy_from_user(&subs, arg, sizeof(subs)))
1967 return -EFAULT;
1968
1969 result = -EINVAL;
1970 if ((sender = snd_seq_client_use_ptr(subs.sender.client)) == NULL)
1971 goto __end;
1972 if ((sport = snd_seq_port_use_ptr(sender, subs.sender.port)) == NULL)
1973 goto __end;
1974 p = snd_seq_port_get_subscription(&sport->c_src, &subs.dest);
1975 if (p) {
1976 result = 0;
1977 subs = p->info;
1978 } else
1979 result = -ENOENT;
1980
1981 __end:
1982 if (sport)
1983 snd_seq_port_unlock(sport);
1984 if (sender)
1985 snd_seq_client_unlock(sender);
1986 if (result >= 0) {
1987 if (copy_to_user(arg, &subs, sizeof(subs)))
1988 return -EFAULT;
1989 }
1990 return result;
1991}
1992
1993
1994/*
1995 * get subscription info - check only its presence
1996 */
c7e0b5bf
TI		 1997static int snd_seq_ioctl_query_subs(struct snd_seq_client *client,
1998 void __user *arg)
1da177e4
LT		 1999{
2000 int result = -ENXIO;
c7e0b5bf
TI		 2001 struct snd_seq_client *cptr = NULL;
2002 struct snd_seq_client_port *port = NULL;
2003 struct snd_seq_query_subs subs;
2004 struct snd_seq_port_subs_info *group;
1da177e4
LT		 2005 struct list_head *p;
2006 int i;
2007
2008 if (copy_from_user(&subs, arg, sizeof(subs)))
2009 return -EFAULT;
2010
2011 if ((cptr = snd_seq_client_use_ptr(subs.root.client)) == NULL)
2012 goto __end;
2013 if ((port = snd_seq_port_use_ptr(cptr, subs.root.port)) == NULL)
2014 goto __end;
2015
2016 switch (subs.type) {
2017 case SNDRV_SEQ_QUERY_SUBS_READ:
2018 group = &port->c_src;
2019 break;
2020 case SNDRV_SEQ_QUERY_SUBS_WRITE:
2021 group = &port->c_dest;
2022 break;
2023 default:
2024 goto __end;
2025 }
2026
2027 down_read(&group->list_mutex);
2028 /* search for the subscriber */
2029 subs.num_subs = group->count;
2030 i = 0;
2031 result = -ENOENT;
2032 list_for_each(p, &group->list_head) {
2033 if (i++ == subs.index) {
2034 /* found! */
c7e0b5bf 2035 struct snd_seq_subscribers *s;
1da177e4 2036 if (subs.type == SNDRV_SEQ_QUERY_SUBS_READ) {
c7e0b5bf 2037 s = list_entry(p, struct snd_seq_subscribers, src_list);
1da177e4
LT		 2038 subs.addr = s->info.dest;
2039 } else {
c7e0b5bf 2040 s = list_entry(p, struct snd_seq_subscribers, dest_list);
1da177e4
LT		 2041 subs.addr = s->info.sender;
2042 }
2043 subs.flags = s->info.flags;
2044 subs.queue = s->info.queue;
2045 result = 0;
2046 break;
2047 }
2048 }
2049 up_read(&group->list_mutex);
2050
2051 __end:
2052 if (port)
2053 snd_seq_port_unlock(port);
2054 if (cptr)
2055 snd_seq_client_unlock(cptr);
2056 if (result >= 0) {
2057 if (copy_to_user(arg, &subs, sizeof(subs)))
2058 return -EFAULT;
2059 }
2060 return result;
2061}
2062
2063
2064/*
2065 * query next client
2066 */
c7e0b5bf
TI		 2067static int snd_seq_ioctl_query_next_client(struct snd_seq_client *client,
2068 void __user *arg)
1da177e4 2069{
c7e0b5bf
TI		 2070 struct snd_seq_client *cptr = NULL;
2071 struct snd_seq_client_info info;
1da177e4
LT		 2072
2073 if (copy_from_user(&info, arg, sizeof(info)))
2074 return -EFAULT;
2075
2076 /* search for next client */
2077 info.client++;
2078 if (info.client < 0)
2079 info.client = 0;
2080 for (; info.client < SNDRV_SEQ_MAX_CLIENTS; info.client++) {
2081 cptr = snd_seq_client_use_ptr(info.client);
2082 if (cptr)
2083 break; /* found */
2084 }
2085 if (cptr == NULL)
2086 return -ENOENT;
2087
2088 get_client_info(cptr, &info);
2089 snd_seq_client_unlock(cptr);
2090
2091 if (copy_to_user(arg, &info, sizeof(info)))
2092 return -EFAULT;
2093 return 0;
2094}
2095
2096/*
2097 * query next port
2098 */
c7e0b5bf
TI		 2099static int snd_seq_ioctl_query_next_port(struct snd_seq_client *client,
2100 void __user *arg)
1da177e4 2101{
c7e0b5bf
TI		 2102 struct snd_seq_client *cptr;
2103 struct snd_seq_client_port *port = NULL;
2104 struct snd_seq_port_info info;
1da177e4
LT		 2105
2106 if (copy_from_user(&info, arg, sizeof(info)))
2107 return -EFAULT;
2108 cptr = snd_seq_client_use_ptr(info.addr.client);
2109 if (cptr == NULL)
2110 return -ENXIO;
2111
2112 /* search for next port */
2113 info.addr.port++;
2114 port = snd_seq_port_query_nearest(cptr, &info);
2115 if (port == NULL) {
2116 snd_seq_client_unlock(cptr);
2117 return -ENOENT;
2118 }
2119
2120 /* get port info */
2121 info.addr = port->addr;
2122 snd_seq_get_port_info(port, &info);
2123 snd_seq_port_unlock(port);
2124 snd_seq_client_unlock(cptr);
2125
2126 if (copy_to_user(arg, &info, sizeof(info)))
2127 return -EFAULT;
2128 return 0;
2129}
2130
2131/* -------------------------------------------------------- */
2132
2133static struct seq_ioctl_table {
2134 unsigned int cmd;
c7e0b5bf 2135 int (*func)(struct snd_seq_client *client, void __user * arg);
1da177e4
LT		 2136} ioctl_tables[] = {
2137 { SNDRV_SEQ_IOCTL_SYSTEM_INFO, snd_seq_ioctl_system_info },
2138 { SNDRV_SEQ_IOCTL_RUNNING_MODE, snd_seq_ioctl_running_mode },
2139 { SNDRV_SEQ_IOCTL_GET_CLIENT_INFO, snd_seq_ioctl_get_client_info },
2140 { SNDRV_SEQ_IOCTL_SET_CLIENT_INFO, snd_seq_ioctl_set_client_info },
2141 { SNDRV_SEQ_IOCTL_CREATE_PORT, snd_seq_ioctl_create_port },
2142 { SNDRV_SEQ_IOCTL_DELETE_PORT, snd_seq_ioctl_delete_port },
2143 { SNDRV_SEQ_IOCTL_GET_PORT_INFO, snd_seq_ioctl_get_port_info },
2144 { SNDRV_SEQ_IOCTL_SET_PORT_INFO, snd_seq_ioctl_set_port_info },
2145 { SNDRV_SEQ_IOCTL_SUBSCRIBE_PORT, snd_seq_ioctl_subscribe_port },
2146 { SNDRV_SEQ_IOCTL_UNSUBSCRIBE_PORT, snd_seq_ioctl_unsubscribe_port },
2147 { SNDRV_SEQ_IOCTL_CREATE_QUEUE, snd_seq_ioctl_create_queue },
2148 { SNDRV_SEQ_IOCTL_DELETE_QUEUE, snd_seq_ioctl_delete_queue },
2149 { SNDRV_SEQ_IOCTL_GET_QUEUE_INFO, snd_seq_ioctl_get_queue_info },
2150 { SNDRV_SEQ_IOCTL_SET_QUEUE_INFO, snd_seq_ioctl_set_queue_info },
2151 { SNDRV_SEQ_IOCTL_GET_NAMED_QUEUE, snd_seq_ioctl_get_named_queue },
2152 { SNDRV_SEQ_IOCTL_GET_QUEUE_STATUS, snd_seq_ioctl_get_queue_status },
2153 { SNDRV_SEQ_IOCTL_GET_QUEUE_TEMPO, snd_seq_ioctl_get_queue_tempo },
2154 { SNDRV_SEQ_IOCTL_SET_QUEUE_TEMPO, snd_seq_ioctl_set_queue_tempo },
2155 { SNDRV_SEQ_IOCTL_GET_QUEUE_TIMER, snd_seq_ioctl_get_queue_timer },
2156 { SNDRV_SEQ_IOCTL_SET_QUEUE_TIMER, snd_seq_ioctl_set_queue_timer },
2157 { SNDRV_SEQ_IOCTL_GET_QUEUE_CLIENT, snd_seq_ioctl_get_queue_client },
2158 { SNDRV_SEQ_IOCTL_SET_QUEUE_CLIENT, snd_seq_ioctl_set_queue_client },
2159 { SNDRV_SEQ_IOCTL_GET_CLIENT_POOL, snd_seq_ioctl_get_client_pool },
2160 { SNDRV_SEQ_IOCTL_SET_CLIENT_POOL, snd_seq_ioctl_set_client_pool },
2161 { SNDRV_SEQ_IOCTL_GET_SUBSCRIPTION, snd_seq_ioctl_get_subscription },
2162 { SNDRV_SEQ_IOCTL_QUERY_NEXT_CLIENT, snd_seq_ioctl_query_next_client },
2163 { SNDRV_SEQ_IOCTL_QUERY_NEXT_PORT, snd_seq_ioctl_query_next_port },
2164 { SNDRV_SEQ_IOCTL_REMOVE_EVENTS, snd_seq_ioctl_remove_events },
2165 { SNDRV_SEQ_IOCTL_QUERY_SUBS, snd_seq_ioctl_query_subs },
2166 { 0, NULL },
2167};
2168
c7e0b5bf
TI		 2169static int snd_seq_do_ioctl(struct snd_seq_client *client, unsigned int cmd,
2170 void __user *arg)
1da177e4
LT		 2171{
2172 struct seq_ioctl_table *p;
2173
2174 switch (cmd) {
2175 case SNDRV_SEQ_IOCTL_PVERSION:
2176 /* return sequencer version number */
2177 return put_user(SNDRV_SEQ_VERSION, (int __user *)arg) ? -EFAULT : 0;
2178 case SNDRV_SEQ_IOCTL_CLIENT_ID:
2179 /* return the id of this client */
2180 return put_user(client->number, (int __user *)arg) ? -EFAULT : 0;
2181 }
2182
2183 if (! arg)
2184 return -EFAULT;
2185 for (p = ioctl_tables; p->cmd; p++) {
2186 if (p->cmd == cmd)
2187 return p->func(client, arg);
2188 }
2189 snd_printd("seq unknown ioctl() 0x%x (type='%c', number=0x%2x)\n",
2190 cmd, _IOC_TYPE(cmd), _IOC_NR(cmd));
2191 return -ENOTTY;
2192}
2193
2194
2195static long snd_seq_ioctl(struct file *file, unsigned int cmd, unsigned long arg)
2196{
c7e0b5bf 2197 struct snd_seq_client *client = file->private_data;
1da177e4
LT		 2198
2199 snd_assert(client != NULL, return -ENXIO);
2200
2201 return snd_seq_do_ioctl(client, cmd, (void __user *) arg);
2202}
2203
2204#ifdef CONFIG_COMPAT
2205#include "seq_compat.c"
2206#else
2207#define snd_seq_ioctl_compat NULL
2208#endif
2209
2210/* -------------------------------------------------------- */
2211
2212
2213/* exported to kernel modules */
7b6d9245
CL		 2214int snd_seq_create_kernel_client(struct snd_card *card, int client_index,
2215 const char *name_fmt, ...)
1da177e4 2216{
c7e0b5bf 2217 struct snd_seq_client *client;
7b6d9245 2218 va_list args;
1da177e4
LT		 2219
2220 snd_assert(! in_interrupt(), return -EBUSY);
2221
aa1e77e6 2222 if (card && client_index >= SNDRV_SEQ_CLIENTS_PER_CARD)
1da177e4 2223 return -EINVAL;
aa1e77e6 2224 if (card == NULL && client_index >= SNDRV_SEQ_GLOBAL_CLIENTS)
1da177e4 2225 return -EINVAL;
1da177e4 2226
1a60d4c5 2227 if (mutex_lock_interruptible(&register_mutex))
1da177e4 2228 return -ERESTARTSYS;
d001544d
CL		 2229
2230 if (card) {
aa1e77e6
CL		 2231 client_index += SNDRV_SEQ_GLOBAL_CLIENTS
2232 + card->number * SNDRV_SEQ_CLIENTS_PER_CARD;
2233 if (client_index >= SNDRV_SEQ_DYNAMIC_CLIENTS_BEGIN)
d001544d
CL		 2234 client_index = -1;
2235 }
2236
1da177e4 2237 /* empty write queue as default */
aa1e77e6 2238 client = seq_create_client1(client_index, 0);
1da177e4 2239 if (client == NULL) {
1a60d4c5 2240 mutex_unlock(&register_mutex);
1da177e4
LT		 2241 return -EBUSY; /* failure code */
2242 }
2243 usage_alloc(&client_usage, 1);
2244
83e8ad69
CL		 2245 client->accept_input = 1;
2246 client->accept_output = 1;
1da177e4 2247
7b6d9245
CL		 2248 va_start(args, name_fmt);
2249 vsnprintf(client->name, sizeof(client->name), name_fmt, args);
2250 va_end(args);
1da177e4
LT		 2251
2252 client->type = KERNEL_CLIENT;
1a60d4c5 2253 mutex_unlock(&register_mutex);
1da177e4
LT		 2254
2255 /* make others aware this new client */
2256 snd_seq_system_client_ev_client_start(client->number);
2257
2258 /* return client number to caller */
2259 return client->number;
2260}
2261
91715ed9
TI		 2262EXPORT_SYMBOL(snd_seq_create_kernel_client);
2263
1da177e4
LT		 2264/* exported to kernel modules */
2265int snd_seq_delete_kernel_client(int client)
2266{
c7e0b5bf 2267 struct snd_seq_client *ptr;
1da177e4
LT		 2268
2269 snd_assert(! in_interrupt(), return -EBUSY);
2270
2271 ptr = clientptr(client);
2272 if (ptr == NULL)
2273 return -EINVAL;
2274
2275 seq_free_client(ptr);
2276 kfree(ptr);
2277 return 0;
2278}
2279
91715ed9 2280EXPORT_SYMBOL(snd_seq_delete_kernel_client);
1da177e4
LT		 2281
2282/* skeleton to enqueue event, called from snd_seq_kernel_client_enqueue
2283 * and snd_seq_kernel_client_enqueue_blocking
2284 */
c7e0b5bf 2285static int kernel_client_enqueue(int client, struct snd_seq_event *ev,
1da177e4
LT		 2286 struct file *file, int blocking,
2287 int atomic, int hop)
2288{
c7e0b5bf 2289 struct snd_seq_client *cptr;
1da177e4
LT		 2290 int result;
2291
2292 snd_assert(ev != NULL, return -EINVAL);
2293
2294 if (ev->type == SNDRV_SEQ_EVENT_NONE)
2295 return 0; /* ignore this */
2296 if (ev->type == SNDRV_SEQ_EVENT_KERNEL_ERROR)
2297 return -EINVAL; /* quoted events can't be enqueued */
2298
2299 /* fill in client number */
2300 ev->source.client = client;
2301
2302 if (check_event_type_and_length(ev))
2303 return -EINVAL;
2304
2305 cptr = snd_seq_client_use_ptr(client);
2306 if (cptr == NULL)
2307 return -EINVAL;
2308
2309 if (! cptr->accept_output)
2310 result = -EPERM;
2311 else /* send it */
2312 result = snd_seq_client_enqueue_event(cptr, ev, file, blocking, atomic, hop);
2313
2314 snd_seq_client_unlock(cptr);
2315 return result;
2316}
2317
2318/*
2319 * exported, called by kernel clients to enqueue events (w/o blocking)
2320 *
2321 * RETURN VALUE: zero if succeed, negative if error
2322 */
c7e0b5bf 2323int snd_seq_kernel_client_enqueue(int client, struct snd_seq_event * ev,
1da177e4
LT		 2324 int atomic, int hop)
2325{
2326 return kernel_client_enqueue(client, ev, NULL, 0, atomic, hop);
2327}
2328
91715ed9
TI		 2329EXPORT_SYMBOL(snd_seq_kernel_client_enqueue);
2330
1da177e4
LT		 2331/*
2332 * exported, called by kernel clients to enqueue events (with blocking)
2333 *
2334 * RETURN VALUE: zero if succeed, negative if error
2335 */
c7e0b5bf 2336int snd_seq_kernel_client_enqueue_blocking(int client, struct snd_seq_event * ev,
1da177e4
LT		 2337 struct file *file,
2338 int atomic, int hop)
2339{
2340 return kernel_client_enqueue(client, ev, file, 1, atomic, hop);
2341}
2342
91715ed9 2343EXPORT_SYMBOL(snd_seq_kernel_client_enqueue_blocking);
1da177e4
LT		 2344
2345/*
2346 * exported, called by kernel clients to dispatch events directly to other
2347 * clients, bypassing the queues. Event time-stamp will be updated.
2348 *
2349 * RETURN VALUE: negative = delivery failed,
2350 * zero, or positive: the number of delivered events
2351 */
c7e0b5bf 2352int snd_seq_kernel_client_dispatch(int client, struct snd_seq_event * ev,
1da177e4
LT		 2353 int atomic, int hop)
2354{
c7e0b5bf 2355 struct snd_seq_client *cptr;
1da177e4
LT		 2356 int result;
2357
2358 snd_assert(ev != NULL, return -EINVAL);
2359
2360 /* fill in client number */
2361 ev->queue = SNDRV_SEQ_QUEUE_DIRECT;
2362 ev->source.client = client;
2363
2364 if (check_event_type_and_length(ev))
2365 return -EINVAL;
2366
2367 cptr = snd_seq_client_use_ptr(client);
2368 if (cptr == NULL)
2369 return -EINVAL;
2370
2371 if (!cptr->accept_output)
2372 result = -EPERM;
2373 else
2374 result = snd_seq_deliver_event(cptr, ev, atomic, hop);
2375
2376 snd_seq_client_unlock(cptr);
2377 return result;
2378}
2379
91715ed9 2380EXPORT_SYMBOL(snd_seq_kernel_client_dispatch);
1da177e4
LT		 2381
2382/*
2383 * exported, called by kernel clients to perform same functions as with
2384 * userland ioctl()
2385 */
2386int snd_seq_kernel_client_ctl(int clientid, unsigned int cmd, void *arg)
2387{
c7e0b5bf 2388 struct snd_seq_client *client;
1da177e4
LT		 2389 mm_segment_t fs;
2390 int result;
2391
2392 client = clientptr(clientid);
2393 if (client == NULL)
2394 return -ENXIO;
2395 fs = snd_enter_user();
2396 result = snd_seq_do_ioctl(client, cmd, (void __user *)arg);
2397 snd_leave_user(fs);
2398 return result;
2399}
2400
91715ed9 2401EXPORT_SYMBOL(snd_seq_kernel_client_ctl);
1da177e4
LT		 2402
2403/* exported (for OSS emulator) */
2404int snd_seq_kernel_client_write_poll(int clientid, struct file *file, poll_table *wait)
2405{
c7e0b5bf 2406 struct snd_seq_client *client;
1da177e4
LT		 2407
2408 client = clientptr(clientid);
2409 if (client == NULL)
2410 return -ENXIO;
2411
2412 if (! snd_seq_write_pool_allocated(client))
2413 return 1;
2414 if (snd_seq_pool_poll_wait(client->pool, file, wait))
2415 return 1;
2416 return 0;
2417}
2418
91715ed9
TI		 2419EXPORT_SYMBOL(snd_seq_kernel_client_write_poll);
2420
1da177e4
LT		 2421/*---------------------------------------------------------------------------*/
2422
04f141a8 2423#ifdef CONFIG_PROC_FS
1da177e4
LT		 2424/*
2425 * /proc interface
2426 */
c7e0b5bf
TI		 2427static void snd_seq_info_dump_subscribers(struct snd_info_buffer *buffer,
2428 struct snd_seq_port_subs_info *group,
2429 int is_src, char *msg)
1da177e4
LT		 2430{
2431 struct list_head *p;
c7e0b5bf 2432 struct snd_seq_subscribers *s;
1da177e4
LT		 2433 int count = 0;
2434
2435 down_read(&group->list_mutex);
2436 if (list_empty(&group->list_head)) {
2437 up_read(&group->list_mutex);
2438 return;
2439 }
2440 snd_iprintf(buffer, msg);
2441 list_for_each(p, &group->list_head) {
2442 if (is_src)
c7e0b5bf 2443 s = list_entry(p, struct snd_seq_subscribers, src_list);
1da177e4 2444 else
c7e0b5bf 2445 s = list_entry(p, struct snd_seq_subscribers, dest_list);
1da177e4
LT		 2446 if (count++)
2447 snd_iprintf(buffer, ", ");
2448 snd_iprintf(buffer, "%d:%d",
2449 is_src ? s->info.dest.client : s->info.sender.client,
2450 is_src ? s->info.dest.port : s->info.sender.port);
2451 if (s->info.flags & SNDRV_SEQ_PORT_SUBS_TIMESTAMP)
2452 snd_iprintf(buffer, "[%c:%d]", ((s->info.flags & SNDRV_SEQ_PORT_SUBS_TIME_REAL) ? 'r' : 't'), s->info.queue);
2453 if (group->exclusive)
2454 snd_iprintf(buffer, "[ex]");
2455 }
2456 up_read(&group->list_mutex);
2457 snd_iprintf(buffer, "\n");
2458}
2459
2460#define FLAG_PERM_RD(perm) ((perm) & SNDRV_SEQ_PORT_CAP_READ ? ((perm) & SNDRV_SEQ_PORT_CAP_SUBS_READ ? 'R' : 'r') : '-')
2461#define FLAG_PERM_WR(perm) ((perm) & SNDRV_SEQ_PORT_CAP_WRITE ? ((perm) & SNDRV_SEQ_PORT_CAP_SUBS_WRITE ? 'W' : 'w') : '-')
2462#define FLAG_PERM_EX(perm) ((perm) & SNDRV_SEQ_PORT_CAP_NO_EXPORT ? '-' : 'e')
2463
2464#define FLAG_PERM_DUPLEX(perm) ((perm) & SNDRV_SEQ_PORT_CAP_DUPLEX ? 'X' : '-')
2465
c7e0b5bf
TI		 2466static void snd_seq_info_dump_ports(struct snd_info_buffer *buffer,
2467 struct snd_seq_client *client)
1da177e4 2468{
9244b2c3 2469 struct snd_seq_client_port *p;
1da177e4 2470
1a60d4c5 2471 mutex_lock(&client->ports_mutex);
9244b2c3 2472 list_for_each_entry(p, &client->ports_list_head, list) {
1da177e4
LT		 2473 snd_iprintf(buffer, " Port %3d : \"%s\" (%c%c%c%c)\n",
2474 p->addr.port, p->name,
2475 FLAG_PERM_RD(p->capability),
2476 FLAG_PERM_WR(p->capability),
2477 FLAG_PERM_EX(p->capability),
2478 FLAG_PERM_DUPLEX(p->capability));
2479 snd_seq_info_dump_subscribers(buffer, &p->c_src, 1, " Connecting To: ");
2480 snd_seq_info_dump_subscribers(buffer, &p->c_dest, 0, " Connected From: ");
2481 }
1a60d4c5 2482 mutex_unlock(&client->ports_mutex);
1da177e4
LT		 2483}
2484
2485
c7e0b5bf
TI		 2486void snd_seq_info_pool(struct snd_info_buffer *buffer,
2487 struct snd_seq_pool *pool, char *space);
2488
1da177e4 2489/* exported to seq_info.c */
c7e0b5bf
TI		 2490void snd_seq_info_clients_read(struct snd_info_entry *entry,
2491 struct snd_info_buffer *buffer)
1da177e4 2492{
1da177e4 2493 int c;
c7e0b5bf 2494 struct snd_seq_client *client;
1da177e4
LT		 2495
2496 snd_iprintf(buffer, "Client info\n");
2497 snd_iprintf(buffer, " cur clients : %d\n", client_usage.cur);
2498 snd_iprintf(buffer, " peak clients : %d\n", client_usage.peak);
2499 snd_iprintf(buffer, " max clients : %d\n", SNDRV_SEQ_MAX_CLIENTS);
2500 snd_iprintf(buffer, "\n");
2501
2502 /* list the client table */
2503 for (c = 0; c < SNDRV_SEQ_MAX_CLIENTS; c++) {
2504 client = snd_seq_client_use_ptr(c);
2505 if (client == NULL)
2506 continue;
2507 if (client->type == NO_CLIENT) {
2508 snd_seq_client_unlock(client);
2509 continue;
2510 }
2511
2512 snd_iprintf(buffer, "Client %3d : \"%s\" [%s]\n",
2513 c, client->name,
2514 client->type == USER_CLIENT ? "User" : "Kernel");
2515 snd_seq_info_dump_ports(buffer, client);
2516 if (snd_seq_write_pool_allocated(client)) {
2517 snd_iprintf(buffer, " Output pool :\n");
2518 snd_seq_info_pool(buffer, client->pool, " ");
2519 }
2520 if (client->type == USER_CLIENT && client->data.user.fifo &&
2521 client->data.user.fifo->pool) {
2522 snd_iprintf(buffer, " Input pool :\n");
2523 snd_seq_info_pool(buffer, client->data.user.fifo->pool, " ");
2524 }
2525 snd_seq_client_unlock(client);
2526 }
2527}
04f141a8 2528#endif /* CONFIG_PROC_FS */
1da177e4
LT		 2529
2530/*---------------------------------------------------------------------------*/
2531
2532
2533/*
2534 * REGISTRATION PART
2535 */
2536
9c2e08c5 2537static const struct file_operations snd_seq_f_ops =
1da177e4
LT		 2538{
2539 .owner = THIS_MODULE,
2540 .read = snd_seq_read,
2541 .write = snd_seq_write,
2542 .open = snd_seq_open,
2543 .release = snd_seq_release,
2544 .poll = snd_seq_poll,
2545 .unlocked_ioctl = snd_seq_ioctl,
2546 .compat_ioctl = snd_seq_ioctl_compat,
2547};
2548
1da177e4
LT		 2549/*
2550 * register sequencer device
2551 */
2552int __init snd_sequencer_device_init(void)
2553{
2554 int err;
2555
1a60d4c5 2556 if (mutex_lock_interruptible(&register_mutex))
1da177e4
LT		 2557 return -ERESTARTSYS;
2558
2af677fc 2559 if ((err = snd_register_device(SNDRV_DEVICE_TYPE_SEQUENCER, NULL, 0,
f87135f5 2560 &snd_seq_f_ops, NULL, "seq")) < 0) {
1a60d4c5 2561 mutex_unlock(&register_mutex);
1da177e4
LT		 2562 return err;
2563 }
2564
1a60d4c5 2565 mutex_unlock(&register_mutex);
1da177e4
LT		 2566
2567 return 0;
2568}
2569
2570
2571
2572/*
2573 * unregister sequencer device
2574 */
2575void __exit snd_sequencer_device_done(void)
2576{
2577 snd_unregister_device(SNDRV_DEVICE_TYPE_SEQUENCER, NULL, 0);
2578}
Linux 6.x block layer and io_uring tree(s)