PIKApp/app/display/pikadisplayshell-title.c

572 lines
18 KiB
C

/* 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 <string.h>
#include <gegl.h>
#include <gtk/gtk.h>
#include "libpikabase/pikabase.h"
#include "libpikacolor/pikacolor.h"
#include "libpikawidgets/pikawidgets.h"
#include "libpikabase/pikabase.h"
#include "display-types.h"
#include "config/pikadisplayconfig.h"
#include "gegl/pika-babl.h"
#include "core/pikacontainer.h"
#include "core/pikadrawable.h"
#include "core/pikaimage.h"
#include "core/pikaimage-color-profile.h"
#include "core/pikaitem.h"
#include "pikadisplay.h"
#include "pikadisplayshell.h"
#include "pikadisplayshell-title.h"
#include "pikastatusbar.h"
#include "about.h"
#include "pika-intl.h"
#define MAX_TITLE_BUF 512
static gboolean pika_display_shell_update_title_idle (gpointer data);
static gint pika_display_shell_format_title (PikaDisplayShell *display,
gchar *title,
gint title_len,
const gchar *format);
/* public functions */
void
pika_display_shell_title_update (PikaDisplayShell *shell)
{
g_return_if_fail (PIKA_IS_DISPLAY_SHELL (shell));
if (shell->title_idle_id)
g_source_remove (shell->title_idle_id);
shell->title_idle_id = g_idle_add (pika_display_shell_update_title_idle,
shell);
}
/* private functions */
static gboolean
pika_display_shell_update_title_idle (gpointer data)
{
PikaDisplayShell *shell = PIKA_DISPLAY_SHELL (data);
shell->title_idle_id = 0;
if (pika_display_get_image (shell->display))
{
PikaDisplayConfig *config = shell->display->config;
gchar title[MAX_TITLE_BUF];
gchar status[MAX_TITLE_BUF];
gint len;
/* format the title */
len = pika_display_shell_format_title (shell, title, sizeof (title),
config->image_title_format);
if (len) /* U+2013 EN DASH */
len += g_strlcpy (title + len, " \342\200\223 ", sizeof (title) - len);
g_strlcpy (title + len, PIKA_ACRONYM, sizeof (title) - len);
/* format the statusbar */
pika_display_shell_format_title (shell, status, sizeof (status),
config->image_status_format);
g_object_set (shell,
"title", title,
"status", status,
NULL);
}
else
{
g_object_set (shell,
"title", PIKA_NAME,
"status", " ",
NULL);
}
return FALSE;
}
static const gchar *
pika_display_shell_title_image_type (PikaImage *image)
{
const gchar *name = "";
pika_enum_get_value (PIKA_TYPE_IMAGE_BASE_TYPE,
pika_image_get_base_type (image), NULL, NULL, &name, NULL);
return name;
}
static const gchar *
pika_display_shell_title_image_precision (PikaImage *image)
{
const gchar *name = "";
pika_enum_get_value (PIKA_TYPE_PRECISION,
pika_image_get_precision (image), NULL, NULL, &name, NULL);
return name;
}
static gint print (gchar *buf,
gint len,
gint start,
const gchar *fmt,
...) G_GNUC_PRINTF (4, 5);
static gint
print (gchar *buf,
gint len,
gint start,
const gchar *fmt,
...)
{
va_list args;
gint printed;
va_start (args, fmt);
printed = g_vsnprintf (buf + start, len - start, fmt, args);
if (printed < 0)
printed = len - start;
va_end (args);
return printed;
}
static gint
pika_display_shell_format_title (PikaDisplayShell *shell,
gchar *title,
gint title_len,
const gchar *format)
{
PikaImage *image;
PikaDrawable *drawable = NULL;
GList *drawables;
gint num, denom;
gint i = 0;
g_return_val_if_fail (PIKA_IS_DISPLAY_SHELL (shell), 0);
image = pika_display_get_image (shell->display);
if (! image)
{
title[0] = '\n';
return 0;
}
/* PIKA window title only take single selected layer into account so
* far (not sure how we could have multi-layer concept there, except
* wanting never-ending window titles!).
* When multiple drawables are selected, we just display nothing.
*/
drawables = pika_image_get_selected_drawables (image);
if (g_list_length (drawables) == 1)
drawable = drawables->data;
g_list_free (drawables);
pika_zoom_model_get_fraction (shell->zoom, &num, &denom);
while (i < title_len && *format)
{
switch (*format)
{
case '%':
format++;
switch (*format)
{
case 0:
/* format string ends within %-sequence, print literal '%' */
case '%':
title[i++] = '%';
break;
case 'f': /* base filename */
i += print (title, title_len, i, "%s",
pika_image_get_display_name (image));
break;
case 'F': /* full filename */
i += print (title, title_len, i, "%s",
pika_image_get_display_path (image));
break;
case 'p': /* PDB id */
i += print (title, title_len, i, "%d", pika_image_get_id (image));
break;
case 'i': /* instance */
i += print (title, title_len, i, "%d",
pika_display_get_instance (shell->display));
break;
case 't': /* image type */
i += print (title, title_len, i, "%s %s",
pika_display_shell_title_image_type (image),
pika_display_shell_title_image_precision (image));
break;
case 'T': /* drawable type */
if (drawable)
{
const Babl *format = pika_drawable_get_format (drawable);
i += print (title, title_len, i, "%s",
pika_babl_format_get_description (format));
}
break;
case 's': /* user source zoom factor */
i += print (title, title_len, i, "%d", denom);
break;
case 'd': /* user destination zoom factor */
i += print (title, title_len, i, "%d", num);
break;
case 'z': /* user zoom factor (percentage) */
{
gdouble scale = pika_zoom_model_get_factor (shell->zoom);
i += print (title, title_len, i,
scale >= 0.15 ? "%.0f" : "%.2f", 100.0 * scale);
}
break;
case 'D': /* dirty flag */
if (format[1] == 0)
{
/* format string ends within %D-sequence, print literal '%D' */
i += print (title, title_len, i, "%%D");
break;
}
if (pika_image_is_dirty (image))
title[i++] = format[1];
format++;
break;
case 'C': /* clean flag */
if (format[1] == 0)
{
/* format string ends within %C-sequence, print literal '%C' */
i += print (title, title_len, i, "%%C");
break;
}
if (! pika_image_is_dirty (image))
title[i++] = format[1];
format++;
break;
case 'B': /* dirty flag (long) */
if (pika_image_is_dirty (image))
i += print (title, title_len, i, "%s", _("(modified)"));
break;
case 'A': /* clean flag (long) */
if (! pika_image_is_dirty (image))
i += print (title, title_len, i, "%s", _("(clean)"));
break;
case 'N': /* not-exported flag */
if (format[1] == 0)
{
/* format string ends within %E-sequence, print literal '%E' */
i += print (title, title_len, i, "%%N");
break;
}
if (pika_image_is_export_dirty (image))
title[i++] = format[1];
format++;
break;
case 'E': /* exported flag */
if (format[1] == 0)
{
/* format string ends within %E-sequence, print literal '%E' */
i += print (title, title_len, i, "%%E");
break;
}
if (! pika_image_is_export_dirty (image))
title[i++] = format[1];
format++;
break;
case 'm': /* memory used by image */
{
PikaObject *object = PIKA_OBJECT (image);
gchar *str;
str = g_format_size (pika_object_get_memsize (object, NULL));
i += print (title, title_len, i, "%s", str);
g_free (str);
}
break;
case 'M': /* image size in megapixels */
i += print (title, title_len, i, "%.1f",
(gdouble) pika_image_get_width (image) *
(gdouble) pika_image_get_height (image) / 1000000.0);
break;
case 'l': /* number of layers */
i += print (title, title_len, i, "%d",
pika_image_get_n_layers (image));
break;
case 'L': /* number of layers (long) */
{
gint num = pika_image_get_n_layers (image);
i += print (title, title_len, i,
ngettext ("%d layer", "%d layers", num), num);
}
break;
case 'n': /* active drawable name */
if (drawable)
{
gchar *desc;
desc = pika_viewable_get_description (PIKA_VIEWABLE (drawable),
NULL);
i += print (title, title_len, i, "%s", desc);
g_free (desc);
}
else
{
i += print (title, title_len, i, "%s", _("(none)"));
}
break;
case 'P': /* active drawable PDB id */
if (drawable)
i += print (title, title_len, i, "%d",
pika_item_get_id (PIKA_ITEM (drawable)));
else
i += print (title, title_len, i, "%s", _("(none)"));
break;
case 'W': /* width in real-world units */
if (shell->unit != PIKA_UNIT_PIXEL)
{
gdouble xres;
gdouble yres;
gchar unit_format[8];
pika_image_get_resolution (image, &xres, &yres);
g_snprintf (unit_format, sizeof (unit_format), "%%.%df",
pika_unit_get_scaled_digits (shell->unit, xres));
i += print (title, title_len, i, unit_format,
pika_pixels_to_units (pika_image_get_width (image),
shell->unit, xres));
break;
}
/* else fallthru */
case 'w': /* width in pixels */
i += print (title, title_len, i, "%d",
pika_image_get_width (image));
break;
case 'H': /* height in real-world units */
if (shell->unit != PIKA_UNIT_PIXEL)
{
gdouble xres;
gdouble yres;
gchar unit_format[8];
pika_image_get_resolution (image, &xres, &yres);
g_snprintf (unit_format, sizeof (unit_format), "%%.%df",
pika_unit_get_scaled_digits (shell->unit, yres));
i += print (title, title_len, i, unit_format,
pika_pixels_to_units (pika_image_get_height (image),
shell->unit, yres));
break;
}
/* else fallthru */
case 'h': /* height in pixels */
i += print (title, title_len, i, "%d",
pika_image_get_height (image));
break;
case 'u': /* unit symbol */
i += print (title, title_len, i, "%s",
pika_unit_get_symbol (shell->unit));
break;
case 'U': /* unit abbreviation */
i += print (title, title_len, i, "%s",
pika_unit_get_abbreviation (shell->unit));
break;
case 'X': /* drawable width in real world units */
if (drawable && shell->unit != PIKA_UNIT_PIXEL)
{
gdouble xres;
gdouble yres;
gchar unit_format[8];
pika_image_get_resolution (image, &xres, &yres);
g_snprintf (unit_format, sizeof (unit_format), "%%.%df",
pika_unit_get_scaled_digits (shell->unit, xres));
i += print (title, title_len, i, unit_format,
pika_pixels_to_units (pika_item_get_width
(PIKA_ITEM (drawable)),
shell->unit, xres));
break;
}
/* else fallthru */
case 'x': /* drawable width in pixels */
if (drawable)
i += print (title, title_len, i, "%d",
pika_item_get_width (PIKA_ITEM (drawable)));
break;
case 'Y': /* drawable height in real world units */
if (drawable && shell->unit != PIKA_UNIT_PIXEL)
{
gdouble xres;
gdouble yres;
gchar unit_format[8];
pika_image_get_resolution (image, &xres, &yres);
g_snprintf (unit_format, sizeof (unit_format), "%%.%df",
pika_unit_get_scaled_digits (shell->unit, yres));
i += print (title, title_len, i, unit_format,
pika_pixels_to_units (pika_item_get_height
(PIKA_ITEM (drawable)),
shell->unit, yres));
break;
}
/* else fallthru */
case 'y': /* drawable height in pixels */
if (drawable)
i += print (title, title_len, i, "%d",
pika_item_get_height (PIKA_ITEM (drawable)));
break;
case 'o': /* image's color profile name */
{
PikaColorManaged *managed = PIKA_COLOR_MANAGED (image);
PikaColorProfile *profile;
profile = pika_color_managed_get_color_profile (managed);
i += print (title, title_len, i, "%s",
pika_color_profile_get_label (profile));
}
break;
case 'e': /* display's offsets in pixels */
{
gdouble scale = pika_zoom_model_get_factor (shell->zoom);
gdouble offset_x = shell->offset_x / scale;
gdouble offset_y = shell->offset_y / scale;
i += print (title, title_len, i,
scale >= 0.15 ? "%.0fx%.0f" : "%.2fx%.2f",
offset_x, offset_y);
}
break;
case 'r': /* view rotation angle in degrees */
{
i += print (title, title_len, i, "%.1f", shell->rotate_angle);
}
break;
case '\xc3': /* utf-8 extended char */
{
format ++;
switch (*format)
{
case '\xbe':
/* line actually written at 23:55 on an Easter Sunday */
i += print (title, title_len, i, "42");
break;
default:
/* in the case of an unhandled utf-8 extended char format
* leave the format string parsing as it was
*/
format--;
break;
}
}
break;
/* Other cool things to be added:
* %r = xresolution
* %R = yresolution
* %ø = image's fractal dimension
* %þ = the answer to everything - (implemented)
*/
default:
/* format string contains unknown %-sequence, print it literally */
i += print (title, title_len, i, "%%%c", *format);
break;
}
break;
default:
title[i++] = *format;
break;
}
format++;
}
title[MIN (i, title_len - 1)] = '\0';
return i;
}