AlderconeStudio/PIKApp
AlderconeStudio
/
PIKApp
0
0
Fork 0
Code Issues 1 Pull Requests Packages Projects Releases 1 Wiki Activity
PIKApp/app/app.c

574 lines
17 KiB
C
Raw Permalink Blame History

/* 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 Spencer Kimball and Peter Mattis
*
* 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/>.
*/
#include "config.h"
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <locale.h>
#ifdef HAVE_SYS_PARAM_H
#include <sys/param.h>
#endif
#ifdef HAVE_UNISTD_H
#include <unistd.h>
#endif
#include <glib/gstdio.h>
#include <gio/gio.h>
#include <gegl.h>
#include <gdk-pixbuf/gdk-pixbuf.h>
#ifdef G_OS_WIN32
#include <windows.h>
#include <winnls.h>
#endif
#undef PIKA_DISABLE_DEPRECATED /* for compat enums */
#include "libpikabase/pikabase.h"
#define PIKA_DISABLE_DEPRECATED
#include "libpikaconfig/pikaconfig.h"
#include "core/core-types.h"
#include "config/pikarc.h"
#include "gegl/pika-gegl.h"
#include "core/pika.h"
#include "core/pika-batch.h"
#include "core/pika-user-install.h"
#include "core/pikaimage.h"
#include "file/file-open.h"
#ifndef PIKA_CONSOLE_COMPILATION
#include <gtk/gtk.h>
#include "dialogs/user-install-dialog.h"
#include "gui/pikaapp.h"
#include "gui/gui.h"
#endif
#include "app.h"
#include "errors.h"
#include "pikaconsoleapp.h"
#include "pikacoreapp.h"
#include "language.h"
#include "sanity.h"
#include "pika-debug.h"
#include "pika-intl.h"
#include "pika-update.h"
/* local prototypes */
static void app_init_update_noop (const gchar *text1,
const gchar *text2,
gdouble percentage);
static void app_activate_callback (PikaCoreApp *app,
gpointer user_data);
static void app_restore_after_callback (Pika *pika,
PikaInitStatusFunc status_callback);
static gboolean app_exit_after_callback (Pika *pika,
gboolean kill_it,
GApplication *app);
#if 0
/* left here as documentation how to do compat enums */
GType pika_convert_dither_type_compat_get_type (void); /* compat cruft */
#endif
/* local variables */
static GObject *initial_monitor = NULL;
/* public functions */
void
app_libs_init (GOptionContext *context,
gboolean no_interface)
{
#if 0
GQuark quark;
#endif
/* disable OpenCL before GEGL is even initialized; this way we only
* enable if wanted in pikarc, instead of always enabling, and then
* disabling again if wanted in pikarc
*/
g_object_set (gegl_config (),
"use-opencl", FALSE,
"application-license", "GPL3",
NULL);
g_option_context_add_group (context, gegl_get_option_group ());
#ifndef PIKA_CONSOLE_COMPILATION
if (! no_interface)
{
gui_libs_init (context);
}
#endif
#if 0
/* left here as documentation how to do compat enums */
/* keep compat enum code in sync with pdb/enumcode.pl */
quark = g_quark_from_static_string ("pika-compat-enum");
g_type_set_qdata (PIKA_TYPE_CONVERT_DITHER_TYPE, quark,
(gpointer) pika_convert_dither_type_compat_get_type ());
#endif
}
void
app_abort (gboolean no_interface,
const gchar *abort_message)
{
#ifndef PIKA_CONSOLE_COMPILATION
if (no_interface)
#endif
{
g_print ("%s\n\n", abort_message);
}
#ifndef PIKA_CONSOLE_COMPILATION
else
{
gui_abort (abort_message);
}
#endif
app_exit (EXIT_FAILURE);
}
void
app_exit (gint status)
{
exit (status);
}
gint
app_run (const gchar *full_prog_name,
const gchar **filenames,
GFile *alternate_system_pikarc,
GFile *alternate_pikarc,
const gchar *session_name,
const gchar *batch_interpreter,
const gchar **batch_commands,
gboolean quit,
gboolean as_new,
gboolean no_interface,
gboolean no_data,
gboolean no_fonts,
gboolean no_splash,
gboolean be_verbose,
gboolean use_shm,
gboolean use_cpu_accel,
gboolean console_messages,
gboolean use_debug_handler,
gboolean show_playground,
gboolean show_debug_menu,
PikaStackTraceMode stack_trace_mode,
PikaPDBCompatMode pdb_compat_mode,
const gchar *backtrace_file)
{
Pika *pika = NULL;
GApplication *app = NULL;
GFile *default_folder = NULL;
GFile *pikadir = NULL;
const gchar *abort_message = NULL;
gint retval = EXIT_SUCCESS;
if (filenames && filenames[0] && ! filenames[1] &&
g_file_test (filenames[0], G_FILE_TEST_IS_DIR))
{
if (g_path_is_absolute (filenames[0]))
{
default_folder = g_file_new_for_path (filenames[0]);
}
else
{
gchar *absolute = g_build_path (G_DIR_SEPARATOR_S,
g_get_current_dir (),
filenames[0],
NULL);
default_folder = g_file_new_for_path (absolute);
g_free (absolute);
}
filenames = NULL;
}
/* Create an instance of the "Pika" object which is the root of the
* core object system
*/
pika = pika_new (full_prog_name,
session_name,
default_folder,
be_verbose,
no_data,
no_fonts,
no_interface,
use_shm,
use_cpu_accel,
console_messages,
show_playground,
show_debug_menu,
stack_trace_mode,
pdb_compat_mode);
g_clear_object (&default_folder);
#ifndef PIKA_CONSOLE_COMPILATION
app = pika_app_new (pika, no_splash, quit, as_new, filenames, batch_interpreter, batch_commands);
#else
app = pika_console_app_new (pika, quit, as_new, filenames, batch_interpreter, batch_commands);
#endif
pika->app = app;
pika_cpu_accel_set_use (use_cpu_accel);
/* Check if the user's pika_directory exists */
pikadir = pika_directory_file (NULL);
if (g_file_query_file_type (pikadir, G_FILE_QUERY_INFO_NONE, NULL) !=
G_FILE_TYPE_DIRECTORY)
{
PikaUserInstall *install = pika_user_install_new (G_OBJECT (pika),
be_verbose);
#ifdef PIKA_CONSOLE_COMPILATION
pika_user_install_run (install, 1);
#else
if (! (no_interface ?
pika_user_install_run (install, 1) :
user_install_dialog_run (install)))
exit (EXIT_FAILURE);
#endif
pika_user_install_free (install);
}
g_object_unref (pikadir);
pika_load_config (pika, alternate_system_pikarc, alternate_pikarc);
/* Initialize the error handling after creating/migrating the config
* directory because it will create some folders for backup and crash
* logs in advance. Therefore running this before
* pika_user_install_new() would break migration as well as initial
* folder creations.
*
* It also needs to be run after pika_load_config() because error
* handling is based on Preferences. It means that early loading code
* is not handled by our debug code, but that's not a big deal.
*/
errors_init (pika, full_prog_name, use_debug_handler,
stack_trace_mode, backtrace_file);
/* run the late-stage sanity check. it's important that this check is run
* after the call to language_init() (see comment in sanity_check_late().)
*/
abort_message = sanity_check_late ();
if (abort_message)
app_abort (no_interface, abort_message);
/* initialize lowlevel stuff */
pika_gegl_init (pika);
/* Connect our restore_after callback before gui_init() connects
* theirs, so ours runs first and can grab the initial monitor
* before the GUI's restore_after callback resets it.
*/
g_signal_connect_after (pika, "restore",
G_CALLBACK (app_restore_after_callback),
NULL);
g_signal_connect_after (pika, "exit",
G_CALLBACK (app_exit_after_callback),
app);
g_signal_connect (app, "activate",
G_CALLBACK (app_activate_callback),
NULL);
retval = g_application_run (app, 0, NULL);
if (! retval)
retval = pika_core_app_get_exit_status (PIKA_CORE_APP (app));
if (pika->be_verbose)
g_print ("EXIT: %s\n", G_STRFUNC);
g_clear_object (&app);
pika_gegl_exit (pika);
errors_exit ();
while (g_main_context_pending (NULL))
g_main_context_iteration (NULL, TRUE);
g_object_unref (pika);
pika_debug_instances ();
gegl_exit ();
return retval;
}
/* private functions */
static void
app_init_update_noop (const gchar *text1,
const gchar *text2,
gdouble percentage)
{
/* deliberately do nothing */
}
static void
app_activate_callback (PikaCoreApp *app,
gpointer user_data)
{
Pika *pika = NULL;
PikaInitStatusFunc update_status_func = NULL;
const gchar **filenames;
const gchar *current_language;
gchar *prev_language = NULL;
GError *font_error = NULL;
gint batch_retval;
g_return_if_fail (PIKA_IS_CORE_APP (app));
pika = pika_core_app_get_pika (app);
pika_core_app_set_exit_status (app, EXIT_SUCCESS);
#ifndef PIKA_CONSOLE_COMPILATION
if (! pika->no_interface)
update_status_func = gui_init (pika, pika_app_get_no_splash (PIKA_APP (app)), PIKA_APP (app), NULL);
#endif
if (! update_status_func)
update_status_func = app_init_update_noop;
/* Create all members of the global Pika instance which need an already
* parsed pikarc, e.g. the data factories
*/
pika_initialize (pika, update_status_func);
g_object_get (pika->edit_config,
"prev-language", &prev_language,
NULL);
/* Language was already initialized. I call this again only to get the
* actual language information.
*/
current_language = language_init (NULL);
pika->query_all = (prev_language == NULL ||
g_strcmp0 (prev_language, current_language) != 0);
g_free (prev_language);
/* Load all data files */
pika_restore (pika, update_status_func, &font_error);
/* enable autosave late so we don't autosave when the
* monitor resolution is set in gui_init()
*/
pika_rc_set_autosave (PIKA_RC (pika->edit_config), TRUE);
/* check for updates *after* enabling config autosave, so that the timestamp
* is saved
*/
pika_update_auto_check (pika->edit_config, pika);
/* Setting properties to be used for the next run. */
g_object_set (pika->edit_config,
/* Set this after pika_update_auto_check(). */
"config-version", PIKA_VERSION,
/* Set this after pika_restore(). */
"prev-language", current_language,
NULL);
#ifndef PIKA_CONSOLE_COMPILATION
if (! pika->no_interface)
{
/* Before opening images from command line, check for salvaged images
* and query interactively to know if we should recover or discard
* them.
*/
GList *recovered_files;
GList *iter;
recovered_files = errors_recovered ();
if (recovered_files &&
gui_recover (g_list_length (recovered_files)))
{
for (iter = recovered_files; iter; iter = iter->next)
{
GFile *file;
PikaImage *image;
GError *error = NULL;
PikaPDBStatusType status;
file = g_file_new_for_path (iter->data);
image = file_open_with_display (pika,
pika_get_user_context (pika),
NULL,
file,
pika_core_app_get_as_new (app),
initial_monitor,
&status, &error);
if (image)
{
/* Break ties with the backup directory. */
pika_image_set_file (image, NULL);
/* One of the rare exceptions where we should call
* pika_image_dirty() directly instead of creating
* an undo. We want the image to be dirty from
* scratch, without anything to undo.
*/
pika_image_dirty (image, PIKA_DIRTY_IMAGE);
}
else
{
g_error_free (error);
}
g_object_unref (file);
}
}
/* Delete backup XCF images. */
for (iter = recovered_files; iter; iter = iter->next)
{
g_unlink (iter->data);
}
g_list_free_full (recovered_files, g_free);
}
#endif
/* Load the images given on the command-line. */
filenames = pika_core_app_get_filenames (app);
if (filenames != NULL)
{
gint i;
for (i = 0; filenames[i] != NULL; i++)
{
GFile *file = g_file_new_for_commandline_arg (filenames[i]);
file_open_from_command_line (pika, file,
pika_core_app_get_as_new (app),
initial_monitor);
g_object_unref (file);
}
}
/* The software is now fully loaded and ready to be used and get
* external input.
*/
pika->initialized = TRUE;
if (font_error)
{
pika_message_literal (pika, NULL,
PIKA_MESSAGE_INFO,
font_error->message);
g_error_free (font_error);
}
batch_retval = pika_batch_run (pika,
pika_core_app_get_batch_interpreter (app),
pika_core_app_get_batch_commands (app));
if (pika_core_app_get_quit (app))
{
/* Only if we are in batch mode, we want to exit with the
* return value of the batch command.
*/
pika_core_app_set_exit_status (app, batch_retval);
/* Emit the "exit" signal, but also properly free all images still
* opened.
*/
pika_exit (pika, TRUE);
}
}
static void
app_restore_after_callback (Pika *pika,
PikaInitStatusFunc status_callback)
{
gint dummy;
/* Getting the display name for a -1 display returns the initial
* monitor during startup. Need to call this from a restore_after
* callback, because before restore(), the GUI can't return anything,
* after after restore() the initial monitor gets reset.
*/
g_free (pika_get_display_name (pika, -1, &initial_monitor, &dummy));
}
static gboolean
app_exit_after_callback (Pika *pika,
gboolean kill_it,
GApplication *app)
{
if (pika->be_verbose)
g_print ("EXIT: %s\n", G_STRFUNC);
/*
* In stable releases, we simply call exit() here. This speeds up
* the process of quitting PIKA and also works around the problem
* that plug-ins might still be running.
*
* In unstable releases, we shut down PIKA properly in an attempt
* to catch possible problems in our finalizers.
*/
#ifdef PIKA_UNSTABLE
g_application_quit (G_APPLICATION (app));
#else
pika_gegl_exit (pika);
gegl_exit ();
exit (pika_core_app_get_exit_status (PIKA_CORE_APP (app)));
#endif
return FALSE;
}
Reference in New Issue View Git Blame Copy Permalink