2001-11-24 21:07:58 +03:00
|
|
|
//
|
2005-02-25 00:55:12 +03:00
|
|
|
// "$Id$"
|
2001-11-24 21:07:58 +03:00
|
|
|
//
|
|
|
|
// Fl_XPM_Image routines.
|
|
|
|
//
|
2010-11-29 00:06:39 +03:00
|
|
|
// Copyright 1997-2010 by Bill Spitzak and others.
|
2001-11-24 21:07:58 +03:00
|
|
|
//
|
2011-07-19 08:49:30 +04:00
|
|
|
// This library is free software. Distribution and use rights are outlined in
|
|
|
|
// the file "COPYING" which should have been included with this file. If this
|
|
|
|
// file is missing or damaged, see the license at:
|
|
|
|
//
|
|
|
|
// http://www.fltk.org/COPYING.php
|
2001-11-24 21:07:58 +03:00
|
|
|
//
|
2005-04-16 04:13:17 +04:00
|
|
|
// Please report all bugs and problems on the following page:
|
|
|
|
//
|
|
|
|
// http://www.fltk.org/str.php
|
2001-11-24 21:07:58 +03:00
|
|
|
//
|
|
|
|
// Contents:
|
|
|
|
//
|
|
|
|
//
|
|
|
|
|
|
|
|
//
|
|
|
|
// Include necessary header files...
|
|
|
|
//
|
|
|
|
|
|
|
|
#include <FL/Fl.H>
|
|
|
|
#include <FL/Fl_XPM_Image.H>
|
|
|
|
#include <stdio.h>
|
|
|
|
#include <stdlib.h>
|
2008-09-19 21:40:20 +04:00
|
|
|
#include <FL/fl_utf8.h>
|
2002-04-11 15:52:43 +04:00
|
|
|
#include "flstring.h"
|
2001-11-24 21:07:58 +03:00
|
|
|
|
|
|
|
|
|
|
|
//
|
|
|
|
// 'hexdigit()' - Convert a hex digit to an integer.
|
|
|
|
//
|
|
|
|
|
|
|
|
static int hexdigit(int x) { // I - Hex digit...
|
|
|
|
if (isdigit(x)) return x-'0';
|
|
|
|
if (isupper(x)) return x-'A'+10;
|
|
|
|
if (islower(x)) return x-'a'+10;
|
|
|
|
return 20;
|
|
|
|
}
|
|
|
|
|
|
|
|
#define MAXSIZE 2048
|
|
|
|
#define INITIALLINES 256
|
2008-09-14 22:19:41 +04:00
|
|
|
/**
|
|
|
|
The constructor loads the XPM image from the name filename.
|
|
|
|
<P>The destructor free all memory and server resources that are used by
|
|
|
|
the image.
|
|
|
|
*/
|
2001-11-24 21:07:58 +03:00
|
|
|
Fl_XPM_Image::Fl_XPM_Image(const char *name) : Fl_Pixmap((char *const*)0) {
|
|
|
|
FILE *f;
|
|
|
|
|
2008-09-11 03:56:49 +04:00
|
|
|
if ((f = fl_fopen(name, "rb")) == NULL) return;
|
2001-11-24 21:07:58 +03:00
|
|
|
|
|
|
|
// read all the c-strings out of the file:
|
|
|
|
char** new_data = new char *[INITIALLINES];
|
|
|
|
char** temp_data;
|
|
|
|
int malloc_size = INITIALLINES;
|
|
|
|
char buffer[MAXSIZE+20];
|
|
|
|
int i = 0;
|
|
|
|
while (fgets(buffer,MAXSIZE+20,f)) {
|
|
|
|
if (buffer[0] != '\"') continue;
|
|
|
|
char *myp = buffer;
|
|
|
|
char *q = buffer+1;
|
|
|
|
while (*q != '\"' && myp < buffer+MAXSIZE) {
|
|
|
|
if (*q == '\\') switch (*++q) {
|
|
|
|
case '\r':
|
|
|
|
case '\n':
|
2012-04-05 09:12:30 +04:00
|
|
|
if (!fgets(q,(int) (buffer+MAXSIZE+20-q),f)) { /* no problem if we hit EOF */ } break;
|
2001-11-24 21:07:58 +03:00
|
|
|
case 0:
|
|
|
|
break;
|
|
|
|
case 'x': {
|
|
|
|
q++;
|
|
|
|
int n = 0;
|
|
|
|
for (int x = 0; x < 3; x++) {
|
2002-08-09 07:17:30 +04:00
|
|
|
int xd = hexdigit(*q);
|
|
|
|
if (xd > 15) break;
|
|
|
|
n = (n<<4)+xd;
|
2001-11-24 21:07:58 +03:00
|
|
|
q++;
|
|
|
|
}
|
|
|
|
*myp++ = n;
|
|
|
|
} break;
|
|
|
|
default: {
|
|
|
|
int c = *q++;
|
|
|
|
if (c>='0' && c<='7') {
|
|
|
|
c -= '0';
|
|
|
|
for (int x=0; x<2; x++) {
|
2002-08-09 07:17:30 +04:00
|
|
|
int xd = hexdigit(*q);
|
|
|
|
if (xd>7) break;
|
|
|
|
c = (c<<3)+xd;
|
2001-11-24 21:07:58 +03:00
|
|
|
q++;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
*myp++ = c;
|
|
|
|
} break;
|
|
|
|
} else {
|
|
|
|
*myp++ = *q++;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
*myp++ = 0;
|
|
|
|
if (i >= malloc_size) {
|
|
|
|
temp_data = new char *[malloc_size + INITIALLINES];
|
|
|
|
memcpy(temp_data, new_data, sizeof(char *) * malloc_size);
|
|
|
|
delete[] new_data;
|
|
|
|
new_data = temp_data;
|
|
|
|
malloc_size += INITIALLINES;
|
|
|
|
}
|
|
|
|
new_data[i] = new char[myp-buffer+1];
|
|
|
|
memcpy(new_data[i], buffer,myp-buffer);
|
|
|
|
new_data[i][myp-buffer] = 0;
|
|
|
|
i++;
|
|
|
|
}
|
|
|
|
|
|
|
|
fclose(f);
|
|
|
|
|
2001-12-21 23:45:43 +03:00
|
|
|
data((const char **)new_data, i);
|
2002-05-25 06:56:59 +04:00
|
|
|
alloc_data = 1;
|
|
|
|
|
2001-11-24 21:07:58 +03:00
|
|
|
measure();
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
//
|
2005-02-25 00:55:12 +03:00
|
|
|
// End of "$Id$".
|
2001-11-24 21:07:58 +03:00
|
|
|
//
|