maybe it was just a syntax error?
[mikachu/openbox.git] / render / gradient.c
1 /* -*- indent-tabs-mode: nil; tab-width: 4; c-basic-offset: 4; -*-
2
3    gradient.c for the Openbox window manager
4    Copyright (c) 2003        Ben Jansens
5    Copyright (c) 2003        Derek Foreman
6
7    This program is free software; you can redistribute it and/or modify
8    it under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 2 of the License, or
10    (at your option) any later version.
11
12    This program is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16
17    See the COPYING file for a copy of the GNU General Public License.
18 */
19
20 #include "render.h"
21 #include "gradient.h"
22 #include "color.h"
23 #include <glib.h>
24
25 static void highlight(RrPixel32 *x, RrPixel32 *y, gboolean raised);
26 static void gradient_solid(RrAppearance *l, gint w, gint h);
27 static void gradient_split(RrAppearance *a, gint w, gint h);
28 static void gradient_vertical(RrSurface *sf, gint w, gint h);
29 static void gradient_horizontal(RrSurface *sf, gint w, gint h);
30 static void gradient_osx(RrSurface *sf, gint w, gint h);
31 static void gradient_diagonal(RrSurface *sf, gint w, gint h);
32 static void gradient_crossdiagonal(RrSurface *sf, gint w, gint h);
33 static void gradient_pyramid(RrSurface *sf, gint inw, gint inh);
34
35 void RrRender(RrAppearance *a, gint w, gint h)
36 {
37     RrPixel32 *data = a->surface.pixel_data;
38     RrPixel32 current;
39     guint r,g,b;
40     gint off, x;
41
42     switch (a->surface.grad) {
43     case RR_SURFACE_SOLID:
44         gradient_solid(a, w, h);
45         break;
46     case RR_SURFACE_SPLIT:
47         gradient_split(a, w, h);
48         break;
49     case RR_SURFACE_VERTICAL:
50         gradient_vertical(&a->surface, w, h);
51         break;
52     case RR_SURFACE_HORIZONTAL:
53         gradient_horizontal(&a->surface, w, h);
54         break;
55     case RR_SURFACE_OSX:
56         gradient_osx(&a->surface, w, h);
57         break;
58     case RR_SURFACE_DIAGONAL:
59         gradient_diagonal(&a->surface, w, h);
60         break;
61     case RR_SURFACE_CROSS_DIAGONAL:
62         gradient_crossdiagonal(&a->surface, w, h);
63         break;
64     case RR_SURFACE_PYRAMID:
65         gradient_pyramid(&a->surface, w, h);
66         break;
67     default:
68         g_assert_not_reached(); /* unhandled gradient */
69         return;
70     }
71   
72     if (a->surface.interlaced) {
73         gint i;
74         RrPixel32 *p;
75
76         r = a->surface.interlace_color->r;
77         g = a->surface.interlace_color->g;
78         b = a->surface.interlace_color->b;
79         current = (r << RrDefaultRedOffset)
80             + (g << RrDefaultGreenOffset)
81             + (b << RrDefaultBlueOffset);
82         p = data;
83         for (i = 0; i < h; i += 2, p += w)
84             for (x = 0; x < w; ++x, ++p)
85                 *p = current;
86     }
87
88     if (a->surface.relief == RR_RELIEF_FLAT && a->surface.border) {
89         r = a->surface.border_color->r;
90         g = a->surface.border_color->g;
91         b = a->surface.border_color->b;
92         current = (r << RrDefaultRedOffset)
93             + (g << RrDefaultGreenOffset)
94             + (b << RrDefaultBlueOffset);
95         for (off = 0, x = 0; x < w; ++x, off++) {
96             *(data + off) = current;
97             *(data + off + ((h-1) * w)) = current;
98         }
99         for (off = 0, x = 0; x < h; ++x, off++) {
100             *(data + (off * w)) = current;
101             *(data + (off * w) + w - 1) = current;
102         }
103     }
104
105     if (a->surface.relief != RR_RELIEF_FLAT) {
106         if (a->surface.bevel == RR_BEVEL_1) {
107             for (off = 1, x = 1; x < w - 1; ++x, off++)
108                 highlight(data + off,
109                           data + off + (h-1) * w,
110                           a->surface.relief==RR_RELIEF_RAISED);
111             for (off = 0, x = 0; x < h; ++x, off++)
112                 highlight(data + off * w,
113                           data + off * w + w - 1,
114                           a->surface.relief==RR_RELIEF_RAISED);
115         }
116
117         if (a->surface.bevel == RR_BEVEL_2) {
118             for (off = 2, x = 2; x < w - 2; ++x, off++)
119                 highlight(data + off + w,
120                           data + off + (h-2) * w,
121                           a->surface.relief==RR_RELIEF_RAISED);
122             for (off = 1, x = 1; x < h-1; ++x, off++)
123                 highlight(data + off * w + 1,
124                           data + off * w + w - 2,
125                           a->surface.relief==RR_RELIEF_RAISED);
126         }
127     }
128 }
129
130 static void highlight(RrPixel32 *x, RrPixel32 *y, gboolean raised)
131 {
132     gint r, g, b;
133
134     RrPixel32 *up, *down;
135     if (raised) {
136         up = x;
137         down = y;
138     } else {
139         up = y;
140         down = x;
141     }
142     r = (*up >> RrDefaultRedOffset) & 0xFF;
143     r += r >> 1;
144     g = (*up >> RrDefaultGreenOffset) & 0xFF;
145     g += g >> 1;
146     b = (*up >> RrDefaultBlueOffset) & 0xFF;
147     b += b >> 1;
148     if (r > 0xFF) r = 0xFF;
149     if (g > 0xFF) g = 0xFF;
150     if (b > 0xFF) b = 0xFF;
151     *up = (r << RrDefaultRedOffset) + (g << RrDefaultGreenOffset)
152         + (b << RrDefaultBlueOffset);
153   
154     r = (*down >> RrDefaultRedOffset) & 0xFF;
155     r = (r >> 1) + (r >> 2);
156     g = (*down >> RrDefaultGreenOffset) & 0xFF;
157     g = (g >> 1) + (g >> 2);
158     b = (*down >> RrDefaultBlueOffset) & 0xFF;
159     b = (b >> 1) + (b >> 2);
160     *down = (r << RrDefaultRedOffset) + (g << RrDefaultGreenOffset)
161         + (b << RrDefaultBlueOffset);
162 }
163
164 static void create_bevel_colors(RrAppearance *l)
165 {
166     gint r, g, b;
167
168     /* light color */
169     r = l->surface.primary->r;
170     r += r >> 1;
171     g = l->surface.primary->g;
172     g += g >> 1;
173     b = l->surface.primary->b;
174     b += b >> 1;
175     if (r > 0xFF) r = 0xFF;
176     if (g > 0xFF) g = 0xFF;
177     if (b > 0xFF) b = 0xFF;
178     g_assert(!l->surface.bevel_light);
179     l->surface.bevel_light = RrColorNew(l->inst, r, g, b);
180
181     /* dark color */
182     r = l->surface.primary->r;
183     r = (r >> 1) + (r >> 2);
184     g = l->surface.primary->g;
185     g = (g >> 1) + (g >> 2);
186     b = l->surface.primary->b;
187     b = (b >> 1) + (b >> 2);
188     g_assert(!l->surface.bevel_dark);
189     l->surface.bevel_dark = RrColorNew(l->inst, r, g, b);
190 }
191
192 static void gradient_solid(RrAppearance *l, gint w, gint h) 
193 {
194     RrPixel32 pix;
195     gint i, a, b;
196     RrSurface *sp = &l->surface;
197     gint left = 0, top = 0, right = w - 1, bottom = h - 1;
198
199     pix = (sp->primary->r << RrDefaultRedOffset)
200         + (sp->primary->g << RrDefaultGreenOffset)
201         + (sp->primary->b << RrDefaultBlueOffset);
202
203     for (a = 0; a < w; a++)
204         for (b = 0; b < h; b++)
205             sp->pixel_data[a + b * w] = pix;
206
207     XFillRectangle(RrDisplay(l->inst), l->pixmap, RrColorGC(sp->primary),
208                    0, 0, w, h);
209
210     if (sp->interlaced) {
211         for (i = 0; i < h; i += 2)
212             XDrawLine(RrDisplay(l->inst), l->pixmap,
213                       RrColorGC(sp->interlace_color),
214                       0, i, w, i);
215     }
216
217     switch (sp->relief) {
218     case RR_RELIEF_RAISED:
219         if (!sp->bevel_dark)
220             create_bevel_colors(l);
221
222         switch (sp->bevel) {
223         case RR_BEVEL_1:
224             XDrawLine(RrDisplay(l->inst), l->pixmap, RrColorGC(sp->bevel_dark),
225                       left, bottom, right, bottom);
226             XDrawLine(RrDisplay(l->inst), l->pixmap, RrColorGC(sp->bevel_dark),
227                       right, bottom, right, top);
228                 
229             XDrawLine(RrDisplay(l->inst), l->pixmap,RrColorGC(sp->bevel_light),
230                       left, top, right, top);
231             XDrawLine(RrDisplay(l->inst), l->pixmap,RrColorGC(sp->bevel_light),
232                       left, bottom, left, top);
233             break;
234         case RR_BEVEL_2:
235             XDrawLine(RrDisplay(l->inst), l->pixmap, RrColorGC(sp->bevel_dark),
236                       left + 1, bottom - 2, right - 2, bottom - 2);
237             XDrawLine(RrDisplay(l->inst), l->pixmap, RrColorGC(sp->bevel_dark),
238                       right - 2, bottom - 2, right - 2, top + 1);
239
240             XDrawLine(RrDisplay(l->inst), l->pixmap,RrColorGC(sp->bevel_light),
241                       left + 1, top + 1, right - 2, top + 1);
242             XDrawLine(RrDisplay(l->inst), l->pixmap,RrColorGC(sp->bevel_light),
243                       left + 1, bottom - 2, left + 1, top + 1);
244             break;
245         default:
246             g_assert_not_reached(); /* unhandled BevelType */
247         }
248         break;
249     case RR_RELIEF_SUNKEN:
250         if (!sp->bevel_dark)
251             create_bevel_colors(l);
252
253         switch (sp->bevel) {
254         case RR_BEVEL_1:
255             XDrawLine(RrDisplay(l->inst), l->pixmap,RrColorGC(sp->bevel_light),
256                       left, bottom, right, bottom);
257             XDrawLine(RrDisplay(l->inst), l->pixmap,RrColorGC(sp->bevel_light),
258                       right, bottom, right, top);
259       
260             XDrawLine(RrDisplay(l->inst), l->pixmap, RrColorGC(sp->bevel_dark),
261                       left, top, right, top);
262             XDrawLine(RrDisplay(l->inst), l->pixmap, RrColorGC(sp->bevel_dark),
263                       left, bottom, left, top);
264             break;
265         case RR_BEVEL_2:
266             XDrawLine(RrDisplay(l->inst), l->pixmap,RrColorGC(sp->bevel_light),
267                       left + 1, bottom - 2, right - 2, bottom - 2);
268             XDrawLine(RrDisplay(l->inst), l->pixmap,RrColorGC(sp->bevel_light),
269                       right - 2, bottom - 2, right - 2, top + 1);
270       
271             XDrawLine(RrDisplay(l->inst), l->pixmap, RrColorGC(sp->bevel_dark),
272                       left + 1, top + 1, right - 2, top + 1);
273             XDrawLine(RrDisplay(l->inst), l->pixmap, RrColorGC(sp->bevel_dark),
274                       left + 1, bottom - 2, left + 1, top + 1);
275
276             break;
277         default:
278             g_assert_not_reached(); /* unhandled BevelType */
279         }
280         break;
281     case RR_RELIEF_FLAT:
282         if (sp->border) {
283             XDrawRectangle(RrDisplay(l->inst), l->pixmap,
284                            RrColorGC(sp->border_color),
285                            left, top, right, bottom);
286         }
287         break;
288     default:  
289         g_assert_not_reached(); /* unhandled ReliefType */
290     }
291 }
292
293 /* * * * * * * * * * * * * * GRADIENT MAGIC WOOT * * * * * * * * * * * * * * */
294
295 #define VARS(x)                                                     \
296     guint color##x[3];                                       \
297     gint len##x, cdelta##x[3], error##x[3] = { 0, 0, 0 }, inc##x[3]; \
298     gboolean bigslope##x[3] /* color slope > 1 */
299
300 #define SETUP(x, from, to, w)         \
301     len##x = w;                       \
302                                       \
303     color##x[0] = from->r;            \
304     color##x[1] = from->g;            \
305     color##x[2] = from->b;            \
306                                       \
307     cdelta##x[0] = to->r - from->r;   \
308     cdelta##x[1] = to->g - from->g;   \
309     cdelta##x[2] = to->b - from->b;   \
310                                       \
311     if (cdelta##x[0] < 0) {           \
312         cdelta##x[0] = -cdelta##x[0]; \
313         inc##x[0] = -1;               \
314     } else                            \
315         inc##x[0] = 1;                \
316     if (cdelta##x[1] < 0) {           \
317         cdelta##x[1] = -cdelta##x[1]; \
318         inc##x[1] = -1;               \
319     } else                            \
320         inc##x[1] = 1;                \
321     if (cdelta##x[2] < 0) {           \
322         cdelta##x[2] = -cdelta##x[2]; \
323         inc##x[2] = -1;               \
324     } else                            \
325         inc##x[2] = 1;                \
326     bigslope##x[0] = cdelta##x[0] > w;\
327     bigslope##x[1] = cdelta##x[1] > w;\
328     bigslope##x[2] = cdelta##x[2] > w
329
330 #define COLOR_RR(x, c)                       \
331     c->r = color##x[0];                      \
332     c->g = color##x[1];                      \
333     c->b = color##x[2]
334
335 #define COLOR(x)                             \
336     ((color##x[0] << RrDefaultRedOffset) +   \
337      (color##x[1] << RrDefaultGreenOffset) + \
338      (color##x[2] << RrDefaultBlueOffset))
339
340 #define INCREMENT(x, i) \
341     (inc##x[i])
342
343 #define NEXT(x)                                           \
344 {                                                         \
345     gint i;                                                \
346     for (i = 2; i >= 0; --i) {                            \
347         if (!cdelta##x[i]) continue;                      \
348                                                           \
349         if (!bigslope##x[i]) {                            \
350             /* Y (color) is dependant on X */             \
351             error##x[i] += cdelta##x[i];                  \
352             if ((error##x[i] << 1) >= len##x) {           \
353                 color##x[i] += INCREMENT(x, i);           \
354                 error##x[i] -= len##x;                    \
355             }                                             \
356         } else {                                          \
357             /* X is dependant on Y (color) */             \
358             while (1) {                                   \
359                 color##x[i] += INCREMENT(x, i);           \
360                 error##x[i] += len##x;                    \
361                 if ((error##x[i] << 1) >= cdelta##x[i]) { \
362                     error##x[i] -= cdelta##x[i];          \
363                     break;                                \
364                 }                                         \
365             }                                             \
366         }                                                 \
367     }                                                     \
368 }
369
370 static void gradient_split(RrAppearance *a, gint w, gint h)
371 {
372     gint x, y1, y3, r, g, b;
373     RrSurface *sf = &a->surface;
374     RrPixel32 *data = sf->pixel_data;
375     RrPixel32 current;
376     RrColor *primary_light, *secondary_light;
377
378     r = sf->primary->r;
379     r += r >> 2;
380     g = sf->primary->g;
381     g += g >> 2;
382     b = sf->primary->b;
383     b += b >> 2;
384     if (r > 0xFF) r = 0xFF;
385     if (g > 0xFF) g = 0xFF;
386     if (b > 0xFF) b = 0xFF;
387       primary_light = RrColorNew(a->inst, r, g, b);
388
389     r = sf->secondary->r;
390     r += r >> 4;
391     g = sf->secondary->g;
392     g += g >> 4;
393     b = sf->secondary->b;
394     b += b >> 4;
395     if (r > 0xFF) r = 0xFF;
396     if (g > 0xFF) g = 0xFF;
397     if (b > 0xFF) b = 0xFF;
398     secondary_light = RrColorNew(a->inst, r, g, b);
399
400     VARS(y1);
401     SETUP(y1, primary_light, sf->primary, (h / 2) -1);
402   
403     VARS(y3);
404     SETUP(y3, sf->secondary, secondary_light,  (h / 2) -1);
405
406     for (y1 = h - 1; y1 > (h / 2) -1; --y1) {  /* 0 -> h-1 */
407         current = COLOR(y1);
408         for (x = w - 1; x >= 0; --x)  /* 0 -> w */
409             *(data++) = current;
410
411         NEXT(y1);
412     }
413
414     
415     for (y3 = (h / 2) - 1; y3 > 0; --y3) {
416         current = COLOR(y3);
417         for (x = w - 1; x >= 0; --x)
418             *(data++) = current;
419
420         NEXT(y3);
421     }
422
423     current = COLOR(y3);
424     for (x = w - 1; x >= 0; --x)  /* 0 -> w */
425         *(data++) = current;
426
427     RrColorFree(primary_light);
428     RrColorFree(secondary_light);
429 }
430
431 static void gradient_horizontal(RrSurface *sf, gint w, gint h)
432 {
433     gint x, y;
434     RrPixel32 *data = sf->pixel_data, *datav;
435     RrPixel32 current;
436
437     VARS(x);
438     SETUP(x, sf->primary, sf->secondary, w);
439
440     for (x = w - 1; x > 0; --x) {  /* 0 -> w-1 */
441         current = COLOR(x);
442         datav = data;
443         for (y = h - 1; y >= 0; --y) {  /* 0 -> h */
444             *datav = current;
445             datav += w;
446         }
447         ++data;
448
449         NEXT(x);
450     }
451     current = COLOR(x);
452     for (y = h - 1; y >= 0; --y)  /* 0 -> h */
453         *(data + y * w) = current;
454 }
455
456 static void gradient_osx(RrSurface *sf, gint w, gint h)
457 {
458     gint x, y;
459     RrPixel32 *data = sf->pixel_data, *datav;
460     RrPixel32 current;
461
462     VARS(x);
463     SETUP(x, sf->primary, sf->secondary, w/2);
464
465     for (x = w - 1; x > w/2-1; --x) {  /* 0 -> w-1 */
466         current = COLOR(x);
467         datav = data;
468         for (y = h - 1; y >= 0; --y) {  /* 0 -> h */
469             *datav = current;
470             datav += w;
471         }
472         ++data;
473
474         NEXT(x);
475     }
476     SETUP(x, sf->secondary, sf->primary, w/2);
477     for (x = w/2 - 1; x > 0; --x) {  /* 0 -> w-1 */
478         current = COLOR(x);
479         datav = data;
480         for (y = h - 1; y >= 0; --y) {  /* 0 -> h */
481             *datav = current;
482             datav += w;
483         }
484         ++data;
485
486         NEXT(x);
487     }
488     current = COLOR(x);
489     for (y = h - 1; y >= 0; --y)  /* 0 -> h */
490         *(data + y * w) = current;
491 }
492
493 static void gradient_vertical(RrSurface *sf, gint w, gint h)
494 {
495     gint x, y;
496     RrPixel32 *data = sf->pixel_data;
497     RrPixel32 current;
498
499     VARS(y);
500     SETUP(y, sf->primary, sf->secondary, h);
501
502     for (y = h - 1; y > 0; --y) {  /* 0 -> h-1 */
503         current = COLOR(y);
504         for (x = w - 1; x >= 0; --x)  /* 0 -> w */
505             *(data++) = current;
506
507         NEXT(y);
508     }
509     current = COLOR(y);
510     for (x = w - 1; x >= 0; --x)  /* 0 -> w */
511         *(data++) = current;
512 }
513
514
515 static void gradient_diagonal(RrSurface *sf, gint w, gint h)
516 {
517     gint x, y;
518     RrPixel32 *data = sf->pixel_data;
519     RrColor left, right;
520     RrColor extracorner;
521
522     VARS(lefty);
523     VARS(righty);
524     VARS(x);
525
526     extracorner.r = (sf->primary->r + sf->secondary->r) / 2;
527     extracorner.g = (sf->primary->g + sf->secondary->g) / 2;
528     extracorner.b = (sf->primary->b + sf->secondary->b) / 2;
529
530     SETUP(lefty, sf->primary, (&extracorner), h);
531     SETUP(righty, (&extracorner), sf->secondary, h);
532
533     for (y = h - 1; y > 0; --y) {  /* 0 -> h-1 */
534         COLOR_RR(lefty, (&left));
535         COLOR_RR(righty, (&right));
536
537         SETUP(x, (&left), (&right), w);
538
539         for (x = w - 1; x > 0; --x) {  /* 0 -> w-1 */
540             *(data++) = COLOR(x);
541
542             NEXT(x);
543         }
544         *(data++) = COLOR(x);
545
546         NEXT(lefty);
547         NEXT(righty);
548     }
549     COLOR_RR(lefty, (&left));
550     COLOR_RR(righty, (&right));
551
552     SETUP(x, (&left), (&right), w);
553
554     for (x = w - 1; x > 0; --x) {  /* 0 -> w-1 */
555         *(data++) = COLOR(x);
556         
557         NEXT(x);
558     }
559     *data = COLOR(x);
560 }
561
562 static void gradient_crossdiagonal(RrSurface *sf, gint w, gint h)
563 {
564     gint x, y;
565     RrPixel32 *data = sf->pixel_data;
566     RrColor left, right;
567     RrColor extracorner;
568
569     VARS(lefty);
570     VARS(righty);
571     VARS(x);
572
573     extracorner.r = (sf->primary->r + sf->secondary->r) / 2;
574     extracorner.g = (sf->primary->g + sf->secondary->g) / 2;
575     extracorner.b = (sf->primary->b + sf->secondary->b) / 2;
576
577     SETUP(lefty, (&extracorner), sf->secondary, h);
578     SETUP(righty, sf->primary, (&extracorner), h);
579
580     for (y = h - 1; y > 0; --y) {  /* 0 -> h-1 */
581         COLOR_RR(lefty, (&left));
582         COLOR_RR(righty, (&right));
583
584         SETUP(x, (&left), (&right), w);
585
586         for (x = w - 1; x > 0; --x) {  /* 0 -> w-1 */
587             *(data++) = COLOR(x);
588
589             NEXT(x);
590         }
591         *(data++) = COLOR(x);
592
593         NEXT(lefty);
594         NEXT(righty);
595     }
596     COLOR_RR(lefty, (&left));
597     COLOR_RR(righty, (&right));
598
599     SETUP(x, (&left), (&right), w);
600
601     for (x = w - 1; x > 0; --x) {  /* 0 -> w-1 */
602         *(data++) = COLOR(x);
603         
604         NEXT(x);
605     }
606     *data = COLOR(x);
607 }
608
609 static void gradient_pyramid(RrSurface *sf, gint inw, gint inh)
610 {
611     gint x, y, w = (inw >> 1) + 1, h = (inh >> 1) + 1;
612     RrPixel32 *data = sf->pixel_data;
613     RrPixel32 *end = data + inw*inh - 1;
614     RrPixel32 current;
615     RrColor left, right;
616     RrColor extracorner;
617
618     VARS(lefty);
619     VARS(righty);
620     VARS(x);
621
622     extracorner.r = (sf->primary->r + sf->secondary->r) / 2;
623     extracorner.g = (sf->primary->g + sf->secondary->g) / 2;
624     extracorner.b = (sf->primary->b + sf->secondary->b) / 2;
625
626     SETUP(lefty, (&extracorner), sf->secondary, h);
627     SETUP(righty, sf->primary, (&extracorner), h);
628
629     for (y = h - 1; y > 0; --y) {  /* 0 -> h-1 */
630         COLOR_RR(lefty, (&left));
631         COLOR_RR(righty, (&right));
632
633         SETUP(x, (&left), (&right), w);
634
635         for (x = w - 1; x > 0; --x) {  /* 0 -> w-1 */
636             current = COLOR(x);
637             *(data+x) = current;
638             *(data+inw-x) = current;
639             *(end-x) = current;
640             *(end-(inw-x)) = current;
641
642             NEXT(x);
643         }
644         current = COLOR(x);
645         *(data+x) = current;
646         *(data+inw-x) = current;
647         *(end-x) = current;
648         *(end-(inw-x)) = current;
649
650         data+=inw;
651         end-=inw;
652
653         NEXT(lefty);
654         NEXT(righty);
655     }
656     COLOR_RR(lefty, (&left));
657     COLOR_RR(righty, (&right));
658
659     SETUP(x, (&left), (&right), w);
660
661     for (x = w - 1; x > 0; --x) {  /* 0 -> w-1 */
662         current = COLOR(x);
663         *(data+x) = current;
664         *(data+inw-x) = current;
665         *(end-x) = current;
666         *(end-(inw-x)) = current;
667         
668         NEXT(x);
669     }
670     current = COLOR(x);
671     *(data+x) = current;
672     *(data+inw-x) = current;
673     *(end-x) = current;
674     *(end-(inw-x)) = current;
675 }
676