callisto-debian/gimp
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

plug-ins: port file-csource to GIO

Browse Source
This commit is contained in:
Michael Natterer
2013-11-29 00:05:38 +01:00
parent e0edc568aa
commit 297ff1ea0f
1 changed files with 319 additions and 162 deletions
Download Patch File Download Diff File Expand all files Collapse all files

481
plug-ins/common/file-csource.c
View File

@ -38,7 +38,6 @@
typedef struct typedef struct
{ {
gchar *file_name;
gchar *prefixed_name; gchar *prefixed_name;
gchar *comment; gchar *comment;
gboolean use_comment; gboolean use_comment;
@ -58,7 +57,8 @@ static void run (const gchar *name,
gint *nreturn_vals, gint *nreturn_vals,
GimpParam **return_vals); GimpParam **return_vals);
static gboolean save_image (Config *config, static gboolean save_image (GFile *file,
Config *config,
gint32 image_ID, gint32 image_ID,
gint32 drawable_ID, gint32 drawable_ID,
GError **error); GError **error);
@ -75,7 +75,6 @@ const GimpPlugInInfo PLUG_IN_INFO =
static Config config = static Config config =
{ {
NULL, /* file_name */
"gimp_image", /* prefixed_name */ "gimp_image", /* prefixed_name */
NULL, /* comment */ NULL, /* comment */
FALSE, /* use_comment */ FALSE, /* use_comment */
@ -116,6 +115,7 @@ query (void)
save_args, NULL); save_args, NULL);
gimp_register_file_handler_mime (SAVE_PROC, "text/x-csrc"); gimp_register_file_handler_mime (SAVE_PROC, "text/x-csrc");
gimp_register_file_handler_uri (SAVE_PROC);
gimp_register_save_handler (SAVE_PROC, "c", ""); gimp_register_save_handler (SAVE_PROC, "c", "");
} }
@ -150,16 +150,12 @@ run (const gchar *name,
gint32 drawable_ID = param[2].data.d_int32; gint32 drawable_ID = param[2].data.d_int32;
GimpParasite *parasite; GimpParasite *parasite;
gchar *x; gchar *x;
GimpImageType drawable_type = gimp_drawable_type (drawable_ID);
gimp_get_data (SAVE_PROC, &config); gimp_get_data (SAVE_PROC, &config);
config.prefixed_name = "gimp_image"; config.prefixed_name = "gimp_image";
config.comment = NULL; config.comment = NULL;
config.alpha = gimp_drawable_has_alpha (drawable_ID);
config.file_name = param[3].data.d_string;
config.alpha = (drawable_type == GIMP_RGBA_IMAGE ||
drawable_type == GIMP_GRAYA_IMAGE ||
drawable_type == GIMP_INDEXEDA_IMAGE);
parasite = gimp_image_get_parasite (image_ID, "gimp-comment"); parasite = gimp_image_get_parasite (image_ID, "gimp-comment");
if (parasite) if (parasite)
@ -202,7 +198,8 @@ run (const gchar *name,
} }
} }
if (! save_image (&config, image_ID, drawable_ID, &error)) if (! save_image (g_file_new_for_uri (param[3].data.d_string),
&config, image_ID, drawable_ID, &error))
{ {
status = GIMP_PDB_EXECUTION_ERROR; status = GIMP_PDB_EXECUTION_ERROR;
@ -297,101 +294,145 @@ rl_encode_rgbx (guint8 *bp,
return bp; return bp;
} }
static inline void static gboolean print (GOutputStream *stream,
save_rle_decoder (FILE *fp, GError **error,
const gchar *macro_name, const gchar *format,
const gchar *s_uint, ...) G_GNUC_PRINTF (3, 4);
const gchar *s_uint_8,
guint n_ch) static gboolean
print (GOutputStream *stream,
GError **error,
const gchar *format,
...)
{ {
fprintf (fp, "#define %s_RUN_LENGTH_DECODE(image_buf, rle_data, size, bpp) do \\\n", va_list args;
macro_name); gboolean success;
fprintf (fp, "{ %s __bpp; %s *__ip; const %s *__il, *__rd; \\\n", s_uint, s_uint_8, s_uint_8);
fprintf (fp, " __bpp = (bpp); __ip = (image_buf); __il = __ip + (size) * __bpp; \\\n");
fprintf (fp, " __rd = (rle_data); if (__bpp > 3) { /* RGBA */ \\\n"); va_start (args, format);
success = gimp_output_stream_vprintf (stream, NULL, NULL,
error, format, args);
va_end (args);
fprintf (fp, " while (__ip < __il) { %s __l = *(__rd++); \\\n", s_uint); return success;
fprintf (fp, " if (__l & 128) { __l = __l - 128; \\\n");
fprintf (fp, " do { memcpy (__ip, __rd, 4); __ip += 4; } while (--__l); __rd += 4; \\\n");
fprintf (fp, " } else { __l *= 4; memcpy (__ip, __rd, __l); \\\n");
fprintf (fp, " __ip += __l; __rd += __l; } } \\\n");
fprintf (fp, " } else { /* RGB */ \\\n");
fprintf (fp, " while (__ip < __il) { %s __l = *(__rd++); \\\n", s_uint);
fprintf (fp, " if (__l & 128) { __l = __l - 128; \\\n");
fprintf (fp, " do { memcpy (__ip, __rd, 3); __ip += 3; } while (--__l); __rd += 3; \\\n");
fprintf (fp, " } else { __l *= 3; memcpy (__ip, __rd, __l); \\\n");
fprintf (fp, " __ip += __l; __rd += __l; } } \\\n");
fprintf (fp, " } } while (0)\n");
} }
static inline guint static inline gboolean
save_uchar (FILE *fp, save_rle_decoder (GOutputStream *output,
guint c, const gchar *macro_name,
guint8 d, const gchar *s_uint,
Config *config) const gchar *s_uint_8,
guint n_ch,
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 { /* 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"
" } } while (0)\n");
}
static inline gboolean
save_uchar (GOutputStream *output,
guint *c,
guint8 d,
Config *config,
GError **error)
{ {
static guint8 pad = 0; static guint8 pad = 0;
if (c > 74) if (*c > 74)
{ {
if (!config->use_macros) if (! config->use_macros)
{ {
fprintf (fp, "\"\n \""); if (! print (output, error, "\"\n \""))
c = 3; return FALSE;
*c = 3;
} }
else else
{ {
fprintf (fp, "\"\n \""); if (! print (output, error, "\"\n \""))
c = 2; return FALSE;
*c = 2;
} }
} }
if (d < 33 || d > 126) if (d < 33 || d > 126)
{ {
fprintf (fp, "\\%o", d); if (! print (output, error, "\\%o", d))
c += 1 + 1 + (d > 7) + (d > 63); return FALSE;
*c += 1 + 1 + (d > 7) + (d > 63);
pad = d < 64; pad = d < 64;
return c; return TRUE;
} }
if (d == '\\') if (d == '\\')
{ {
fputs ("\\\\", fp); if (! print (output, error, "\\\\"))
c += 2; return FALSE;
*c += 2;
} }
else if (d == '"') else if (d == '"')
{ {
fputs ("\\\"", fp); if (! print (output, error, "\\\""))
c += 2; return FALSE;
*c += 2;
} }
else if (pad && d >= '0' && d <= '9') else if (pad && d >= '0' && d <= '9')
{ {
fputs ("\"\"", fp); if (! print (output, error, "\"\"%c", d))
fputc (d, fp); return FALSE;
c += 3;
*c += 3;
} }
else else
{ {
fputc (d, fp); if (! print (output, error, "%c", d))
c += 1; return FALSE;
*c += 1;
} }
pad = 0; pad = 0;
return c; return TRUE;
} }
static gboolean static gboolean
save_image (Config *config, save_image (GFile *file,
Config *config,
gint32 image_ID, gint32 image_ID,
gint32 drawable_ID, gint32 drawable_ID,
GError **error) GError **error)
{ {
GOutputStream *output;
GeglBuffer *buffer; GeglBuffer *buffer;
FILE *fp;
GimpImageType drawable_type = gimp_drawable_type (drawable_ID); GimpImageType drawable_type = gimp_drawable_type (drawable_ID);
gchar *s_uint_8, *s_uint, *s_char, *s_null; gchar *s_uint_8, *s_uint, *s_char, *s_null;
guint c; guint c;
@ -404,13 +445,18 @@ save_image (Config *config,
gint x, y, pad, n_bytes, bpp; gint x, y, pad, n_bytes, bpp;
gint drawable_bpp; gint drawable_bpp;
fp = g_fopen (config->file_name, "w"); output = G_OUTPUT_STREAM (g_file_replace (file, NULL, FALSE, 0, NULL, error));
if (! fp) if (output)
{
GOutputStream *buffered;
buffered = g_buffered_output_stream_new (output);
g_object_unref (output);
output = buffered;
}
else
{ {
g_set_error (error, G_FILE_ERROR, g_file_error_from_errno (errno),
_("Could not open '%s' for writing: %s"),
gimp_filename_to_utf8 (config->file_name),
g_strerror (errno));
return FALSE; return FALSE;
} }
@ -529,150 +575,261 @@ save_image (Config *config,
macro_name = g_ascii_strup (config->prefixed_name, -1); macro_name = g_ascii_strup (config->prefixed_name, -1);
basename = g_path_get_basename (config->file_name); basename = g_file_get_basename (file);
fprintf (fp, "/* GIMP %s C-Source image dump %s(%s) */\n\n", if (! print (output, error,
config->alpha ? "RGBA" : "RGB", "/* GIMP %s C-Source image dump %s(%s) */\n\n",
config->use_rle ? "1-byte-run-length-encoded " : "", config->alpha ? "RGBA" : "RGB",
basename); config->use_rle ? "1-byte-run-length-encoded " : "",
basename))
goto fail;
g_free (basename); g_free (basename);
if (config->use_rle && !config->use_macros) if (config->use_rle && !config->use_macros)
save_rle_decoder (fp, {
macro_name, if (! save_rle_decoder (output,
config->glib_types ? "guint" : "unsigned int", macro_name,
config->glib_types ? "guint8" : "unsigned char", config->glib_types ? "guint" : "unsigned int",
config->alpha ? 4 : 3); config->glib_types ? "guint8" : "unsigned char",
config->alpha ? 4 : 3,
error))
goto fail;
}
if (!config->use_macros) if (!config->use_macros)
{ {
fprintf (fp, "static const struct {\n"); if (! print (output, error,
fprintf (fp, " %s\t width;\n", s_uint); "static const struct {\n"
fprintf (fp, " %s\t height;\n", s_uint); " %s\t width;\n"
fprintf (fp, " %s\t bytes_per_pixel; /* 2:RGB16, 3:RGB, 4:RGBA */ \n", " %s\t height;\n"
s_uint); " %s\t bytes_per_pixel; /* 2:RGB16, 3:RGB, 4:RGBA */ \n",
s_uint, s_uint, s_uint))
goto fail;
if (config->use_comment) if (config->use_comment)
fprintf (fp, " %s\t*comment;\n", s_char); {
fprintf (fp, " %s\t %spixel_data[", if (! print (output, error, " %s\t*comment;\n", s_char))
s_uint_8, goto fail;
config->use_rle ? "rle_" : ""); }
if (! print (output, error,
" %s\t %spixel_data[",
s_uint_8,
config->use_rle ? "rle_" : ""))
goto fail;
if (config->use_rle) if (config->use_rle)
fprintf (fp, "%u + 1];\n", (guint) (img_buffer_end - img_buffer)); {
if (! print (output, error,
"%u + 1];\n",
(guint) (img_buffer_end - img_buffer)))
goto fail;
}
else else
fprintf (fp, "%u * %u * %u + 1];\n", {
width, if (! print (output, error,
height, "%u * %u * %u + 1];\n",
config->rgb565 ? 2 : (config->alpha ? 4 : 3)); width,
fprintf (fp, "} %s = {\n", config->prefixed_name); height,
fprintf (fp, " %u, %u, %u,\n", config->rgb565 ? 2 : (config->alpha ? 4 : 3)))
width, goto fail;
height, }
config->rgb565 ? 2 : (config->alpha ? 4 : 3));
if (! print (output, error, "} %s = {\n", config->prefixed_name))
goto fail;
if (! print (output, error,
" %u, %u, %u,\n",
width,
height,
config->rgb565 ? 2 : (config->alpha ? 4 : 3)))
goto fail;
} }
else /* use macros */ else /* use macros */
{ {
fprintf (fp, "#define %s_WIDTH (%u)\n", if (! print (output, error,
macro_name, width); "#define %s_WIDTH (%u)\n"
fprintf (fp, "#define %s_HEIGHT (%u)\n", "#define %s_HEIGHT (%u)\n"
macro_name, height); "#define %s_BYTES_PER_PIXEL (%u) /* 3:RGB, 4:RGBA */\n",
fprintf (fp, "#define %s_BYTES_PER_PIXEL (%u) /* 3:RGB, 4:RGBA */\n", macro_name, width,
macro_name, config->alpha ? 4 : 3); macro_name, height,
macro_name, config->alpha ? 4 : 3))
{
goto fail;
}
} }
if (config->use_comment && !config->comment) if (config->use_comment && !config->comment)
{ {
if (!config->use_macros) if (! config->use_macros)
fprintf (fp, " %s,\n", s_null); {
else /* use macros */ if (! print (output, error, " %s,\n", s_null))
fprintf (fp, "#define %s_COMMENT (%s)\n", macro_name, s_null); goto fail;
}
else
{
if (! print (output, error,
"#define %s_COMMENT (%s)\n",
macro_name, s_null))
goto fail;
}
} }
else if (config->use_comment) else if (config->use_comment)
{ {
gchar *p = config->comment - 1; gchar *p = config->comment - 1;
if (config->use_macros) if (config->use_macros)
fprintf (fp, "#define %s_COMMENT \\\n", macro_name); {
fprintf (fp, " \""); if (! print (output, error, "#define %s_COMMENT \\\n", macro_name))
goto fail;
}
if (! print (output, error, " \""))
goto fail;
while (*(++p)) while (*(++p))
if (*p == '\\') {
fprintf (fp, "\\\\"); gboolean success = FALSE;
else if (*p == '"')
fprintf (fp, "\\\""); if (*p == '\\')
else if (*p == '\n' && p[1]) success = print (output, error, "\\\\");
fprintf (fp, "\\n\"%s\n \"", else if (*p == '"')
config->use_macros ? " \\" : ""); success = print (output, error, "\\\"");
else if (*p == '\n') else if (*p == '\n' && p[1])
fprintf (fp, "\\n"); success = print (output, error,
else if (*p == '\r') "\\n\"%s\n \"",
fprintf (fp, "\\r"); config->use_macros ? " \\" : "");
else if (*p == '\b') else if (*p == '\n')
fprintf (fp, "\\b"); success = print (output, error, "\\n");
else if (*p == '\f') else if (*p == '\r')
fprintf (fp, "\\f"); success = print (output, error, "\\r");
else if (*p >= 32 && *p <= 126) else if (*p == '\b')
fprintf (fp, "%c", *p); success = print (output, error, "\\b");
else else if (*p == '\f')
fprintf (fp, "\\%03o", *p); success = print (output, error, "\\f");
if (!config->use_macros) else if (*p >= 32 && *p <= 126)
fprintf (fp, "\",\n"); success = print (output, error, "%c", *p);
else /* use macros */ else
fprintf (fp, "\"\n"); 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 (config->use_macros)
{ {
fprintf (fp, "#define %s_%sPIXEL_DATA ((%s*) %s_%spixel_data)\n", if (! print (output, error,
macro_name, "#define %s_%sPIXEL_DATA ((%s*) %s_%spixel_data)\n",
config->use_rle ? "RLE_" : "", macro_name,
s_uint_8, config->use_rle ? "RLE_" : "",
macro_name, s_uint_8,
config->use_rle ? "rle_" : ""); macro_name,
config->use_rle ? "rle_" : ""))
goto fail;
if (config->use_rle) if (config->use_rle)
save_rle_decoder (fp, {
macro_name, if (! save_rle_decoder (output,
s_uint, macro_name,
s_uint_8, s_uint,
config->alpha ? 4 : 3); s_uint_8,
fprintf (fp, "static const %s %s_%spixel_data[", config->alpha ? 4 : 3,
s_uint_8, error))
macro_name, goto fail;
config->use_rle ? "rle_" : ""); }
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 (config->use_rle)
fprintf (fp, "%u] =\n", (guint) (img_buffer_end - img_buffer)); {
if (! print (output, error,
"%u] =\n",
(guint) (img_buffer_end - img_buffer)))
goto fail;
}
else else
fprintf (fp, "%u * %u * %u + 1] =\n", {
width, if (! print (output, error,
height, "%u * %u * %u + 1] =\n",
config->alpha ? 4 : 3); width,
fprintf (fp, "(\""); height,
config->alpha ? 4 : 3))
goto fail;
}
if (! print (output, error, "(\""))
goto fail;
c = 2; c = 2;
} }
else else
{ {
fprintf (fp, " \""); if (! print (output, error, " \""))
goto fail;
c = 3; c = 3;
} }
switch (drawable_type) switch (drawable_type)
{ {
case GIMP_RGB_IMAGE: case GIMP_RGB_IMAGE:
case GIMP_RGBA_IMAGE: case GIMP_RGBA_IMAGE:
do do
c = save_uchar (fp, c, *(img_buffer++), config); {
if (! save_uchar (output, &c, *(img_buffer++), config, error))
goto fail;
}
while (img_buffer < img_buffer_end); while (img_buffer < img_buffer_end);
break; break;
default: default:
g_warning ("unhandled drawable type (%d)", drawable_type); g_warning ("unhandled drawable type (%d)", drawable_type);
fclose (fp); goto fail;
return FALSE;
} }
if (!config->use_macros)
fprintf (fp, "\",\n};\n\n");
else /* use macros */
fprintf (fp, "\");\n\n");
fclose (fp); 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); g_object_unref (buffer);
return TRUE; return TRUE;
fail:
g_object_unref (output);
g_object_unref (buffer);
return FALSE;
} }
static void static void