sound/pci/lola/lola_clock.c

   1 /*
   2  *  Support for Digigram Lola PCI-e boards
   3  *
   4  *  Copyright (c) 2011 Takashi Iwai <tiwai@suse.de>
   5  *
   6  *  This program is free software; you can redistribute it and/or modify it
   7  *  under the terms of the GNU General Public License as published by the Free
   8  *  Software Foundation; either version 2 of the License, or (at your option)
   9  *  any later version.
  10  *
  11  *  This program is distributed in the hope that it will be useful, but WITHOUT
  12  *  ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  13  *  FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
  14  *  more details.
  15  *
  16  *  You should have received a copy of the GNU General Public License along with
  17  *  this program; if not, write to the Free Software Foundation, Inc., 59
  18  *  Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  19  */
  20
  21 #include <linux/kernel.h>
  22 #include <linux/init.h>
  23 #include <linux/delay.h>
  24 #include <sound/core.h>
  25 #include <sound/pcm.h>
  26 #include "lola.h"
  27
  28 unsigned int lola_sample_rate_convert(unsigned int coded)
  29 {
  30         unsigned int freq;
  31
  32         /* base frequency */
  33         switch (coded & 0x3) {
  34         case 0:     freq = 48000; break;
  35         case 1:     freq = 44100; break;
  36         case 2:     freq = 32000; break;
  37         default:    return 0;   /* error */
  38         }
  39
  40         /* multiplier / devisor */
  41         switch (coded & 0x1c) {
  42         case (0 << 2):    break;
  43         case (4 << 2):    break;
  44         case (1 << 2):    freq *= 2; break;
  45         case (2 << 2):    freq *= 4; break;
  46         case (5 << 2):    freq /= 2; break;
  47         case (6 << 2):    freq /= 4; break;
  48         default:        return 0;   /* error */
  49         }
  50
  51         /* ajustement */
  52         switch (coded & 0x60) {
  53         case (0 << 5):    break;
  54         case (1 << 5):    freq = (freq * 999) / 1000; break;
  55         case (2 << 5):    freq = (freq * 1001) / 1000; break;
  56         default:        return 0;   /* error */
  57         }
  58         return freq;
  59 }
  60
  61 /*
  62  * Granualrity
  63  */
  64
  65 #define LOLA_MAXFREQ_AT_GRANULARITY_MIN         48000
  66 #define LOLA_MAXFREQ_AT_GRANULARITY_BELOW_MAX   96000
  67
  68 static bool check_gran_clock_compatibility(struct lola *chip,
  69                                            unsigned int val,
  70                                            unsigned int freq)
  71 {
  72         if (!chip->granularity)
  73                 return true;
  74
  75         if (val < LOLA_GRANULARITY_MIN || val > LOLA_GRANULARITY_MAX ||
  76             (val % LOLA_GRANULARITY_STEP) != 0)
  77                 return false;
  78
  79         if (val == LOLA_GRANULARITY_MIN) {
  80                 if (freq > LOLA_MAXFREQ_AT_GRANULARITY_MIN)
  81                         return false;
  82         } else if (val < LOLA_GRANULARITY_MAX) {
  83                 if (freq > LOLA_MAXFREQ_AT_GRANULARITY_BELOW_MAX)
  84                         return false;
  85         }
  86         return true;
  87 }
  88
  89 int lola_set_granularity(struct lola *chip, unsigned int val, bool force)
  90 {
  91         int err;
  92
  93         if (!force) {
  94                 if (val == chip->granularity)
  95                         return 0;
  96 #if 0
  97                 /* change Gran only if there are no streams allocated ! */
  98                 if (chip->audio_in_alloc_mask || chip->audio_out_alloc_mask)
  99                         return -EBUSY;
 100 #endif
 101                 if (!check_gran_clock_compatibility(chip, val,
 102                                                     chip->clock.cur_freq))
 103                         return -EINVAL;
 104         }
 105
 106         chip->granularity = val;
 107         val /= LOLA_GRANULARITY_STEP;
 108
 109         /* audio function group */
 110         err = lola_codec_write(chip, 1, LOLA_VERB_SET_GRANULARITY_STEPS,
 111                                val, 0);
 112         if (err < 0)
 113                 return err;
 114         /* this can be a very slow function !!! */
 115         usleep_range(400 * val, 20000);
 116         return lola_codec_flush(chip);
 117 }
 118
 119 /*
 120  * Clock widget handling
 121  */
 122
 123 int __devinit lola_init_clock_widget(struct lola *chip, int nid)
 124 {
 125         unsigned int val;
 126         int i, j, nitems, nb_verbs, idx, idx_list;
 127         int err;
 128
 129         err = lola_read_param(chip, nid, LOLA_PAR_AUDIO_WIDGET_CAP, &val);
 130         if (err < 0) {
 131                 printk(KERN_ERR SFX "Can't read wcaps for 0x%x\n", nid);
 132                 return err;
 133         }
 134
 135         if ((val & 0xfff00000) != 0x01f00000) { /* test SubType and Type */
 136                 snd_printdd("No valid clock widget\n");
 137                 return 0;
 138         }
 139
 140         chip->clock.nid = nid;
 141         chip->clock.items = val & 0xff;
 142         snd_printdd("clock_list nid=%x, entries=%d\n", nid,
 143                     chip->clock.items);
 144         if (chip->clock.items > MAX_SAMPLE_CLOCK_COUNT) {
 145                 printk(KERN_ERR SFX "CLOCK_LIST too big: %d\n",
 146                        chip->clock.items);
 147                 return -EINVAL;
 148         }
 149
 150         nitems = chip->clock.items;
 151         nb_verbs = (nitems + 3) / 4;
 152         idx = 0;
 153         idx_list = 0;
 154         for (i = 0; i < nb_verbs; i++) {
 155                 unsigned int res_ex;
 156                 unsigned short items[4];
 157
 158                 err = lola_codec_read(chip, nid, LOLA_VERB_GET_CLOCK_LIST,
 159                                       idx, 0, &val, &res_ex);
 160                 if (err < 0) {
 161                         printk(KERN_ERR SFX "Can't read CLOCK_LIST\n");
 162                         return -EINVAL;
 163                 }
 164
 165                 items[0] = val & 0xfff;
 166                 items[1] = (val >> 16) & 0xfff;
 167                 items[2] = res_ex & 0xfff;
 168                 items[3] = (res_ex >> 16) & 0xfff;
 169
 170                 for (j = 0; j < 4; j++) {
 171                         unsigned char type = items[j] >> 8;
 172                         unsigned int freq = items[j] & 0xff;
 173                         int format = LOLA_CLOCK_FORMAT_NONE;
 174                         bool add_clock = true;
 175                         if (type == LOLA_CLOCK_TYPE_INTERNAL) {
 176                                 freq = lola_sample_rate_convert(freq);
 177                                 if (freq < chip->sample_rate_min)
 178                                         add_clock = false;
 179                                 else if (freq == 48000) {
 180                                         chip->clock.cur_index = idx_list;
 181                                         chip->clock.cur_freq = 48000;
 182                                         chip->clock.cur_valid = true;
 183                                 }
 184                         } else if (type == LOLA_CLOCK_TYPE_VIDEO) {
 185                                 freq = lola_sample_rate_convert(freq);
 186                                 if (freq < chip->sample_rate_min)
 187                                         add_clock = false;
 188                                 /* video clock has a format (0:NTSC, 1:PAL)*/
 189                                 if (items[j] & 0x80)
 190                                         format = LOLA_CLOCK_FORMAT_NTSC;
 191                                 else
 192                                         format = LOLA_CLOCK_FORMAT_PAL;
 193                         }
 194                         if (add_clock) {
 195                                 struct lola_sample_clock *sc;
 196                                 sc = &chip->clock.sample_clock[idx_list];
 197                                 sc->type = type;
 198                                 sc->format = format;
 199                                 sc->freq = freq;
 200                                 /* keep the index used with the board */
 201                                 chip->clock.idx_lookup[idx_list] = idx;
 202                                 idx_list++;
 203                         } else {
 204                                 chip->clock.items--;
 205                         }
 206                         if (++idx >= nitems)
 207                                 break;
 208                 }
 209         }
 210         return 0;
 211 }
 212
 213 /* enable unsolicited events of the clock widget */
 214 int lola_enable_clock_events(struct lola *chip)
 215 {
 216         unsigned int res;
 217         int err;
 218
 219         err = lola_codec_read(chip, chip->clock.nid,
 220                               LOLA_VERB_SET_UNSOLICITED_ENABLE,
 221                               LOLA_UNSOLICITED_ENABLE | LOLA_UNSOLICITED_TAG,
 222                               0, &res, NULL);
 223         if (err < 0)
 224                 return err;
 225         if (res) {
 226                 printk(KERN_WARNING SFX "error in enable_clock_events %d\n",
 227                        res);
 228                 return -EINVAL;
 229         }
 230         return 0;
 231 }
 232
 233 int lola_set_clock_index(struct lola *chip, unsigned int idx)
 234 {
 235         unsigned int res;
 236         int err;
 237
 238         err = lola_codec_read(chip, chip->clock.nid,
 239                               LOLA_VERB_SET_CLOCK_SELECT,
 240                               chip->clock.idx_lookup[idx],
 241                               0, &res, NULL);
 242         if (err < 0)
 243                 return err;
 244         if (res) {
 245                 printk(KERN_WARNING SFX "error in set_clock %d\n", res);
 246                 return -EINVAL;
 247         }
 248         return 0;
 249 }
 250
 251 bool lola_update_ext_clock_freq(struct lola *chip, unsigned int val)
 252 {
 253         unsigned int tag;
 254
 255         /* the current EXTERNAL clock information gets updated by interrupt
 256          * with an unsolicited response
 257          */
 258         if (!val)
 259                 return false;
 260         tag = (val >> LOLA_UNSOL_RESP_TAG_OFFSET) & LOLA_UNSOLICITED_TAG_MASK;
 261         if (tag != LOLA_UNSOLICITED_TAG)
 262                 return false;
 263
 264         /* only for current = external clocks */
 265         if (chip->clock.sample_clock[chip->clock.cur_index].type !=
 266             LOLA_CLOCK_TYPE_INTERNAL) {
 267                 chip->clock.cur_freq = lola_sample_rate_convert(val & 0x7f);
 268                 chip->clock.cur_valid = (val & 0x100) != 0;
 269         }
 270         return true;
 271 }
 272
 273 int lola_set_clock(struct lola *chip, int idx)
 274 {
 275         int freq = 0;
 276         bool valid = false;
 277
 278         if (idx == chip->clock.cur_index) {
 279                 /* current clock is allowed */
 280                 freq = chip->clock.cur_freq;
 281                 valid = chip->clock.cur_valid;
 282         } else if (chip->clock.sample_clock[idx].type ==
 283                    LOLA_CLOCK_TYPE_INTERNAL) {
 284                 /* internal clocks allowed */
 285                 freq = chip->clock.sample_clock[idx].freq;
 286                 valid = true;
 287         }
 288
 289         if (!freq || !valid)
 290                 return -EINVAL;
 291
 292         if (!check_gran_clock_compatibility(chip, chip->granularity, freq))
 293                 return -EINVAL;
 294
 295         if (idx != chip->clock.cur_index) {
 296                 int err = lola_set_clock_index(chip, idx);
 297                 if (err < 0)
 298                         return err;
 299                 /* update new settings */
 300                 chip->clock.cur_index = idx;
 301                 chip->clock.cur_freq = freq;
 302                 chip->clock.cur_valid = true;
 303         }
 304         return 0;
 305 }
 306
 307 int lola_set_sample_rate(struct lola *chip, int rate)
 308 {
 309         int i;
 310
 311         if (chip->clock.cur_freq == rate && chip->clock.cur_valid)
 312                 return 0;
 313         /* search for new dwClockIndex */
 314         for (i = 0; i < chip->clock.items; i++) {
 315                 if (chip->clock.sample_clock[i].type == LOLA_CLOCK_TYPE_INTERNAL &&
 316                     chip->clock.sample_clock[i].freq == rate)
 317                         break;
 318         }
 319         if (i >= chip->clock.items)
 320                 return -EINVAL;
 321         return lola_set_clock(chip, i);
 322 }
 323