annotate src/linuxplay.c @ 467:13d500863631

Tailorization Import of the upstream sources from Repository: /afs/informatik.uni-tuebingen.de/local/web/xemacs/cvs Kind: cvs Module: XEmacs/xemacs Revision: 2001-04-12 18:25:01 by michaels
author tailor@h615406.serverkompetenz.net
date Thu, 12 Apr 2001 18:25:01 +0000
parents abe6d1db359e
children 183866b06e0b
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
1 /* linuxplay.c - play a sound file on the speaker
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
2 **
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
3 ** Copyright (C) 1995,96 by Markus Gutschke (gutschk@math.uni-muenster.de)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
4 ** This is version 1.3 of linuxplay.c, with platform-independent functions
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
5 ** moved to a different file by Robert Bihlmeyer <robbe@orcus.priv.at>.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
6 **
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
7 ** Parts of this code were inspired by sunplay.c, which is copyright 1989 by
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
8 ** Jef Poskanzer and 1991,92 by Jamie Zawinski; c.f. sunplay.c for further
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
9 ** information.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
10 **
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
11 ** Permission to use, copy, modify, and distribute this software and its
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
12 ** documentation for any purpose and without fee is hereby granted, provided
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
13 ** that the above copyright notice appear in all copies and that both that
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
14 ** copyright notice and this permission notice appear in supporting
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
15 ** documentation. This software is provided "as is" without express or
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
16 ** implied warranty.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
17 **
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
18 ** Changelog:
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
19 ** 1.0 -- first release; supports SunAudio, Wave and RAW file formats
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
20 ** detects (and rejects) VOC file format
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
21 ** tested with PC-Speaker driver only
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
22 ** 1.1 -- fixed bug with playback of stereo Wave files
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
23 ** fixed VOC file detection
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
24 ** fixed mono/8bit conversion
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
25 ** cleaned up mixer programming (c.f. VoxWare-SDK)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
26 ** tested with PC-Speaker driver and with PAS16 soundcard
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
27 ** 1.2 -- first (incompatible) attempt at fixing reliable signal handling
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
28 ** 1.3 -- changed signal handling to use reliable signals; this is done
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
29 ** by including "syssignal.h"; it fixes nasty program crashes
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
30 ** when using native sound in TTY mode.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
31 ** added support for DEC audio file format (this is basically the
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
32 ** same as Sun audio, but uses little endian format, instead).
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
33 ** strip the header from Sun audio and DEC audio files in order to
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
34 ** prevent noise at beginning of samples (thanks to Thomas Pundt
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
35 ** <pundtt@math.uni-muenster.de> for pointing out this bug and
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
36 ** providing information on the file format).
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
37 ** added a few more conversion routines.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
38 ** made the code even more tolerant to the limits imposed by some
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
39 ** soundcards and try to accept soundfiles even if they are not
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
40 ** fully conformant to the standard.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
41 ** 1.4 -- increased header size to 256; I hope there is no sample software
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
42 ** that requires this much.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
43 ** added code for converting from signed to unsigned format as
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
44 ** some soundcards cannot handle signed 8bit data.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
45 */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
46
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
47 /* Synched up with: Not in FSF. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
48
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
49 /* XEmacs beta testers say: undef this by default. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
50 #undef NOVOLUMECTRLFORMULAW /* Changing the volume for uLaw-encoded
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
51 samples sounds very poor; possibly,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
52 this is true only for the PC-Snd
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
53 driver, so undefine this symbol at your
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
54 discretion */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
55
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
56 #ifdef HAVE_CONFIG_H
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
57 #include <config.h>
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
58 #endif
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
59
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
60 #include "miscplay.h"
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 428
diff changeset
61 #include "nativesound.h"
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
62
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
63 #include <errno.h>
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
64 #include <fcntl.h>
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 428
diff changeset
65 #include SOUNDCARD_H_FILE /* Path computed by configure */
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
66 #include <stdio.h>
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
67 #include <stdlib.h>
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
68 #include <string.h>
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
69 #include <fcntl.h>
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
70 #include <sys/file.h>
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
71 #include <sys/ioctl.h>
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
72 #include <sys/signal.h>
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
73 #include <unistd.h>
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
74
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
75 #ifdef LINUXPLAYSTANDALONE
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
76 #define perror(str) fprintf(stderr,"audio: %s %s\n",str,strerror(errno));
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
77 #define warn(str) fprintf(stderr,"audio: %s\n",str);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
78 #else
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
79 #include "lisp.h"
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
80 #include "syssignal.h"
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
81 #include "sysfile.h"
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
82 #define perror(str) message("audio: %s, %s ",str,strerror(errno))
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
83 #define warn(str) message("audio: %s ",GETTEXT(str))
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
84 #endif
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
85
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 428
diff changeset
86 static SIGTYPE (*sighup_handler) (int);
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 428
diff changeset
87 static SIGTYPE (*sigint_handler) (int);
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
88
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
89 static int mix_fd;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
90 static int audio_vol;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
91 static int audio_fd;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
92 static char *audio_dev = "/dev/dsp";
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
93
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
94 /* Intercept SIGINT and SIGHUP in order to close the audio and mixer
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
95 devices before terminating sound output; this requires reliable
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
96 signals as provided by "syssignal.h" */
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 428
diff changeset
97 static SIGTYPE
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 428
diff changeset
98 sighandler (int sig)
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
99 {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
100 if (mix_fd > 0) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
101 if (audio_vol >= 0) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
102 ioctl(mix_fd,SOUND_MIXER_WRITE_PCM,&audio_vol);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
103 audio_vol = -1; }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
104 if (mix_fd != audio_fd)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
105 close(mix_fd);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
106 mix_fd = -1; }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
107 if (audio_fd > 0) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
108 ioctl(audio_fd,SNDCTL_DSP_SYNC,NULL);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
109 ioctl(audio_fd,SNDCTL_DSP_RESET,NULL);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
110 close(audio_fd);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
111 audio_fd = -1; }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
112 if (sig == SIGHUP && sighup_handler) sighup_handler(sig);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
113 else if (sig == SIGINT && sigint_handler) sigint_handler(sig);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
114 else exit(1);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
115 }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
116
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
117 /* Initialize the soundcard and mixer device with the parameters that we
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
118 found in the header of the sound file. If the soundcard is not capable of
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
119 natively supporting the required parameters, then try to set up conversion
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
120 routines.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
121 The difficulty with setting up the sound card is that the parameters are
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
122 not fully orthogonal; changing one of them might affect some of the
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
123 others, too. Thus we do quite a lot of double checking; actually most of
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
124 this is not needed right now, but it will come in handy, if the kernel's
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
125 sounddriver ever changes or if third-party sounddrivers are used. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
126 static int audio_init(int mixx_fd, int auddio_fd, int fmt, int speed,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
127 int tracks, int *volume,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
128 size_t (**sndcnv) (void **, size_t *sz, void **))
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
129 {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
130 int i,the_speed,the_stereo,the_fmt;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
131
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
132 *sndcnv = sndcnvnop;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
133
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
134 if (ioctl(auddio_fd,SNDCTL_DSP_SYNC,NULL) < 0) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
135 perror("SNDCTL_DSP_SYNC");
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
136 return(0); }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
137
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
138 /* Initialize sound hardware with preferred parameters */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
139
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
140 /* If the sound hardware cannot support 16 bit format or requires a
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
141 different byte sex then try to drop to 8 bit format */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
142
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
143 the_fmt = fmt;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
144 if(ioctl(audio_fd,SNDCTL_DSP_SETFMT,&the_fmt) < 0) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
145 perror("SNDCTL_DSP_SETFMT");
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
146 return(0);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
147 }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
148
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
149 if (fmt != the_fmt) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
150 if (fmt == AFMT_S16_LE || fmt == AFMT_S16_BE) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
151 *sndcnv = fmt == AFMT_S16_BE ? sndcnv2byteBE : sndcnv2byteLE;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
152 if (((i=fmt=AFMT_U8),ioctl(audio_fd,SNDCTL_DSP_SETFMT,&i)) < 0 ||
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
153 fmt != i || ioctl(audio_fd,SNDCTL_DSP_SETFMT,&the_fmt) < 0 ||
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
154 fmt != the_fmt) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
155 perror("SNDCTL_DSP_SETFMT");
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
156 return(0); } }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
157 else if (fmt == AFMT_MU_LAW && the_fmt == AFMT_U8 ) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
158 /* the kernel will convert for us */ }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
159 else {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
160 perror("SNDCTL_DSP_SETFMT");
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
161 return(0); } }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
162 else if (fmt == AFMT_S8) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
163 *sndcnv = sndcnv2unsigned;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
164 if (((i=fmt=AFMT_U8),ioctl(audio_fd,SNDCTL_DSP_SETFMT,&i)) < 0 ||
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
165 fmt != i || ioctl(audio_fd,SNDCTL_DSP_SETFMT,&the_fmt) < 0 ||
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
166 fmt != the_fmt) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
167 perror("SNDCTRL_DSP_SETFMT");
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
168 return(0); } }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
169
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
170 /* The PCSP driver does not support reading of the sampling rate via the
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
171 SOUND_PCM_READ_RATE ioctl; determine "the_speed" here */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
172 the_speed = speed; ioctl(audio_fd,SNDCTL_DSP_SPEED,&the_speed);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
173 /* The PCSP driver does not support reading of the mono/stereo flag, thus
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
174 we assume, that failure to change this mode means we are in mono mode */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
175 if (((i = (the_stereo = tracks)-1),ioctl(audio_fd,SNDCTL_DSP_STEREO,&i)) < 0)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
176 the_stereo = 1;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
177
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
178 /* Try to request stereo playback (if needed); if this cannot be supported
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
179 by the hardware, then install conversion routines for mono playback */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
180
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
181 /* This ioctl will fail if we use the PCSP driver; thus the value of
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
182 "the_stereo" is still unchanged */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
183 ioctl(audio_fd,SOUND_PCM_READ_CHANNELS,&the_stereo);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
184 if (tracks != the_stereo) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
185 if (tracks == 2) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
186 tracks = 1;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
187 *sndcnv = *sndcnv == sndcnv2byteLE ? sndcnv2monobyteLE :
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
188 *sndcnv == sndcnv2byteBE ? sndcnv2monobyteBE :
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
189 *sndcnv == sndcnv2unsigned ? sndcnv2monounsigned :
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
190 the_fmt == AFMT_S16_LE ? sndcnv16_2monoLE :
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
191 the_fmt == AFMT_S16_BE ? sndcnv16_2monoBE :
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
192 the_fmt == AFMT_S8 ? sndcnv8S_2mono :
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
193 the_fmt == AFMT_U8 ? sndcnv8U_2mono :
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
194 the_fmt == AFMT_MU_LAW ? sndcnvULaw_2mono : NULL;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
195 if (*sndcnv == NULL) { /* this should not happen */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
196 perror("SNDCTL_DSP_STEREO");
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
197 return(0); }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
198 /* Switch to mono mode */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
199 if (((i = 0),ioctl(audio_fd,SNDCTL_DSP_STEREO,&i)) < 0 || i) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
200 perror("SNDCTL_DSP_STEREO");
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
201 return(0); }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
202 /* Now double check that everything is set as expected */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
203 if (((i = AFMT_QUERY),ioctl(audio_fd,SNDCTL_DSP_SETFMT,&i)) < 0 ||
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
204 (i != the_fmt &&
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
205 (((i=the_fmt),ioctl(audio_fd,SNDCTL_DSP_SETFMT,&i)) < 0 ||
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
206 i != the_fmt ||
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
207 ((i = AFMT_QUERY),ioctl(audio_fd,SNDCTL_DSP_SETFMT,&i)) < 0 ||
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
208 i != the_fmt)) ||
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
209 (ioctl(audio_fd,SOUND_PCM_READ_CHANNELS,&i) >= 0 &&
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
210 i != 1)) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
211 /* There was no way that we could set the soundcard to a meaningful
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
212 mode */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
213 perror("SNDCTL_DSP_SETFMT and SNDCTL_DSP_STEREO");
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
214 return(0); } }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
215 else {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
216 /* Somebody set the soundcard to stereo even though we requested
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
217 mono; this should not happen... */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
218 if (((i = the_stereo = tracks),ioctl(audio_fd,SNDCTL_DSP_STEREO,&i))<0 ||
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
219 i != the_stereo-1) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
220 perror("SNDCTL_DSP_STEREO");
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
221 return(0); }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
222 if (((i = AFMT_QUERY),ioctl(audio_fd,SNDCTL_DSP_SETFMT,&i)) < 0 ||
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
223 i != the_fmt) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
224 perror("SNDCTL_DSP_SETFMT");
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
225 return(0); } } }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
226
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
227 /* Fail if deviations from desired sampling frequency are too big */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
228
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
229 /* This ioctl will fail if we use the PCSP driver; thus the value of
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
230 "the_speed" is still unchanged */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
231 ioctl(audio_fd,SOUND_PCM_READ_RATE,&the_speed);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
232 if (speed*14 < the_speed*10 || speed*6 > the_speed*10) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
233 char buffer[256];
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
234 sprintf(buffer,"SNDCTL_DSP_SPEED (req: %d, rtn: %d)",speed,the_speed);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
235 perror(buffer);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
236 return(0); }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
237
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
238 /* Use the mixer device for setting the playback volume */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
239 if (mixx_fd > 0) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
240 int vol = *volume & 0xFF;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
241 if (ioctl(mixx_fd,SOUND_MIXER_READ_PCM,volume) < 0)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
242 *volume = -1;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
243 if (vol < 0) vol = 0; else if (vol > 100) vol = 100;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
244 #ifdef NOVOLUMECTRLFORMULAW
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
245 if (fmt == AFMT_MU_LAW)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
246 vol = 100;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
247 #endif
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
248 vol |= 256*vol;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
249 /* Do not signal an error, if volume control is unavailable! */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
250 ioctl(mixx_fd,SOUND_MIXER_WRITE_PCM,&vol); }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
251
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
252 #if defined(LINUXPLAYSTANDALONE) && 1
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
253 /* Debugging output is displayed only when compiled as stand-alone version */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
254 {int the_volume;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
255 the_fmt = AFMT_QUERY;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
256 ioctl(audio_fd,SNDCTL_DSP_SETFMT,&the_fmt);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
257 ioctl(auddio_fd,SOUND_PCM_READ_CHANNELS,&the_stereo);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
258 ioctl(auddio_fd,SOUND_PCM_READ_RATE,&the_speed);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
259 ioctl(mixx_fd,SOUND_MIXER_READ_PCM,&the_volume);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
260 fprintf(stderr,"%s, %s, %dHz, L:%d/R:%d\n",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
261 the_fmt == AFMT_MU_LAW ? "AFMT_MU_LAW" :
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
262 the_fmt == AFMT_A_LAW ? "AFMT_A_LAW" :
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
263 the_fmt == AFMT_IMA_ADPCM ? "AFMT_IMA_ADPCM" :
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
264 the_fmt == AFMT_U8 ? "AFMT_U8" :
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
265 the_fmt == AFMT_S16_LE ? "AFMT_S16_LE" :
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
266 the_fmt == AFMT_S16_BE ? "AFMT_S16_BE" :
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
267 the_fmt == AFMT_S8 ? "AFMT_S8" :
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
268 the_fmt == AFMT_U16_LE ? "AFMT_U16_LE" :
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
269 the_fmt == AFMT_U16_BE ? "AFMT_U16_BE" :
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
270 the_fmt == AFMT_MPEG ? "AFMT_MPEG" :
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
271 "AFMT_???",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
272 the_stereo == 2 ? "stereo" : "mono",
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
273 the_speed,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
274 the_volume / 256, the_volume % 256); }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
275 #endif
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
276
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
277 return(1);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
278 }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
279
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
280 /* XEmacs requires code both for playback of pre-loaded data and for playback
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 428
diff changeset
281 from a soundfile; we use one function for both cases.
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 428
diff changeset
282
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 428
diff changeset
283 Returns 1 on succes. 0 otherwise.
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 428
diff changeset
284 */
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 428
diff changeset
285 static int linux_play_data_or_file(int fd,unsigned char *data,
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
286 int length,int volume)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
287 {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
288 size_t (*parsesndfile)(void **dayta,size_t *sz,void **outbuf);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
289 size_t (*sndcnv)(void **dayta,size_t *sz,void **);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
290 fmtType ffmt;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
291 int fmt,speed,tracks;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
292 unsigned char *pptr,*optr,*cptr,*sptr;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
293 int wrtn,rrtn,crtn,prtn;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
294 unsigned char sndbuf[SNDBUFSZ];
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
295
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
296 /* We need to read at least the header information before we can start
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
297 doing anything */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
298 if (!data || length < HEADERSZ) {
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 428
diff changeset
299 if (fd < 0) return 0;
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
300 else {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
301 length = read(fd,sndbuf,SNDBUFSZ);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
302 if (length < HEADERSZ)
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 428
diff changeset
303 return 0;
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
304 data = sndbuf;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
305 length = SNDBUFSZ; }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
306 }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
307
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
308 ffmt = analyze_format(data,&fmt,&speed,&tracks,&parsesndfile);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
309
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
310 if (ffmt != fmtRaw && ffmt != fmtSunAudio && ffmt != fmtWave) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
311 warn("Unsupported file format (neither RAW, nor Sun/DECAudio, nor WAVE)");
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 428
diff changeset
312 return 0; }
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
313
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
314 /* The VoxWare-SDK discourages opening /dev/audio; opening /dev/dsp and
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
315 properly initializing it via ioctl() is preferred */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
316 if ((audio_fd=open(audio_dev, O_WRONLY | O_NONBLOCK, 0)) < 0) {
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 428
diff changeset
317 /* JV. Much too verbose. In addition this can crash. See NOTE: in
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 428
diff changeset
318 Fplay_sound
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 428
diff changeset
319 perror(audio_dev); */
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
320 if (mix_fd > 0 && mix_fd != audio_fd) { close(mix_fd); mix_fd = -1; }
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 428
diff changeset
321 return 0; }
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
322
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
323 /* The VoxWare-SDK discourages direct manipulation of the mixer device as
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
324 this could lead to problems, when multiple sound cards are installed */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
325 mix_fd = audio_fd;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
326
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
327 sighup_handler = signal(SIGHUP, sighandler);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
328 sigint_handler = signal(SIGINT, sighandler);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
329
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
330 if (!audio_init(mix_fd,audio_fd,fmt,speed,tracks,&volume,&sndcnv))
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
331 goto END_OF_PLAY;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
332 audio_vol = volume;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
333
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
334 reset_parsestate();
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
335
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
336 /* Mainloop: read a block of data, parse its contents, perform all
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
337 the necessary conversions and output it to the sound
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
338 device; repeat until all data has been processed */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
339 rrtn = length;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
340 do {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
341 for (pptr = data; (prtn = parsesndfile((void **)&pptr,(size_t *)&rrtn,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
342 (void **)&optr)) > 0; )
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
343 for (cptr = optr; (crtn = sndcnv((void **)&cptr,(size_t *) &prtn,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
344 (void **)&sptr)) > 0; ) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
345 for (;;) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
346 if ((wrtn = write(audio_fd,sptr,crtn)) < 0) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
347 perror("write"); goto END_OF_PLAY; }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
348 else if (wrtn) break;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
349 else if (ioctl(audio_fd,SNDCTL_DSP_SYNC,NULL) < 0) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
350 perror("SNDCTL_DSP_SYNC"); goto END_OF_PLAY; } }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
351 if (wrtn != crtn) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
352 char buf[255];
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
353 sprintf(buf,"play: crtn = %d, wrtn = %d",crtn,wrtn);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
354 warn(buf);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
355 goto END_OF_PLAY; } }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
356 if (fd >= 0) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
357 if ((rrtn = read(fd,sndbuf,SNDBUFSZ)) < 0) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
358 perror("read"); goto END_OF_PLAY; } }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
359 else
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
360 break;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
361 } while (rrtn > 0);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
362
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
363 if (ffmt == fmtWave)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
364 parse_wave_complete();
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 428
diff changeset
365
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
366
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
367 END_OF_PLAY:
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
368 /* Now cleanup all used resources */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
369
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
370 ioctl(audio_fd,SNDCTL_DSP_SYNC,NULL);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
371 ioctl(audio_fd,SNDCTL_DSP_RESET,NULL);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
372
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
373 signal(SIGHUP,sighup_handler);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
374 signal(SIGINT,sigint_handler);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
375
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
376 if (mix_fd > 0) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
377 if (audio_vol >= 0) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
378 ioctl(mix_fd,SOUND_MIXER_WRITE_PCM,&audio_vol);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
379 audio_vol = -1; }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
380 if (mix_fd != audio_fd)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
381 close(mix_fd);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
382 mix_fd = -1; }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
383
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
384 close(audio_fd);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
385 audio_fd = -1;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
386
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 428
diff changeset
387 return 1;
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
388 }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
389
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
390 /* Call "linux_play_data_or_file" with the appropriate parameters for
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
391 playing a soundfile */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
392 void play_sound_file (char *sound_file, int volume)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
393 {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
394 int fd;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
395
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
396 if ((fd=open(sound_file,O_RDONLY,0)) < 0) {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
397 perror(sound_file);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
398 return; }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
399 linux_play_data_or_file(fd,NULL,0,volume);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
400 close(fd);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
401 return;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
402 }
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
403
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
404 /* Call "linux_play_data_or_file" with the appropriate parameters for
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
405 playing pre-loaded data */
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 428
diff changeset
406 int play_sound_data (unsigned char *data, int length, int volume)
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
407 {
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 428
diff changeset
408 return linux_play_data_or_file(-1,data,length,volume);
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
409 }