blob: db69fe141622bc90d5f28692984332e0757554f2 [file] [log] [blame]
bellard85571bc2004-11-07 18:04:02 +00001/*
bellard1d14ffa2005-10-30 18:58:22 +00002 * QEMU SDL audio driver
3 *
4 * Copyright (c) 2004-2005 Vassili Karpov (malc)
5 *
bellard85571bc2004-11-07 18:04:02 +00006 * Permission is hereby granted, free of charge, to any person obtaining a copy
7 * of this software and associated documentation files (the "Software"), to deal
8 * in the Software without restriction, including without limitation the rights
9 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10 * copies of the Software, and to permit persons to whom the Software is
11 * furnished to do so, subject to the following conditions:
12 *
13 * The above copyright notice and this permission notice shall be included in
14 * all copies or substantial portions of the Software.
15 *
16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
19 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
22 * THE SOFTWARE.
23 */
Peter Maydell6086a562016-01-18 17:33:52 +000024#include "qemu/osdep.h"
bellard9f059ec2004-11-14 18:59:52 +000025#include <SDL.h>
26#include <SDL_thread.h>
pbrook87ecb682007-11-17 17:14:51 +000027#include "qemu-common.h"
28#include "audio.h"
bellard85571bc2004-11-07 18:04:02 +000029
thse784ba72007-07-11 23:23:15 +000030#ifndef _WIN32
31#ifdef __sun__
32#define _POSIX_PTHREAD_SEMANTICS 1
blueswir1c5e97232009-03-07 20:06:23 +000033#elif defined(__OpenBSD__) || defined(__FreeBSD__) || defined(__DragonFly__)
blueswir19b4c14c2008-10-25 11:19:14 +000034#include <pthread.h>
thse784ba72007-07-11 23:23:15 +000035#endif
thse784ba72007-07-11 23:23:15 +000036#endif
37
bellard1d14ffa2005-10-30 18:58:22 +000038#define AUDIO_CAP "sdl"
39#include "audio_int.h"
bellardfb065182004-11-09 23:09:44 +000040
bellard1d14ffa2005-10-30 18:58:22 +000041typedef struct SDLVoiceOut {
42 HWVoiceOut hw;
43 int live;
malcff541492010-01-17 00:25:29 +030044 int rpos;
bellard1d14ffa2005-10-30 18:58:22 +000045 int decr;
46} SDLVoiceOut;
bellard85571bc2004-11-07 18:04:02 +000047
48static struct {
49 int nb_samples;
50} conf = {
Juan Quintela1a40d5e2009-08-11 02:31:17 +020051 .nb_samples = 1024
bellard85571bc2004-11-07 18:04:02 +000052};
53
blueswir1b1d8e522008-10-26 13:43:07 +000054static struct SDLAudioState {
bellard85571bc2004-11-07 18:04:02 +000055 int exit;
56 SDL_mutex *mutex;
57 SDL_sem *sem;
58 int initialized;
Kővágó, Zoltán81ebb072015-06-03 23:03:55 +020059 bool driver_created;
bellard85571bc2004-11-07 18:04:02 +000060} glob_sdl;
61typedef struct SDLAudioState SDLAudioState;
62
bellard1d14ffa2005-10-30 18:58:22 +000063static void GCC_FMT_ATTR (1, 2) sdl_logerr (const char *fmt, ...)
bellard85571bc2004-11-07 18:04:02 +000064{
bellard1d14ffa2005-10-30 18:58:22 +000065 va_list ap;
66
67 va_start (ap, fmt);
68 AUD_vlog (AUDIO_CAP, fmt, ap);
69 va_end (ap);
70
71 AUD_log (AUDIO_CAP, "Reason: %s\n", SDL_GetError ());
bellard85571bc2004-11-07 18:04:02 +000072}
73
bellard1d14ffa2005-10-30 18:58:22 +000074static int sdl_lock (SDLAudioState *s, const char *forfn)
bellard85571bc2004-11-07 18:04:02 +000075{
76 if (SDL_LockMutex (s->mutex)) {
bellard1d14ffa2005-10-30 18:58:22 +000077 sdl_logerr ("SDL_LockMutex for %s failed\n", forfn);
bellard85571bc2004-11-07 18:04:02 +000078 return -1;
79 }
80 return 0;
81}
82
bellard1d14ffa2005-10-30 18:58:22 +000083static int sdl_unlock (SDLAudioState *s, const char *forfn)
bellard85571bc2004-11-07 18:04:02 +000084{
85 if (SDL_UnlockMutex (s->mutex)) {
bellard1d14ffa2005-10-30 18:58:22 +000086 sdl_logerr ("SDL_UnlockMutex for %s failed\n", forfn);
bellard85571bc2004-11-07 18:04:02 +000087 return -1;
88 }
89 return 0;
90}
91
bellard1d14ffa2005-10-30 18:58:22 +000092static int sdl_post (SDLAudioState *s, const char *forfn)
bellard85571bc2004-11-07 18:04:02 +000093{
94 if (SDL_SemPost (s->sem)) {
bellard1d14ffa2005-10-30 18:58:22 +000095 sdl_logerr ("SDL_SemPost for %s failed\n", forfn);
bellard85571bc2004-11-07 18:04:02 +000096 return -1;
97 }
98 return 0;
99}
100
bellard1d14ffa2005-10-30 18:58:22 +0000101static int sdl_wait (SDLAudioState *s, const char *forfn)
bellard85571bc2004-11-07 18:04:02 +0000102{
103 if (SDL_SemWait (s->sem)) {
bellard1d14ffa2005-10-30 18:58:22 +0000104 sdl_logerr ("SDL_SemWait for %s failed\n", forfn);
bellard85571bc2004-11-07 18:04:02 +0000105 return -1;
106 }
107 return 0;
108}
109
bellard1d14ffa2005-10-30 18:58:22 +0000110static int sdl_unlock_and_post (SDLAudioState *s, const char *forfn)
bellard85571bc2004-11-07 18:04:02 +0000111{
bellard1d14ffa2005-10-30 18:58:22 +0000112 if (sdl_unlock (s, forfn)) {
bellard85571bc2004-11-07 18:04:02 +0000113 return -1;
bellard1d14ffa2005-10-30 18:58:22 +0000114 }
bellard85571bc2004-11-07 18:04:02 +0000115
bellard1d14ffa2005-10-30 18:58:22 +0000116 return sdl_post (s, forfn);
bellard85571bc2004-11-07 18:04:02 +0000117}
118
Serge Ziryukin6c557ab2010-04-22 14:14:24 +0300119static int aud_to_sdlfmt (audfmt_e fmt)
bellard85571bc2004-11-07 18:04:02 +0000120{
bellard85571bc2004-11-07 18:04:02 +0000121 switch (fmt) {
bellard1d14ffa2005-10-30 18:58:22 +0000122 case AUD_FMT_S8:
bellard1d14ffa2005-10-30 18:58:22 +0000123 return AUDIO_S8;
124
125 case AUD_FMT_U8:
bellard1d14ffa2005-10-30 18:58:22 +0000126 return AUDIO_U8;
127
128 case AUD_FMT_S16:
bellard1d14ffa2005-10-30 18:58:22 +0000129 return AUDIO_S16LSB;
130
131 case AUD_FMT_U16:
bellard1d14ffa2005-10-30 18:58:22 +0000132 return AUDIO_U16LSB;
133
bellard85571bc2004-11-07 18:04:02 +0000134 default:
bellard1d14ffa2005-10-30 18:58:22 +0000135 dolog ("Internal logic error: Bad audio format %d\n", fmt);
136#ifdef DEBUG_AUDIO
137 abort ();
138#endif
139 return AUDIO_U8;
bellard85571bc2004-11-07 18:04:02 +0000140 }
141}
142
Stefan Weil4ff97862011-03-13 15:44:02 +0100143static int sdl_to_audfmt(int sdlfmt, audfmt_e *fmt, int *endianness)
bellard85571bc2004-11-07 18:04:02 +0000144{
bellard1d14ffa2005-10-30 18:58:22 +0000145 switch (sdlfmt) {
146 case AUDIO_S8:
Stefan Weil4ff97862011-03-13 15:44:02 +0100147 *endianness = 0;
bellard1d14ffa2005-10-30 18:58:22 +0000148 *fmt = AUD_FMT_S8;
149 break;
150
151 case AUDIO_U8:
Stefan Weil4ff97862011-03-13 15:44:02 +0100152 *endianness = 0;
bellard1d14ffa2005-10-30 18:58:22 +0000153 *fmt = AUD_FMT_U8;
154 break;
155
156 case AUDIO_S16LSB:
Stefan Weil4ff97862011-03-13 15:44:02 +0100157 *endianness = 0;
bellard1d14ffa2005-10-30 18:58:22 +0000158 *fmt = AUD_FMT_S16;
159 break;
160
161 case AUDIO_U16LSB:
Stefan Weil4ff97862011-03-13 15:44:02 +0100162 *endianness = 0;
bellard1d14ffa2005-10-30 18:58:22 +0000163 *fmt = AUD_FMT_U16;
164 break;
165
166 case AUDIO_S16MSB:
Stefan Weil4ff97862011-03-13 15:44:02 +0100167 *endianness = 1;
bellard1d14ffa2005-10-30 18:58:22 +0000168 *fmt = AUD_FMT_S16;
169 break;
170
171 case AUDIO_U16MSB:
Stefan Weil4ff97862011-03-13 15:44:02 +0100172 *endianness = 1;
bellard1d14ffa2005-10-30 18:58:22 +0000173 *fmt = AUD_FMT_U16;
174 break;
175
bellard85571bc2004-11-07 18:04:02 +0000176 default:
bellard1d14ffa2005-10-30 18:58:22 +0000177 dolog ("Unrecognized SDL audio format %d\n", sdlfmt);
178 return -1;
bellard85571bc2004-11-07 18:04:02 +0000179 }
bellard1d14ffa2005-10-30 18:58:22 +0000180
181 return 0;
bellard85571bc2004-11-07 18:04:02 +0000182}
183
184static int sdl_open (SDL_AudioSpec *req, SDL_AudioSpec *obt)
185{
186 int status;
thse784ba72007-07-11 23:23:15 +0000187#ifndef _WIN32
malcd087bb32010-08-06 13:09:41 +0400188 int err;
thse784ba72007-07-11 23:23:15 +0000189 sigset_t new, old;
190
191 /* Make sure potential threads created by SDL don't hog signals. */
malcd087bb32010-08-06 13:09:41 +0400192 err = sigfillset (&new);
193 if (err) {
194 dolog ("sdl_open: sigfillset failed: %s\n", strerror (errno));
malc60592ed2010-08-07 20:03:05 +0400195 return -1;
malcd087bb32010-08-06 13:09:41 +0400196 }
197 err = pthread_sigmask (SIG_BLOCK, &new, &old);
198 if (err) {
199 dolog ("sdl_open: pthread_sigmask failed: %s\n", strerror (err));
200 return -1;
201 }
thse784ba72007-07-11 23:23:15 +0000202#endif
bellard85571bc2004-11-07 18:04:02 +0000203
204 status = SDL_OpenAudio (req, obt);
205 if (status) {
bellard1d14ffa2005-10-30 18:58:22 +0000206 sdl_logerr ("SDL_OpenAudio failed\n");
bellard85571bc2004-11-07 18:04:02 +0000207 }
thse784ba72007-07-11 23:23:15 +0000208
209#ifndef _WIN32
malcd087bb32010-08-06 13:09:41 +0400210 err = pthread_sigmask (SIG_SETMASK, &old, NULL);
211 if (err) {
212 dolog ("sdl_open: pthread_sigmask (restore) failed: %s\n",
213 strerror (errno));
214 /* We have failed to restore original signal mask, all bets are off,
215 so exit the process */
216 exit (EXIT_FAILURE);
217 }
thse784ba72007-07-11 23:23:15 +0000218#endif
bellard85571bc2004-11-07 18:04:02 +0000219 return status;
220}
221
222static void sdl_close (SDLAudioState *s)
223{
224 if (s->initialized) {
bellard1d14ffa2005-10-30 18:58:22 +0000225 sdl_lock (s, "sdl_close");
bellard85571bc2004-11-07 18:04:02 +0000226 s->exit = 1;
bellard1d14ffa2005-10-30 18:58:22 +0000227 sdl_unlock_and_post (s, "sdl_close");
bellard85571bc2004-11-07 18:04:02 +0000228 SDL_PauseAudio (1);
229 SDL_CloseAudio ();
230 s->initialized = 0;
231 }
232}
233
234static void sdl_callback (void *opaque, Uint8 *buf, int len)
235{
bellard1d14ffa2005-10-30 18:58:22 +0000236 SDLVoiceOut *sdl = opaque;
bellard85571bc2004-11-07 18:04:02 +0000237 SDLAudioState *s = &glob_sdl;
bellard1d14ffa2005-10-30 18:58:22 +0000238 HWVoiceOut *hw = &sdl->hw;
239 int samples = len >> hw->info.shift;
bellard85571bc2004-11-07 18:04:02 +0000240
241 if (s->exit) {
242 return;
243 }
244
245 while (samples) {
bellard1d14ffa2005-10-30 18:58:22 +0000246 int to_mix, decr;
bellard85571bc2004-11-07 18:04:02 +0000247
malcff541492010-01-17 00:25:29 +0300248 /* dolog ("in callback samples=%d\n", samples); */
249 sdl_wait (s, "sdl_callback");
250 if (s->exit) {
251 return;
bellard85571bc2004-11-07 18:04:02 +0000252 }
253
malcff541492010-01-17 00:25:29 +0300254 if (sdl_lock (s, "sdl_callback")) {
255 return;
256 }
malc4839abe2009-09-30 16:25:55 +0400257
malcff541492010-01-17 00:25:29 +0300258 if (audio_bug (AUDIO_FUNC, sdl->live < 0 || sdl->live > hw->samples)) {
259 dolog ("sdl->live=%d hw->samples=%d\n",
260 sdl->live, hw->samples);
261 return;
262 }
263
264 if (!sdl->live) {
265 goto again;
266 }
267
268 /* dolog ("in callback live=%d\n", live); */
269 to_mix = audio_MIN (samples, sdl->live);
270 decr = to_mix;
271 while (to_mix) {
272 int chunk = audio_MIN (to_mix, hw->samples - hw->rpos);
273 struct st_sample *src = hw->mix_buf + hw->rpos;
274
275 /* dolog ("in callback to_mix %d, chunk %d\n", to_mix, chunk); */
276 hw->clip (buf, src, chunk);
277 sdl->rpos = (sdl->rpos + chunk) % hw->samples;
278 to_mix -= chunk;
279 buf += chunk << hw->info.shift;
280 }
281 samples -= decr;
282 sdl->live -= decr;
283 sdl->decr += decr;
284
285 again:
286 if (sdl_unlock (s, "sdl_callback")) {
287 return;
288 }
malc4839abe2009-09-30 16:25:55 +0400289 }
malcff541492010-01-17 00:25:29 +0300290 /* dolog ("done len=%d\n", len); */
bellard85571bc2004-11-07 18:04:02 +0000291}
292
bellard1d14ffa2005-10-30 18:58:22 +0000293static int sdl_write_out (SWVoiceOut *sw, void *buf, int len)
bellard85571bc2004-11-07 18:04:02 +0000294{
bellard1d14ffa2005-10-30 18:58:22 +0000295 return audio_pcm_sw_write (sw, buf, len);
296}
297
malcbdff2532009-09-18 11:37:39 +0400298static int sdl_run_out (HWVoiceOut *hw, int live)
bellard1d14ffa2005-10-30 18:58:22 +0000299{
malcbdff2532009-09-18 11:37:39 +0400300 int decr;
bellard1d14ffa2005-10-30 18:58:22 +0000301 SDLVoiceOut *sdl = (SDLVoiceOut *) hw;
302 SDLAudioState *s = &glob_sdl;
303
malc3fd7f632009-09-18 11:19:00 +0400304 if (sdl_lock (s, "sdl_run_out")) {
bellard1d14ffa2005-10-30 18:58:22 +0000305 return 0;
306 }
307
malcff541492010-01-17 00:25:29 +0300308 if (sdl->decr > live) {
309 ldebug ("sdl->decr %d live %d sdl->live %d\n",
310 sdl->decr,
311 live,
312 sdl->live);
313 }
314
315 decr = audio_MIN (sdl->decr, live);
316 sdl->decr -= decr;
317
318 sdl->live = live - decr;
319 hw->rpos = sdl->rpos;
bellard1d14ffa2005-10-30 18:58:22 +0000320
321 if (sdl->live > 0) {
malc3fd7f632009-09-18 11:19:00 +0400322 sdl_unlock_and_post (s, "sdl_run_out");
bellard1d14ffa2005-10-30 18:58:22 +0000323 }
324 else {
malc3fd7f632009-09-18 11:19:00 +0400325 sdl_unlock (s, "sdl_run_out");
bellard1d14ffa2005-10-30 18:58:22 +0000326 }
327 return decr;
328}
329
330static void sdl_fini_out (HWVoiceOut *hw)
331{
332 (void) hw;
333
bellard85571bc2004-11-07 18:04:02 +0000334 sdl_close (&glob_sdl);
335}
336
Kővágó, Zoltán5706db12015-06-03 23:03:47 +0200337static int sdl_init_out(HWVoiceOut *hw, struct audsettings *as,
338 void *drv_opaque)
bellard85571bc2004-11-07 18:04:02 +0000339{
bellard1d14ffa2005-10-30 18:58:22 +0000340 SDLVoiceOut *sdl = (SDLVoiceOut *) hw;
bellard85571bc2004-11-07 18:04:02 +0000341 SDLAudioState *s = &glob_sdl;
342 SDL_AudioSpec req, obt;
Stefan Weil4ff97862011-03-13 15:44:02 +0100343 int endianness;
bellard1d14ffa2005-10-30 18:58:22 +0000344 int err;
345 audfmt_e effective_fmt;
malc1ea879e2008-12-03 22:48:44 +0000346 struct audsettings obt_as;
bellard85571bc2004-11-07 18:04:02 +0000347
bellardc0fe3822005-11-05 18:55:28 +0000348 req.freq = as->freq;
Serge Ziryukin6c557ab2010-04-22 14:14:24 +0300349 req.format = aud_to_sdlfmt (as->fmt);
bellardc0fe3822005-11-05 18:55:28 +0000350 req.channels = as->nchannels;
bellard85571bc2004-11-07 18:04:02 +0000351 req.samples = conf.nb_samples;
bellard85571bc2004-11-07 18:04:02 +0000352 req.callback = sdl_callback;
353 req.userdata = sdl;
354
bellard1d14ffa2005-10-30 18:58:22 +0000355 if (sdl_open (&req, &obt)) {
bellard85571bc2004-11-07 18:04:02 +0000356 return -1;
bellard1d14ffa2005-10-30 18:58:22 +0000357 }
bellard85571bc2004-11-07 18:04:02 +0000358
Stefan Weil4ff97862011-03-13 15:44:02 +0100359 err = sdl_to_audfmt(obt.format, &effective_fmt, &endianness);
bellard1d14ffa2005-10-30 18:58:22 +0000360 if (err) {
361 sdl_close (s);
362 return -1;
363 }
364
bellardc0fe3822005-11-05 18:55:28 +0000365 obt_as.freq = obt.freq;
366 obt_as.nchannels = obt.channels;
367 obt_as.fmt = effective_fmt;
Stefan Weil4ff97862011-03-13 15:44:02 +0100368 obt_as.endianness = endianness;
bellardc0fe3822005-11-05 18:55:28 +0000369
bellardd929eba2006-07-04 21:47:22 +0000370 audio_pcm_init_info (&hw->info, &obt_as);
bellardc0fe3822005-11-05 18:55:28 +0000371 hw->samples = obt.samples;
bellard85571bc2004-11-07 18:04:02 +0000372
373 s->initialized = 1;
374 s->exit = 0;
375 SDL_PauseAudio (0);
376 return 0;
377}
378
bellard1d14ffa2005-10-30 18:58:22 +0000379static int sdl_ctl_out (HWVoiceOut *hw, int cmd, ...)
bellard85571bc2004-11-07 18:04:02 +0000380{
381 (void) hw;
382
383 switch (cmd) {
384 case VOICE_ENABLE:
385 SDL_PauseAudio (0);
386 break;
387
388 case VOICE_DISABLE:
389 SDL_PauseAudio (1);
390 break;
391 }
392 return 0;
393}
394
395static void *sdl_audio_init (void)
396{
397 SDLAudioState *s = &glob_sdl;
Kővágó, Zoltán81ebb072015-06-03 23:03:55 +0200398 if (s->driver_created) {
399 sdl_logerr("Can't create multiple sdl backends\n");
400 return NULL;
401 }
bellard85571bc2004-11-07 18:04:02 +0000402
403 if (SDL_InitSubSystem (SDL_INIT_AUDIO)) {
bellard1d14ffa2005-10-30 18:58:22 +0000404 sdl_logerr ("SDL failed to initialize audio subsystem\n");
bellard85571bc2004-11-07 18:04:02 +0000405 return NULL;
406 }
407
408 s->mutex = SDL_CreateMutex ();
409 if (!s->mutex) {
bellard1d14ffa2005-10-30 18:58:22 +0000410 sdl_logerr ("Failed to create SDL mutex\n");
bellard85571bc2004-11-07 18:04:02 +0000411 SDL_QuitSubSystem (SDL_INIT_AUDIO);
412 return NULL;
413 }
414
415 s->sem = SDL_CreateSemaphore (0);
416 if (!s->sem) {
bellard1d14ffa2005-10-30 18:58:22 +0000417 sdl_logerr ("Failed to create SDL semaphore\n");
bellard85571bc2004-11-07 18:04:02 +0000418 SDL_DestroyMutex (s->mutex);
419 SDL_QuitSubSystem (SDL_INIT_AUDIO);
420 return NULL;
421 }
422
Kővágó, Zoltán81ebb072015-06-03 23:03:55 +0200423 s->driver_created = true;
bellard85571bc2004-11-07 18:04:02 +0000424 return s;
425}
426
427static void sdl_audio_fini (void *opaque)
428{
429 SDLAudioState *s = opaque;
430 sdl_close (s);
431 SDL_DestroySemaphore (s->sem);
432 SDL_DestroyMutex (s->mutex);
433 SDL_QuitSubSystem (SDL_INIT_AUDIO);
Kővágó, Zoltán81ebb072015-06-03 23:03:55 +0200434 s->driver_created = false;
bellard85571bc2004-11-07 18:04:02 +0000435}
436
bellard1d14ffa2005-10-30 18:58:22 +0000437static struct audio_option sdl_options[] = {
malc98f9f482009-08-11 20:48:02 +0400438 {
439 .name = "SAMPLES",
440 .tag = AUD_OPT_INT,
441 .valp = &conf.nb_samples,
442 .descr = "Size of SDL buffer in samples"
443 },
Juan Quintela2700efa2009-08-11 02:31:16 +0200444 { /* End of list */ }
bellard85571bc2004-11-07 18:04:02 +0000445};
446
blueswir135f4b582008-10-06 18:08:30 +0000447static struct audio_pcm_ops sdl_pcm_ops = {
Juan Quintela1dd3e4d2009-08-11 02:31:15 +0200448 .init_out = sdl_init_out,
449 .fini_out = sdl_fini_out,
450 .run_out = sdl_run_out,
451 .write = sdl_write_out,
452 .ctl_out = sdl_ctl_out,
bellard1d14ffa2005-10-30 18:58:22 +0000453};
454
455struct audio_driver sdl_audio_driver = {
Juan Quintelabee37f32009-08-11 02:31:14 +0200456 .name = "sdl",
457 .descr = "SDL http://www.libsdl.org",
458 .options = sdl_options,
459 .init = sdl_audio_init,
460 .fini = sdl_audio_fini,
461 .pcm_ops = &sdl_pcm_ops,
462 .can_be_default = 1,
463 .max_voices_out = 1,
464 .max_voices_in = 0,
465 .voice_size_out = sizeof (SDLVoiceOut),
466 .voice_size_in = 0
bellard85571bc2004-11-07 18:04:02 +0000467};