14 Image loader for raw files.
16 This is a barebones raw loader...
21 datachannels: the number of channels the file contains
22 storechannels: the bitmap of channels we will read
23 intrl: interlace flag,
24 0 = sample interleaving
26 2 = image interleaving (not implemented)
32 interleave(unsigned char *inbuffer,unsigned char *outbuffer,int rowsize,int channels) {
35 if (inbuffer == outbuffer) return; /* Check if data is already in interleaved format */
36 for (ind=0; ind<rowsize; ind++)
37 for (ch=0; ch<channels; ch++)
38 outbuffer[i++] = inbuffer[rowsize*ch+ind];
43 expandchannels(unsigned char *inbuffer, unsigned char *outbuffer,
44 int xsize, int datachannels, int storechannels) {
46 int copy_chans = storechannels > datachannels ? datachannels : storechannels;
47 if (inbuffer == outbuffer)
48 return; /* Check if data is already in expanded format */
49 for(x = 0; x < xsize; x++) {
50 for (ch = 0; ch < copy_chans; ch++)
51 outbuffer[x*storechannels+ch] = inbuffer[x*datachannels+ch];
52 for (; ch < storechannels; ch++)
53 outbuffer[x*storechannels+ch] = 0;
58 i_readraw_wiol(io_glue *ig, int x, int y, int datachannels, int storechannels, int intrl) {
62 unsigned char *inbuffer;
63 unsigned char *ilbuffer;
64 unsigned char *exbuffer;
66 int inbuflen,ilbuflen,exbuflen;
70 io_glue_commit_types(ig);
71 mm_log((1, "i_readraw(ig %p,x %d,y %d,datachannels %d,storechannels %d,intrl %d)\n",
72 ig, x, y, datachannels, storechannels, intrl));
74 if (intrl != 0 && intrl != 1) {
75 i_push_error(0, "raw_interleave must be 0 or 1");
78 if (storechannels < 1 || storechannels > 4) {
79 i_push_error(0, "raw_storechannels must be between 1 and 4");
83 im = i_img_empty_ch(NULL,x,y,storechannels);
87 inbuflen = im->xsize*datachannels;
89 exbuflen = im->xsize*storechannels;
90 inbuffer = (unsigned char*)mymalloc(inbuflen);
91 mm_log((1,"inbuflen: %d, ilbuflen: %d, exbuflen: %d.\n",inbuflen,ilbuflen,exbuflen));
93 if (intrl==0) ilbuffer = inbuffer;
94 else ilbuffer=mymalloc(inbuflen);
96 if (datachannels==storechannels) exbuffer=ilbuffer;
97 else exbuffer= mymalloc(exbuflen);
100 while( k<im->ysize ) {
101 rc = ig->readcb(ig, inbuffer, inbuflen);
102 if (rc != inbuflen) {
104 i_push_error(0, "error reading file");
106 i_push_error(0, "premature end of file");
109 if (intrl != 0) myfree(ilbuffer);
110 if (datachannels != storechannels) myfree(exbuffer);
113 interleave(inbuffer,ilbuffer,im->xsize,datachannels);
114 expandchannels(ilbuffer,exbuffer,im->xsize,datachannels,storechannels);
115 /* FIXME: Do we ever want to save to a virtual image? */
116 memcpy(&(im->idata[im->xsize*storechannels*k]),exbuffer,exbuflen);
121 if (intrl != 0) myfree(ilbuffer);
122 if (datachannels != storechannels) myfree(exbuffer);
124 i_tags_add(&im->tags, "i_format", 0, "raw", -1, 0);
132 i_writeraw_wiol(i_img* im, io_glue *ig) {
135 io_glue_commit_types(ig);
137 mm_log((1,"writeraw(im %p,ig %p)\n", im, ig));
139 if (im == NULL) { mm_log((1,"Image is empty\n")); return(0); }
141 rc = ig->writecb(ig,im->idata,im->bytes);
142 if (rc != im->bytes) {
143 i_push_error(errno, "Could not write to file");
144 mm_log((1,"i_writeraw: Couldn't write to file\n"));
148 if (im->type == i_direct_type) {
149 /* just save it as 8-bits, maybe support saving higher bit count
151 int line_size = im->xsize * im->channels;
152 unsigned char *data = mymalloc(line_size);
156 while (rc == line_size && y < im->ysize) {
157 i_gsamp(im, 0, im->xsize, y, data, NULL, im->channels);
158 rc = ig->writecb(ig, data, line_size);
161 if (rc != line_size) {
162 i_push_error(errno, "write error");
167 /* paletted image - assumes the caller puts the palette somewhere
170 int line_size = sizeof(i_palidx) * im->xsize;
171 i_palidx *data = mymalloc(sizeof(i_palidx) * im->xsize);
175 while (rc == line_size && y < im->ysize) {
176 i_gpal(im, 0, im->xsize, y, data);
177 rc = ig->writecb(ig, data, line_size);
181 if (rc != line_size) {
182 i_push_error(errno, "write error");