core/misc.c

   1 /*
   2  *  Misc and compatibility things
   3  *  Copyright (c) by Jaroslav Kysela <perex@perex.cz>
   4  *
   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
  22 #include <linux/init.h>
  23 #include <linux/export.h>
  24 #include <linux/moduleparam.h>
  25 #include <linux/time.h>
  26 #include <linux/slab.h>
  27 #include <linux/ioport.h>
  28 #include <linux/fs.h>
  29 #include <sound/core.h>
  30
  31 #ifdef CONFIG_SND_DEBUG
  32
  33 #ifdef CONFIG_SND_DEBUG_VERBOSE
  34 #define DEFAULT_DEBUG_LEVEL     2
  35 #else
  36 #define DEFAULT_DEBUG_LEVEL     1
  37 #endif
  38
  39 static int debug = DEFAULT_DEBUG_LEVEL;
  40 module_param(debug, int, 0644);
  41 MODULE_PARM_DESC(debug, "Debug level (0 = disable)");
  42
  43 #endif /* CONFIG_SND_DEBUG */
  44
  45 void release_and_free_resource(struct resource *res)
  46 {
  47         if (res) {
  48                 release_resource(res);
  49                 kfree(res);
  50         }
  51 }
  52 EXPORT_SYMBOL(release_and_free_resource);
  53
  54 #ifdef CONFIG_SND_VERBOSE_PRINTK
  55 /* strip the leading path if the given path is absolute */
  56 static const char *sanity_file_name(const char *path)
  57 {
  58         if (*path == '/')
  59                 return strrchr(path, '/') + 1;
  60         else
  61                 return path;
  62 }
  63 #endif
  64
  65 #if defined(CONFIG_SND_DEBUG) || defined(CONFIG_SND_VERBOSE_PRINTK)
  66 void __snd_printk(unsigned int level, const char *path, int line,
  67                   const char *format, ...)
  68 {
  69         va_list args;
  70 #ifdef CONFIG_SND_VERBOSE_PRINTK
  71         int kern_level;
  72         struct va_format vaf;
  73         char verbose_fmt[] = KERN_DEFAULT "ALSA %s:%d %pV";
  74         bool level_found = false;
  75 #endif
  76
  77 #ifdef CONFIG_SND_DEBUG
  78         if (debug < level)
  79                 return;
  80 #endif
  81
  82         va_start(args, format);
  83 #ifdef CONFIG_SND_VERBOSE_PRINTK
  84         vaf.fmt = format;
  85         vaf.va = &args;
  86
  87         while ((kern_level = printk_get_level(vaf.fmt)) != 0) {
  88                 const char *end_of_header = printk_skip_level(vaf.fmt);
  89
  90                 /* Ignore KERN_CONT. We print filename:line for each piece. */
  91                 if (kern_level >= '0' && kern_level <= '7') {
  92                         memcpy(verbose_fmt, vaf.fmt, end_of_header - vaf.fmt);
  93                         level_found = true;
  94                 }
  95
  96                 vaf.fmt = end_of_header;
  97         }
  98
  99         if (!level_found && level)
 100                 memcpy(verbose_fmt, KERN_DEBUG, sizeof(KERN_DEBUG) - 1);
 101
 102         printk(verbose_fmt, sanity_file_name(path), line, &vaf);
 103 #else
 104         vprintk(format, args);
 105 #endif
 106         va_end(args);
 107 }
 108 EXPORT_SYMBOL_GPL(__snd_printk);
 109 #endif
 110
 111 #ifdef CONFIG_PCI
 112 #include <linux/pci.h>
 113 /**
 114  * snd_pci_quirk_lookup_id - look up a PCI SSID quirk list
 115  * @vendor: PCI SSV id
 116  * @device: PCI SSD id
 117  * @list: quirk list, terminated by a null entry
 118  *
 119  * Look through the given quirk list and finds a matching entry
 120  * with the same PCI SSID.  When subdevice is 0, all subdevice
 121  * values may match.
 122  *
 123  * Returns the matched entry pointer, or NULL if nothing matched.
 124  */
 125 const struct snd_pci_quirk *
 126 snd_pci_quirk_lookup_id(u16 vendor, u16 device,
 127                         const struct snd_pci_quirk *list)
 128 {
 129         const struct snd_pci_quirk *q;
 130
 131         for (q = list; q->subvendor; q++) {
 132                 if (q->subvendor != vendor)
 133                         continue;
 134                 if (!q->subdevice ||
 135                     (device & q->subdevice_mask) == q->subdevice)
 136                         return q;
 137         }
 138         return NULL;
 139 }
 140 EXPORT_SYMBOL(snd_pci_quirk_lookup_id);
 141
 142 /**
 143  * snd_pci_quirk_lookup - look up a PCI SSID quirk list
 144  * @pci: pci_dev handle
 145  * @list: quirk list, terminated by a null entry
 146  *
 147  * Look through the given quirk list and finds a matching entry
 148  * with the same PCI SSID.  When subdevice is 0, all subdevice
 149  * values may match.
 150  *
 151  * Returns the matched entry pointer, or NULL if nothing matched.
 152  */
 153 const struct snd_pci_quirk *
 154 snd_pci_quirk_lookup(struct pci_dev *pci, const struct snd_pci_quirk *list)
 155 {
 156         if (!pci)
 157                 return NULL;
 158         return snd_pci_quirk_lookup_id(pci->subsystem_vendor,
 159                                        pci->subsystem_device,
 160                                        list);
 161 }
 162 EXPORT_SYMBOL(snd_pci_quirk_lookup);
 163 #endif
 164
 165 /*
 166  * Deferred async signal helpers
 167  *
 168  * Below are a few helper functions to wrap the async signal handling
 169  * in the deferred work.  The main purpose is to avoid the messy deadlock
 170  * around tasklist_lock and co at the kill_fasync() invocation.
 171  * fasync_helper() and kill_fasync() are replaced with snd_fasync_helper()
 172  * and snd_kill_fasync(), respectively.  In addition, snd_fasync_free() has
 173  * to be called at releasing the relevant file object.
 174  */
 175 struct snd_fasync {
 176         struct fasync_struct *fasync;
 177         int signal;
 178         int poll;
 179         int on;
 180         struct list_head list;
 181 };
 182
 183 static DEFINE_SPINLOCK(snd_fasync_lock);
 184 static LIST_HEAD(snd_fasync_list);
 185
 186 static void snd_fasync_work_fn(struct work_struct *work)
 187 {
 188         struct snd_fasync *fasync;
 189
 190         spin_lock_irq(&snd_fasync_lock);
 191         while (!list_empty(&snd_fasync_list)) {
 192                 fasync = list_first_entry(&snd_fasync_list, struct snd_fasync, list);
 193                 list_del_init(&fasync->list);
 194                 spin_unlock_irq(&snd_fasync_lock);
 195                 if (fasync->on)
 196                         kill_fasync(&fasync->fasync, fasync->signal, fasync->poll);
 197                 spin_lock_irq(&snd_fasync_lock);
 198         }
 199         spin_unlock_irq(&snd_fasync_lock);
 200 }
 201
 202 static DECLARE_WORK(snd_fasync_work, snd_fasync_work_fn);
 203
 204 int snd_fasync_helper(int fd, struct file *file, int on,
 205                       struct snd_fasync **fasyncp)
 206 {
 207         struct snd_fasync *fasync = NULL;
 208
 209         if (on) {
 210                 fasync = kzalloc(sizeof(*fasync), GFP_KERNEL);
 211                 if (!fasync)
 212                         return -ENOMEM;
 213                 INIT_LIST_HEAD(&fasync->list);
 214         }
 215
 216         spin_lock_irq(&snd_fasync_lock);
 217         if (*fasyncp) {
 218                 kfree(fasync);
 219                 fasync = *fasyncp;
 220         } else {
 221                 if (!fasync) {
 222                         spin_unlock_irq(&snd_fasync_lock);
 223                         return 0;
 224                 }
 225                 *fasyncp = fasync;
 226         }
 227         fasync->on = on;
 228         spin_unlock_irq(&snd_fasync_lock);
 229         return fasync_helper(fd, file, on, &fasync->fasync);
 230 }
 231 EXPORT_SYMBOL_GPL(snd_fasync_helper);
 232
 233 void snd_kill_fasync(struct snd_fasync *fasync, int signal, int poll)
 234 {
 235         unsigned long flags;
 236
 237         if (!fasync || !fasync->on)
 238                 return;
 239         spin_lock_irqsave(&snd_fasync_lock, flags);
 240         fasync->signal = signal;
 241         fasync->poll = poll;
 242         list_move(&fasync->list, &snd_fasync_list);
 243         schedule_work(&snd_fasync_work);
 244         spin_unlock_irqrestore(&snd_fasync_lock, flags);
 245 }
 246 EXPORT_SYMBOL_GPL(snd_kill_fasync);
 247
 248 void snd_fasync_free(struct snd_fasync *fasync)
 249 {
 250         if (!fasync)
 251                 return;
 252         fasync->on = 0;
 253         flush_work(&snd_fasync_work);
 254         kfree(fasync);
 255 }
 256 EXPORT_SYMBOL_GPL(snd_fasync_free);