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

TOMOYO Linux Cross Reference
Linux/sound/isa/gus/gus_volume.c

Version: ~ [ linux-5.9.1 ] ~ [ linux-5.8.16 ] ~ [ linux-5.7.19 ] ~ [ linux-5.6.19 ] ~ [ linux-5.5.19 ] ~ [ linux-5.4.72 ] ~ [ linux-5.3.18 ] ~ [ linux-5.2.21 ] ~ [ linux-5.1.21 ] ~ [ linux-5.0.21 ] ~ [ linux-4.20.17 ] ~ [ linux-4.19.152 ] ~ [ linux-4.18.20 ] ~ [ linux-4.17.19 ] ~ [ linux-4.16.18 ] ~ [ linux-4.15.18 ] ~ [ linux-4.14.202 ] ~ [ linux-4.13.16 ] ~ [ linux-4.12.14 ] ~ [ linux-4.11.12 ] ~ [ linux-4.10.17 ] ~ [ linux-4.9.240 ] ~ [ linux-4.8.17 ] ~ [ linux-4.7.10 ] ~ [ linux-4.6.7 ] ~ [ linux-4.5.7 ] ~ [ linux-4.4.240 ] ~ [ linux-4.3.6 ] ~ [ linux-4.2.8 ] ~ [ linux-4.1.52 ] ~ [ linux-4.0.9 ] ~ [ linux-3.19.8 ] ~ [ linux-3.18.140 ] ~ [ linux-3.17.8 ] ~ [ linux-3.16.85 ] ~ [ linux-3.15.10 ] ~ [ linux-3.14.79 ] ~ [ linux-3.13.11 ] ~ [ linux-3.12.74 ] ~ [ linux-3.11.10 ] ~ [ linux-3.10.108 ] ~ [ linux-2.6.32.71 ] ~ [ linux-2.6.0 ] ~ [ linux-2.4.37.11 ] ~ [ unix-v6-master ] ~ [ ccs-tools-1.8.5 ] ~ [ policy-sample ] ~
Architecture: ~ [ i386 ] ~ [ alpha ] ~ [ m68k ] ~ [ mips ] ~ [ ppc ] ~ [ sparc ] ~ [ sparc64 ] ~

  1 /*
  2  *  Copyright (c) by Jaroslav Kysela <perex@perex.cz>
  3  *
  4  *
  5  *   This program is free software; you can redistribute it and/or modify
  6  *   it under the terms of the GNU General Public License as published by
  7  *   the Free Software Foundation; either version 2 of the License, or
  8  *   (at your option) any later version.
  9  *
 10  *   This program is distributed in the hope that it will be useful,
 11  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
 12  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 13  *   GNU General Public License for more details.
 14  *
 15  *   You should have received a copy of the GNU General Public License
 16  *   along with this program; if not, write to the Free Software
 17  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
 18  *
 19  */
 20 
 21 #include <linux/time.h>
 22 #include <linux/export.h>
 23 #include <sound/core.h>
 24 #include <sound/gus.h>
 25 #define __GUS_TABLES_ALLOC__
 26 #include "gus_tables.h"
 27 
 28 EXPORT_SYMBOL(snd_gf1_atten_table); /* for snd-gus-synth module */
 29 
 30 unsigned short snd_gf1_lvol_to_gvol_raw(unsigned int vol)
 31 {
 32         unsigned short e, m, tmp;
 33 
 34         if (vol > 65535)
 35                 vol = 65535;
 36         tmp = vol;
 37         e = 7;
 38         if (tmp < 128) {
 39                 while (e > 0 && tmp < (1 << e))
 40                         e--;
 41         } else {
 42                 while (tmp > 255) {
 43                         tmp >>= 1;
 44                         e++;
 45                 }
 46         }
 47         m = vol - (1 << e);
 48         if (m > 0) {
 49                 if (e > 8)
 50                         m >>= e - 8;
 51                 else if (e < 8)
 52                         m <<= 8 - e;
 53                 m &= 255;
 54         }
 55         return (e << 8) | m;
 56 }
 57 
 58 #if 0
 59 
 60 unsigned int snd_gf1_gvol_to_lvol_raw(unsigned short gf1_vol)
 61 {
 62         unsigned int rvol;
 63         unsigned short e, m;
 64 
 65         if (!gf1_vol)
 66                 return 0;
 67         e = gf1_vol >> 8;
 68         m = (unsigned char) gf1_vol;
 69         rvol = 1 << e;
 70         if (e > 8)
 71                 return rvol | (m << (e - 8));
 72         return rvol | (m >> (8 - e));
 73 }
 74 
 75 unsigned int snd_gf1_calc_ramp_rate(struct snd_gus_card * gus,
 76                                     unsigned short start,
 77                                     unsigned short end,
 78                                     unsigned int us)
 79 {
 80         static unsigned char vol_rates[19] =
 81         {
 82                 23, 24, 26, 28, 29, 31, 32, 34,
 83                 36, 37, 39, 40, 42, 44, 45, 47,
 84                 49, 50, 52
 85         };
 86         unsigned short range, increment, value, i;
 87 
 88         start >>= 4;
 89         end >>= 4;
 90         if (start < end)
 91                 us /= end - start;
 92         else
 93                 us /= start - end;
 94         range = 4;
 95         value = gus->gf1.enh_mode ?
 96             vol_rates[0] :
 97             vol_rates[gus->gf1.active_voices - 14];
 98         for (i = 0; i < 3; i++) {
 99                 if (us < value) {
100                         range = i;
101                         break;
102                 } else
103                         value <<= 3;
104         }
105         if (range == 4) {
106                 range = 3;
107                 increment = 1;
108         } else
109                 increment = (value + (value >> 1)) / us;
110         return (range << 6) | (increment & 0x3f);
111 }
112 
113 #endif  /*  0  */
114 
115 unsigned short snd_gf1_translate_freq(struct snd_gus_card * gus, unsigned int freq16)
116 {
117         freq16 >>= 3;
118         if (freq16 < 50)
119                 freq16 = 50;
120         if (freq16 & 0xf8000000) {
121                 freq16 = ~0xf8000000;
122                 snd_printk(KERN_ERR "snd_gf1_translate_freq: overflow - freq = 0x%x\n", freq16);
123         }
124         return ((freq16 << 9) + (gus->gf1.playback_freq >> 1)) / gus->gf1.playback_freq;
125 }
126 
127 #if 0
128 
129 short snd_gf1_compute_vibrato(short cents, unsigned short fc_register)
130 {
131         static short vibrato_table[] =
132         {
133                 0, 0, 32, 592, 61, 1175, 93, 1808,
134                 124, 2433, 152, 3007, 182, 3632, 213, 4290,
135                 241, 4834, 255, 5200
136         };
137 
138         long depth;
139         short *vi1, *vi2, pcents, v1;
140 
141         pcents = cents < 0 ? -cents : cents;
142         for (vi1 = vibrato_table, vi2 = vi1 + 2; pcents > *vi2; vi1 = vi2, vi2 += 2);
143         v1 = *(vi1 + 1);
144         /* The FC table above is a list of pairs. The first number in the pair     */
145         /* is the cents index from 0-255 cents, and the second number in the       */
146         /* pair is the FC adjustment needed to change the pitch by the indexed     */
147         /* number of cents. The table was created for an FC of 32768.              */
148         /* The following expression does a linear interpolation against the        */
149         /* approximated log curve in the table above, and then scales the number   */
150         /* by the FC before the LFO. This calculation also adjusts the output      */
151         /* value to produce the appropriate depth for the hardware. The depth      */
152         /* is 2 * desired FC + 1.                                                  */
153         depth = (((int) (*(vi2 + 1) - *vi1) * (pcents - *vi1) / (*vi2 - *vi1)) + v1) * fc_register >> 14;
154         if (depth)
155                 depth++;
156         if (depth > 255)
157                 depth = 255;
158         return cents < 0 ? -(short) depth : (short) depth;
159 }
160 
161 unsigned short snd_gf1_compute_pitchbend(unsigned short pitchbend, unsigned short sens)
162 {
163         static long log_table[] = {1024, 1085, 1149, 1218, 1290, 1367, 1448, 1534, 1625, 1722, 1825, 1933};
164         int wheel, sensitivity;
165         unsigned int mantissa, f1, f2;
166         unsigned short semitones, f1_index, f2_index, f1_power, f2_power;
167         char bend_down = 0;
168         int bend;
169 
170         if (!sens)
171                 return 1024;
172         wheel = (int) pitchbend - 8192;
173         sensitivity = ((int) sens * wheel) / 128;
174         if (sensitivity < 0) {
175                 bend_down = 1;
176                 sensitivity = -sensitivity;
177         }
178         semitones = (unsigned int) (sensitivity >> 13);
179         mantissa = sensitivity % 8192;
180         f1_index = semitones % 12;
181         f2_index = (semitones + 1) % 12;
182         f1_power = semitones / 12;
183         f2_power = (semitones + 1) / 12;
184         f1 = log_table[f1_index] << f1_power;
185         f2 = log_table[f2_index] << f2_power;
186         bend = (int) ((((f2 - f1) * mantissa) >> 13) + f1);
187         if (bend_down)
188                 bend = 1048576L / bend;
189         return bend;
190 }
191 
192 unsigned short snd_gf1_compute_freq(unsigned int freq,
193                                     unsigned int rate,
194                                     unsigned short mix_rate)
195 {
196         unsigned int fc;
197         int scale = 0;
198 
199         while (freq >= 4194304L) {
200                 scale++;
201                 freq >>= 1;
202         }
203         fc = (freq << 10) / rate;
204         if (fc > 97391L) {
205                 fc = 97391;
206                 snd_printk(KERN_ERR "patch: (1) fc frequency overflow - %u\n", fc);
207         }
208         fc = (fc * 44100UL) / mix_rate;
209         while (scale--)
210                 fc <<= 1;
211         if (fc > 65535L) {
212                 fc = 65535;
213                 snd_printk(KERN_ERR "patch: (2) fc frequency overflow - %u\n", fc);
214         }
215         return (unsigned short) fc;
216 }
217 
218 #endif  /*  0  */
219 

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

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

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

osdn.jp