4 * Copyright (c) 2011 by Chris Robinson <chris.kcat@gmail.com>
6 * 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:
13 * The above copyright notice and this permission notice shall be included in
14 * all copies or substantial portions of the Software.
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 THE
19 * 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
25 /* This file contains routines to help with some menial OpenAL-related tasks,
26 * such as opening a device and setting up a context, closing the device and
27 * destroying its context, converting between frame counts and byte lengths,
28 * finding an appropriate buffer format, and getting readable strings for
29 * channel configs and sample types. */
31 #include "alhelpers.h"
42 /* InitAL opens a device and sets up a context using default attributes, making
43 * the program ready to call OpenAL functions. */
44 int InitAL(char ***argv
, int *argc
)
50 /* Open and initialize a device */
52 if(argc
&& argv
&& *argc
> 1 && strcmp((*argv
)[0], "-device") == 0)
54 device
= alcOpenDevice((*argv
)[1]);
56 fprintf(stderr
, "Failed to open \"%s\", trying default\n", (*argv
)[1]);
61 device
= alcOpenDevice(NULL
);
64 fprintf(stderr
, "Could not open a device!\n");
68 ctx
= alcCreateContext(device
, NULL
);
69 if(ctx
== NULL
|| alcMakeContextCurrent(ctx
) == ALC_FALSE
)
72 alcDestroyContext(ctx
);
73 alcCloseDevice(device
);
74 fprintf(stderr
, "Could not set a context!\n");
79 if(alcIsExtensionPresent(device
, "ALC_ENUMERATE_ALL_EXT"))
80 name
= alcGetString(device
, ALC_ALL_DEVICES_SPECIFIER
);
81 if(!name
|| alcGetError(device
) != AL_NO_ERROR
)
82 name
= alcGetString(device
, ALC_DEVICE_SPECIFIER
);
83 printf("Opened \"%s\"\n", name
);
88 /* CloseAL closes the device belonging to the current context, and destroys the
95 ctx
= alcGetCurrentContext();
99 device
= alcGetContextsDevice(ctx
);
101 alcMakeContextCurrent(NULL
);
102 alcDestroyContext(ctx
);
103 alcCloseDevice(device
);
107 const char *FormatName(ALenum format
)
111 case AL_FORMAT_MONO8
: return "Mono, U8";
112 case AL_FORMAT_MONO16
: return "Mono, S16";
113 case AL_FORMAT_MONO_FLOAT32
: return "Mono, Float32";
114 case AL_FORMAT_MONO_MULAW
: return "Mono, muLaw";
115 case AL_FORMAT_MONO_ALAW_EXT
: return "Mono, aLaw";
116 case AL_FORMAT_MONO_IMA4
: return "Mono, IMA4 ADPCM";
117 case AL_FORMAT_MONO_MSADPCM_SOFT
: return "Mono, MS ADPCM";
118 case AL_FORMAT_STEREO8
: return "Stereo, U8";
119 case AL_FORMAT_STEREO16
: return "Stereo, S16";
120 case AL_FORMAT_STEREO_FLOAT32
: return "Stereo, Float32";
121 case AL_FORMAT_STEREO_MULAW
: return "Stereo, muLaw";
122 case AL_FORMAT_STEREO_ALAW_EXT
: return "Stereo, aLaw";
123 case AL_FORMAT_STEREO_IMA4
: return "Stereo, IMA4 ADPCM";
124 case AL_FORMAT_STEREO_MSADPCM_SOFT
: return "Stereo, MS ADPCM";
125 case AL_FORMAT_QUAD8
: return "Quadraphonic, U8";
126 case AL_FORMAT_QUAD16
: return "Quadraphonic, S16";
127 case AL_FORMAT_QUAD32
: return "Quadraphonic, Float32";
128 case AL_FORMAT_QUAD_MULAW
: return "Quadraphonic, muLaw";
129 case AL_FORMAT_51CHN8
: return "5.1 Surround, U8";
130 case AL_FORMAT_51CHN16
: return "5.1 Surround, S16";
131 case AL_FORMAT_51CHN32
: return "5.1 Surround, Float32";
132 case AL_FORMAT_51CHN_MULAW
: return "5.1 Surround, muLaw";
133 case AL_FORMAT_61CHN8
: return "6.1 Surround, U8";
134 case AL_FORMAT_61CHN16
: return "6.1 Surround, S16";
135 case AL_FORMAT_61CHN32
: return "6.1 Surround, Float32";
136 case AL_FORMAT_61CHN_MULAW
: return "6.1 Surround, muLaw";
137 case AL_FORMAT_71CHN8
: return "7.1 Surround, U8";
138 case AL_FORMAT_71CHN16
: return "7.1 Surround, S16";
139 case AL_FORMAT_71CHN32
: return "7.1 Surround, Float32";
140 case AL_FORMAT_71CHN_MULAW
: return "7.1 Surround, muLaw";
141 case AL_FORMAT_BFORMAT2D_8
: return "B-Format 2D, U8";
142 case AL_FORMAT_BFORMAT2D_16
: return "B-Format 2D, S16";
143 case AL_FORMAT_BFORMAT2D_FLOAT32
: return "B-Format 2D, Float32";
144 case AL_FORMAT_BFORMAT2D_MULAW
: return "B-Format 2D, muLaw";
145 case AL_FORMAT_BFORMAT3D_8
: return "B-Format 3D, U8";
146 case AL_FORMAT_BFORMAT3D_16
: return "B-Format 3D, S16";
147 case AL_FORMAT_BFORMAT3D_FLOAT32
: return "B-Format 3D, Float32";
148 case AL_FORMAT_BFORMAT3D_MULAW
: return "B-Format 3D, muLaw";
149 case AL_FORMAT_UHJ2CHN8_SOFT
: return "UHJ 2-channel, U8";
150 case AL_FORMAT_UHJ2CHN16_SOFT
: return "UHJ 2-channel, S16";
151 case AL_FORMAT_UHJ2CHN_FLOAT32_SOFT
: return "UHJ 2-channel, Float32";
152 case AL_FORMAT_UHJ3CHN8_SOFT
: return "UHJ 3-channel, U8";
153 case AL_FORMAT_UHJ3CHN16_SOFT
: return "UHJ 3-channel, S16";
154 case AL_FORMAT_UHJ3CHN_FLOAT32_SOFT
: return "UHJ 3-channel, Float32";
155 case AL_FORMAT_UHJ4CHN8_SOFT
: return "UHJ 4-channel, U8";
156 case AL_FORMAT_UHJ4CHN16_SOFT
: return "UHJ 4-channel, S16";
157 case AL_FORMAT_UHJ4CHN_FLOAT32_SOFT
: return "UHJ 4-channel, Float32";
159 return "Unknown Format";
165 #define WIN32_LEAN_AND_MEAN
167 #include <mmsystem.h>
171 static int start_time
= 0;
175 ULARGE_INTEGER ulint
;
177 GetSystemTimeAsFileTime(&systime
.ftime
);
178 /* FILETIME is in 100-nanosecond units, or 1/10th of a microsecond. */
179 cur_time
= (int)(systime
.ulint
.QuadPart
/10000);
182 start_time
= cur_time
;
183 return cur_time
- start_time
;
186 void al_nssleep(unsigned long nsec
)
188 Sleep(nsec
/ 1000000);
193 #include <sys/time.h>
199 static int start_time
= 0u;
202 #if _POSIX_TIMERS > 0
204 int ret
= clock_gettime(CLOCK_REALTIME
, &ts
);
205 if(ret
!= 0) return 0;
206 cur_time
= (int)(ts
.tv_sec
*1000 + ts
.tv_nsec
/1000000);
207 #else /* _POSIX_TIMERS > 0 */
209 int ret
= gettimeofday(&tv
, NULL
);
210 if(ret
!= 0) return 0;
211 cur_time
= (int)(tv
.tv_sec
*1000 + tv
.tv_usec
/1000);
215 start_time
= cur_time
;
216 return cur_time
- start_time
;
219 void al_nssleep(unsigned long nsec
)
221 struct timespec ts
, rem
;
222 ts
.tv_sec
= (time_t)(nsec
/ 1000000000ul);
223 ts
.tv_nsec
= (long)(nsec
% 1000000000ul);
224 while(nanosleep(&ts
, &rem
) == -1 && errno
== EINTR
)