998 lines
29 KiB
C
998 lines
29 KiB
C
/* CSource - PIKA Plugin to dump image data in RGB(A) format for C source
|
|
* Copyright (C) 1999 Tim Janik
|
|
*
|
|
* This program is free software: you can redistribute it and/or
|
|
* modify it under the terms of the GNU General Public License
|
|
* as published by the Free Software Foundation; either version 3
|
|
* of the License, or (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program. If not, see <https://www.gnu.org/licenses/>.
|
|
*
|
|
* This plugin is heavily based on the header plugin by Spencer Kimball and
|
|
* Peter Mattis.
|
|
*/
|
|
|
|
#include "config.h"
|
|
|
|
#include <string.h>
|
|
#include <errno.h>
|
|
|
|
#include <glib/gstdio.h>
|
|
|
|
#include <libpika/pika.h>
|
|
#include <libpika/pikaui.h>
|
|
|
|
#include "libpika/stdplugins-intl.h"
|
|
|
|
|
|
#define SAVE_PROC "file-csource-save"
|
|
#define PLUG_IN_BINARY "file-csource"
|
|
#define PLUG_IN_ROLE "pika-file-csource"
|
|
|
|
|
|
typedef struct _Csource Csource;
|
|
typedef struct _CsourceClass CsourceClass;
|
|
|
|
struct _Csource
|
|
{
|
|
PikaPlugIn parent_instance;
|
|
};
|
|
|
|
struct _CsourceClass
|
|
{
|
|
PikaPlugInClass parent_class;
|
|
};
|
|
|
|
|
|
#define CSOURCE_TYPE (csource_get_type ())
|
|
#define CSOURCE (obj) (G_TYPE_CHECK_INSTANCE_CAST ((obj), CSOURCE_TYPE, Csource))
|
|
|
|
GType csource_get_type (void) G_GNUC_CONST;
|
|
|
|
static GList * csource_query_procedures (PikaPlugIn *plug_in);
|
|
static PikaProcedure * csource_create_procedure (PikaPlugIn *plug_in,
|
|
const gchar *name);
|
|
|
|
static PikaValueArray * csource_save (PikaProcedure *procedure,
|
|
PikaRunMode run_mode,
|
|
PikaImage *image,
|
|
gint n_drawables,
|
|
PikaDrawable **drawables,
|
|
GFile *file,
|
|
const PikaValueArray *args,
|
|
gpointer run_data);
|
|
|
|
static gboolean save_image (GFile *file,
|
|
PikaImage *image,
|
|
PikaDrawable *drawable,
|
|
GObject *config,
|
|
GError **error);
|
|
static gboolean save_dialog (PikaImage *image,
|
|
PikaProcedure *procedure,
|
|
GObject *config);
|
|
|
|
|
|
G_DEFINE_TYPE (Csource, csource, PIKA_TYPE_PLUG_IN)
|
|
|
|
PIKA_MAIN (CSOURCE_TYPE)
|
|
DEFINE_STD_SET_I18N
|
|
|
|
|
|
static void
|
|
csource_class_init (CsourceClass *klass)
|
|
{
|
|
PikaPlugInClass *plug_in_class = PIKA_PLUG_IN_CLASS (klass);
|
|
|
|
plug_in_class->query_procedures = csource_query_procedures;
|
|
plug_in_class->create_procedure = csource_create_procedure;
|
|
plug_in_class->set_i18n = STD_SET_I18N;
|
|
}
|
|
|
|
static void
|
|
csource_init (Csource *csource)
|
|
{
|
|
}
|
|
|
|
static GList *
|
|
csource_query_procedures (PikaPlugIn *plug_in)
|
|
{
|
|
return g_list_append (NULL, g_strdup (SAVE_PROC));
|
|
}
|
|
|
|
static PikaProcedure *
|
|
csource_create_procedure (PikaPlugIn *plug_in,
|
|
const gchar *name)
|
|
{
|
|
PikaProcedure *procedure = NULL;
|
|
|
|
if (! strcmp (name, SAVE_PROC))
|
|
{
|
|
procedure = pika_save_procedure_new (plug_in, name,
|
|
PIKA_PDB_PROC_TYPE_PLUGIN,
|
|
csource_save, NULL, NULL);
|
|
|
|
pika_procedure_set_image_types (procedure, "*");
|
|
|
|
pika_procedure_set_menu_label (procedure, _("C source code"));
|
|
|
|
pika_procedure_set_documentation (procedure,
|
|
_("Dump image data in RGB(A) format "
|
|
"for C source"),
|
|
_("CSource cannot be run non-interactively."),
|
|
name);
|
|
pika_procedure_set_attribution (procedure,
|
|
"Tim Janik",
|
|
"Tim Janik",
|
|
"1999");
|
|
|
|
pika_file_procedure_set_format_name (PIKA_FILE_PROCEDURE (procedure),
|
|
_("C-Source"));
|
|
pika_file_procedure_set_handles_remote (PIKA_FILE_PROCEDURE (procedure),
|
|
TRUE);
|
|
pika_file_procedure_set_mime_types (PIKA_FILE_PROCEDURE (procedure),
|
|
"image/x-csrc");
|
|
pika_file_procedure_set_extensions (PIKA_FILE_PROCEDURE (procedure),
|
|
"c");
|
|
|
|
PIKA_PROC_AUX_ARG_STRING (procedure, "prefixed-name",
|
|
_("_Prefixed name"),
|
|
_("Prefixed name"),
|
|
"pika_image",
|
|
PIKA_PARAM_READWRITE);
|
|
|
|
PIKA_PROC_AUX_ARG_STRING (procedure, "pika-comment",
|
|
_("Comme_nt"),
|
|
_("Comment"),
|
|
pika_get_default_comment (),
|
|
PIKA_PARAM_READWRITE);
|
|
|
|
pika_procedure_set_argument_sync (procedure, "pika-comment",
|
|
PIKA_ARGUMENT_SYNC_PARASITE);
|
|
|
|
PIKA_PROC_AUX_ARG_BOOLEAN (procedure, "save-comment",
|
|
_("Save comment to _file"),
|
|
_("Save comment"),
|
|
pika_export_comment (),
|
|
PIKA_PARAM_READWRITE);
|
|
|
|
PIKA_PROC_AUX_ARG_BOOLEAN (procedure, "glib-types",
|
|
_("Use GLib types (guint_8*)"),
|
|
_("Use GLib types"),
|
|
TRUE,
|
|
PIKA_PARAM_READWRITE);
|
|
|
|
PIKA_PROC_AUX_ARG_BOOLEAN (procedure, "save-alpha",
|
|
_("Save alpha channel (RG_BA/RGB)"),
|
|
_("Save the alpha channel"),
|
|
FALSE,
|
|
PIKA_PARAM_READWRITE);
|
|
|
|
PIKA_PROC_AUX_ARG_BOOLEAN (procedure, "rgb565",
|
|
_("Save as RGB565 (1_6-bit)"),
|
|
_("Use RGB565 encoding"),
|
|
FALSE,
|
|
PIKA_PARAM_READWRITE);
|
|
|
|
PIKA_PROC_AUX_ARG_BOOLEAN (procedure, "use-macros",
|
|
_("_Use macros instead of struct"),
|
|
_("Use C macros"),
|
|
FALSE,
|
|
PIKA_PARAM_READWRITE);
|
|
|
|
PIKA_PROC_AUX_ARG_BOOLEAN (procedure, "use-rle",
|
|
_("Use _1 bit Run-Length-Encoding"),
|
|
_("Use run-length-encoding"),
|
|
FALSE,
|
|
PIKA_PARAM_READWRITE);
|
|
|
|
PIKA_PROC_AUX_ARG_DOUBLE (procedure, "opacity",
|
|
_("Opaci_ty"),
|
|
_("Opacity"),
|
|
0.0, 100.0, 100.0,
|
|
PIKA_PARAM_READWRITE);
|
|
}
|
|
|
|
return procedure;
|
|
}
|
|
|
|
static PikaValueArray *
|
|
csource_save (PikaProcedure *procedure,
|
|
PikaRunMode run_mode,
|
|
PikaImage *image,
|
|
gint n_drawables,
|
|
PikaDrawable **drawables,
|
|
GFile *file,
|
|
const PikaValueArray *args,
|
|
gpointer run_data)
|
|
{
|
|
PikaProcedureConfig *config;
|
|
PikaPDBStatusType status = PIKA_PDB_SUCCESS;
|
|
PikaExportReturn export = PIKA_EXPORT_CANCEL;
|
|
gchar *prefixed_name;
|
|
gchar *comment;
|
|
GError *error = NULL;
|
|
|
|
gegl_init (NULL, NULL);
|
|
|
|
if (run_mode != PIKA_RUN_INTERACTIVE)
|
|
return pika_procedure_new_return_values (procedure,
|
|
PIKA_PDB_CALLING_ERROR,
|
|
NULL);
|
|
|
|
config = pika_procedure_create_config (procedure);
|
|
pika_procedure_config_begin_export (config, image, run_mode, args, NULL);
|
|
|
|
pika_ui_init (PLUG_IN_BINARY);
|
|
|
|
export = pika_export_image (&image, &n_drawables, &drawables, "C Source",
|
|
PIKA_EXPORT_CAN_HANDLE_RGB |
|
|
PIKA_EXPORT_CAN_HANDLE_ALPHA);
|
|
|
|
if (n_drawables != 1)
|
|
{
|
|
g_set_error (&error, G_FILE_ERROR, 0,
|
|
_("C source does not support multiple layers."));
|
|
|
|
return pika_procedure_new_return_values (procedure,
|
|
PIKA_PDB_CALLING_ERROR,
|
|
error);
|
|
}
|
|
|
|
g_object_set (config,
|
|
"save-alpha", pika_drawable_has_alpha (drawables[0]),
|
|
NULL);
|
|
|
|
if (export == PIKA_EXPORT_CANCEL)
|
|
return pika_procedure_new_return_values (procedure,
|
|
PIKA_PDB_CANCEL,
|
|
NULL);
|
|
|
|
if (! save_dialog (image, procedure, G_OBJECT (config)))
|
|
status = PIKA_PDB_CANCEL;
|
|
|
|
g_object_get (config,
|
|
"prefixed-name", &prefixed_name,
|
|
"pika-comment", &comment,
|
|
NULL);
|
|
|
|
if (! prefixed_name || ! prefixed_name[0])
|
|
g_object_set (config,
|
|
"prefixed-name", "tmp",
|
|
NULL);
|
|
|
|
if (comment && ! comment[0])
|
|
g_object_set (config,
|
|
"pika-comment", NULL,
|
|
NULL);
|
|
|
|
g_free (prefixed_name);
|
|
g_free (comment);
|
|
|
|
if (status == PIKA_PDB_SUCCESS)
|
|
{
|
|
if (! save_image (file, image, drawables[0], G_OBJECT (config),
|
|
&error))
|
|
{
|
|
status = PIKA_PDB_EXECUTION_ERROR;
|
|
}
|
|
}
|
|
|
|
pika_procedure_config_end_export (config, image, file, status);
|
|
g_object_unref (config);
|
|
|
|
if (export == PIKA_EXPORT_EXPORT)
|
|
{
|
|
pika_image_delete (image);
|
|
g_free (drawables);
|
|
}
|
|
|
|
return pika_procedure_new_return_values (procedure, status, error);
|
|
}
|
|
|
|
static gboolean
|
|
diff2_rgb565 (guint8 *ip)
|
|
{
|
|
return ip[0] != ip[2] || ip[1] != ip[3];
|
|
}
|
|
|
|
static gboolean
|
|
diff2_rgb (guint8 *ip)
|
|
{
|
|
return ip[0] != ip[3] || ip[1] != ip[4] || ip[2] != ip[5];
|
|
}
|
|
|
|
static gboolean
|
|
diff2_rgba (guint8 *ip)
|
|
{
|
|
return ip[0] != ip[4] || ip[1] != ip[5] || ip[2] != ip[6] || ip[3] != ip[7];
|
|
}
|
|
|
|
static guint8 *
|
|
rl_encode_rgbx (guint8 *bp,
|
|
guint8 *ip,
|
|
guint8 *limit,
|
|
guint bpp)
|
|
{
|
|
gboolean (*diff2_pix) (guint8 *);
|
|
guint8 *ilimit = limit - bpp;
|
|
|
|
switch (bpp)
|
|
{
|
|
case 2: diff2_pix = diff2_rgb565; break;
|
|
case 3: diff2_pix = diff2_rgb; break;
|
|
case 4: diff2_pix = diff2_rgba; break;
|
|
default: g_assert_not_reached ();
|
|
}
|
|
|
|
while (ip < limit)
|
|
{
|
|
g_assert (ip < ilimit); /* paranoid */
|
|
|
|
if (diff2_pix (ip))
|
|
{
|
|
guint8 *s_ip = ip;
|
|
guint l = 1;
|
|
|
|
ip += bpp;
|
|
while (l < 127 && ip < ilimit && diff2_pix (ip))
|
|
{ ip += bpp; l += 1; }
|
|
if (ip == ilimit && l < 127)
|
|
{ ip += bpp; l += 1; }
|
|
*(bp++) = l;
|
|
memcpy (bp, s_ip, l * bpp);
|
|
bp += l * bpp;
|
|
}
|
|
else
|
|
{
|
|
guint l = 2;
|
|
|
|
ip += bpp;
|
|
while (l < 127 && ip < ilimit && !diff2_pix (ip))
|
|
{ ip += bpp; l += 1; }
|
|
*(bp++) = l | 128;
|
|
memcpy (bp, ip, bpp);
|
|
ip += bpp;
|
|
bp += bpp;
|
|
}
|
|
if (ip == ilimit)
|
|
{
|
|
*(bp++) = 1;
|
|
memcpy (bp, ip, bpp);
|
|
ip += bpp;
|
|
bp += bpp;
|
|
}
|
|
}
|
|
|
|
return bp;
|
|
}
|
|
|
|
static gboolean print (GOutputStream *stream,
|
|
GError **error,
|
|
const gchar *format,
|
|
...) G_GNUC_PRINTF (3, 4);
|
|
|
|
static gboolean
|
|
print (GOutputStream *stream,
|
|
GError **error,
|
|
const gchar *format,
|
|
...)
|
|
{
|
|
va_list args;
|
|
gboolean success;
|
|
|
|
va_start (args, format);
|
|
success = g_output_stream_vprintf (stream, NULL, NULL,
|
|
error, format, args);
|
|
va_end (args);
|
|
|
|
return success;
|
|
}
|
|
|
|
static inline gboolean
|
|
save_rle_decoder (GOutputStream *output,
|
|
const gchar *macro_name,
|
|
const gchar *s_uint,
|
|
const gchar *s_uint_8,
|
|
guint bpp,
|
|
GError **error)
|
|
{
|
|
return
|
|
print (output, error,
|
|
"#define %s_RUN_LENGTH_DECODE(image_buf, rle_data, size, bpp) do \\\n",
|
|
macro_name) &&
|
|
print (output, error,
|
|
"{ %s __bpp; %s *__ip; const %s *__il, *__rd; \\\n",
|
|
s_uint, s_uint_8, s_uint_8) &&
|
|
print (output, error,
|
|
" __bpp = (bpp); __ip = (image_buf); __il = __ip + (size) * __bpp; \\\n"
|
|
" __rd = (rle_data); if (__bpp > 3) { /* RGBA */ \\\n"
|
|
" while (__ip < __il) { %s __l = *(__rd++); \\\n",
|
|
s_uint) &&
|
|
print (output, error,
|
|
" if (__l & 128) { __l = __l - 128; \\\n"
|
|
" do { memcpy (__ip, __rd, 4); __ip += 4; } while (--__l); __rd += 4; \\\n"
|
|
" } else { __l *= 4; memcpy (__ip, __rd, __l); \\\n"
|
|
" __ip += __l; __rd += __l; } } \\\n"
|
|
" } else if (__bpp == 3) { /* RGB */ \\\n"
|
|
" while (__ip < __il) { %s __l = *(__rd++); \\\n",
|
|
s_uint) &&
|
|
print (output, error,
|
|
" if (__l & 128) { __l = __l - 128; \\\n"
|
|
" do { memcpy (__ip, __rd, 3); __ip += 3; } while (--__l); __rd += 3; \\\n"
|
|
" } else { __l *= 3; memcpy (__ip, __rd, __l); \\\n"
|
|
" __ip += __l; __rd += __l; } } \\\n"
|
|
" } else { /* RGB16 */ \\\n"
|
|
" while (__ip < __il) { %s __l = *(__rd++); \\\n",
|
|
s_uint) &&
|
|
print (output, error,
|
|
" if (__l & 128) { __l = __l - 128; \\\n"
|
|
" do { memcpy (__ip, __rd, 2); __ip += 2; } while (--__l); __rd += 2; \\\n"
|
|
" } else { __l *= 2; memcpy (__ip, __rd, __l); \\\n"
|
|
" __ip += __l; __rd += __l; } } \\\n"
|
|
" } } while (0)\n");
|
|
}
|
|
|
|
static inline gboolean
|
|
save_uchar (GOutputStream *output,
|
|
guint *c,
|
|
guint8 d,
|
|
gboolean use_macros,
|
|
GError **error)
|
|
{
|
|
static guint8 pad = 0;
|
|
|
|
if (*c > 74)
|
|
{
|
|
if (! use_macros)
|
|
{
|
|
if (! print (output, error, "\"\n \""))
|
|
return FALSE;
|
|
|
|
*c = 3;
|
|
}
|
|
else
|
|
{
|
|
if (! print (output, error, "\"\n \""))
|
|
return FALSE;
|
|
|
|
*c = 2;
|
|
}
|
|
}
|
|
|
|
if (d < 33 || (d >= 48 && d <= 57) || d > 126)
|
|
{
|
|
if (! print (output, error, "\\%03o", d))
|
|
return FALSE;
|
|
|
|
*c += 1 + 1 + (d > 7) + (d > 63);
|
|
pad = d < 64;
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
if (d == '\\')
|
|
{
|
|
if (! print (output, error, "\\\\"))
|
|
return FALSE;
|
|
|
|
*c += 2;
|
|
}
|
|
else if (d == '"')
|
|
{
|
|
if (! print (output, error, "\\\""))
|
|
return FALSE;
|
|
|
|
*c += 2;
|
|
}
|
|
else if (pad && d >= '0' && d <= '9')
|
|
{
|
|
if (! print (output, error, "\"\"%c", d))
|
|
return FALSE;
|
|
|
|
*c += 3;
|
|
}
|
|
else
|
|
{
|
|
if (! print (output, error, "%c", d))
|
|
return FALSE;
|
|
|
|
*c += 1;
|
|
}
|
|
|
|
pad = 0;
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
static gboolean
|
|
save_image (GFile *file,
|
|
PikaImage *image,
|
|
PikaDrawable *drawable,
|
|
GObject *config,
|
|
GError **error)
|
|
{
|
|
GOutputStream *output;
|
|
GeglBuffer *buffer;
|
|
GCancellable *cancellable;
|
|
PikaImageType drawable_type = pika_drawable_type (drawable);
|
|
gchar *s_uint_8, *s_uint, *s_char, *s_null;
|
|
guint c;
|
|
gchar *macro_name;
|
|
guint8 *img_buffer, *img_buffer_end;
|
|
gchar *basename;
|
|
guint8 *data, *p;
|
|
gint width;
|
|
gint height;
|
|
gint x, y, pad, n_bytes, bpp;
|
|
const Babl *drawable_format;
|
|
gint drawable_bpp;
|
|
gchar *config_prefixed_name;
|
|
gchar *config_comment;
|
|
gboolean config_save_comment;
|
|
gboolean config_glib_types;
|
|
gboolean config_save_alpha;
|
|
gboolean config_rgb565;
|
|
gboolean config_use_macros;
|
|
gboolean config_use_rle;
|
|
gdouble config_opacity;
|
|
|
|
g_object_get (config,
|
|
"prefixed-name", &config_prefixed_name,
|
|
"pika-comment", &config_comment,
|
|
"save-comment", &config_save_comment,
|
|
"glib-types", &config_glib_types,
|
|
"save-alpha", &config_save_alpha,
|
|
"rgb565", &config_rgb565,
|
|
"use-macros", &config_use_macros,
|
|
"use-rle", &config_use_rle,
|
|
"opacity", &config_opacity,
|
|
NULL);
|
|
|
|
output = G_OUTPUT_STREAM (g_file_replace (file,
|
|
NULL, FALSE, G_FILE_CREATE_NONE,
|
|
NULL, error));
|
|
if (output)
|
|
{
|
|
GOutputStream *buffered;
|
|
|
|
buffered = g_buffered_output_stream_new (output);
|
|
g_object_unref (output);
|
|
|
|
output = buffered;
|
|
}
|
|
else
|
|
{
|
|
return FALSE;
|
|
}
|
|
|
|
buffer = pika_drawable_get_buffer (drawable);
|
|
|
|
width = gegl_buffer_get_width (buffer);
|
|
height = gegl_buffer_get_height (buffer);
|
|
|
|
if (pika_drawable_has_alpha (drawable))
|
|
drawable_format = babl_format ("R'G'B'A u8");
|
|
else
|
|
drawable_format = babl_format ("R'G'B' u8");
|
|
|
|
drawable_bpp = babl_format_get_bytes_per_pixel (drawable_format);
|
|
|
|
bpp = config_rgb565 ? 2 : (config_save_alpha ? 4 : 3);
|
|
n_bytes = width * height * bpp;
|
|
pad = width * drawable_bpp;
|
|
if (config_use_rle)
|
|
pad = MAX (pad, 130 + n_bytes / 127);
|
|
|
|
data = g_new (guint8, pad + n_bytes);
|
|
p = data + pad;
|
|
|
|
for (y = 0; y < height; y++)
|
|
{
|
|
gegl_buffer_get (buffer, GEGL_RECTANGLE (0, y, width, 1), 1.0,
|
|
drawable_format, data,
|
|
GEGL_AUTO_ROWSTRIDE, GEGL_ABYSS_NONE);
|
|
|
|
if (bpp == 2)
|
|
{
|
|
for (x = 0; x < width; x++)
|
|
{
|
|
guint8 *d = data + x * drawable_bpp;
|
|
guint8 r, g, b;
|
|
gushort rgb16;
|
|
gdouble alpha = drawable_type == PIKA_RGBA_IMAGE ? d[3] : 0xff;
|
|
|
|
alpha *= config_opacity / 25500.0;
|
|
r = (0.5 + alpha * (gdouble) d[0]);
|
|
g = (0.5 + alpha * (gdouble) d[1]);
|
|
b = (0.5 + alpha * (gdouble) d[2]);
|
|
r >>= 3;
|
|
g >>= 2;
|
|
b >>= 3;
|
|
rgb16 = (r << 11) + (g << 5) + b;
|
|
*(p++) = (guchar) rgb16;
|
|
*(p++) = (guchar) (rgb16 >> 8);
|
|
}
|
|
}
|
|
else if (config_save_alpha)
|
|
{
|
|
for (x = 0; x < width; x++)
|
|
{
|
|
guint8 *d = data + x * drawable_bpp;
|
|
gdouble alpha = drawable_type == PIKA_RGBA_IMAGE ? d[3] : 0xff;
|
|
|
|
alpha *= config_opacity / 100.0;
|
|
*(p++) = d[0];
|
|
*(p++) = d[1];
|
|
*(p++) = d[2];
|
|
*(p++) = alpha + 0.5;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
for (x = 0; x < width; x++)
|
|
{
|
|
guint8 *d = data + x * drawable_bpp;
|
|
gdouble alpha = drawable_type == PIKA_RGBA_IMAGE ? d[3] : 0xff;
|
|
|
|
alpha *= config_opacity / 25500.0;
|
|
*(p++) = 0.5 + alpha * (gdouble) d[0];
|
|
*(p++) = 0.5 + alpha * (gdouble) d[1];
|
|
*(p++) = 0.5 + alpha * (gdouble) d[2];
|
|
}
|
|
}
|
|
}
|
|
|
|
img_buffer = data + pad;
|
|
if (config_use_rle)
|
|
{
|
|
img_buffer_end = rl_encode_rgbx (data, img_buffer,
|
|
img_buffer + n_bytes, bpp);
|
|
img_buffer = data;
|
|
}
|
|
else
|
|
{
|
|
img_buffer_end = img_buffer + n_bytes;
|
|
}
|
|
|
|
if (! config_use_macros && config_glib_types)
|
|
{
|
|
s_uint_8 = "guint8 ";
|
|
s_uint = "guint ";
|
|
s_char = "gchar ";
|
|
s_null = "NULL";
|
|
}
|
|
else if (! config_use_macros)
|
|
{
|
|
s_uint_8 = "unsigned char";
|
|
s_uint = "unsigned int ";
|
|
s_char = "char ";
|
|
s_null = "(char*) 0";
|
|
}
|
|
else if (config_use_macros && config_glib_types)
|
|
{
|
|
s_uint_8 = "guint8";
|
|
s_uint = "guint";
|
|
s_char = "gchar";
|
|
s_null = "NULL";
|
|
}
|
|
else /* config_use_macros && ! config_glib_types */
|
|
{
|
|
s_uint_8 = "unsigned char";
|
|
s_uint = "unsigned int";
|
|
s_char = "char";
|
|
s_null = "(char*) 0";
|
|
}
|
|
|
|
macro_name = g_ascii_strup (config_prefixed_name, -1);
|
|
|
|
basename = g_file_get_basename (file);
|
|
|
|
if (! print (output, error,
|
|
"/* PIKA %s C-Source image dump %s(%s) */\n\n",
|
|
config_save_alpha ? "RGBA" : "RGB",
|
|
config_use_rle ? "1-byte-run-length-encoded " : "",
|
|
basename))
|
|
goto fail;
|
|
|
|
g_free (basename);
|
|
|
|
if (config_use_rle && !config_use_macros)
|
|
{
|
|
if (! save_rle_decoder (output,
|
|
macro_name,
|
|
config_glib_types ? "guint" : "unsigned int",
|
|
config_glib_types ? "guint8" : "unsigned char",
|
|
bpp,
|
|
error))
|
|
goto fail;
|
|
}
|
|
|
|
if (!config_use_macros)
|
|
{
|
|
if (! print (output, error,
|
|
"static const struct {\n"
|
|
" %s\t width;\n"
|
|
" %s\t height;\n"
|
|
" %s\t bytes_per_pixel; /* 2:RGB16, 3:RGB, 4:RGBA */ \n",
|
|
s_uint, s_uint, s_uint))
|
|
goto fail;
|
|
|
|
if (config_save_comment)
|
|
{
|
|
if (! print (output, error, " %s\t*comment;\n", s_char))
|
|
goto fail;
|
|
}
|
|
|
|
if (! print (output, error,
|
|
" %s\t %spixel_data[",
|
|
s_uint_8,
|
|
config_use_rle ? "rle_" : ""))
|
|
goto fail;
|
|
|
|
if (config_use_rle)
|
|
{
|
|
if (! print (output, error,
|
|
"%u + 1];\n",
|
|
(guint) (img_buffer_end - img_buffer)))
|
|
goto fail;
|
|
}
|
|
else
|
|
{
|
|
if (! print (output, error,
|
|
"%u * %u * %u + 1];\n",
|
|
width,
|
|
height,
|
|
bpp))
|
|
goto fail;
|
|
}
|
|
|
|
if (! print (output, error, "} %s = {\n", config_prefixed_name))
|
|
goto fail;
|
|
|
|
if (! print (output, error,
|
|
" %u, %u, %u,\n",
|
|
width,
|
|
height,
|
|
bpp))
|
|
goto fail;
|
|
}
|
|
else /* use macros */
|
|
{
|
|
if (! print (output, error,
|
|
"#define %s_WIDTH (%u)\n"
|
|
"#define %s_HEIGHT (%u)\n"
|
|
"#define %s_BYTES_PER_PIXEL (%u) /* 2:RGB16, 3:RGB, 4:RGBA */\n",
|
|
macro_name, width,
|
|
macro_name, height,
|
|
macro_name, bpp))
|
|
{
|
|
goto fail;
|
|
}
|
|
}
|
|
|
|
if (config_save_comment && ! config_comment)
|
|
{
|
|
if (! config_use_macros)
|
|
{
|
|
if (! print (output, error, " %s,\n", s_null))
|
|
goto fail;
|
|
}
|
|
else
|
|
{
|
|
if (! print (output, error,
|
|
"#define %s_COMMENT (%s)\n",
|
|
macro_name, s_null))
|
|
goto fail;
|
|
}
|
|
}
|
|
else if (config_save_comment)
|
|
{
|
|
gchar *p = config_comment - 1;
|
|
|
|
if (config_use_macros)
|
|
{
|
|
if (! print (output, error, "#define %s_COMMENT \\\n", macro_name))
|
|
goto fail;
|
|
}
|
|
|
|
if (! print (output, error, " \""))
|
|
goto fail;
|
|
|
|
while (*(++p))
|
|
{
|
|
gboolean success = FALSE;
|
|
|
|
if (*p == '\\')
|
|
success = print (output, error, "\\\\");
|
|
else if (*p == '"')
|
|
success = print (output, error, "\\\"");
|
|
else if (*p == '\n' && p[1])
|
|
success = print (output, error,
|
|
"\\n\"%s\n \"",
|
|
config_use_macros ? " \\" : "");
|
|
else if (*p == '\n')
|
|
success = print (output, error, "\\n");
|
|
else if (*p == '\r')
|
|
success = print (output, error, "\\r");
|
|
else if (*p == '\b')
|
|
success = print (output, error, "\\b");
|
|
else if (*p == '\f')
|
|
success = print (output, error, "\\f");
|
|
else if (( *p >= 32 && *p <= 47 ) || (*p >= 58 && *p <= 126))
|
|
success = print (output, error, "%c", *p);
|
|
else
|
|
success = print (output, error, "\\%03o", *p);
|
|
|
|
if (! success)
|
|
goto fail;
|
|
}
|
|
|
|
if (! config_use_macros)
|
|
{
|
|
if (! print (output, error, "\",\n"))
|
|
goto fail;
|
|
}
|
|
else
|
|
{
|
|
if (! print (output, error, "\"\n"))
|
|
goto fail;
|
|
}
|
|
}
|
|
|
|
if (config_use_macros)
|
|
{
|
|
if (! print (output, error,
|
|
"#define %s_%sPIXEL_DATA ((%s*) %s_%spixel_data)\n",
|
|
macro_name,
|
|
config_use_rle ? "RLE_" : "",
|
|
s_uint_8,
|
|
macro_name,
|
|
config_use_rle ? "rle_" : ""))
|
|
goto fail;
|
|
|
|
if (config_use_rle)
|
|
{
|
|
if (! save_rle_decoder (output,
|
|
macro_name,
|
|
s_uint,
|
|
s_uint_8,
|
|
bpp,
|
|
error))
|
|
goto fail;
|
|
}
|
|
|
|
if (! print (output, error,
|
|
"static const %s %s_%spixel_data[",
|
|
s_uint_8,
|
|
macro_name,
|
|
config_use_rle ? "rle_" : ""))
|
|
goto fail;
|
|
|
|
if (config_use_rle)
|
|
{
|
|
if (! print (output, error,
|
|
"%u + 1] =\n",
|
|
(guint) (img_buffer_end - img_buffer)))
|
|
goto fail;
|
|
}
|
|
else
|
|
{
|
|
if (! print (output, error,
|
|
"%u * %u * %u + 1] =\n",
|
|
width,
|
|
height,
|
|
bpp))
|
|
goto fail;
|
|
}
|
|
|
|
if (! print (output, error, "(\""))
|
|
goto fail;
|
|
|
|
c = 2;
|
|
}
|
|
else
|
|
{
|
|
if (! print (output, error, " \""))
|
|
goto fail;
|
|
|
|
c = 3;
|
|
}
|
|
|
|
switch (drawable_type)
|
|
{
|
|
case PIKA_RGB_IMAGE:
|
|
case PIKA_RGBA_IMAGE:
|
|
do
|
|
{
|
|
if (! save_uchar (output, &c, *(img_buffer++), config_use_macros,
|
|
error))
|
|
goto fail;
|
|
}
|
|
while (img_buffer < img_buffer_end);
|
|
break;
|
|
|
|
default:
|
|
g_warning ("unhandled drawable type (%d)", drawable_type);
|
|
goto fail;
|
|
}
|
|
|
|
if (! config_use_macros)
|
|
{
|
|
if (! print (output, error, "\",\n};\n\n"))
|
|
goto fail;
|
|
}
|
|
else
|
|
{
|
|
if (! print (output, error, "\");\n\n"))
|
|
goto fail;
|
|
}
|
|
|
|
if (! g_output_stream_close (output, NULL, error))
|
|
goto fail;
|
|
|
|
g_object_unref (output);
|
|
g_object_unref (buffer);
|
|
|
|
return TRUE;
|
|
|
|
fail:
|
|
|
|
cancellable = g_cancellable_new ();
|
|
g_cancellable_cancel (cancellable);
|
|
g_output_stream_close (output, cancellable, NULL);
|
|
g_object_unref (cancellable);
|
|
|
|
g_object_unref (output);
|
|
g_object_unref (buffer);
|
|
|
|
return FALSE;
|
|
}
|
|
|
|
static gboolean
|
|
save_dialog (PikaImage *image,
|
|
PikaProcedure *procedure,
|
|
GObject *config)
|
|
{
|
|
GtkWidget *dialog;
|
|
GtkWidget *vbox;
|
|
gboolean run;
|
|
|
|
dialog = pika_save_procedure_dialog_new (PIKA_SAVE_PROCEDURE (procedure),
|
|
PIKA_PROCEDURE_CONFIG (config),
|
|
image);
|
|
|
|
pika_procedure_dialog_get_scale_entry (PIKA_PROCEDURE_DIALOG (dialog),
|
|
"opacity", 1.0);
|
|
|
|
pika_procedure_dialog_set_sensitive (PIKA_PROCEDURE_DIALOG (dialog),
|
|
"save-alpha", TRUE, config, "rgb565",
|
|
TRUE);
|
|
|
|
vbox = pika_procedure_dialog_fill_box (PIKA_PROCEDURE_DIALOG (dialog),
|
|
"csource-box",
|
|
"prefixed-name", "pika-comment",
|
|
"save-comment", "glib-types",
|
|
"use-macros", "use-rle", "save-alpha",
|
|
"rgb565", "opacity",
|
|
NULL);
|
|
gtk_box_set_spacing (GTK_BOX (vbox), 12);
|
|
gtk_container_set_border_width (GTK_CONTAINER (vbox), 12);
|
|
|
|
pika_procedure_dialog_fill (PIKA_PROCEDURE_DIALOG (dialog),
|
|
"csource-box",
|
|
NULL);
|
|
gtk_widget_show (dialog);
|
|
|
|
run = pika_procedure_dialog_run (PIKA_PROCEDURE_DIALOG (dialog));
|
|
|
|
gtk_widget_destroy (dialog);
|
|
|
|
return run;
|
|
}
|