/* PIKA - Photo and Image Kooker Application * a rebranding of The GNU Image Manipulation Program (created with heckimp) * A derived work which may be trivial. However, any changes may be (C)2023 by Aldercone Studio * * Original copyright, applying to most contents (license remains unchanged): * Copyright (C) 1995-1999 Spencer Kimball and Peter Mattis * * file-icns.c * Copyright (C) 2004 Brion Vibber * * 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 . */ #include "config.h" #include #include #include #include #include /* #define ICNS_DBG */ #include "file-icns.h" #include "file-icns-load.h" #include "file-icns-save.h" #include "libpika/stdplugins-intl.h" #define LOAD_PROC "file-icns-load" #define LOAD_THUMB_PROC "file-icns-load-thumb" #define SAVE_PROC "file-icns-save" typedef struct _Icns Icns; typedef struct _IcnsClass IcnsClass; struct _Icns { PikaPlugIn parent_instance; }; struct _IcnsClass { PikaPlugInClass parent_class; }; #define ICNS_TYPE (icns_get_type ()) #define ICNS(obj) (G_TYPE_CHECK_INSTANCE_CAST ((obj), ICNS_TYPE, Icns)) GType icns_get_type (void) G_GNUC_CONST; static GList * icns_query_procedures (PikaPlugIn *plug_in); static PikaProcedure * icns_create_procedure (PikaPlugIn *plug_in, const gchar *name); static PikaValueArray * icns_load (PikaProcedure *procedure, PikaRunMode run_mode, GFile *file, PikaMetadata *metadata, PikaMetadataLoadFlags *flags, PikaProcedureConfig *config, gpointer run_data); static PikaValueArray * icns_load_thumb (PikaProcedure *procedure, GFile *file, gint size, PikaProcedureConfig *config, gpointer run_data); static PikaValueArray * icns_save (PikaProcedure *procedure, PikaRunMode run_mode, PikaImage *image, gint n_drawables, PikaDrawable **drawables, GFile *file, PikaMetadata *metadata, PikaProcedureConfig *config, gpointer run_data); G_DEFINE_TYPE (Icns, icns, PIKA_TYPE_PLUG_IN) PIKA_MAIN (ICNS_TYPE) DEFINE_STD_SET_I18N static void icns_class_init (IcnsClass *klass) { PikaPlugInClass *plug_in_class = PIKA_PLUG_IN_CLASS (klass); plug_in_class->query_procedures = icns_query_procedures; plug_in_class->create_procedure = icns_create_procedure; plug_in_class->set_i18n = STD_SET_I18N; } static void icns_init (Icns *icns) { } static GList * icns_query_procedures (PikaPlugIn *plug_in) { GList *list = NULL; list = g_list_append (list, g_strdup (LOAD_THUMB_PROC)); list = g_list_append (list, g_strdup (LOAD_PROC)); list = g_list_append (list, g_strdup (SAVE_PROC)); return list; } static PikaProcedure * icns_create_procedure (PikaPlugIn *plug_in, const gchar *name) { PikaProcedure *procedure = NULL; if (! strcmp (name, LOAD_PROC)) { procedure = pika_load_procedure_new (plug_in, name, PIKA_PDB_PROC_TYPE_PLUGIN, icns_load, NULL, NULL); pika_procedure_set_menu_label (procedure, N_("Icns")); pika_procedure_set_documentation (procedure, "Loads files in Apple Icon Image format", "Loads Apple Icon Image files.", name); pika_procedure_set_attribution (procedure, "Brion Vibber ", "Brion Vibber ", "2004"); pika_file_procedure_set_mime_types (PIKA_FILE_PROCEDURE (procedure), "image/x-icns"); pika_file_procedure_set_extensions (PIKA_FILE_PROCEDURE (procedure), "icns"); pika_file_procedure_set_magics (PIKA_FILE_PROCEDURE (procedure), "0,string,\x69\x63\x6E\x73"); pika_load_procedure_set_thumbnail_loader (PIKA_LOAD_PROCEDURE (procedure), LOAD_THUMB_PROC); } else if (! strcmp (name, LOAD_THUMB_PROC)) { procedure = pika_thumbnail_procedure_new (plug_in, name, PIKA_PDB_PROC_TYPE_PLUGIN, icns_load_thumb, NULL, NULL); pika_procedure_set_documentation (procedure, "Loads a preview from an Apple Icon Image file", "", name); pika_procedure_set_attribution (procedure, "Brion Vibber ", "Brion Vibber ", "2004"); } else if (! strcmp (name, SAVE_PROC)) { procedure = pika_save_procedure_new (plug_in, name, PIKA_PDB_PROC_TYPE_PLUGIN, FALSE, icns_save, NULL, NULL); pika_procedure_set_image_types (procedure, "*"); pika_procedure_set_menu_label (procedure, _("Apple Icon Image")); pika_procedure_set_icon_name (procedure, PIKA_ICON_BRUSH); pika_procedure_set_documentation (procedure, "Saves files in Apple Icon Image file format", "Saves files in Apple Icon Image file format", name); pika_procedure_set_attribution (procedure, "Brion Vibber ", "Brion Vibber ", "2004"); pika_file_procedure_set_mime_types (PIKA_FILE_PROCEDURE (procedure), "image/x-icns"); pika_file_procedure_set_extensions (PIKA_FILE_PROCEDURE (procedure), "icns"); } return procedure; } static PikaValueArray * icns_load (PikaProcedure *procedure, PikaRunMode run_mode, GFile *file, PikaMetadata *metadata, PikaMetadataLoadFlags *flags, PikaProcedureConfig *config, gpointer run_data) { PikaValueArray *return_vals; PikaImage *image; GError *error = NULL; gegl_init (NULL, NULL); image = icns_load_image (file, NULL, &error); if (! image) return pika_procedure_new_return_values (procedure, PIKA_PDB_EXECUTION_ERROR, error); return_vals = pika_procedure_new_return_values (procedure, PIKA_PDB_SUCCESS, NULL); PIKA_VALUES_SET_IMAGE (return_vals, 1, image); return return_vals; } static PikaValueArray * icns_load_thumb (PikaProcedure *procedure, GFile *file, gint size, PikaProcedureConfig *config, gpointer run_data) { PikaValueArray *return_vals; gint width; gint height; PikaImage *image; GError *error = NULL; gegl_init (NULL, NULL); width = size; height = size; image = icns_load_thumbnail_image (file, &width, &height, 0, &error); if (! image) return pika_procedure_new_return_values (procedure, PIKA_PDB_EXECUTION_ERROR, error); return_vals = pika_procedure_new_return_values (procedure, PIKA_PDB_SUCCESS, NULL); PIKA_VALUES_SET_IMAGE (return_vals, 1, image); PIKA_VALUES_SET_INT (return_vals, 2, width); PIKA_VALUES_SET_INT (return_vals, 3, height); pika_value_array_truncate (return_vals, 4); return return_vals; } static PikaValueArray * icns_save (PikaProcedure *procedure, PikaRunMode run_mode, PikaImage *image, gint n_drawables, PikaDrawable **drawables, GFile *file, PikaMetadata *metadata, PikaProcedureConfig *config, gpointer run_data) { PikaPDBStatusType status; GError *error = NULL; gegl_init (NULL, NULL); status = icns_save_image (file, image, run_mode, &error); return pika_procedure_new_return_values (procedure, status, error); } /* Buffer should point to *at least 5 byte buffer*! */ void fourcc_get_string (gchar *fourcc, gchar *buf) { buf = fourcc; buf[4] = 0; }