itaVA_experimental_gui.m 12.6 KB
Newer Older
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
function varargout = itaVA_experimental_gui(varargin)
% ITAVA_EXPERIMENTAL_GUI MATLAB code for itaVA_experimental_gui.fig
%      ITAVA_EXPERIMENTAL_GUI, by itself, creates a new ITAVA_EXPERIMENTAL_GUI or raises the existing
%      singleton*.
%
%      H = ITAVA_EXPERIMENTAL_GUI returns the handle to a new ITAVA_EXPERIMENTAL_GUI or the handle to
%      the existing singleton*.
%
%      ITAVA_EXPERIMENTAL_GUI('CALLBACK',hObject,eventData,handles,...) calls the local
%      function named CALLBACK in ITAVA_EXPERIMENTAL_GUI.M with the given input arguments.
%
%      ITAVA_EXPERIMENTAL_GUI('Property','Value',...) creates a new ITAVA_EXPERIMENTAL_GUI or raises the
%      existing singleton*.  Starting from the left, property value pairs are
%      applied to the GUI before itaVA_experimental_gui_OpeningFcn gets called.  An
%      unrecognized property name or invalid value makes property application
%      stop.  All inputs are passed to itaVA_experimental_gui_OpeningFcn via varargin.
%
%      *See GUI Options on GUIDE's Tools menu.  Choose "GUI allows only one
%      instance to run (singleton)".
%
% See also: GUIDE, GUIDATA, GUIHANDLES

% Edit the above text to modify the response to help itaVA_experimental_gui

% Last Modified by GUIDE v2.5 24-Mar-2017 11:30:53

% Begin initialization code - DO NOT EDIT
gui_Singleton = 1;
gui_State = struct('gui_Name',       mfilename, ...
                   'gui_Singleton',  gui_Singleton, ...
                   'gui_OpeningFcn', @itaVA_experimental_gui_OpeningFcn, ...
                   'gui_OutputFcn',  @itaVA_experimental_gui_OutputFcn, ...
                   'gui_LayoutFcn',  [] , ...
                   'gui_Callback',   []);
if nargin && ischar(varargin{1})
    gui_State.gui_Callback = str2func(varargin{1});
end

if nargout
    [varargout{1:nargout}] = gui_mainfcn(gui_State, varargin{:});
else
    gui_mainfcn(gui_State, varargin{:});
end
% End initialization code - DO NOT EDIT


% --- Executes just before itaVA_experimental_gui is made visible.
function itaVA_experimental_gui_OpeningFcn(hObject, eventdata, handles, varargin)
% This function has no output args, see OutputFcn.
% hObject    handle to figure
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)
% varargin   command line arguments to itaVA_experimental_gui (see VARARGIN)

% Choose default command line output for itaVA_experimental_gui
handles.output = hObject;
handles.va = itaVA;
58
59
60
61
62
63
64
handles.module_id = 'PrototypeGenericPath:MyGenericRenderer';
handles.va_source_id = 1;
handles.va_signal_id = '';
handles.va_listener_id = 1;

refresh_workspace_vars( hObject, handles );
refresh_sourcesignals( hObject, handles );
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

% Update handles structure
guidata(hObject, handles);



% UIWAIT makes itaVA_experimental_gui wait for user response (see UIRESUME)
% uiwait(handles.figure1);


% --- Outputs from this function are returned to the command line.
function varargout = itaVA_experimental_gui_OutputFcn(hObject, eventdata, handles) 
% varargout  cell array for returning output args (see VARARGOUT);
% hObject    handle to figure
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Get default command line output from handles structure
varargout{1} = handles.output;


% --- Executes on button press in connect_connect_va.
function connect_connect_va_Callback(hObject, eventdata, handles)
% hObject    handle to connect_connect_va (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)
if handles.va.isConnected
    handles.va.disconnect;
end
handles.va.connect;
handles.va.reset;

for n=1:numel( handles.va.getRenderingModules )
    if strcmp( handles.va.getRenderingModules( n ).class, 'PrototypeGenericPath' )
        gpg_renderer = handles.va.getRenderingModules( n );
        break;
    end
end

if ~exist( 'gpg_renderer', 'var' )
    error( 'No prototype generic path renderer found, please add or enable in VA configuration.' )
else
    disp( [ 'Using channel prototype generic path renderer with identifier: ' gpg_renderer.id ] )
end

% Classic VA module call with input and output arguments
111
handles.module_id = [ gpg_renderer.class ':' gpg_renderer.id ];
112
in_args.info = true;
113
114
out_args = handles.va.callModule( handles.module_id, in_args );
disp( [ 'Your experimental renderer "' handles.module_id '" has ' num2str( out_args.numchannels ) ' channels and an FIR filter length of ' num2str( out_args.irfilterlengthsamples ) ' samples' ] )
115
116
117
118
119

handles.edit_va_channels.String = out_args.numchannels;
handles.edit_va_fir_taps.String = out_args.irfilterlengthsamples;
handles.edit_va_fs.String = '44.100';

120
121
122
123
% example
global ita_impulse;
ita_impulse = ita_merge( ita_generate_impulse, ita_generate_impulse );

124
% Very simple scene with one path
125
126
handles.va_listener_id = handles.va.createListener( 'itaVA_ExperimentalListener' );
handles.va_source_id = handles.va.createSoundSource( 'itaVA_ExperimentalSource' );
127
128
129
130
131
132
133
134
135
136
137
138
139

function edit_va_channels_CreateFcn(hObject, eventdata, handles)

function edit_va_fir_taps_CreateFcn(hObject, eventdata, handles)

