1 # Copyright (C) 2009-2014 EDF R&D
3 # This library is free software; you can redistribute it and/or
4 # modify it under the terms of the GNU Lesser General Public
5 # License as published by the Free Software Foundation; either
6 # version 2.1 of the License, or (at your option) any later version.
8 # This library is distributed in the hope that it will be useful,
9 # but WITHOUT ANY WARRANTY; without even the implied warranty of
10 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
11 # Lesser General Public License for more details.
13 # You should have received a copy of the GNU Lesser General Public
14 # License along with this library; if not, write to the Free Software
15 # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
17 # See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
21 #import context from ..
22 execfile("../context.py")
23 from module_generator import Generator,Module,Service,PYComponent,CPPComponent,F77Component
28 std::cerr << "a: " << a << std::endl;
29 std::cerr << "b: " << b << std::endl;
35 double val[10],rval[10];
36 int ival[10],rival[10];
37 long lval[10],rlval[10];
38 float cval[20],rcval[20];
39 char* sval[]={"coucou","bonjour","salut"};
48 char instance_name[72];
49 info = cp_cd(component,instance_name);
50 std::cerr << "instance_name: " << instance_name << std::endl;
55 std::cerr << "val: " << val[0] << std::endl;
56 std::cerr << "val: " << val[1] << std::endl;
57 std::cerr << "val: " << val[2] << std::endl;
58 cp_edb(component,CP_ITERATION,0.,1,(char*)"ba",10,val);
59 cp_edb(component,CP_ITERATION,0.,2,(char*)"ba",10,val);
60 cp_edb(component,CP_ITERATION,0.,3,(char*)"ba",10,val);
62 std::cerr << "sval: " << sval[0] << std::endl;
63 std::cerr << "sval: " << sval[1] << std::endl;
64 std::cerr << "sval: " << sval[2] << std::endl;
65 cp_ech(component,CP_ITERATION,0.,1,(char*)"bb",3,sval,6);
70 std::cerr << "ival: " << ival[0] << std::endl;
71 std::cerr << "ival: " << ival[1] << std::endl;
72 std::cerr << "ival: " << ival[2] << std::endl;
73 cp_een(component,CP_ITERATION,0.,1,(char*)"bc",10,ival);
81 std::cerr << "cval: " << cval[0] << std::endl;
82 std::cerr << "cval: " << cval[1] << std::endl;
83 std::cerr << "cval: " << cval[2] << std::endl;
84 std::cerr << "cval: " << cval[3] << std::endl;
85 std::cerr << "cval: " << cval[4] << std::endl;
86 std::cerr << "cval: " << cval[5] << std::endl;
87 cp_ecp(component,CP_ITERATION,0.,1,(char*)"bd",10,cval);
92 std::cerr << "cval: " << cval[0] << std::endl;
93 std::cerr << "cval: " << cval[1] << std::endl;
94 std::cerr << "cval: " << cval[2] << std::endl;
95 cp_ere(component,CP_ITERATION,0.,1,(char*)"be",10,cval);
100 std::cerr << "ival: " << ival[0] << std::endl;
101 std::cerr << "ival: " << ival[1] << std::endl;
102 std::cerr << "ival: " << ival[2] << std::endl;
103 cp_elo(component,CP_ITERATION,0.,1,(char*)"bf",10,ival);
108 std::cerr << "lval: " << lval[0] << std::endl;
109 std::cerr << "lval: " << lval[1] << std::endl;
110 std::cerr << "lval: " << lval[2] << std::endl;
111 cp_eln(component,CP_ITERATION,0.,1,(char*)"bg",10,lval);
116 std::cerr << "ival: " << ival[0] << std::endl;
117 std::cerr << "ival: " << ival[1] << std::endl;
118 std::cerr << "ival: " << ival[2] << std::endl;
119 cp_een(component,CP_ITERATION,0.,1,(char*)"bh",10,ival);
124 std::cerr << "lval: " << lval[0] << std::endl;
125 std::cerr << "lval: " << lval[1] << std::endl;
126 std::cerr << "lval: " << lval[2] << std::endl;
127 cp_elg(component,CP_ITERATION,0.,1,(char*)"bi",10,lval);
130 info=cp_ldb(component,CP_ITERATION,&t1,&t2,&i,(char*)"aa",3,&mval,rval);
131 std::cerr << "info: " << info << std::endl;
132 std::cerr << "rval: " << rval[0] << std::endl;
133 std::cerr << "rval: " << rval[1] << std::endl;
134 std::cerr << "rval: " << rval[2] << std::endl;
136 info=cp_lch(component,CP_ITERATION,&tt1,&tt2,&i,(char*)"ab",3,&mval,rsval,7);
137 std::cerr << "info: " << info << std::endl;
138 std::cerr << "rsval: " << rsval[0] << std::endl;
139 std::cerr << "rsval: " << rsval[1] << std::endl;
140 std::cerr << "rsval: " << rsval[2] << std::endl;
142 info=cp_len(component,CP_ITERATION,&tt1,&tt2,&i,(char*)"ac",3,&mval,rival);
143 std::cerr << "info: " << info << std::endl;
144 std::cerr << "rival: " << rival[0] << std::endl;
145 std::cerr << "rival: " << rival[1] << std::endl;
146 std::cerr << "rival: " << rival[2] << std::endl;
148 info=cp_lcp(component,CP_ITERATION,&tt1,&tt2,&i,(char*)"ad",3,&mval,rcval);
149 std::cerr << "info: " << info << std::endl;
150 std::cerr << "rcval: " << rcval[0] << std::endl;
151 std::cerr << "rcval: " << rcval[1] << std::endl;
152 std::cerr << "rcval: " << rcval[2] << std::endl;
153 std::cerr << "rcval: " << rcval[3] << std::endl;
154 std::cerr << "rcval: " << rcval[4] << std::endl;
155 std::cerr << "rcval: " << rcval[5] << std::endl;
160 info=cp_lre(component,CP_ITERATION,&tt1,&tt2,&i,(char*)"ae",3,&mval,rcval);
161 std::cerr << "info: " << info << std::endl;
162 std::cerr << "rcval: " << rcval[0] << std::endl;
163 std::cerr << "rcval: " << rcval[1] << std::endl;
164 std::cerr << "rcval: " << rcval[2] << std::endl;
170 info=cp_llo(component,CP_ITERATION,&tt1,&tt2,&i,(char*)"af",3,&mval,rival);
171 std::cerr << "info: " << info << std::endl;
172 std::cerr << "rival: " << rival[0] << std::endl;
173 std::cerr << "rival: " << rival[1] << std::endl;
174 std::cerr << "rival: " << rival[2] << std::endl;
176 info=cp_lln(component,CP_ITERATION,&tt1,&tt2,&i,(char*)"ag",3,&mval,rlval);
177 std::cerr << "info: " << info << std::endl;
178 std::cerr << "rlval: " << rlval[0] << std::endl;
179 std::cerr << "rlval: " << rlval[1] << std::endl;
180 std::cerr << "rlval: " << rlval[2] << std::endl;
186 info=cp_len(component,CP_ITERATION,&tt1,&tt2,&i,(char*)"ah",3,&mval,rival);
187 std::cerr << "info: " << info << std::endl;
188 std::cerr << "rival: " << rival[0] << std::endl;
189 std::cerr << "rival: " << rival[1] << std::endl;
190 std::cerr << "rival: " << rival[2] << std::endl;
192 info=cp_llg(component,CP_ITERATION,&tt1,&tt2,&i,(char*)"ai",3,&mval,rlval);
193 std::cerr << "info: " << info << std::endl;
194 std::cerr << "rlval: " << rlval[0] << std::endl;
195 std::cerr << "rlval: " << rlval[1] << std::endl;
196 std::cerr << "rlval: " << rlval[2] << std::endl;
198 info=cp_fini(component,(char*)"aa",1);
199 std::cerr << "info: " << info << std::endl;
201 info=cp_effi(component,(char*)"aa",3);
202 std::cerr << "info: " << info << std::endl;
204 cp_fin(component,CP_ARRET);
207 std::cerr << "c: " << c << std::endl;
209 c1=CPPComponent("compo1",services=[
210 Service("s1",inport=[("a","double"),("b","double")],
211 outport=[("c","double")],
212 instream=[("aa","CALCIUM_double","I"),
213 ("ab","CALCIUM_string","I"),
214 ("ac","CALCIUM_integer","I"),
215 ("ad","CALCIUM_complex","I"),
216 ("ae","CALCIUM_real","I"),
217 ("af","CALCIUM_logical","I"),
218 ("ag","CALCIUM_long","I"),
219 ("ah","CALCIUM_integer","I"),
220 ("ai","CALCIUM_integer","I"),
222 outstream=[("ba","CALCIUM_double","I"),
223 ("bb","CALCIUM_string","I"),
224 ("bc","CALCIUM_integer","I"),
225 ("bd","CALCIUM_complex","I"),
226 ("be","CALCIUM_real","I"),
227 ("bf","CALCIUM_logical","I"),
228 ("bg","CALCIUM_long","I"),
229 ("bh","CALCIUM_integer","I"),
230 ("bi","CALCIUM_integer","I"),
232 defs="//def1",body=body,
244 info,name= calcium.cp_cd(component)
248 dep=calcium.CP_ITERATION
251 val=numpy.zeros(10,'d')
255 print "--------> Appel calcium.cp_edb",val
256 info=calcium.cp_edb(component, dep, 0., 1, "ba", nval,val)
257 info=calcium.cp_edb(component, dep, 0., 2, "ba", nval,val)
258 info=calcium.cp_edb(component, dep, 0., 3, "ba", nval,val)
261 val=numpy.array(["coucouc ","bonjour ","salut "])
262 val=calcium.stringArray(3,8)
266 print "--------> Appel calcium.cp_ech",val
267 info=calcium.cp_ech(component, dep, 0., 1, "bb", 3,val)
270 val=numpy.zeros(10,'i')
273 print "--------> Appel calcium.cp_een",val
274 info=calcium.cp_een(component, dep, 0., 1, "bc", 3,val)
276 val=numpy.zeros(10,'F')
279 print "--------> Appel calcium.cp_ecp",val
280 info=calcium.cp_ecp(component, dep, 0., 1, "bd", 3,val)
282 val=numpy.zeros(10,'f')
285 print "--------> Appel calcium.cp_ere",val
286 info=calcium.cp_ere(component, dep, 0., 1, "be", 3,val)
288 val=numpy.zeros(10,'i')
292 print "--------> Appel calcium.cp_elo",val
293 info=calcium.cp_elo(component, dep, 0., 1, "bf", 3,val)
295 val=numpy.zeros(10,'l')
299 print "--------> Appel calcium.cp_eln",val
300 info=calcium.cp_eln(component, dep, 0., 1, "bg", 3,val)
302 val=numpy.zeros(10,'i')
306 print "--------> Appel calcium.cp_een",val
307 info=calcium.cp_een(component, dep, 0., 1, "bh", 3,val)
309 val=numpy.zeros(10,'l')
313 print "--------> Appel calcium.cp_elg",val
314 info=calcium.cp_elg(component, dep, 0., 1, "bi", 3,val)
318 val=numpy.zeros(10,'d')
319 print "--------> Appel calcium.cp_ldb"
320 info,tt,ii,mval=calcium.cp_ldb(component, dep, 0.,1., 1, "aa", 3,val)
323 val=numpy.array(["","","",], dtype='S13')
324 print "--------> Appel calcium.cp_lch"
325 info,tt,ii,mval=calcium.cp_lch(component, dep, 0.,1., 1, "ab", 3,val)
329 val=numpy.array([" "," "," ",], dtype='S13')
330 print "--------> Appel calcium.cp_lch"
331 info,tt,ii,mval=calcium.cp_lch(component, dep, 0.,1., 1, "ab", 3,val)
335 val=calcium.stringArray(3,8)
336 print "--------> Appel calcium.cp_lch"
337 info,tt,ii,mval=calcium.cp_lch(component, dep, 0.,1., 1, "ab", 3,val)
343 val=numpy.zeros(10,'i')
344 print "--------> Appel calcium.cp_len"
345 info,tt,ii,mval=calcium.cp_len(component, dep, 0.,1., 1, "ac", 3,val)
348 val=numpy.zeros(10,'F')
349 print "--------> Appel calcium.cp_lcp"
350 info,tt,ii,mval=calcium.cp_lcp(component, dep, 0.,1., 1, "ad", 3,val)
353 val=numpy.zeros(10,'f')
354 print "--------> Appel calcium.cp_lre"
355 info,tt,ii,mval=calcium.cp_lre(component, dep, 0.,1., 1, "ae", 3,val)
358 val=numpy.zeros(10,'i')
359 print "--------> Appel calcium.cp_llo"
360 info,tt,ii,mval=calcium.cp_llo(component, dep, 0.,1., 1, "af", 3,val)
363 val=numpy.zeros(10,'l')
364 print "--------> Appel calcium.cp_lln"
365 info,tt,ii,mval=calcium.cp_lln(component, dep, 0.,1., 1, "ag", 3,val)
368 val=numpy.zeros(10,'i')
369 print "--------> Appel calcium.cp_len"
370 info,tt,ii,mval=calcium.cp_len(component, dep, 0.,1., 1, "ah", 3,val)
373 val=numpy.zeros(10,'l')
374 print "--------> Appel calcium.cp_llg"
375 info,tt,ii,mval=calcium.cp_llg(component, dep, 0.,1., 1, "ai", 3,val)
379 info=calcium.cp_fini(component,"aa",1)
382 info=calcium.cp_effi(component,"aa",3)
390 err=calcium.cp_fin(component,calcium.CP_ARRET)
393 c2=PYComponent("compo2",services=[
394 Service("s1",inport=[("a","double"),("b","double")],
395 outport=[("c","double"),("d","double")],
396 instream=[("aa","CALCIUM_double","I"),
397 ("ab","CALCIUM_string","I"),
398 ("ac","CALCIUM_integer","I"),
399 ("ad","CALCIUM_complex","I"),
400 ("ae","CALCIUM_real","I"),
401 ("af","CALCIUM_logical","I"),
402 ("ag","CALCIUM_long","I"),
403 ("ah","CALCIUM_integer","I"),
404 ("ai","CALCIUM_integer","I"),
406 outstream=[("ba","CALCIUM_double","I"),
407 ("bb","CALCIUM_string","I"),
408 ("bc","CALCIUM_integer","I"),
409 ("bd","CALCIUM_complex","I"),
410 ("be","CALCIUM_real","I"),
411 ("bf","CALCIUM_logical","I"),
412 ("bg","CALCIUM_long","I"),
413 ("bh","CALCIUM_integer","I"),
414 ("bi","CALCIUM_integer","I"),
425 c3=F77Component("fcode1",
428 inport=[("a","double"),("b","double")],
429 outport=[("c","double")],
430 instream=[("aa","CALCIUM_double","I"),
431 ("ab","CALCIUM_string","I"),
432 ("ac","CALCIUM_integer","I"),
433 ("ad","CALCIUM_complex","I"),
434 ("ae","CALCIUM_real","I"),
435 ("af","CALCIUM_logical","I"),
436 ("ag","CALCIUM_long","I"),
437 ("ah","CALCIUM_integer","I"),
438 ("ai","CALCIUM_integer","I"),
440 outstream=[("ba","CALCIUM_double","I"),
441 ("bb","CALCIUM_string","I"),
442 ("bc","CALCIUM_integer","I"),
443 ("bd","CALCIUM_complex","I"),
444 ("be","CALCIUM_real","I"),
445 ("bf","CALCIUM_logical","I"),
446 ("bg","CALCIUM_long","I"),
447 ("bh","CALCIUM_integer","I"),
448 ("bi","CALCIUM_integer","I"),
452 libs="-L%s -lcode1" % cwd,
453 rlibs="-Wl,--rpath -Wl,%s" % cwd,
456 g=Generator(Module("pycompos",components=[c1,c2,c3],prefix="./install",layout="multidir"),context)
462 g.make_appli("appli", restrict=["KERNEL"], altmodules={"GUI":GUI_ROOT_DIR, "YACS":YACS_ROOT_DIR})