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
|
#include <Xw_Extension.h>
/* ifdef then trace on */
#ifdef TRACE
/*
#define TRACE_PUT_PIXEL
*/
#endif
/*
XW_STATUS Xw_put_pixel (aimage,x,y,index,npixel):
XW_EXT_IMAGEDATA *aimage
int x,y Pixel position
int index Pixel color index
int npixel Pixel number to fill with the same color index
Fill an existing IMAGE created by Xw_open_image from Pixel index
returns XW_ERROR if Extended Image is not defined
or Color is not defined
or Pixel position is wrong (Outside of image)
returns XW_SUCCESS if successful
*/
#ifdef XW_PROTOTYPE
XW_STATUS Xw_put_pixel (void *aimage,int x,int y,int index,int npixel)
#else
XW_STATUS Xw_put_pixel (aimage,x,y,index,npixel)
void *aimage ;
int x,y,index,npixel ;
#endif /*XW_PROTOTYPE*/
{
XW_EXT_IMAGEDATA *pimage = (XW_EXT_IMAGEDATA*) aimage ;
register union {
char *data ;
unsigned char *cdata ;
unsigned short *sdata ;
unsigned long *ldata ;
} data ;
unsigned long lpixel ;
register int np ;
int fpixel,epixel,simage ;
XImage *pximage;
if( !Xw_isdefine_image(pimage) ) {
/*ERROR*Bad EXT_IMAGEDATA Address*/
Xw_set_error(25,"Xw_put_pixel",pimage) ;
return (XW_ERROR) ;
}
if( !Xw_isdefine_color(_ICOLORMAP,index) ) {
/*ERROR*Bad Defined Color at index*/
Xw_set_error(41,"Xw_put_pixel",&index) ;
return (XW_ERROR) ;
}
pximage = (_ZIMAGE) ? _ZIMAGE : _IIMAGE;
simage = pximage->height*pximage->width ;
fpixel = x*pximage->width + y ;
epixel = fpixel + npixel - 1 ;
if( x < 0 || y < 0 || (epixel >= simage) ) {
/*WARNING*Bad PIXEL position*/
Xw_set_error(47,"Xw_put_pixel",&simage) ;
return (XW_ERROR) ;
}
lpixel = _ICOLORMAP->pixels[index] ;
switch (pximage->bitmap_pad) {
case 8 :
{ register unsigned char cpixel = (unsigned char) lpixel ;
data.data = pximage->data + (fpixel) ;
for( np=npixel ; np ; --np ) *data.cdata++ = cpixel ;
}
break ;
case 16 :
{ register unsigned short spixel = (unsigned short) lpixel ;
data.data = pximage->data + (fpixel<<1) ;
for( np=npixel ; np ; --np ) *data.sdata++ = spixel ;
}
break ;
case 32 :
data.data = pximage->data + (fpixel<<2) ;
for( np=npixel ; np ; --np ) *data.ldata++ = lpixel ;
}
#ifdef TRACE_PUT_PIXEL
printf (" Xw_put_pixel(%x,%d,%d,%d,%d)\n",
pimage,x,y,index,npixel) ;
#endif
return (XW_SUCCESS);
}
|
