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
|
//
// mxToolKit (c) 1999 by Mete Ciragan
//
// file: mxPcx.cpp
// implementation: all
// last modified: Apr 15 1999, Mete Ciragan
// copyright: The programs and associated files contained in this
// distribution were developed by Mete Ciragan. The programs
// are not in the public domain, but they are freely
// distributable without licensing fees. These programs are
// provided without guarantee or warrantee expressed or
// implied.
//
#include "mxtk/mxPcx.h"
#include <stdio.h>
#include <stdlib.h>
mxImage *
mxPcxRead (const char *filename)
{
FILE *file = fopen (filename, "rb");
if (!file)
return 0;
mxPcxHeader header;
if (fread (&header, sizeof (mxPcxHeader), 1, file) == -1)
{
fclose (file);
return 0;
}
/*
if (header.bitsPerPixel != 8 ||
header.version != 5)
{
fclose (file);
return 0;
}
(void) fseek (file, -769, SEEK_END);
if (fgetc (file) != 12) {
fclose (file);
return NULL;
}
*/
(void) fseek (file, -768, SEEK_END);
int w = header.xmax - header.xmin + 1;
int h = header.ymax - header.ymin + 1;
mxImage *image = new mxImage ();
if (!image->create (w, h, 8))
{
delete image;
fclose (file);
return 0;
}
if (fread ((byte *) image->palette, sizeof (byte), 768, file) == -1)
{
fclose (file);
return 0;
}
(void) fseek(file, sizeof (mxPcxHeader), SEEK_SET);
int ptr = 0;
int ch, rep;
byte *data = (byte *) image->data;
int size = w * h;
while (ptr < size)
{
ch = fgetc(file);
if (ch >= 192)
{
rep = ch - 192;
ch = fgetc(file);
}
else {
rep = 1;
}
while (rep--)
data[ptr++] = (byte)ch;
}
fclose(file);
return image;
}
bool
mxPcxWrite (const char * /*filename*/, mxImage * /*image*/)
{
return false;
}
|