% --- Executes on selection change in listbox_filters.
function listbox_filters_Callback(hObject, eventdata, handles)
% hObject    handle to listbox_filters (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: contents = cellstr(get(hObject,'String')) returns listbox_filters contents as cell array
%        contents{get(hObject,'Value')} returns selected item from listbox_filters
140
141
142
143
index_selected = handles.listbox_filters.Value;
filter_list = handles.listbox_filters.String;
filter_selected = filter_list{ index_selected };

144

145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
if handles.va.isConnected
    
    num_channels = str2double( handles.edit_va_channels.String );

    mStruct = struct;
    mStruct.listener = handles.va_listener_id;
    mStruct.source = handles.va_source_id;
    mStruct.verbose = true;
    
    newfilter = evalin( 'base', filter_selected );
    
    for n=1:num_channels
        idx_channel_name = [ 'ch' num2str( n ) ];
        mStruct.( idx_channel_name ) = double( newfilter.ch( n ).timeData )';
    end
    
    mRes = handles.va.callModule( handles.module_id, mStruct );
    %disp( mRes )
end
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185

% --- Executes during object creation, after setting all properties.
function listbox_filters_CreateFcn(hObject, eventdata, handles)
% hObject    handle to listbox_filters (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: listbox controls usually have a white background on Windows.
%       See ISPC and COMPUTER.
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
    set(hObject,'BackgroundColor','white');
end


% --- Executes on selection change in listbox_sourcesignals.
function listbox_sourcesignals_Callback(hObject, eventdata, handles)
% hObject    handle to listbox_sourcesignals (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: contents = cellstr(get(hObject,'String')) returns listbox_sourcesignals contents as cell array
%        contents{get(hObject,'Value')} returns selected item from listbox_sourcesignals
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
index_selected = handles.listbox_sourcesignals.Value;
filename_list = handles.listbox_sourcesignals.String;
filepath_list = handles.listbox_sourcesignals.UserData;
filepath_selected = filepath_list{ index_selected };
filename_selected = filename_list{ index_selected };

if handles.va.isConnected
    ss_infos = handles.va.getSignalSourceInfos;
    
    for i=1:numel( ss_infos )
        
    end
    
    handles.va_signal_id = handles.va.createAudiofileSignalSource( filepath_selected, filename_selected );
    handles.va.setSoundSourceSignalSource( handles.va_source_id, handles.va_signal_id );
    handles.va.setAudiofileSignalSourceIsLooping( handles.va_signal_id, true );
    handles.va.setAudiofileSignalSourcePlaybackAction( handles.va_signal_id, 'play' );
end
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245


% --- Executes during object creation, after setting all properties.
function listbox_sourcesignals_CreateFcn(hObject, eventdata, handles)
% hObject    handle to listbox_sourcesignals (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: listbox controls usually have a white background on Windows.
%       See ISPC and COMPUTER.
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
    set(hObject,'BackgroundColor','white');
end


% --- Executes on button press in pushbutton_start_va.
function pushbutton_start_va_Callback(hObject, eventdata, handles)
% hObject    handle to pushbutton_start_va (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)
itaVA_experimental_start_server

function refresh_workspace_vars( hObject, handles )
base_ws_vars = evalin( 'base', 'whos' ); 

stringlist = '';
for i=1:numel( base_ws_vars )
    if( strcmp( base_ws_vars( i ).class, 'itaAudio' ) )
        stringlist = [ stringlist; { base_ws_vars( i ).name } ];
    end
end

handles.listbox_filters.String = stringlist;


function refresh_sourcesignals( hObject, handles )
filelist = dir( pwd );

stringlist = '';
fullfile_stringlist = '';
for i=1:numel( filelist )
    filepath_abs = fullfile( pwd, filelist( i ).name );
246
    [ ~, fbn, ft ] = fileparts( filepath_abs );
247
248
249
250
251
252
253
    if( strcmpi( ft, '.wav' ) )
        stringlist = [ stringlist; { fbn } ];
        fullfile_stringlist = [ fullfile_stringlist; { filepath_abs } ];
    end
end

handles.listbox_sourcesignals.String = stringlist;
254
handles.listbox_sourcesignals.UserData = fullfile_stringlist;
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318


% --- Executes on button press in pushbutton_refresh_workspace_vars.
function pushbutton_refresh_workspace_vars_Callback(hObject, eventdata, handles)
% hObject    handle to pushbutton_refresh_workspace_vars (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)
refresh_workspace_vars( hObject, handles );

% --- Executes on button press in pushbutton_va_setup.
function pushbutton_va_setup_Callback(hObject, eventdata, handles)
% hObject    handle to pushbutton_va_setup (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)
itaVA_setup

function edit_va_channels_Callback(hObject, eventdata, handles)
% hObject    handle to edit_va_channels (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'String') returns contents of edit_va_channels as text
%        str2double(get(hObject,'String')) returns contents of edit_va_channels as a double



function edit_va_fir_taps_Callback(hObject, eventdata, handles)
% hObject    handle to edit_va_fir_taps (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'String') returns contents of edit_va_fir_taps as text
%        str2double(get(hObject,'String')) returns contents of edit_va_fir_taps as a double



function edit_va_fs_Callback(hObject, eventdata, handles)
% hObject    handle to edit_va_fs (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'String') returns contents of edit_va_fs as text
%        str2double(get(hObject,'String')) returns contents of edit_va_fs as a double


% --- Executes during object creation, after setting all properties.
function edit_va_fs_CreateFcn(hObject, eventdata, handles)
% hObject    handle to edit_va_fs (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: edit controls usually have a white background on Windows.
%       See ISPC and COMPUTER.
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
    set(hObject,'BackgroundColor','white');
end


% --- Executes on button press in pushbutton_refresh_input_files.
function pushbutton_refresh_input_files_Callback(hObject, eventdata, handles)
% hObject    handle to pushbutton_refresh_input_files (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)
refresh_sourcesignals( hObject, handles )