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
  
58
  
59
  
60
  
61
  
62
  
63
  
64
  
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
  
111
  
112
  
113
  
114
  
115
  
116
  
117
  
118
  
119
  
120
  
121
  
122
  
123
  
/* template for operator layer row function */ 
 
static void LM_FUNC(rgb_group *s,rgb_group *l,rgb_group *d, 
                    rgb_group *sa,rgb_group *la,rgb_group *da, 
                    int len,double alpha) 
{ 
#ifndef L_LOGIC 
   if (alpha==0.0) 
   { 
      MEMCPY(d,s,sizeof(rgb_group)*len); 
      MEMCPY(da,sa,sizeof(rgb_group)*len); 
      return;  
   } 
   else if (alpha==1.0) 
   { 
      if (!la)  /* no layer alpha => full opaque */ 
         while (len--) 
         { 
            d->r=L_TRUNC(L_OPER(s->r,l->r)); 
            d->g=L_TRUNC(L_OPER(s->g,l->g)); 
            d->b=L_TRUNC(L_OPER(s->b,l->b)); 
            *da=white; 
            l++; s++; sa++; da++; d++; 
         } 
      else 
         while (len--) 
         { 
            if (la->r==COLORMAX && la->g==COLORMAX && la->b==COLORMAX) 
            { 
               d->r=L_TRUNC(L_OPER(s->r,l->r)); 
               d->g=L_TRUNC(L_OPER(s->g,l->g)); 
               d->b=L_TRUNC(L_OPER(s->b,l->b)); 
#ifdef L_USE_SA 
             *da=*sa; 
#else 
             *da=white; 
#endif 
          } 
            else if (la->r==0 && la->g==0 && la->b==0) 
            { 
               *d=*s; 
               *da=*sa; 
            } 
            else 
            { 
               d->r=L_TRUNC(L_OPER(s->r,l->r)); 
               ALPHA_ADD(s,d,d,sa,la,da,r); 
               d->g=L_TRUNC(L_OPER(s->g,l->g)); 
               ALPHA_ADD(s,d,d,sa,la,da,g); 
               d->b=L_TRUNC(L_OPER(s->b,l->b)); 
               ALPHA_ADD(s,d,d,sa,la,da,b); 
#ifdef L_USE_SA 
             *da=*sa; 
#endif 
          } 
            l++; s++; la++; sa++; da++; d++; 
         } 
   } 
   else 
   { 
      if (!la)  /* no layer alpha => full opaque */ 
         while (len--) 
         { 
            d->r=L_TRUNC(L_OPER(s->r,l->r)); 
            ALPHA_ADD_V_NOLA(s,d,d,sa,da,alpha,r); 
            d->g=L_TRUNC(L_OPER(s->g,l->g)); 
            ALPHA_ADD_V_NOLA(s,d,d,sa,da,alpha,g); 
            d->b=L_TRUNC(L_OPER(s->b,l->b)); 
            ALPHA_ADD_V_NOLA(s,d,d,sa,da,alpha,b); 
#ifdef L_USE_SA 
          *da=*sa; 
#endif 
          l++; s++; sa++; da++; d++; 
         } 
      else 
         while (len--) 
         { 
            d->r=L_TRUNC(L_OPER(s->r,l->r)); 
            ALPHA_ADD_V(s,d,d,sa,la,da,alpha,r); 
            d->g=L_TRUNC(L_OPER(s->g,l->g)); 
            ALPHA_ADD_V(s,d,d,sa,la,da,alpha,g); 
            d->b=L_TRUNC(L_OPER(s->b,l->b)); 
            ALPHA_ADD_V(s,d,d,sa,la,da,alpha,b); 
#ifdef L_USE_SA 
          *da=*sa; 
#endif 
          l++; s++; la++; sa++; da++; d++; 
         } 
   } 
#else /* L_LOGIC */ 
   if (alpha==0.0) 
   { 
      smear_color(d,L_TRANS,len); 
      smear_color(da,L_TRANS,len); 
      return;  
   } 
   else  
   { 
      if (!la)  /* no layer alpha => full opaque */ 
         while (len--) 
         { 
            *da=*d=L_LOGIC(L_OPER(s->r,l->r), 
                           L_OPER(s->g,l->g), 
                           L_OPER(s->b,l->b)); 
            l++; s++; sa++; da++; d++; 
         } 
      else 
         while (len--) 
         { 
            if (la->r==0 && la->g==0 && la->b==0) 
               *d=*da=L_TRANS; 
            else 
               *da=*d=L_LOGIC(L_OPER(s->r,l->r), 
                              L_OPER(s->g,l->g), 
                              L_OPER(s->b,l->b)); 
            l++; s++; la++; sa++; da++; d++; 
         } 
   } 
#endif /* L_LOGIC */ 
}