comparison m-toolbox/test/aorepo_proto_test/test3.m @ 0:f0afece42f48

Import.
author Daniele Nicolodi <nicolodi@science.unitn.it>
date Wed, 23 Nov 2011 19:22:13 +0100
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:f0afece42f48
1 % A simple test script to exercise the LTPDA repository
2 %
3 % Edit the repository information before running.
4 %
5 % 31-03-08
6 %
7
8 clear all;
9
10
11 % Hostname and database setting
12 hostname = '130.75.117.61';
13 dbase = 'ltpda_test';
14
15 %% -----------------------------------------------
16 %% NO NEED TO EDIT BELOW HERE
17
18 send = true;
19
20
21 % Connect to the database
22 conn = mysql_connect(hostname, dbase);
23
24 % Submitting N aos
25 N = 5;
26 rand_N = false;
27 obj_type = 'ao';
28 nsecs = 1000;
29 fs = 10;
30
31 pl = plist('obj_type', obj_type, 'send', send, 'N', N, ...
32 'rand', rand_N, 'nsecs', nsecs, 'fs', fs, ...
33 'conn', conn);
34
35 UTN_repo_test_func(pl);
36
37
38 % Submitting N plists
39 N = 1;
40 rand_N = false;
41 obj_type = 'plist';
42
43 pl = plist('obj_type', obj_type, 'send', send, 'N', N, ...
44 'rand', rand_N, ...
45 'conn', conn);
46
47 UTN_repo_test_func(pl);
48
49
50 % Submitting N specwins
51 N = 3;
52 rand_N = false;
53 obj_type = 'specwin';
54
55 pl = plist('obj_type', obj_type, 'send', send, 'N', N, ...
56 'rand', rand_N, ...
57 'conn', conn);
58
59 UTN_repo_test_func(pl);
60
61
62 % Submitting N pzmodels
63 N = 5;
64 rand_N = false;
65 obj_type = 'pzmodel';
66
67 pl = plist('obj_type', obj_type, 'send', send, 'N', N, ...
68 'rand', rand_N, ...
69 'conn', conn);
70
71 UTN_repo_test_func(pl);
72
73
74 % Submitting N miir objects
75 N = 2;
76 rand_N = false;
77 obj_type = 'miir';
78
79 pl = plist('obj_type', obj_type, 'send', send, 'N', N, ...
80 'rand', rand_N, ...
81 'conn', conn);
82
83 UTN_repo_test_func(pl);
84
85
86 % Submitting N mfir objects
87 N = 2;
88 rand_N = false;
89 obj_type = 'mfir';
90
91 pl = plist('obj_type', obj_type, 'send', send, 'N', N, ...
92 'rand', rand_N, ...
93 'conn', conn);
94
95 UTN_repo_test_func(pl);
96
97
98 % Submitting N time objects
99 N = 4;
100 rand_N = false;
101 obj_type = 'time';
102
103 pl = plist('obj_type', obj_type, 'send', send, 'N', N, ...
104 'rand', rand_N, ...
105 'conn', conn);
106
107 UTN_repo_test_func(pl);
108
109
110 % Submitting N timespan objects
111 N = 4;
112 rand_N = false;
113 obj_type = 'mfir';
114
115 pl = plist('obj_type', obj_type, 'send', send, 'N', N, ...
116 'rand', rand_N, ...
117 'conn', conn);
118
119 UTN_repo_test_func(pl);
120
121
122 % Submitting random N aos
123 rand_N = true;
124 obj_type = 'ao';
125 nsecs = 1000;
126 fs = 10;
127
128 pl = plist('obj_type', obj_type, 'send', send, ...
129 'rand', rand_N, 'nsecs', nsecs, 'fs', fs, ...
130 'conn', conn);
131
132 UTN_repo_test_func(pl);
133
134
135 % Submitting random N plists
136 rand_N = true;
137 obj_type = 'plist';
138
139 pl = plist('obj_type', obj_type, 'send', send, ...
140 'rand', rand_N, ...
141 'conn', conn);
142
143 UTN_repo_test_func(pl);
144
145
146 % Submitting random N specwins
147 rand_N = true;
148 obj_type = 'specwin';
149
150 pl = plist('obj_type', obj_type, 'send', send, ...
151 'rand', rand_N, ...
152 'conn', conn);
153
154 UTN_repo_test_func(pl);
155
156
157 % Submitting random N pzmodels
158 rand_N = true;
159 obj_type = 'pzmodel';
160
161 pl = plist('obj_type', obj_type, 'send', send, ...
162 'rand', rand_N, ...
163 'conn', conn);
164
165 UTN_repo_test_func(pl);
166
167
168 % Submitting random N miir objects
169 rand_N = true;
170 obj_type = 'miir';
171
172 pl = plist('obj_type', obj_type, 'send', send, ...
173 'rand', rand_N, ...
174 'conn', conn);
175
176 UTN_repo_test_func(pl);
177
178
179 % Submitting random N mfir objects
180 rand_N = true;
181 obj_type = 'mfir';
182
183 pl = plist('obj_type', obj_type, 'send', send, ...
184 'rand', rand_N, ...
185 'conn', conn);
186
187 UTN_repo_test_func(pl);
188
189
190 % Submitting random N time objects
191 rand_N = true;
192 obj_type = 'time';
193
194 pl = plist('obj_type', obj_type, 'send', send, ...
195 'rand', rand_N, ...
196 'conn', conn);
197
198 UTN_repo_test_func(pl);
199
200
201 % Submitting random N timespan objects
202 rand_N = true;
203 obj_type = 'mfir';
204
205 pl = plist('obj_type', obj_type, 'send', send, ...
206 'rand', rand_N, ...
207 'conn', conn);
208
209 UTN_repo_test_func(pl);
210
211
212 % Submitting random N objects
213 rand_N = true;
214 obj_type = 'none';
215
216 pl = plist('obj_type', obj_type, 'send', send, ...
217 'rand', rand_N, ...
218 'conn', conn);
219
220 UTN_repo_test_func(pl);
221
222 disp('*** done')