Mercurial > hg > xemacs-beta

comparison src/esd.c @ 398:74fd4e045ea6 r21-2-29

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-29
author cvs
date Mon, 13 Aug 2007 11:13:30 +0200
parents
children 183866b06e0b
comparison
equal deleted inserted replaced
397:f4aeb21a5bad 398:74fd4e045ea6
1 /* esd.c - play a sound over ESD
2
3 This file is part of XEmacs.
4
5 XEmacs is free software; you can redistribute it and/or modify it
6 under the terms of the GNU General Public License as published by the
7 Free Software Foundation; either version 2, or (at your option) any
8 later version.
9
10 XEmacs is distributed in the hope that it will be useful, but WITHOUT
11 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
12 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
13 for more details.
14
15 You should have received a copy of the GNU General Public License
16 along with XEmacs; see the file COPYING. If not, write to
17 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18 Boston, MA 02111-1307, USA. */
19
20 /* Synched up with: Not in FSF. */
21
22 #ifdef HAVE_CONFIG_H
23 #include <config.h>
24 #endif
25
26 #include "lisp.h"
27 #include "miscplay.h"
28
29 #include <esd.h>
30
31 #include <unistd.h>
32 #include <fcntl.h>
33 #include <stdio.h>
34 #include <errno.h>
35 #include <string.h>
36
37 /* the name given to ESD - I think this should identify ourselves */
38 #define ESD_NAME "xemacs"
39
40 int esd_play_sound_file(char *file, int vol);
41 int esd_play_sound_file(char *file, int vol)
42 { /* #### FIXME: vol is ignored */
43 return esd_play_file(ESD_NAME, file, 0);
44 }
45
46 int esd_play_sound_data(unsigned char *data, size_t length, int vol);
47 int esd_play_sound_data(unsigned char *data, size_t length, int vol)
48 { /* #### FIXME: vol is ignored */
49 size_t (*parsesndfile)(void **dayta,size_t *sz,void **outbuf);
50 size_t (*sndcnv)(void **dayta,size_t *sz,void **);
51 fmtType ffmt;
52 int fmt,speed,tracks;
53 unsigned char *pptr,*optr,*cptr,*sptr;
54 ssize_t wrtn;
55 size_t crtn;
56 size_t prtn;
57 int flags, sock;
58
59 /* analyze_format needs at least this many bytes to work with */
60 if (length < HEADERSZ)
61 return 0;
62
63 ffmt = analyze_format(data,&fmt,&speed,&tracks,&parsesndfile);
64
65 if (ffmt != fmtRaw && ffmt != fmtSunAudio && ffmt != fmtWave) {
66 message(GETTEXT("audio: Unsupported file format (neither RAW, nor Sun/DECAudio, nor WAVE)"));
67 return 0;
68 }
69
70 /* convert header information into ESD flags */
71 flags = ESD_STREAM|ESD_PLAY;
72 sndcnv = sndcnvnop;
73 switch (fmt)
74 {
75 case AFMT_MU_LAW:
76 sndcnv = sndcnvULaw_2linear;
77 flags |= ESD_BITS8;
78 break;
79 case AFMT_S8:
80 sndcnv = sndcnv2unsigned; /* ESD needs unsigned bytes */
81 case AFMT_U8:
82 flags |= ESD_BITS8;
83 break;
84 case AFMT_S16_BE:
85 sndcnv = sndcnv16swap; /* ESD wants little endian */
86 case AFMT_S16_LE:
87 flags |= ESD_BITS16;
88 break;
89 default:
90 message(GETTEXT("audio: byte format %d unimplemented"), fmt);
91 return 0;
92 }
93 switch (tracks)
94 {
95 case 1: flags |= ESD_MONO; break;
96 case 2: flags |= ESD_STEREO; break;
97 default:
98 message(GETTEXT("audio: %d channels - only 1 or 2 supported"), tracks);
99 return 0;
100 }
101
102 sock = esd_play_stream(flags, speed, NULL, "xemacs");
103 if (sock < 0)
104 return 0;
105
106 reset_parsestate();
107
108 for (pptr = data; (prtn = parsesndfile((void **)&pptr,&length,
109 (void **)&optr)) > 0; )
110 for (cptr = optr; (crtn = sndcnv((void **)&cptr,&prtn,
111 (void **)&sptr)) > 0; ) {
112 if ((wrtn = write(sock,sptr,crtn)) < 0) {
113 message(GETTEXT("audio: write error (%s)"), strerror(errno));
114 goto END_OF_PLAY;
115 }
116 if (wrtn != crtn) {
117 message(GETTEXT("audio: only wrote %d of %d bytes"), wrtn, crtn);
118 goto END_OF_PLAY;
119 }
120 }
121
122 if (ffmt == fmtWave)
123 parse_wave_complete();
124
125 END_OF_PLAY:
126 /* Now cleanup all used resources */
127
128 close(sock);
129 return 1;
130 }