initial commit
[goodguy/history.git] / cinelerra-5.0 / guicast / bccmdl.py
1 #!/bin/python
2
3 base = {
4   "rgb8": {
5     "i8": {
6       "r": " uint32_t in = *inp, r = ((in>>6)&3)*0x55u, g = ((in>>3)&7)*0x24u, b = (in&7)*0x24u;",
7       "w": " uint32_t ot = (r&0xc0u) | ((g>>2)&0x38u) | ((b>>5)&0x07u);\n" +
8            " *out++ = ot;",
9     },
10     "i16": {
11       "r": " uint32_t in = *inp, r = ((in>>6)&3)*0x5555u, g = ((in>>3)&7)*0x2492u, b = (in&7)*0x2492u;",
12       "w": " uint32_t ot = ((r>>8)&0xc0u) | ((g>>10) & 0x38u) >> 2) | ((b>>13)&0x07u);\n" +
13            " *out++ = ot;",
14     },
15     "fp": {
16       "r": " int in = *inp; float r = (in>>6)/3.f, g = ((in>>3)&0x07u)/7.f, b = (in&0x07u)/7.f;",
17       "w": " int vr = clp(4,r), vg = clp(8,g), vb = clp(8,b);\n" +
18            " *out++ = ((vr<<6)&0xc0u) | ((vg<<3)&0x38u) | (vb&0x7u);",
19     },
20   },
21   "rgb565": {
22     "i8": {
23       "r": " uint32_t in = *(uint16_t*)inp;\n" +
24            " int r = (in>>8)&0xf8u, g = (in>>3)&0xfcu, b = (in&0x1fu)<<3;",
25       "w": " uint32_t ot = ((r<<8) & 0xf800u) | ((g<<3) & 0x07e0u) | ((b>>3) & 0x001fu);\n" +
26            " *(uint16_t*)out = ot; out += sizeof(uint16_t);",
27     },
28     "i16": {
29       "r": " uint32_t in = *(uint16_t*)inp;\n" +
30            " int r = in&0xf800u, g = (in<<5)&0xfc00u, b = (in<<11)&0xf800u;",
31       "w": " uint32_t ot = (r&0xf800u) | ((g>>5) & 0x07e0u) | ((b>>11) & 0x001fu);\n" +
32            " *out++ = ot;",
33     },
34     "fp": {
35       "r": " uint32_t in = *(uint16_t*)inp;\n" +
36            " float r = (in>>11)/31.f, g = ((in>>5)&0x3fu)/63.f, b = (in&0x1fu)/31.f;",
37       "w": " uint32_t vr = clp(32,r), vg = clp(64,g), vb = clp(32,b);\n" +
38            " *out++ = ((vr<<11)&0xf800u) | ((vg<<6)&0x07e0u) | (vb&0x001fu);",
39     },
40   },
41   "rgb888": {
42     "i8": {
43       "r": " int r = *inp++, g = *inp++, b = *inp++;",
44       "w": " *out++ = r; *out++ = g; *out++ = b;",
45     },
46     "i16": {
47       "r": " int r = *inp++*0x101u, g = *inp++*0x101u, b = *inp++*0x101u;",
48       "w": " *out++ = r>>8; *out++ = g>>8; *out++ = b>>8;",
49     },
50     "fp": {
51       "r": " float r = fclp(*inp++,256), g=fclp(*inp++,256), b = fclp(*inp++,256);",
52       "w": " *out++ = clp(256,r); *out++ = clp(256,g); *out++ = clp(256,b);",
53     },
54   },
55   "rgb161616": {
56     "i8": {
57       "r": " int r = *inp++>>8, g = *inp++>>8, b = *inp++>>8;",
58       "w": " *out++ = r*0x101u; *out++ = g*0x101u; *out++ = b*0x101u;",
59     },
60     "i16": {
61       "r": " int r = *inp++, g = *inp++, b = *inp++;",
62       "w": " *out++ = r; *out++ = g; *out++ = b;",
63     },
64     "fp": {
65       "r": " float r = fclp(*inp++,65536), g=fclp(*inp++,65536), b = fclp(*inp++,65536);",
66       "w": " *out++ = clp(65536,r); *out++ = clp(65536,g); *out++ = clp(65536,b);",
67     },
68   },
69   "rgbfloat": {
70     "i8": {
71       "r": " int r = clp(256,*inp++), g = clp(256,*inp++), b = clp(256,*inp++);",
72       "w": " *out++ = fclp(r,256); *out++ = fclp(g,256); *out++ = fclp(b,256);",
73     },
74     "i16": {
75       "r": " int r = clp(65536,*inp++), g = clp(65536,*inp++), b = clp(65536,*inp++);",
76       "w": " *out++ = fclp(r,65536); *out++ = fclp(g,65536); *out++ = fclp(b,65536);",
77     },
78     "fp": {
79       "r": " float r = *inp++, g=*inp++, b = *inp++;",
80       "w": " *out++ = r; *out++ = g; *out++ = b;",
81     },
82   },
83
84   "bgr565": {
85     "i8": {
86       "r": " uint32_t in = *(uint16_t*)inp;\n" +
87            " int b = (in>>8)&0xf8u, g = (in>>3)&0xfcu, r = (in&0x1fu)<<3;",
88       "w": " uint32_t ot = ((b&0xf8u)<<8) | ((g&0xfcu)<<3) | ((r&0xf8u)>>3);\n" +
89            " *(uint16_t*)out = ot; out += sizeof(uint16_t)/sizeof(*out);",
90     },
91     "i16": {
92       "r": " uint32_t in = *(uint16_t*)inp;\n" +
93            " int b = in&0xf800u, g = (in<<5)&0xfc00u, r = (in<<11)&0xf800u;",
94       "w": " uint32_t ot = (b&0xf800u) | ((g>>5) & 0x07e0u) << 3) | (r>>11);\n" +
95            " *out++ = ot;",
96     },
97     "fp": {
98       "r": " uint32_t in = *(uint16_t*)inp;\n" +
99            " float b = (in>>11)/31.f, g = ((in>>5)&0x3fu)/63.f, r = (in&0x1fu)/31.f;",
100       "w": " uint32_t vb = clp(32,b), vg = clp(64,g), vr = clp(32,r);\n" +
101            " *out++ = ((vb<<11)&0xf800u) | ((vg<<6)&0x03e0u) | (vr&0x001fu);",
102     },
103   },
104   "bgr888": {
105     "i8": {
106       "r": " int b = *inp++, g = *inp++, r = *inp++;",
107       "w": " *out++ = b; *out++ = g; *out++ = r;",
108     },
109     "i16": {
110       "r": " int b = *inp++*0x101u, g = *inp++*0x101u, r = *inp++*0x101u;",
111       "w": " *out.16++ = b>>8; *out.16++ = g>>8; *out.16++ = r>>8;",
112     },
113     "fp": {
114       "r": " float b = fclp(*inp++,256), g=fclp(*inp++,256), r = fclp(*inp++,256);",
115       "w": " *out++ = clp(256,b); *out++ = clp(256,g); *out++ = clp(256,r);",
116     },
117   },
118   "bgr8888": {
119     "i8": {
120       "r": " int b = *inp++, g = *inp++, r = *inp++;",
121       "w": " *out++ = b; *out++ = g; *out++ = r; ++out;",
122     },
123     "i16": {
124       "r": " int b = *inp++*0x101u, g = *inp++*0x101u, r = *inp++*0x101u;",
125       "w": " *out++ = b>>8; *out++ = g>>8; *out++ = r>>8; ++out;",
126     },
127     "fp": {
128       "r": " float b = fclp(*inp++,256), g=fclp(*inp++,256), r = fclp(*inp++,256);",
129       "w": " *out++ = clp(256,b); *out++ = clp(256,g); *out++ = clp(256,r); ++out;",
130     },
131   },
132   "bgr161616": {
133     "i8": {
134       "r": " int b = *inp++>>8, g = *inp++>>8, r = *inp++>>8;",
135       "w": " *out++ = b*0x101u; *out++ = g*0x101u; *out++ = r*0x101u;",
136     },
137     "i16": {
138       "r": " int b = *inp++, g = *inp++, r = *inp++;",
139       "w": " *out++ = b; *out++ = g; *out++ = r;",
140     },
141     "fp": {
142       "r": " float b = fclp(*inp++,65536), g=fclp(*inp++,65536), r = fclp(*inp++,65536);",
143       "w": " *out++ = clp(65536,b); *out++ = clp(65536,g); *out++ = clp(65536,r);",
144     },
145   },
146   "bgrfloat": {
147     "i8": {
148       "r": " int b = clp(256,*inp++), g = clp(256,*inp++), r = clp(256,*inp++);",
149       "w": " *out++ = fclp(b,256); *out++ = fclp(g,256); *out++ = fclp(r,256);",
150     },
151     "i16": {
152       "r": " int b = clp(65536,*inp++), g = clp(65536,*inp++), r = clp(65536,*inp++);",
153       "w": " *out++ = fclp(b,65536); *out++ = fclp(g,65536); *out++ = fclp(r,65536);",
154     },
155     "fp": {
156       "r": " float b = *inp++, g=*inp++, r = *inp++;",
157       "w": " *out++ = b; *out++ = g; *out++ = r;",
158     },
159   },
160
161   "yuv888": {
162     "i8": {
163       "r": " int32_t y = *inp++*0x010101u, u = *inp++, v = *inp++;",
164       "w": " *out++ = y; *out++ = u; *out++ = v;",
165     },
166     "i16": {
167       "r": " int32_t y = *inp++*0x010101u, u = *inp++<<8, v = *inp++<<8;",
168       "w": " *out++ = y>>8; *out++ = u>>8; *out++ = v>>8;",
169     },
170   },
171   "yuv161616": {
172     "i8": {
173       "r": " int32_t iy = *inp++, y = (iy<<8) | (iy>>8), u = *inp++>>8, v = *inp++>>8;",
174       "w": " *out++ = y<<8; *out++ = u<<8; *out++ = v<<8;",
175     },
176     "i16": {
177       "r": " int32_t iy = *inp++, y = (iy<<8) | (iy>>8), u = *inp++, v = *inp++;",
178       "w": " *out++ = y; *out++ = u; *out++ = v;",
179     },
180   },
181
182   "yuyv8888": {
183     "i8": {
184       "r": " int32_t iy = inp[(i&1)<<1], y = iy*0x010101u, u = inp[1], v = inp[3];",
185       "w": " if( !(j&1) ) { *out++ = y; *out = u; out[2] = v; }\n" +
186            " else { *out++ = u; *out++= y; *out++ = v; }",
187     },
188     "i16": {
189       "r": " int32_t iy = inp[(i&1)<<1], y = iy*0x010101u, u = inp[1]<<8, v = inp[3]<<8;",
190       "w": " if( !(j&1) ) { *out++ = y>>8; *out = u>>8; out[2] = v>>8; }\n" +
191            " else { *out++ = u>>8; *out++= y>>8; *out++ = v>>8; }",
192     },
193   },
194
195   "yuv10101010": {
196     "i8": {
197       "r": " uint32_t it = *(uint32_t*)inp;\n" +
198            " int32_t y = ((it>>22)&0x3ffu)*0x4010u, u = (it>>14)&0xffu, v = (it>>4)&0xffu;",
199       "w": " uint32_t ot = (y<<24) | (u<<14) | (v<<4);\n" +
200            " *(uint32_t*)out = ot; out += sizeof(uint32_t)/sizeof(*out);",
201     },
202     "i16": {
203       "r": " uint32_t it = *(uint32_t*)inp;\n" +
204            " int32_t y = ((it>>22)&0x3ffu)*0x4010u, u = (it>>6)&0xffc0u, v = (it<<4)&0xffc0u;",
205       "w": " uint32_t ot = ((y&0xffc0u)<<16) | ((u&0xffc0u)<<6) | ((v&0xffc0u)>>4);\n" +
206            " *(uint32_t*)out = ot; out += sizeof(uint32_t)/sizeof(*out);",
207     },
208   },
209
210   "vyu888": {
211     "i8": {
212       "r": " int32_t v = *inp++, y = *inp++*0x010101u, u = *inp++;",
213       "w": " *out++ = v; *out++ = y; *out++ = u;",
214     },
215     "i16": {
216       "r": " int32_t v = *inp++<<8, y = *inp++*0x010101u, u = *inp++<<8;",
217       "w": " *out++ = v>>8; *out++ = y>>8; *out++ = u>>8;",
218     },
219   },
220
221   "uyv888": {
222     "i8": {
223       "r": " int32_t u = *inp++, y = *inp++*0x010101u, v = *inp++;",
224       "w": " *out++ = u; *out++ = y; *out++ = v;",
225     },
226     "i16": {
227       "r": " int32_t u = *inp++<<8, y = *inp++*0x010101u, v = *inp++<<8;",
228       "w": " *out++ = u>>8; *out++ = y>>8; *out++ = v>>8;",
229     },
230   },
231
232   "yuv420p": {
233     "i8": {
234       "r": " int32_t y = *yip*0x010101u, u = *uip, v = *vip;",
235       "w": " yop[j] = y;  uop[j/2] = u;  vop[j/2] = v;",
236     },
237     "i16": {
238       "r": " int32_t y = *yip*0x010101u, u = *uip<<8, v = *vip<<8;",
239       "w": " yop[j] = y>>8;  uop[j/2] = u>>8;  vop[j/2] = v>>8;",
240     },
241   },
242
243   "yuv422p": {
244     "i8": {
245       "r": " int32_t y = *yip*0x010101u, u = *uip, v = *vip;",
246       "w": " yop[j] = y;  uop[j/2] = u;  vop[j/2] = v;",
247     },
248     "i16": {
249       "r": " int32_t y = *yip*0x010101u, u = *uip<<8, v = *vip<<8;",
250       "w": " yop[j] = y>>8;  uop[j/2] = u>>8;  vop[j/2] = v>>8;",
251     },
252   },
253
254   "yuv444p": {
255     "i8": {
256       "r": " int32_t y = *yip*0x010101u, u = *uip, v = *vip;",
257       "w": " yop[j] = y;  uop[j] = u;  vop[j] = v;",
258     },
259     "i16": {
260       "r": " int32_t y = *yip*0x010101u, u = *uip<<8, v = *vip<<8;",
261       "w": " yop[j] = y>>8;  uop[j] = u>>8;  vop[j] = v>>8;",
262     },
263   },
264
265   "yuv411p": {
266     "i8": {
267       "r": " int32_t y = *yip*0x010101u, u = *uip, v = *vip;",
268       "w": " yop[j] = y;  uop[j/4] = u;  vop[j/4] = v;",
269     },
270     "i16": {
271       "r": " int32_t y = *yip*0x010101u, u = *uip<<8, v = *vip<<8;",
272       "w": " yop[j] = y>>8;  uop[j/4] = u>>8;  vop[j/4] = v>>8;",
273     },
274   },
275
276   "yuv410p": {
277     "i8": {
278       "r": " int32_t y = *yip*0x010101u, u = *uip, v = *vip;",
279       "w": " yop[j] = y;  uop[j/4] = u;  vop[j/4] = v;",
280     },
281     "i16": {
282       "r": " int32_t y = *yip*0x010101u, u = *uip<<8, v = *vip<<8;",
283       "w": " yop[j] = y>>8;  uop[j/4] = u>>8;  vop[j/4] = v>>8;",
284     },
285   },
286
287   "rgbfltp": {
288     "i8": {
289       "r": " int r = clp(256,*rip++), g = clp(256,*gip++), b = clp(256,*bip++);",
290       "w": " *rop++ = fclp(r,256); *gop++ = fclp(g,256); *bop++ = fclp(b,256);",
291     },
292     "i16": {
293       "r": " int r = clp(65536,*rip++), g = clp(65536,*gip++), b = clp(65536,*bip++);",
294       "w": " *rop++ = fclp(r,65536); *gop++ = fclp(g,65536); *bop++ = fclp(b,65536);",
295     },
296     "fp": {
297       "r": " float r = *rip++, g = *gip++, b = *bip++;",
298       "w": " *rop++ = r; *gop++ = g; *bop++ = b;",
299     },
300   },
301
302   # alpha component
303   "a8": {
304     "i8": {
305       "r": " z_int a = *inp++;",
306       "w": " *out++ = a;",
307     },
308     "i16": {
309       "r": " z_int a = *inp++<<8;",
310       "w": " *out++ = a>>8;",
311     },
312     "fp": {
313       "r": " z_float fa = fclp(*inp++,256);",
314       "w": " *out++ = clp(256,a)",
315     },
316   },
317   "a16": {
318     "i8": {
319       "r": " z_int a = *inp++>>8;",
320       "w": " *out++ = a<<8;",
321     },
322     "i16": {
323       "r": " z_int a = *inp++;",
324       "w": " *out++ = a;",
325     },
326     "fp": {
327       "r": " z_float fa = fclp(*inp++,65536);",
328       "w": " *out++ = clp(65536,a);",
329     },
330   },
331   "afp": {
332     "i8": {
333       "r": " z_int a = clp(256,*inp++);",
334       "w": " *out++ = fclp(a,256);",
335     },
336     "i16": {
337       "r": " z_int a = clp(65536,*inp++);",
338       "w": " *out++ = fclp(a,65536);",
339     },
340     "fp": {
341       "r": " z_float fa = *inp++;",
342       "w": " *out++ = fa;",
343     },
344   },
345   "afpp": {
346     "i8": {
347       "r": " z_int a = clp(256,*aip++);",
348       "w": " *aop++ = fclp(a,256);",
349     },
350     "i16": {
351       "r": " z_int a = clp(65536,*aip++);",
352       "w": " *aop++ = fclp(a,65536);",
353     },
354     "fp": {
355       "r": " z_float fa = *aip++;",
356       "w": " *aop++ = fa;",
357     },
358   },
359   # alpha blend rgb/black, yuv/black, rgb/bg_color
360   "brgb": {
361     "i8": " r = r*a/0xffu; g = g*a/0xffu; b = b*a/0xffu;",
362     "i16": " r = r*a/0xffffu; g = g*a/0xffffu; b = b*a/0xffffu;",
363     "fp": " r *= fa; g *= fa; b *= fa;",
364   },
365   "byuv": {
366     "i8": " z_int a1 = 0xffu-a;\n" +
367           " y = y*a/0xffu; u = (u*a + 0x80u*a1)/0xffu; v = (v*a + 0x80u*a1)/0xffu;",
368     "i16": " z_int a1 = 0xffffu-a;\n" +
369            " y = y*a/0xffffu; u = (u*a + 0x8000u*a1)/0xffffu; v = (v*a + 0x8000u*a1)/0xffffu;",
370   },
371   "bbg": {
372     "i8": " int a1 = 0xffu-a;\n" +
373         " r = (r*a + bg_r*a1)/0xffu; g = (g*a + bg_g*a1)/0xffu; b = (b*a + bg_b*a1)/0xffu;",
374     "i16": "int a1 = 0xffffu-a;\n" +
375         " r = (r*a + bg_r*a1)/0xffffu; g = (g*a + bg_g*a1)/0xffffu; b = (b*a + bg_b*a1)/0xffffu;",
376     "fp": " float a1 = 1-fa;\n" +
377         " r = (r*fa + bg_r*a1); g = (g*fa + bg_g*a1); b = (b*fa + bg_b*a1);",
378   },
379 }
380
381 cmodels = []
382 layout = {}
383 dtype = {}
384 special = {}
385
386 def add_cmodel(nm, typ=None, *args):
387   global cmodels, layout, dtype
388   cmodels += [nm,]
389   dtype[nm] = typ
390   layout[nm] = args
391
392 def specialize(fr_cmdl, to_cmdl, fn):
393   global special
394   special[(fr_cmdl, to_cmdl)] = fn
395
396 add_cmodel("bc_transparency")
397 add_cmodel("bc_compressed")
398
399 add_cmodel("bc_rgb8", "i8", "rgb8")
400 add_cmodel("bc_rgb565", "i8", "rgb565")
401 add_cmodel("bc_bgr565", "i8", "bgr565")
402 add_cmodel("bc_bgr888", "i8", "bgr888")
403 add_cmodel("bc_bgr8888", "i8", "bgr8888")
404
405 add_cmodel("bc_rgb888", "i8", "rgb888")
406 add_cmodel("bc_rgba8888", "i8", "rgb888", "a8")
407 add_cmodel("bc_argb8888", "i8", "a8", "rgb888")
408 add_cmodel("bc_abgr8888", "i8", "a8", "bgr888")
409 add_cmodel("bc_rgb161616", "i16", "rgb161616")
410 add_cmodel("bc_rgba16161616", "i16", "rgb161616", "a16")
411 add_cmodel("bc_yuv888", "i8", "yuv888")
412 add_cmodel("bc_yuva8888", "i8", "yuv888", "a8")
413 add_cmodel("bc_yuv161616", "i16", "yuv161616")
414 add_cmodel("bc_yuva16161616", "i16", "yuv161616", "a16")
415
416 add_cmodel("bc_yuv422", "i8", "yuyv8888")
417 add_cmodel("bc_a8")
418 add_cmodel("bc_a16")
419 add_cmodel("bc_a_float")
420 add_cmodel("bc_yuv101010", "i16", "yuv10101010")
421 add_cmodel("bc_vyu888", "i8", "vyu888")
422 add_cmodel("bc_uyva8888", "i8", "uyv888", "a8")
423 add_cmodel("bc_rgb_float", "fp", "rgbfloat")
424 add_cmodel("bc_rgba_float", "fp", "rgbfloat", "afp")
425
426 add_cmodel("bc_yuv420p", "i8", "yuv420p")
427 add_cmodel("bc_yuv422p", "i8", "yuv422p")
428 add_cmodel("bc_yuv444p", "i8", "yuv444p")
429 add_cmodel("bc_yuv411p", "i8", "yuv411p")
430 add_cmodel("bc_yuv410p", "i8", "yuv410p")
431 add_cmodel("bc_rgb_floatp", "fp", "rgbfltp")
432 add_cmodel("bc_rgba_floatp", "fp", "rgbfltp", "afpp")
433
434 specialize("bc_rgba8888", "bc_transparency", "XFER_rgba8888_to_transparency")
435
436 ctype = {
437   "i8": "uint8_t",
438   "i16": "uint16_t",
439   "fp": "float",
440 }
441
442 adata = {
443   "i8": " z_int a=0xff;",
444   "i16": " z_int a=0xffff;",
445   "fp": " z_float fa=1;",
446 }
447
448 def has_alpha(nm):
449   return nm in ["bc_rgba8888", "bc_argb8888", "bc_abgr8888", \
450     "bc_rgba16161616", "bc_yuva8888", "bc_yuva16161616", \
451     "bc_uyva8888", "bc_rgba_float", "bc_rgba_floatp",]
452
453 def has_bgcolor(fr_cmdl,to_cmdl):
454   return fr_cmdl in ["bc_rgba8888"] and \
455     to_cmdl in ["bc_rgba888", "bc_bgr565", "bc_rgb565", \
456      "bc_bgr888", "bc_rgb888", "bc_bgr8888"]
457
458 def is_specialized(fr_cmdl,to_cmdl):
459   global special
460   return special.get((fr_cmdl, to_cmdl)) is not None
461
462 def is_rgb(nm):
463   return nm in [ "bc_rgb8", "bc_rgb565", "bc_bgr565", \
464     "bc_bgr888", "bc_bgr8888", "bc_rgb888", "bc_rgba8888", \
465     "bc_argb8888", "bc_abgr8888", "bc_rgb", "bc_rgb161616", \
466     "bc_rgba16161616", "bc_rgb_float", "bc_rgba_float", \
467     "bc_rgb_floatp", "bc_rgba_floatp", ]
468
469 def is_yuv(nm):
470   return nm in [ "bc_yuv888", "bc_yuva8888", "bc_yuv161616", \
471     "bc_yuva16161616", "bc_yuv422", "bc_yuv101010", "bc_vyu888", \
472     "bc_uyva8888", "bc_yuv420p", "bc_yuv422p", "bc_yuv444p", \
473     "bc_yuv411p", "bc_yuv410p", ]
474
475 def is_planar(nm):
476   return nm in [ "bc_yuv420p", "bc_yuv422p", "bc_yuv444p", \
477     "bc_yuv411p", "bc_yuv410p", "bc_rgb_floatp", "bc_rgba_floatp", ]
478
479 def is_float(nm):
480   return nm in ["bc_rgb_float", "bc_rgba_float", "bc_rgb_floatp", "bc_rgba_floatp", ]
481
482 def gen_xfer_proto(pfx, cls, fr_cmdl, to_cmdl):
483   global dtype, ctype
484   print "%svoid %sxfer_%s_to_%s" % (pfx, cls, fr_cmdl[3:], to_cmdl[3:]),
485   ityp = dtype[fr_cmdl];  fr_typ = ctype[ityp];
486   otyp = dtype[to_cmdl];  to_typ = ctype[otyp];
487   print "()",
488
489 def gen_xfer_fn(fr_cmdl, to_cmdl):
490   global layout, dtype, adata
491   ityp = dtype[fr_cmdl];  otyp = dtype[to_cmdl]
492   if( ityp is None or otyp is None ): return
493   # xfr fn header
494   gen_xfer_proto("", class_qual, fr_cmdl, to_cmdl);
495   # xfr fn body
496   print "{"
497   # loops / pointer preload
498   in_cmdl = fr_cmdl[3:] if is_planar(fr_cmdl) else "flat";
499   out_cmdl = to_cmdl[3:] if is_planar(to_cmdl) else "flat";
500   print " xfer_%s_row_out(%s) xfer_%s_row_in(%s)" % \
501      (out_cmdl, ctype[otyp], in_cmdl, ctype[ityp],)
502   # load inp
503   if( is_float(to_cmdl) and is_yuv(fr_cmdl) ):
504     for ic in layout[fr_cmdl]: print "%s" % (base[ic][ityp]['r']),
505     if( ityp == "i8" ):
506       print "\n float fy = y/16777215.f, r, g, b; YUV_TO_FLOAT(fy, u, v, r, g, b);",
507     elif( ityp == "i16" ):
508       print "\n float fy = y/16777215.f, r, g, b; YUV16_TO_RGB_FLOAT(fy, u, v, r, g, b);",
509     if( has_alpha(fr_cmdl) or has_alpha(to_cmdl) ):
510       if( not has_alpha(fr_cmdl) ):
511         print " z_float fa = 1;",
512       elif( ityp == "i8" ):
513         print " float fa = fclp(a,256);",
514       elif( ityp == "i16" ):
515         print " float fa = fclp(a,65536);",
516   else:
517     for ic in layout[fr_cmdl]: print "%s" % (base[ic][otyp]['r']),
518     if( has_alpha(to_cmdl) and not has_alpha(fr_cmdl) ):
519       print "%s" % (adata[otyp]),
520   print ""
521   # xfer
522   if( is_rgb(fr_cmdl) and is_yuv(to_cmdl) ):
523     if( otyp == "i8" ):
524       print " int32_t y, u, v;  RGB_TO_YUV(y, u, v, r, g, b);"
525     elif( otyp == "i16" ):
526       print " int32_t y, u, v;  RGB_TO_YUV16(y, u, v, r, g, b);"
527   elif( is_yuv(fr_cmdl) and is_rgb(to_cmdl)):
528     if( otyp == "i8" ):
529       print " int32_t r, g, b;  YUV_TO_RGB(y, u, v, r, g, b);"
530     elif( otyp == "i16" ):
531       print " int32_t r, g, b;  YUV_TO_RGB16(y, u, v, r, g, b);"
532   elif( is_yuv(fr_cmdl) and is_yuv(to_cmdl) ):
533     if( otyp == "i8" ):
534       print " y >>= 16;",
535     elif( otyp == "i16" ):
536       print " y >>= 8;",
537   # blend
538   if( has_bgcolor(fr_cmdl,to_cmdl) ):
539     print "%s" % (base["bbg"][otyp])
540   elif( has_alpha(fr_cmdl) and not has_alpha(to_cmdl) ):
541     if( is_rgb(to_cmdl) ):
542       print "%s" % (base["brgb"][otyp])
543     elif( is_yuv(to_cmdl) ):
544       print "%s" % (base["byuv"][otyp])
545   # store out
546   for oc in layout[to_cmdl]:
547     print "%s" % (base[oc][otyp]['w']),
548   print "xfer_end"
549   print "}"
550   print ""
551
552 # output code file
553 class_qual = "BC_Xfer::"
554
555 print "#include \"xfer.h\""
556 print ""
557
558 for fr_cmdl in cmodels:
559   ityp = dtype[fr_cmdl]
560   for to_cmdl in cmodels:
561     otyp = dtype[to_cmdl]
562     if( is_specialized(fr_cmdl, to_cmdl) ):
563       print "  void %s();" % (special[(fr_cmdl, to_cmdl)])
564       continue
565     if( ityp is None or otyp is None ): continue
566     gen_xfer_proto("  ", "", fr_cmdl, to_cmdl);
567     print ";"
568 # end of class definition
569 print "};"
570 print ""
571
572 # xfer functions
573 for fr_cmdl in cmodels:
574   for to_cmdl in cmodels:
575     gen_xfer_fn(fr_cmdl, to_cmdl)
576
577 # transfer switch
578 print ""
579 print "void %sxfer()" % class_qual
580 print "{"
581 print "  switch(in_colormodel) {"
582 for fr_cmdl in cmodels:
583   ityp = dtype[fr_cmdl]
584   if( ityp is None ):
585     if( not fr_cmdl in [it[0] for it in special] ): continue
586   print "  case %s:" % (fr_cmdl.upper())
587   print "    switch(out_colormodel) {"
588   for to_cmdl in cmodels:
589     if( is_specialized(fr_cmdl, to_cmdl) ):
590       print "    case %s: %s(); break;" % (to_cmdl.upper(), special[(fr_cmdl, to_cmdl)])
591       continue
592     otyp = dtype[to_cmdl]
593     if( ityp is None or otyp is None ): continue
594     print "    case %s:" % (to_cmdl.upper()),
595     print "xfer_%s_to_%s();  break;" % (fr_cmdl[3:], to_cmdl[3:])
596   print "    }"
597   print "    break;"
598 print "  }"
599 print "}"
600 print ""
601 print "#include \"xfer.C\""
602 print ""
603