1998-10-21 20:29:01 +04:00
|
|
|
//
|
2005-02-06 19:28:36 +03:00
|
|
|
// "$Id$"
|
1998-10-21 20:29:01 +04:00
|
|
|
//
|
2015-12-18 21:56:58 +03:00
|
|
|
// Pixmap (and other images) label support for the Fast Light Tool Kit (FLTK).
|
1998-10-21 20:29:01 +04:00
|
|
|
//
|
2015-12-18 21:56:58 +03:00
|
|
|
// Copyright 1998-2015 by Bill Spitzak and others.
|
1998-10-21 20:29:01 +04: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
|
1998-10-21 20:29:01 +04: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
|
1998-10-21 20:29:01 +04:00
|
|
|
//
|
1998-10-06 22:21:25 +04:00
|
|
|
|
|
|
|
#include <FL/Fl.H>
|
|
|
|
#include <FL/Fl_Widget.H>
|
1998-12-06 18:09:22 +03:00
|
|
|
#include "Fl_Type.h"
|
|
|
|
#include "Fluid_Image.h"
|
2002-05-16 16:47:44 +04:00
|
|
|
#include "../src/flstring.h"
|
1998-10-06 22:21:25 +04:00
|
|
|
#include <stdio.h>
|
|
|
|
#include <errno.h>
|
1999-03-04 21:45:31 +03:00
|
|
|
#include <stdlib.h>
|
2015-12-18 21:56:58 +03:00
|
|
|
#include <stdarg.h>
|
1998-10-06 22:21:25 +04:00
|
|
|
#include <FL/filename.H>
|
|
|
|
|
2015-12-18 21:56:58 +03:00
|
|
|
extern void goto_source_dir(); // in fluid.cxx
|
|
|
|
extern void leave_source_dir(); // in fluid.cxx
|
1998-10-06 22:21:25 +04:00
|
|
|
|
2001-11-26 01:51:34 +03:00
|
|
|
void Fluid_Image::image(Fl_Widget *o) {
|
2005-03-20 03:51:02 +03:00
|
|
|
if (o->window() != o) o->image(img);
|
1998-10-06 22:21:25 +04:00
|
|
|
}
|
|
|
|
|
2001-11-26 01:51:34 +03:00
|
|
|
void Fluid_Image::deimage(Fl_Widget *o) {
|
2005-03-20 03:51:02 +03:00
|
|
|
if (o->window() != o) o->deimage(img);
|
1998-10-06 22:21:25 +04:00
|
|
|
}
|
|
|
|
|
2001-11-26 01:51:34 +03:00
|
|
|
static int pixmap_header_written = 0;
|
|
|
|
static int bitmap_header_written = 0;
|
|
|
|
static int image_header_written = 0;
|
2010-02-18 14:38:42 +03:00
|
|
|
static int jpeg_header_written = 0;
|
2001-09-29 10:20:15 +04:00
|
|
|
|
2001-11-26 01:51:34 +03:00
|
|
|
void Fluid_Image::write_static() {
|
|
|
|
if (!img) return;
|
2015-12-18 21:56:58 +03:00
|
|
|
const char *idata_name = unique_id(this, "idata", fl_filename_name(name()), 0);
|
|
|
|
function_name_ = unique_id(this, "image", fl_filename_name(name()), 0);
|
2001-11-26 01:51:34 +03:00
|
|
|
if (img->count() > 1) {
|
|
|
|
// Write Pixmap data...
|
|
|
|
write_c("\n");
|
|
|
|
if (pixmap_header_written != write_number) {
|
|
|
|
write_c("#include <FL/Fl_Pixmap.H>\n");
|
|
|
|
pixmap_header_written = write_number;
|
1998-10-06 22:21:25 +04:00
|
|
|
}
|
2015-12-18 21:56:58 +03:00
|
|
|
write_c("static const char *%s[] = {\n", idata_name);
|
2001-11-26 01:51:34 +03:00
|
|
|
write_cstring(img->data()[0], strlen(img->data()[0]));
|
|
|
|
|
|
|
|
int i;
|
|
|
|
int ncolors, chars_per_color;
|
|
|
|
sscanf(img->data()[0], "%*d%*d%d%d", &ncolors, &chars_per_color);
|
|
|
|
|
|
|
|
if (ncolors < 0) {
|
|
|
|
write_c(",\n");
|
|
|
|
write_cstring(img->data()[1], ncolors * -4);
|
|
|
|
i = 2;
|
|
|
|
} else {
|
|
|
|
for (i = 1; i <= ncolors; i ++) {
|
|
|
|
write_c(",\n");
|
|
|
|
write_cstring(img->data()[i], strlen(img->data()[i]));
|
2000-06-16 11:08:16 +04:00
|
|
|
}
|
|
|
|
}
|
2001-11-26 01:51:34 +03:00
|
|
|
for (; i < img->count(); i ++) {
|
|
|
|
write_c(",\n");
|
|
|
|
write_cstring(img->data()[i], img->w() * chars_per_color);
|
1998-10-06 22:21:25 +04:00
|
|
|
}
|
2001-11-26 01:51:34 +03:00
|
|
|
write_c("\n};\n");
|
2015-12-18 21:56:58 +03:00
|
|
|
write_initializer("Fl_Pixmap", "%s", idata_name);
|
2001-11-26 01:51:34 +03:00
|
|
|
} else if (img->d() == 0) {
|
|
|
|
// Write Bitmap data...
|
|
|
|
write_c("\n");
|
|
|
|
if (bitmap_header_written != write_number) {
|
|
|
|
write_c("#include <FL/Fl_Bitmap.H>\n");
|
|
|
|
bitmap_header_written = write_number;
|
1998-10-06 22:21:25 +04:00
|
|
|
}
|
2015-12-18 21:56:58 +03:00
|
|
|
write_c("static const unsigned char %s[] =\n", idata_name);
|
2005-10-26 13:08:01 +04:00
|
|
|
write_cdata(img->data()[0], ((img->w() + 7) / 8) * img->h());
|
2001-11-26 01:51:34 +03:00
|
|
|
write_c(";\n");
|
2015-12-18 21:56:58 +03:00
|
|
|
write_initializer( "Fl_Bitmap", "%s, %d, %d", idata_name, img->w(), img->h());
|
2010-02-18 14:38:42 +03:00
|
|
|
} else if (strcmp(fl_filename_ext(name()), ".jpg")==0) {
|
|
|
|
// Write jpeg image data...
|
|
|
|
write_c("\n");
|
|
|
|
if (jpeg_header_written != write_number) {
|
|
|
|
write_c("#include <FL/Fl_JPEG_Image.H>\n");
|
|
|
|
jpeg_header_written = write_number;
|
|
|
|
}
|
2015-12-18 21:56:58 +03:00
|
|
|
write_c("static const unsigned char %s[] =\n", idata_name);
|
2014-10-05 15:56:06 +04:00
|
|
|
|
2010-11-18 23:00:01 +03:00
|
|
|
FILE *f = fl_fopen(name(), "rb");
|
2010-02-18 14:38:42 +03:00
|
|
|
if (!f) {
|
|
|
|
// message = "Can't include binary file. Can't open";
|
|
|
|
} else {
|
|
|
|
fseek(f, 0, SEEK_END);
|
|
|
|
size_t nData = ftell(f);
|
|
|
|
fseek(f, 0, SEEK_SET);
|
|
|
|
if (nData) {
|
|
|
|
char *data = (char*)calloc(nData, 1);
|
2010-10-29 01:47:01 +04:00
|
|
|
if (fread(data, nData, 1, f)==0) { /* ignore */ }
|
2010-02-18 14:38:42 +03:00
|
|
|
write_cdata(data, nData);
|
|
|
|
free(data);
|
|
|
|
}
|
|
|
|
fclose(f);
|
|
|
|
}
|
|
|
|
|
|
|
|
write_c(";\n");
|
2015-12-18 21:56:58 +03:00
|
|
|
write_initializer("Fl_JPEG_Image", "\"%s\", %s", fl_filename_name(name()), idata_name);
|
2001-11-26 01:51:34 +03:00
|
|
|
} else {
|
|
|
|
// Write image data...
|
|
|
|
write_c("\n");
|
|
|
|
if (image_header_written != write_number) {
|
|
|
|
write_c("#include <FL/Fl_Image.H>\n");
|
|
|
|
image_header_written = write_number;
|
2015-12-18 21:56:58 +03:00
|
|
|
}
|
|
|
|
write_c("static const unsigned char %s[] =\n", idata_name);
|
2005-10-26 13:08:01 +04:00
|
|
|
write_cdata(img->data()[0], (img->w() * img->d() + img->ld()) * img->h());
|
2001-11-26 01:51:34 +03:00
|
|
|
write_c(";\n");
|
2015-12-18 21:56:58 +03:00
|
|
|
write_initializer("Fl_RGB_Image", "%s, %d, %d, %d, %d", idata_name, img->w(), img->h(), img->d(), img->ld());
|
1998-10-06 22:21:25 +04:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2015-12-18 21:56:58 +03:00
|
|
|
void Fluid_Image::write_initializer(const char *type_name, const char *format, ...) {
|
|
|
|
/* Outputs code that returns (and initializes if needed) an Fl_Image as follows:
|
|
|
|
static Fl_Image *'function_name_'() {
|
|
|
|
static Fl_Image *image = new 'type_name'('product of format and remaining args');
|
|
|
|
return image;
|
|
|
|
} */
|
|
|
|
va_list ap;
|
|
|
|
va_start(ap, format);
|
|
|
|
write_c("static Fl_Image *%s() {\n static Fl_Image *image = new %s(", function_name_, type_name);
|
|
|
|
vwrite_c(format, ap);
|
|
|
|
write_c(");\n return image;\n}\n");
|
|
|
|
va_end(ap);
|
|
|
|
}
|
|
|
|
|
2006-07-26 23:52:28 +04:00
|
|
|
void Fluid_Image::write_code(const char *var, int inactive) {
|
2015-12-18 21:56:58 +03:00
|
|
|
/* Outputs code that attaches an image to an Fl_Widget or Fl_Menu_Item.
|
|
|
|
This code calls a function output before by Fluid_Image::write_initializer() */
|
|
|
|
if (img) write_c("%s%s->%s( %s() );\n", indent(), var, inactive ? "deimage" : "image", function_name_);
|
1998-10-06 22:21:25 +04:00
|
|
|
}
|
|
|
|
|
2001-11-26 01:51:34 +03:00
|
|
|
|
1998-10-06 22:21:25 +04:00
|
|
|
////////////////////////////////////////////////////////////////
|
|
|
|
|
2001-11-26 01:51:34 +03:00
|
|
|
static Fluid_Image** images = 0; // sorted list
|
|
|
|
static int numimages = 0;
|
|
|
|
static int tablesize = 0;
|
1998-10-06 22:21:25 +04:00
|
|
|
|
2002-08-10 02:57:00 +04:00
|
|
|
Fluid_Image* Fluid_Image::find(const char *iname) {
|
|
|
|
if (!iname || !*iname) return 0;
|
1998-10-06 22:21:25 +04:00
|
|
|
|
|
|
|
// first search to see if it exists already:
|
|
|
|
int a = 0;
|
|
|
|
int b = numimages;
|
|
|
|
while (a < b) {
|
|
|
|
int c = (a+b)/2;
|
2002-08-10 02:57:00 +04:00
|
|
|
int i = strcmp(iname,images[c]->name_);
|
1998-10-06 22:21:25 +04:00
|
|
|
if (i < 0) b = c;
|
|
|
|
else if (i > 0) a = c+1;
|
|
|
|
else return images[c];
|
|
|
|
}
|
|
|
|
|
|
|
|
// no, so now see if the file exists:
|
|
|
|
|
|
|
|
goto_source_dir();
|
2010-11-18 23:00:01 +03:00
|
|
|
FILE *f = fl_fopen(iname,"rb");
|
1998-10-06 22:21:25 +04:00
|
|
|
if (!f) {
|
2002-08-10 02:57:00 +04:00
|
|
|
read_error("%s : %s",iname,strerror(errno));
|
1998-10-06 22:21:25 +04:00
|
|
|
leave_source_dir();
|
|
|
|
return 0;
|
|
|
|
}
|
2001-11-26 01:51:34 +03:00
|
|
|
fclose(f);
|
1998-10-06 22:21:25 +04:00
|
|
|
|
2002-08-10 02:57:00 +04:00
|
|
|
Fluid_Image *ret = new Fluid_Image(iname);
|
1998-10-06 22:21:25 +04:00
|
|
|
|
2002-08-17 00:10:21 +04:00
|
|
|
if (!ret->img || !ret->img->w() || !ret->img->h()) {
|
2001-11-26 01:51:34 +03:00
|
|
|
delete ret;
|
1998-10-06 22:21:25 +04:00
|
|
|
ret = 0;
|
2002-08-10 02:57:00 +04:00
|
|
|
read_error("%s : unrecognized image format", iname);
|
1998-10-06 22:21:25 +04:00
|
|
|
}
|
|
|
|
leave_source_dir();
|
|
|
|
if (!ret) return 0;
|
|
|
|
|
|
|
|
// make a new entry in the table:
|
|
|
|
numimages++;
|
|
|
|
if (numimages > tablesize) {
|
|
|
|
tablesize = tablesize ? 2*tablesize : 16;
|
2001-11-26 01:51:34 +03:00
|
|
|
if (images) images = (Fluid_Image**)realloc(images, tablesize*sizeof(Fluid_Image*));
|
|
|
|
else images = (Fluid_Image**)malloc(tablesize*sizeof(Fluid_Image*));
|
1998-10-06 22:21:25 +04:00
|
|
|
}
|
|
|
|
for (b = numimages-1; b > a; b--) images[b] = images[b-1];
|
|
|
|
images[a] = ret;
|
|
|
|
|
|
|
|
return ret;
|
|
|
|
}
|
|
|
|
|
2002-08-10 02:57:00 +04:00
|
|
|
Fluid_Image::Fluid_Image(const char *iname) {
|
|
|
|
name_ = strdup(iname);
|
1998-10-06 22:21:25 +04:00
|
|
|
written = 0;
|
|
|
|
refcount = 0;
|
2002-08-10 02:57:00 +04:00
|
|
|
img = Fl_Shared_Image::get(iname);
|
2015-12-18 21:56:58 +03:00
|
|
|
function_name_ = NULL;
|
1998-10-06 22:21:25 +04:00
|
|
|
}
|
|
|
|
|
|
|
|
void Fluid_Image::increment() {
|
|
|
|
++refcount;
|
|
|
|
}
|
|
|
|
|
|
|
|
void Fluid_Image::decrement() {
|
|
|
|
--refcount;
|
|
|
|
if (refcount > 0) return;
|
|
|
|
delete this;
|
|
|
|
}
|
|
|
|
|
|
|
|
Fluid_Image::~Fluid_Image() {
|
|
|
|
int a;
|
2002-08-17 00:10:21 +04:00
|
|
|
if (images) {
|
|
|
|
for (a = 0;; a++) if (images[a] == this) break;
|
|
|
|
numimages--;
|
|
|
|
for (; a < numimages; a++) images[a] = images[a+1];
|
|
|
|
}
|
|
|
|
if (img) img->release();
|
1998-10-06 22:21:25 +04:00
|
|
|
free((void*)name_);
|
|
|
|
}
|
|
|
|
|
|
|
|
////////////////////////////////////////////////////////////////
|
|
|
|
|
2001-09-30 21:37:06 +04:00
|
|
|
#include <FL/Fl_File_Chooser.H>
|
1998-10-06 22:21:25 +04:00
|
|
|
|
|
|
|
const char *ui_find_image_name;
|
|
|
|
Fluid_Image *ui_find_image(const char *oldname) {
|
|
|
|
goto_source_dir();
|
2005-03-25 21:58:18 +03:00
|
|
|
fl_file_chooser_ok_label("Use Image");
|
2005-03-18 09:29:11 +03:00
|
|
|
const char *name = fl_file_chooser("Image?","Image Files (*.{bm,bmp,gif,jpg,pbm,pgm,png,ppm,xbm,xpm})",oldname,1);
|
2005-03-25 21:58:18 +03:00
|
|
|
fl_file_chooser_ok_label(NULL);
|
1998-10-06 22:21:25 +04:00
|
|
|
ui_find_image_name = name;
|
|
|
|
Fluid_Image *ret = (name && *name) ? Fluid_Image::find(name) : 0;
|
|
|
|
leave_source_dir();
|
|
|
|
return ret;
|
|
|
|
}
|
1998-10-21 20:29:01 +04:00
|
|
|
|
2001-11-26 01:51:34 +03:00
|
|
|
|
1998-10-21 20:29:01 +04:00
|
|
|
//
|
2005-02-06 19:28:36 +03:00
|
|
|
// End of "$Id$".
|
1998-10-21 20:29:01 +04:00
|
|
|
//
|