1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
|
/******************************************************
*
* audiosettings - get/set audio preferences from within Pd-patches
* Copyright (C) 2010 IOhannes m zmölnig
*
* forum::für::umläute
*
* institute of electronic music and acoustics (iem)
* university of music and dramatic arts, graz (kug)
*
*
******************************************************
*
* license: GNU General Public License v.3 or later
*
******************************************************/
#include "m_pd.h"
#include <stdio.h>
void sys_get_audio_apis(char*buf);
#ifdef _WIN32
/* we have to implement the not exported functions for w32... */
#endif
static t_class *audiosettings_class;
typedef struct _as_apis {
t_symbol*name;
int id;
struct _as_apis *next;
} t_as_apis;
t_as_apis*as_findapi(t_as_apis*apis, const t_symbol*name) {
while(apis) {
if(name==apis->name)return apis;
apis=apis->next;
}
return NULL;
}
t_as_apis*as_addapi(t_as_apis*apis, t_symbol*name, int id, int overwrite) {
t_as_apis*api=as_findapi(apis, name);
if(api) {
if(overwrite) {
api->name=name;
api->id =id;
}
return apis;
}
api=(t_as_apis*)getbytes(sizeof(t_as_apis));
api->name=name;
api->id=id;
api->next=apis;
return api;
}
t_as_apis*as_apiparse_42(t_as_apis*apis, const char*buf) {
t_as_apis*api=apis;
int start=-1;
int stop =-1;
unsigned int index=0;
int depth=0;
const char*s;
char substring[MAXPDSTRING];
for(index=0, s=buf; 0!=*s; s++, index++) {
if('{'==*s) {
start=index;
depth++;
}
if('}'==*s) {
depth--;
stop=index;
if(start>=0 && start<stop) {
char apiname[MAXPDSTRING];
int apiid;
int length=stop-start;
if(length>=MAXPDSTRING)length=MAXPDSTRING-1;
snprintf(substring, length, "%s", buf+start+1);
if(2==sscanf(substring, "%s %d", apiname, &apiid)) {
apis=as_addapi(apis, gensym(apiname), apiid, 0);
} else {
post("unparseable: '%s'", substring);
}
}
start=-1;
stop=-1;
}
}
return apis;
}
t_as_apis*as_apiparse(t_as_apis*apis, const char*buf) {
return as_apiparse_42(apis, buf);
}
static t_as_apis*APIS=NULL;
typedef struct _audiosettings
{
t_object x_obj;
t_outlet*x_info;
} t_audiosettings;
static void audiosettings_listdevices(t_audiosettings *x, t_symbol *s)
{
}
/*
*/
static void audiosettings_bang(t_audiosettings *x)
{
t_as_apis*api=NULL;
for(api=APIS; api; api=api->next) {
t_atom ap[1];
SETSYMBOL(ap, api->name);
outlet_anything(x->x_info, gensym("driver"), 1, ap);
}
}
static void audiosettings_free(t_audiosettings *x){
}
static void *audiosettings_new(void)
{
t_audiosettings *x = (t_audiosettings *)pd_new(audiosettings_class);
x->x_info=outlet_new(&x->x_obj, 0);
char buf[MAXPDSTRING];
sys_get_audio_apis(buf);
APIS=as_apiparse(APIS, buf);
return (x);
}
void audiosettings_setup(void)
{
post("audiosettings: audio settings manager");
post(" Copyright (C) 2010 IOhannes m zmoelnig");
post(" for the IntegraLive project");
post(" institute of electronic music and acoustics (iem)");
post(" published under the GNU General Public License version 3 or later");
#ifdef AUDIOSETTINGS_VERSION
startpost(" version:"AUDIOSETTINGS_VERSION);
#endif
post("\tcompiled: "__DATE__"");
audiosettings_class = class_new(gensym("audiosettings"), (t_newmethod)audiosettings_new, (t_method)audiosettings_free,
sizeof(t_audiosettings), 0, 0);
class_addbang(audiosettings_class, (t_method)audiosettings_bang);
class_addmethod(audiosettings_class, (t_method)audiosettings_listdevices, gensym("listdevices"), A_GIMME);
}
|
