Loading...
1// SPDX-License-Identifier: GPL-2.0-or-later
2/*
3 * Beep using pcm
4 *
5 * Copyright (c) by Takashi Iwai <tiwai@suse.de>
6 */
7
8#include <linux/io.h>
9#include <asm/irq.h>
10#include <linux/init.h>
11#include <linux/slab.h>
12#include <linux/input.h>
13#include <linux/pci.h>
14#include <linux/dma-mapping.h>
15#include <sound/core.h>
16#include <sound/control.h>
17#include "pmac.h"
18
19struct pmac_beep {
20 int running; /* boolean */
21 int volume; /* mixer volume: 0-100 */
22 int volume_play; /* currently playing volume */
23 int hz;
24 int nsamples;
25 short *buf; /* allocated wave buffer */
26 dma_addr_t addr; /* physical address of buffer */
27 struct input_dev *dev;
28};
29
30/*
31 * stop beep if running
32 */
33void snd_pmac_beep_stop(struct snd_pmac *chip)
34{
35 struct pmac_beep *beep = chip->beep;
36 if (beep && beep->running) {
37 beep->running = 0;
38 snd_pmac_beep_dma_stop(chip);
39 }
40}
41
42/*
43 * Stuff for outputting a beep. The values range from -327 to +327
44 * so we can multiply by an amplitude in the range 0..100 to get a
45 * signed short value to put in the output buffer.
46 */
47static const short beep_wform[256] = {
48 0, 40, 79, 117, 153, 187, 218, 245,
49 269, 288, 304, 316, 323, 327, 327, 324,
50 318, 310, 299, 288, 275, 262, 249, 236,
51 224, 213, 204, 196, 190, 186, 183, 182,
52 182, 183, 186, 189, 192, 196, 200, 203,
53 206, 208, 209, 209, 209, 207, 204, 201,
54 197, 193, 188, 183, 179, 174, 170, 166,
55 163, 161, 160, 159, 159, 160, 161, 162,
56 164, 166, 168, 169, 171, 171, 171, 170,
57 169, 167, 163, 159, 155, 150, 144, 139,
58 133, 128, 122, 117, 113, 110, 107, 105,
59 103, 103, 103, 103, 104, 104, 105, 105,
60 105, 103, 101, 97, 92, 86, 78, 68,
61 58, 45, 32, 18, 3, -11, -26, -41,
62 -55, -68, -79, -88, -95, -100, -102, -102,
63 -99, -93, -85, -75, -62, -48, -33, -16,
64 0, 16, 33, 48, 62, 75, 85, 93,
65 99, 102, 102, 100, 95, 88, 79, 68,
66 55, 41, 26, 11, -3, -18, -32, -45,
67 -58, -68, -78, -86, -92, -97, -101, -103,
68 -105, -105, -105, -104, -104, -103, -103, -103,
69 -103, -105, -107, -110, -113, -117, -122, -128,
70 -133, -139, -144, -150, -155, -159, -163, -167,
71 -169, -170, -171, -171, -171, -169, -168, -166,
72 -164, -162, -161, -160, -159, -159, -160, -161,
73 -163, -166, -170, -174, -179, -183, -188, -193,
74 -197, -201, -204, -207, -209, -209, -209, -208,
75 -206, -203, -200, -196, -192, -189, -186, -183,
76 -182, -182, -183, -186, -190, -196, -204, -213,
77 -224, -236, -249, -262, -275, -288, -299, -310,
78 -318, -324, -327, -327, -323, -316, -304, -288,
79 -269, -245, -218, -187, -153, -117, -79, -40,
80};
81
82#define BEEP_SRATE 22050 /* 22050 Hz sample rate */
83#define BEEP_BUFLEN 512
84#define BEEP_VOLUME 15 /* 0 - 100 */
85
86static int snd_pmac_beep_event(struct input_dev *dev, unsigned int type,
87 unsigned int code, int hz)
88{
89 struct snd_pmac *chip;
90 struct pmac_beep *beep;
91 unsigned long flags;
92 int beep_speed = 0;
93 int srate;
94 int period, ncycles, nsamples;
95 int i, j, f;
96 short *p;
97
98 if (type != EV_SND)
99 return -1;
100
101 switch (code) {
102 case SND_BELL: if (hz) hz = 1000; break;
103 case SND_TONE: break;
104 default: return -1;
105 }
106
107 chip = input_get_drvdata(dev);
108 if (!chip)
109 return -1;
110 beep = chip->beep;
111 if (!beep)
112 return -1;
113
114 if (! hz) {
115 spin_lock_irqsave(&chip->reg_lock, flags);
116 if (beep->running)
117 snd_pmac_beep_stop(chip);
118 spin_unlock_irqrestore(&chip->reg_lock, flags);
119 return 0;
120 }
121
122 beep_speed = snd_pmac_rate_index(chip, &chip->playback, BEEP_SRATE);
123 srate = chip->freq_table[beep_speed];
124
125 if (hz <= srate / BEEP_BUFLEN || hz > srate / 2)
126 hz = 1000;
127
128 spin_lock_irqsave(&chip->reg_lock, flags);
129 if (chip->playback.running || chip->capture.running || beep->running) {
130 spin_unlock_irqrestore(&chip->reg_lock, flags);
131 return 0;
132 }
133 beep->running = 1;
134 spin_unlock_irqrestore(&chip->reg_lock, flags);
135
136 if (hz == beep->hz && beep->volume == beep->volume_play) {
137 nsamples = beep->nsamples;
138 } else {
139 period = srate * 256 / hz; /* fixed point */
140 ncycles = BEEP_BUFLEN * 256 / period;
141 nsamples = (period * ncycles) >> 8;
142 f = ncycles * 65536 / nsamples;
143 j = 0;
144 p = beep->buf;
145 for (i = 0; i < nsamples; ++i, p += 2) {
146 p[0] = p[1] = beep_wform[j >> 8] * beep->volume;
147 j = (j + f) & 0xffff;
148 }
149 beep->hz = hz;
150 beep->volume_play = beep->volume;
151 beep->nsamples = nsamples;
152 }
153
154 spin_lock_irqsave(&chip->reg_lock, flags);
155 snd_pmac_beep_dma_start(chip, beep->nsamples * 4, beep->addr, beep_speed);
156 spin_unlock_irqrestore(&chip->reg_lock, flags);
157 return 0;
158}
159
160/*
161 * beep volume mixer
162 */
163
164static int snd_pmac_info_beep(struct snd_kcontrol *kcontrol,
165 struct snd_ctl_elem_info *uinfo)
166{
167 uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
168 uinfo->count = 1;
169 uinfo->value.integer.min = 0;
170 uinfo->value.integer.max = 100;
171 return 0;
172}
173
174static int snd_pmac_get_beep(struct snd_kcontrol *kcontrol,
175 struct snd_ctl_elem_value *ucontrol)
176{
177 struct snd_pmac *chip = snd_kcontrol_chip(kcontrol);
178 if (snd_BUG_ON(!chip->beep))
179 return -ENXIO;
180 ucontrol->value.integer.value[0] = chip->beep->volume;
181 return 0;
182}
183
184static int snd_pmac_put_beep(struct snd_kcontrol *kcontrol,
185 struct snd_ctl_elem_value *ucontrol)
186{
187 struct snd_pmac *chip = snd_kcontrol_chip(kcontrol);
188 unsigned int oval, nval;
189 if (snd_BUG_ON(!chip->beep))
190 return -ENXIO;
191 oval = chip->beep->volume;
192 nval = ucontrol->value.integer.value[0];
193 if (nval > 100)
194 return -EINVAL;
195 chip->beep->volume = nval;
196 return oval != chip->beep->volume;
197}
198
199static const struct snd_kcontrol_new snd_pmac_beep_mixer = {
200 .iface = SNDRV_CTL_ELEM_IFACE_MIXER,
201 .name = "Beep Playback Volume",
202 .info = snd_pmac_info_beep,
203 .get = snd_pmac_get_beep,
204 .put = snd_pmac_put_beep,
205};
206
207/* Initialize beep stuff */
208int snd_pmac_attach_beep(struct snd_pmac *chip)
209{
210 struct pmac_beep *beep;
211 struct input_dev *input_dev;
212 struct snd_kcontrol *beep_ctl;
213 void *dmabuf;
214 int err = -ENOMEM;
215
216 beep = kzalloc(sizeof(*beep), GFP_KERNEL);
217 if (! beep)
218 return -ENOMEM;
219 dmabuf = dma_alloc_coherent(&chip->pdev->dev, BEEP_BUFLEN * 4,
220 &beep->addr, GFP_KERNEL);
221 input_dev = input_allocate_device();
222 if (! dmabuf || ! input_dev)
223 goto fail1;
224
225 /* FIXME: set more better values */
226 input_dev->name = "PowerMac Beep";
227 input_dev->phys = "powermac/beep";
228 input_dev->id.bustype = BUS_ADB;
229 input_dev->id.vendor = 0x001f;
230 input_dev->id.product = 0x0001;
231 input_dev->id.version = 0x0100;
232
233 input_dev->evbit[0] = BIT_MASK(EV_SND);
234 input_dev->sndbit[0] = BIT_MASK(SND_BELL) | BIT_MASK(SND_TONE);
235 input_dev->event = snd_pmac_beep_event;
236 input_dev->dev.parent = &chip->pdev->dev;
237 input_set_drvdata(input_dev, chip);
238
239 beep->dev = input_dev;
240 beep->buf = dmabuf;
241 beep->volume = BEEP_VOLUME;
242 beep->running = 0;
243
244 beep_ctl = snd_ctl_new1(&snd_pmac_beep_mixer, chip);
245 err = snd_ctl_add(chip->card, beep_ctl);
246 if (err < 0)
247 goto fail1;
248
249 chip->beep = beep;
250
251 err = input_register_device(beep->dev);
252 if (err)
253 goto fail2;
254
255 return 0;
256
257 fail2: snd_ctl_remove(chip->card, beep_ctl);
258 fail1: input_free_device(input_dev);
259 if (dmabuf)
260 dma_free_coherent(&chip->pdev->dev, BEEP_BUFLEN * 4,
261 dmabuf, beep->addr);
262 kfree(beep);
263 return err;
264}
265
266void snd_pmac_detach_beep(struct snd_pmac *chip)
267{
268 if (chip->beep) {
269 input_unregister_device(chip->beep->dev);
270 dma_free_coherent(&chip->pdev->dev, BEEP_BUFLEN * 4,
271 chip->beep->buf, chip->beep->addr);
272 kfree(chip->beep);
273 chip->beep = NULL;
274 }
275}
1/*
2 * Beep using pcm
3 *
4 * Copyright (c) by Takashi Iwai <tiwai@suse.de>
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#include <asm/io.h>
22#include <asm/irq.h>
23#include <linux/init.h>
24#include <linux/slab.h>
25#include <linux/input.h>
26#include <linux/pci.h>
27#include <linux/dma-mapping.h>
28#include <sound/core.h>
29#include <sound/control.h>
30#include "pmac.h"
31
32struct pmac_beep {
33 int running; /* boolean */
34 int volume; /* mixer volume: 0-100 */
35 int volume_play; /* currently playing volume */
36 int hz;
37 int nsamples;
38 short *buf; /* allocated wave buffer */
39 dma_addr_t addr; /* physical address of buffer */
40 struct input_dev *dev;
41};
42
43/*
44 * stop beep if running
45 */
46void snd_pmac_beep_stop(struct snd_pmac *chip)
47{
48 struct pmac_beep *beep = chip->beep;
49 if (beep && beep->running) {
50 beep->running = 0;
51 snd_pmac_beep_dma_stop(chip);
52 }
53}
54
55/*
56 * Stuff for outputting a beep. The values range from -327 to +327
57 * so we can multiply by an amplitude in the range 0..100 to get a
58 * signed short value to put in the output buffer.
59 */
60static short beep_wform[256] = {
61 0, 40, 79, 117, 153, 187, 218, 245,
62 269, 288, 304, 316, 323, 327, 327, 324,
63 318, 310, 299, 288, 275, 262, 249, 236,
64 224, 213, 204, 196, 190, 186, 183, 182,
65 182, 183, 186, 189, 192, 196, 200, 203,
66 206, 208, 209, 209, 209, 207, 204, 201,
67 197, 193, 188, 183, 179, 174, 170, 166,
68 163, 161, 160, 159, 159, 160, 161, 162,
69 164, 166, 168, 169, 171, 171, 171, 170,
70 169, 167, 163, 159, 155, 150, 144, 139,
71 133, 128, 122, 117, 113, 110, 107, 105,
72 103, 103, 103, 103, 104, 104, 105, 105,
73 105, 103, 101, 97, 92, 86, 78, 68,
74 58, 45, 32, 18, 3, -11, -26, -41,
75 -55, -68, -79, -88, -95, -100, -102, -102,
76 -99, -93, -85, -75, -62, -48, -33, -16,
77 0, 16, 33, 48, 62, 75, 85, 93,
78 99, 102, 102, 100, 95, 88, 79, 68,
79 55, 41, 26, 11, -3, -18, -32, -45,
80 -58, -68, -78, -86, -92, -97, -101, -103,
81 -105, -105, -105, -104, -104, -103, -103, -103,
82 -103, -105, -107, -110, -113, -117, -122, -128,
83 -133, -139, -144, -150, -155, -159, -163, -167,
84 -169, -170, -171, -171, -171, -169, -168, -166,
85 -164, -162, -161, -160, -159, -159, -160, -161,
86 -163, -166, -170, -174, -179, -183, -188, -193,
87 -197, -201, -204, -207, -209, -209, -209, -208,
88 -206, -203, -200, -196, -192, -189, -186, -183,
89 -182, -182, -183, -186, -190, -196, -204, -213,
90 -224, -236, -249, -262, -275, -288, -299, -310,
91 -318, -324, -327, -327, -323, -316, -304, -288,
92 -269, -245, -218, -187, -153, -117, -79, -40,
93};
94
95#define BEEP_SRATE 22050 /* 22050 Hz sample rate */
96#define BEEP_BUFLEN 512
97#define BEEP_VOLUME 15 /* 0 - 100 */
98
99static int snd_pmac_beep_event(struct input_dev *dev, unsigned int type,
100 unsigned int code, int hz)
101{
102 struct snd_pmac *chip;
103 struct pmac_beep *beep;
104 unsigned long flags;
105 int beep_speed = 0;
106 int srate;
107 int period, ncycles, nsamples;
108 int i, j, f;
109 short *p;
110
111 if (type != EV_SND)
112 return -1;
113
114 switch (code) {
115 case SND_BELL: if (hz) hz = 1000;
116 case SND_TONE: break;
117 default: return -1;
118 }
119
120 chip = input_get_drvdata(dev);
121 if (! chip || (beep = chip->beep) == NULL)
122 return -1;
123
124 if (! hz) {
125 spin_lock_irqsave(&chip->reg_lock, flags);
126 if (beep->running)
127 snd_pmac_beep_stop(chip);
128 spin_unlock_irqrestore(&chip->reg_lock, flags);
129 return 0;
130 }
131
132 beep_speed = snd_pmac_rate_index(chip, &chip->playback, BEEP_SRATE);
133 srate = chip->freq_table[beep_speed];
134
135 if (hz <= srate / BEEP_BUFLEN || hz > srate / 2)
136 hz = 1000;
137
138 spin_lock_irqsave(&chip->reg_lock, flags);
139 if (chip->playback.running || chip->capture.running || beep->running) {
140 spin_unlock_irqrestore(&chip->reg_lock, flags);
141 return 0;
142 }
143 beep->running = 1;
144 spin_unlock_irqrestore(&chip->reg_lock, flags);
145
146 if (hz == beep->hz && beep->volume == beep->volume_play) {
147 nsamples = beep->nsamples;
148 } else {
149 period = srate * 256 / hz; /* fixed point */
150 ncycles = BEEP_BUFLEN * 256 / period;
151 nsamples = (period * ncycles) >> 8;
152 f = ncycles * 65536 / nsamples;
153 j = 0;
154 p = beep->buf;
155 for (i = 0; i < nsamples; ++i, p += 2) {
156 p[0] = p[1] = beep_wform[j >> 8] * beep->volume;
157 j = (j + f) & 0xffff;
158 }
159 beep->hz = hz;
160 beep->volume_play = beep->volume;
161 beep->nsamples = nsamples;
162 }
163
164 spin_lock_irqsave(&chip->reg_lock, flags);
165 snd_pmac_beep_dma_start(chip, beep->nsamples * 4, beep->addr, beep_speed);
166 spin_unlock_irqrestore(&chip->reg_lock, flags);
167 return 0;
168}
169
170/*
171 * beep volume mixer
172 */
173
174static int snd_pmac_info_beep(struct snd_kcontrol *kcontrol,
175 struct snd_ctl_elem_info *uinfo)
176{
177 uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
178 uinfo->count = 1;
179 uinfo->value.integer.min = 0;
180 uinfo->value.integer.max = 100;
181 return 0;
182}
183
184static int snd_pmac_get_beep(struct snd_kcontrol *kcontrol,
185 struct snd_ctl_elem_value *ucontrol)
186{
187 struct snd_pmac *chip = snd_kcontrol_chip(kcontrol);
188 if (snd_BUG_ON(!chip->beep))
189 return -ENXIO;
190 ucontrol->value.integer.value[0] = chip->beep->volume;
191 return 0;
192}
193
194static int snd_pmac_put_beep(struct snd_kcontrol *kcontrol,
195 struct snd_ctl_elem_value *ucontrol)
196{
197 struct snd_pmac *chip = snd_kcontrol_chip(kcontrol);
198 unsigned int oval, nval;
199 if (snd_BUG_ON(!chip->beep))
200 return -ENXIO;
201 oval = chip->beep->volume;
202 nval = ucontrol->value.integer.value[0];
203 if (nval > 100)
204 return -EINVAL;
205 chip->beep->volume = nval;
206 return oval != chip->beep->volume;
207}
208
209static struct snd_kcontrol_new snd_pmac_beep_mixer = {
210 .iface = SNDRV_CTL_ELEM_IFACE_MIXER,
211 .name = "Beep Playback Volume",
212 .info = snd_pmac_info_beep,
213 .get = snd_pmac_get_beep,
214 .put = snd_pmac_put_beep,
215};
216
217/* Initialize beep stuff */
218int snd_pmac_attach_beep(struct snd_pmac *chip)
219{
220 struct pmac_beep *beep;
221 struct input_dev *input_dev;
222 struct snd_kcontrol *beep_ctl;
223 void *dmabuf;
224 int err = -ENOMEM;
225
226 beep = kzalloc(sizeof(*beep), GFP_KERNEL);
227 if (! beep)
228 return -ENOMEM;
229 dmabuf = dma_alloc_coherent(&chip->pdev->dev, BEEP_BUFLEN * 4,
230 &beep->addr, GFP_KERNEL);
231 input_dev = input_allocate_device();
232 if (! dmabuf || ! input_dev)
233 goto fail1;
234
235 /* FIXME: set more better values */
236 input_dev->name = "PowerMac Beep";
237 input_dev->phys = "powermac/beep";
238 input_dev->id.bustype = BUS_ADB;
239 input_dev->id.vendor = 0x001f;
240 input_dev->id.product = 0x0001;
241 input_dev->id.version = 0x0100;
242
243 input_dev->evbit[0] = BIT_MASK(EV_SND);
244 input_dev->sndbit[0] = BIT_MASK(SND_BELL) | BIT_MASK(SND_TONE);
245 input_dev->event = snd_pmac_beep_event;
246 input_dev->dev.parent = &chip->pdev->dev;
247 input_set_drvdata(input_dev, chip);
248
249 beep->dev = input_dev;
250 beep->buf = dmabuf;
251 beep->volume = BEEP_VOLUME;
252 beep->running = 0;
253
254 beep_ctl = snd_ctl_new1(&snd_pmac_beep_mixer, chip);
255 err = snd_ctl_add(chip->card, beep_ctl);
256 if (err < 0)
257 goto fail1;
258
259 chip->beep = beep;
260
261 err = input_register_device(beep->dev);
262 if (err)
263 goto fail2;
264
265 return 0;
266
267 fail2: snd_ctl_remove(chip->card, beep_ctl);
268 fail1: input_free_device(input_dev);
269 if (dmabuf)
270 dma_free_coherent(&chip->pdev->dev, BEEP_BUFLEN * 4,
271 dmabuf, beep->addr);
272 kfree(beep);
273 return err;
274}
275
276void snd_pmac_detach_beep(struct snd_pmac *chip)
277{
278 if (chip->beep) {
279 input_unregister_device(chip->beep->dev);
280 dma_free_coherent(&chip->pdev->dev, BEEP_BUFLEN * 4,
281 chip->beep->buf, chip->beep->addr);
282 kfree(chip->beep);
283 chip->beep = NULL;
284 }
285}