gus_volume.c 5.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218
  1. /*
  2. * Copyright (c) by Jaroslav Kysela <perex@suse.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. #include <sound/driver.h>
  21. #include <linux/time.h>
  22. #include <sound/core.h>
  23. #include <sound/gus.h>
  24. #define __GUS_TABLES_ALLOC__
  25. #include "gus_tables.h"
  26. EXPORT_SYMBOL(snd_gf1_atten_table); /* for snd-gus-synth module */
  27. unsigned short snd_gf1_lvol_to_gvol_raw(unsigned int vol)
  28. {
  29. unsigned short e, m, tmp;
  30. if (vol > 65535)
  31. vol = 65535;
  32. tmp = vol;
  33. e = 7;
  34. if (tmp < 128) {
  35. while (e > 0 && tmp < (1 << e))
  36. e--;
  37. } else {
  38. while (tmp > 255) {
  39. tmp >>= 1;
  40. e++;
  41. }
  42. }
  43. m = vol - (1 << e);
  44. if (m > 0) {
  45. if (e > 8)
  46. m >>= e - 8;
  47. else if (e < 8)
  48. m <<= 8 - e;
  49. m &= 255;
  50. }
  51. return (e << 8) | m;
  52. }
  53. #if 0
  54. unsigned int snd_gf1_gvol_to_lvol_raw(unsigned short gf1_vol)
  55. {
  56. unsigned int rvol;
  57. unsigned short e, m;
  58. if (!gf1_vol)
  59. return 0;
  60. e = gf1_vol >> 8;
  61. m = (unsigned char) gf1_vol;
  62. rvol = 1 << e;
  63. if (e > 8)
  64. return rvol | (m << (e - 8));
  65. return rvol | (m >> (8 - e));
  66. }
  67. unsigned int snd_gf1_calc_ramp_rate(struct snd_gus_card * gus,
  68. unsigned short start,
  69. unsigned short end,
  70. unsigned int us)
  71. {
  72. static unsigned char vol_rates[19] =
  73. {
  74. 23, 24, 26, 28, 29, 31, 32, 34,
  75. 36, 37, 39, 40, 42, 44, 45, 47,
  76. 49, 50, 52
  77. };
  78. unsigned short range, increment, value, i;
  79. start >>= 4;
  80. end >>= 4;
  81. if (start < end)
  82. us /= end - start;
  83. else
  84. us /= start - end;
  85. range = 4;
  86. value = gus->gf1.enh_mode ?
  87. vol_rates[0] :
  88. vol_rates[gus->gf1.active_voices - 14];
  89. for (i = 0; i < 3; i++) {
  90. if (us < value) {
  91. range = i;
  92. break;
  93. } else
  94. value <<= 3;
  95. }
  96. if (range == 4) {
  97. range = 3;
  98. increment = 1;
  99. } else
  100. increment = (value + (value >> 1)) / us;
  101. return (range << 6) | (increment & 0x3f);
  102. }
  103. #endif /* 0 */
  104. unsigned short snd_gf1_translate_freq(struct snd_gus_card * gus, unsigned int freq16)
  105. {
  106. freq16 >>= 3;
  107. if (freq16 < 50)
  108. freq16 = 50;
  109. if (freq16 & 0xf8000000) {
  110. freq16 = ~0xf8000000;
  111. snd_printk(KERN_ERR "snd_gf1_translate_freq: overflow - freq = 0x%x\n", freq16);
  112. }
  113. return ((freq16 << 9) + (gus->gf1.playback_freq >> 1)) / gus->gf1.playback_freq;
  114. }
  115. #if 0
  116. short snd_gf1_compute_vibrato(short cents, unsigned short fc_register)
  117. {
  118. static short vibrato_table[] =
  119. {
  120. 0, 0, 32, 592, 61, 1175, 93, 1808,
  121. 124, 2433, 152, 3007, 182, 3632, 213, 4290,
  122. 241, 4834, 255, 5200
  123. };
  124. long depth;
  125. short *vi1, *vi2, pcents, v1;
  126. pcents = cents < 0 ? -cents : cents;
  127. for (vi1 = vibrato_table, vi2 = vi1 + 2; pcents > *vi2; vi1 = vi2, vi2 += 2);
  128. v1 = *(vi1 + 1);
  129. /* The FC table above is a list of pairs. The first number in the pair */
  130. /* is the cents index from 0-255 cents, and the second number in the */
  131. /* pair is the FC adjustment needed to change the pitch by the indexed */
  132. /* number of cents. The table was created for an FC of 32768. */
  133. /* The following expression does a linear interpolation against the */
  134. /* approximated log curve in the table above, and then scales the number */
  135. /* by the FC before the LFO. This calculation also adjusts the output */
  136. /* value to produce the appropriate depth for the hardware. The depth */
  137. /* is 2 * desired FC + 1. */
  138. depth = (((int) (*(vi2 + 1) - *vi1) * (pcents - *vi1) / (*vi2 - *vi1)) + v1) * fc_register >> 14;
  139. if (depth)
  140. depth++;
  141. if (depth > 255)
  142. depth = 255;
  143. return cents < 0 ? -(short) depth : (short) depth;
  144. }
  145. unsigned short snd_gf1_compute_pitchbend(unsigned short pitchbend, unsigned short sens)
  146. {
  147. static long log_table[] = {1024, 1085, 1149, 1218, 1290, 1367, 1448, 1534, 1625, 1722, 1825, 1933};
  148. int wheel, sensitivity;
  149. unsigned int mantissa, f1, f2;
  150. unsigned short semitones, f1_index, f2_index, f1_power, f2_power;
  151. char bend_down = 0;
  152. int bend;
  153. if (!sens)
  154. return 1024;
  155. wheel = (int) pitchbend - 8192;
  156. sensitivity = ((int) sens * wheel) / 128;
  157. if (sensitivity < 0) {
  158. bend_down = 1;
  159. sensitivity = -sensitivity;
  160. }
  161. semitones = (unsigned int) (sensitivity >> 13);
  162. mantissa = sensitivity % 8192;
  163. f1_index = semitones % 12;
  164. f2_index = (semitones + 1) % 12;
  165. f1_power = semitones / 12;
  166. f2_power = (semitones + 1) / 12;
  167. f1 = log_table[f1_index] << f1_power;
  168. f2 = log_table[f2_index] << f2_power;
  169. bend = (int) ((((f2 - f1) * mantissa) >> 13) + f1);
  170. if (bend_down)
  171. bend = 1048576L / bend;
  172. return bend;
  173. }
  174. unsigned short snd_gf1_compute_freq(unsigned int freq,
  175. unsigned int rate,
  176. unsigned short mix_rate)
  177. {
  178. unsigned int fc;
  179. int scale = 0;
  180. while (freq >= 4194304L) {
  181. scale++;
  182. freq >>= 1;
  183. }
  184. fc = (freq << 10) / rate;
  185. if (fc > 97391L) {
  186. fc = 97391;
  187. snd_printk(KERN_ERR "patch: (1) fc frequency overflow - %u\n", fc);
  188. }
  189. fc = (fc * 44100UL) / mix_rate;
  190. while (scale--)
  191. fc <<= 1;
  192. if (fc > 65535L) {
  193. fc = 65535;
  194. snd_printk(KERN_ERR "patch: (2) fc frequency overflow - %u\n", fc);
  195. }
  196. return (unsigned short) fc;
  197. }
  198. #endif /* 0 */