1 # Copyright (C) 2009-2013 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.
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
22 #import context from ..
23 execfile("../context.py")
24 from module_generator import Generator,Module,Service,PYComponent,CPPComponent,F77Component
29 std::cerr << "a: " << a << std::endl;
30 std::cerr << "b: " << b << std::endl;
36 double val[10],rval[10];
37 int ival[10],rival[10];
38 long lval[10],rlval[10];
39 float cval[20],rcval[20];
40 char* sval[]={"coucou","bonjour","salut"};
52 std::cerr << "val: " << val[0] << std::endl;
53 std::cerr << "val: " << val[1] << std::endl;
54 std::cerr << "val: " << val[2] << std::endl;
55 cp_edb(component,CP_TEMPS,0.,1,(char*)"ba",10,val);
56 cp_edb(component,CP_TEMPS,1.,2,(char*)"ba",10,val);
57 cp_edb(component,CP_TEMPS,2.,3,(char*)"ba",10,val);
59 std::cerr << "sval: " << sval[0] << std::endl;
60 std::cerr << "sval: " << sval[1] << std::endl;
61 std::cerr << "sval: " << sval[2] << std::endl;
62 cp_ech(component,CP_TEMPS,0.,1,(char*)"bb",3,sval,6);
67 std::cerr << "ival: " << ival[0] << std::endl;
68 std::cerr << "ival: " << ival[1] << std::endl;
69 std::cerr << "ival: " << ival[2] << std::endl;
70 cp_een(component,CP_TEMPS,0.,1,(char*)"bc",10,ival);
78 std::cerr << "cval: " << cval[0] << std::endl;
79 std::cerr << "cval: " << cval[1] << std::endl;
80 std::cerr << "cval: " << cval[2] << std::endl;
81 std::cerr << "cval: " << cval[3] << std::endl;
82 std::cerr << "cval: " << cval[4] << std::endl;
83 std::cerr << "cval: " << cval[5] << std::endl;
84 cp_ecp(component,CP_TEMPS,0.,1,(char*)"bd",10,cval);
89 std::cerr << "cval: " << cval[0] << std::endl;
90 std::cerr << "cval: " << cval[1] << std::endl;
91 std::cerr << "cval: " << cval[2] << std::endl;
92 cp_ere(component,CP_TEMPS,0.,1,(char*)"be",10,cval);
97 std::cerr << "ival: " << ival[0] << std::endl;
98 std::cerr << "ival: " << ival[1] << std::endl;
99 std::cerr << "ival: " << ival[2] << std::endl;
100 cp_elo(component,CP_TEMPS,0.,1,(char*)"bf",10,ival);
105 std::cerr << "lval: " << lval[0] << std::endl;
106 std::cerr << "lval: " << lval[1] << std::endl;
107 std::cerr << "lval: " << lval[2] << std::endl;
108 cp_eln(component,CP_TEMPS,0.,1,(char*)"bg",10,lval);
113 std::cerr << "ival: " << ival[0] << std::endl;
114 std::cerr << "ival: " << ival[1] << std::endl;
115 std::cerr << "ival: " << ival[2] << std::endl;
116 cp_een(component,CP_TEMPS,0.,1,(char*)"bh",10,ival);
121 std::cerr << "lval: " << lval[0] << std::endl;
122 std::cerr << "lval: " << lval[1] << std::endl;
123 std::cerr << "lval: " << lval[2] << std::endl;
124 cp_elg(component,CP_TEMPS,0.,1,(char*)"bi",10,lval);
129 info=cp_ldb(component,CP_TEMPS,&t1,&t2,&i,(char*)"aa",3,&mval,rval);
130 std::cerr << "info: " << info << std::endl;
131 std::cerr << "rval: " << rval[0] << std::endl;
132 std::cerr << "rval: " << rval[1] << std::endl;
133 std::cerr << "rval: " << rval[2] << std::endl;
137 info=cp_lch(component,CP_TEMPS,&tt1,&tt2,&i,(char*)"ab",3,&mval,rsval,7);
138 std::cerr << "info: " << info << std::endl;
139 std::cerr << "rsval: " << rsval[0] << std::endl;
140 std::cerr << "rsval: " << rsval[1] << std::endl;
141 std::cerr << "rsval: " << rsval[2] << std::endl;
143 info=cp_len(component,CP_TEMPS,&tt1,&tt2,&i,(char*)"ac",3,&mval,rival);
144 std::cerr << "info: " << info << std::endl;
145 std::cerr << "rival: " << rival[0] << std::endl;
146 std::cerr << "rival: " << rival[1] << std::endl;
147 std::cerr << "rival: " << rival[2] << std::endl;
149 info=cp_lcp(component,CP_TEMPS,&tt1,&tt2,&i,(char*)"ad",3,&mval,rcval);
150 std::cerr << "info: " << info << std::endl;
151 std::cerr << "rcval: " << rcval[0] << std::endl;
152 std::cerr << "rcval: " << rcval[1] << std::endl;
153 std::cerr << "rcval: " << rcval[2] << std::endl;
154 std::cerr << "rcval: " << rcval[3] << std::endl;
155 std::cerr << "rcval: " << rcval[4] << std::endl;
156 std::cerr << "rcval: " << rcval[5] << std::endl;
161 info=cp_lre(component,CP_TEMPS,&tt1,&tt2,&i,(char*)"ae",3,&mval,rcval);
162 std::cerr << "info: " << info << std::endl;
163 std::cerr << "rcval: " << rcval[0] << std::endl;
164 std::cerr << "rcval: " << rcval[1] << std::endl;
165 std::cerr << "rcval: " << rcval[2] << std::endl;
171 info=cp_llo(component,CP_TEMPS,&tt1,&tt2,&i,(char*)"af",3,&mval,rival);
172 std::cerr << "info: " << info << std::endl;
173 std::cerr << "rival: " << rival[0] << std::endl;
174 std::cerr << "rival: " << rival[1] << std::endl;
175 std::cerr << "rival: " << rival[2] << std::endl;
177 info=cp_lln(component,CP_TEMPS,&tt1,&tt2,&i,(char*)"ag",3,&mval,rlval);
178 std::cerr << "info: " << info << std::endl;
179 std::cerr << "rlval: " << rlval[0] << std::endl;
180 std::cerr << "rlval: " << rlval[1] << std::endl;
181 std::cerr << "rlval: " << rlval[2] << std::endl;
187 info=cp_len(component,CP_TEMPS,&tt1,&tt2,&i,(char*)"ah",3,&mval,rival);
188 std::cerr << "info: " << info << std::endl;
189 std::cerr << "rival: " << rival[0] << std::endl;
190 std::cerr << "rival: " << rival[1] << std::endl;
191 std::cerr << "rival: " << rival[2] << std::endl;
193 info=cp_llg(component,CP_TEMPS,&tt1,&tt2,&i,(char*)"ai",3,&mval,rlval);
194 std::cerr << "info: " << info << std::endl;
195 std::cerr << "rlval: " << rlval[0] << std::endl;
196 std::cerr << "rlval: " << rlval[1] << std::endl;
197 std::cerr << "rlval: " << rlval[2] << std::endl;
199 info=cp_fint(component,(char*)"aa",0.5);
200 std::cerr << "info: " << info << std::endl;
202 info=cp_efft(component,(char*)"aa",1.5);
203 std::cerr << "info: " << info << std::endl;
206 std::cerr << "c: " << c << std::endl;
208 c1=CPPComponent("compo1",services=[
209 Service("s1",inport=[("a","double"),("b","double")],
210 outport=[("c","double")],
211 instream=[("aa","CALCIUM_double","T"),
212 ("ab","CALCIUM_string","T"),
213 ("ac","CALCIUM_integer","T"),
214 ("ad","CALCIUM_complex","T"),
215 ("ae","CALCIUM_real","T"),
216 ("af","CALCIUM_logical","T"),
217 ("ag","CALCIUM_long","T"),
218 ("ah","CALCIUM_integer","T"),
219 ("ai","CALCIUM_integer","T"),
221 outstream=[("ba","CALCIUM_double","T"),
222 ("bb","CALCIUM_string","T"),
223 ("bc","CALCIUM_integer","T"),
224 ("bd","CALCIUM_complex","T"),
225 ("be","CALCIUM_real","T"),
226 ("bf","CALCIUM_logical","T"),
227 ("bg","CALCIUM_long","T"),
228 ("bh","CALCIUM_integer","T"),
229 ("bi","CALCIUM_integer","T"),
231 defs="//def1",body=body,
243 info,name= calcium.cp_cd(component)
249 val=numpy.zeros(10,'d')
253 print "--------> Appel calcium.cp_edb",val
254 info=calcium.cp_edb(component, dep, 0., 1, "ba", nval,val)
255 info=calcium.cp_edb(component, dep, 1., 2, "ba", nval,val)
256 info=calcium.cp_edb(component, dep, 2., 3, "ba", nval,val)
259 val=numpy.array(["coucouc ","bonjour ","salut "])
260 val=calcium.stringArray(3,8)
264 print "--------> Appel calcium.cp_ech",val
265 info=calcium.cp_ech(component, dep, 0., 1, "bb", 3,val)
268 val=numpy.zeros(10,'i')
271 print "--------> Appel calcium.cp_een",val
272 info=calcium.cp_een(component, dep, 0., 1, "bc", 3,val)
274 val=numpy.zeros(10,'F')
277 print "--------> Appel calcium.cp_ecp",val
278 info=calcium.cp_ecp(component, dep, 0., 1, "bd", 3,val)
280 val=numpy.zeros(10,'f')
283 print "--------> Appel calcium.cp_ere",val
284 info=calcium.cp_ere(component, dep, 0., 1, "be", 3,val)
286 val=numpy.zeros(10,'i')
290 print "--------> Appel calcium.cp_elo",val
291 info=calcium.cp_elo(component, dep, 0., 1, "bf", 3,val)
293 val=numpy.zeros(10,'l')
297 print "--------> Appel calcium.cp_eln",val
298 info=calcium.cp_eln(component, dep, 0., 1, "bg", 3,val)
300 val=numpy.zeros(10,'i')
304 print "--------> Appel calcium.cp_een",val
305 info=calcium.cp_een(component, dep, 0., 1, "bh", 3,val)
307 val=numpy.zeros(10,'l')
311 print "--------> Appel calcium.cp_elg",val
312 info=calcium.cp_elg(component, dep, 0., 1, "bi", 3,val)
316 val=numpy.zeros(10,'d')
317 print "--------> Appel calcium.cp_ldb"
318 info,tt,ii,mval=calcium.cp_ldb(component, dep, 0.,1., 1, "aa", 3,val)
321 val=numpy.array(["","","",], dtype='S13')
322 print "--------> Appel calcium.cp_lch"
323 info,tt,ii,mval=calcium.cp_lch(component, dep, 0.,1., 1, "ab", 3,val)
327 val=numpy.array([" "," "," ",], dtype='S13')
328 print "--------> Appel calcium.cp_lch"
329 info,tt,ii,mval=calcium.cp_lch(component, dep, 0.,1., 1, "ab", 3,val)
333 val=calcium.stringArray(3,8)
334 print "--------> Appel calcium.cp_lch"
335 info,tt,ii,mval=calcium.cp_lch(component, dep, 0.,1., 1, "ab", 3,val)
341 val=numpy.zeros(10,'i')
342 print "--------> Appel calcium.cp_len"
343 info,tt,ii,mval=calcium.cp_len(component, dep, 0.,1., 1, "ac", 3,val)
346 val=numpy.zeros(10,'F')
347 print "--------> Appel calcium.cp_lcp"
348 info,tt,ii,mval=calcium.cp_lcp(component, dep, 0.,1., 1, "ad", 3,val)
351 val=numpy.zeros(10,'f')
352 print "--------> Appel calcium.cp_lre"
353 info,tt,ii,mval=calcium.cp_lre(component, dep, 0.,1., 1, "ae", 3,val)
356 val=numpy.zeros(10,'i')
357 print "--------> Appel calcium.cp_llo"
358 info,tt,ii,mval=calcium.cp_llo(component, dep, 0.,1., 1, "af", 3,val)
361 val=numpy.zeros(10,'l')
362 print "--------> Appel calcium.cp_lln"
363 info,tt,ii,mval=calcium.cp_lln(component, dep, 0.,1., 1, "ag", 3,val)
366 val=numpy.zeros(10,'i')
367 print "--------> Appel calcium.cp_len"
368 info,tt,ii,mval=calcium.cp_len(component, dep, 0.,1., 1, "ah", 3,val)
371 val=numpy.zeros(10,'l')
372 print "--------> Appel calcium.cp_llg"
373 info,tt,ii,mval=calcium.cp_llg(component, dep, 0.,1., 1, "ai", 3,val)
377 info=calcium.cp_fint(component,"aa",0.5)
380 info=calcium.cp_efft(component,"aa",1.5)
388 err=calcium.cp_fin(component,calcium.CP_ARRET)
391 c2=PYComponent("compo2",services=[
392 Service("s1",inport=[("a","double"),("b","double")],
393 outport=[("c","double"),("d","double")],
394 instream=[("aa","CALCIUM_double","T"),
395 ("ab","CALCIUM_string","T"),
396 ("ac","CALCIUM_integer","T"),
397 ("ad","CALCIUM_complex","T"),
398 ("ae","CALCIUM_real","T"),
399 ("af","CALCIUM_logical","T"),
400 ("ag","CALCIUM_long","T"),
401 ("ah","CALCIUM_integer","T"),
402 ("ai","CALCIUM_integer","T"),
404 outstream=[("ba","CALCIUM_double","T"),
405 ("bb","CALCIUM_string","T"),
406 ("bc","CALCIUM_integer","T"),
407 ("bd","CALCIUM_complex","T"),
408 ("be","CALCIUM_real","T"),
409 ("bf","CALCIUM_logical","T"),
410 ("bg","CALCIUM_long","T"),
411 ("bh","CALCIUM_integer","T"),
412 ("bi","CALCIUM_integer","T"),
423 c3=F77Component("fcode1",
426 inport=[("a","double"),("b","double")],
427 outport=[("c","double")],
428 instream=[("aa","CALCIUM_double","T"),
429 ("ab","CALCIUM_string","T"),
430 ("ac","CALCIUM_integer","T"),
431 ("ad","CALCIUM_complex","T"),
432 ("ae","CALCIUM_real","T"),
433 ("af","CALCIUM_logical","T"),
434 ("ag","CALCIUM_long","T"),
435 ("ah","CALCIUM_integer","T"),
436 ("ai","CALCIUM_integer","T"),
438 outstream=[("ba","CALCIUM_double","T"),
439 ("bb","CALCIUM_string","T"),
440 ("bc","CALCIUM_integer","T"),
441 ("bd","CALCIUM_complex","T"),
442 ("be","CALCIUM_real","T"),
443 ("bf","CALCIUM_logical","T"),
444 ("bg","CALCIUM_long","T"),
445 ("bh","CALCIUM_integer","T"),
446 ("bi","CALCIUM_integer","T"),
450 libs="-L%s -lcode1" % cwd,
451 rlibs="-Wl,--rpath -Wl,%s" % cwd,
454 g=Generator(Module("pycompos",components=[c1,c2,c3],prefix="./install",layout="multidir"),context)
460 g.make_appli("appli", restrict=["KERNEL"], altmodules={"GUI":GUI_ROOT_DIR, "YACS":YACS_ROOT_DIR})