PIKApp/plug-ins/imagemap/imap_edit_area_info.c

551 lines
18 KiB
C
Raw Normal View History

2023-09-26 00:35:21 +02:00
/*
* This is a plug-in for PIKA.
*
* Generates clickable image maps.
*
* Copyright (C) 1998-2005 Maurits Rijk m.rijk@chello.nl
*
* 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 "libpika/pika.h"
#include "libpika/pikaui.h"
#include "imap_browse.h"
#include "imap_commands.h"
#include "imap_default_dialog.h"
#include "imap_edit_area_info.h"
#include "imap_icons.h"
#include "imap_main.h"
#include "imap_ui_grid.h"
#include "libpika/stdplugins-intl.h"
static gboolean callback_lock;
static gchar*
relative_filter(const char *name, gpointer data)
{
AreaInfoDialog_t *param = (AreaInfoDialog_t*) data;
if (gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(param->relative_link)))
return g_path_get_basename(name);
return g_strdup (name);
}
static void
url_changed (GtkWidget *widget,
gpointer data)
{
AreaInfoDialog_t *param = (AreaInfoDialog_t*) data;
const gchar *url = gtk_entry_get_text (GTK_ENTRY (param->url));
GtkWidget *button;
if (! g_ascii_strncasecmp (url, "http://", sizeof ("http://") - 1) ||
! g_ascii_strncasecmp (url, "https://", sizeof ( "https://") - 1))
button = param->web_site;
else if (! g_ascii_strncasecmp (url, "ftp://", sizeof ("ftp://") - 1))
button = param->ftp_site;
else if (! g_ascii_strncasecmp (url, "gopher://", sizeof ("gopher://") - 1))
button = param->gopher;
else if (! g_ascii_strncasecmp (url, "file:/", sizeof ("file:/") - 1))
button = param->file;
else if (! g_ascii_strncasecmp (url, "wais://", sizeof ("wais://") - 1))
button = param->wais;
else if (! g_ascii_strncasecmp (url, "telnet://", sizeof ("telnet://") - 1))
button = param->telnet;
else if (! g_ascii_strncasecmp (url, "mailto:", sizeof ("mailto:") - 1))
button = param->email;
else
button = param->other;
callback_lock = TRUE;
gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (button), TRUE);
}
static void
set_url (GtkWidget *widget,
AreaInfoDialog_t *param,
const gchar *prefix)
{
if (callback_lock)
{
callback_lock = FALSE;
}
else
{
if (gtk_widget_get_state_flags (widget) & GTK_STATE_FLAG_ACTIVE)
{
char *p;
gchar *url = g_strdup (gtk_entry_get_text (GTK_ENTRY(param->url)));
p = strstr (url, "//"); /* 'https://' */
if (p)
{
p += 2;
}
else
{
p = strchr (url, ':'); /* 'mailto:' */
if (p)
{
p++;
if (*p == '/') /* 'file:/' */
p++;
}
else
{
p = url;
}
}
p = g_strconcat (prefix, p, NULL);
gtk_entry_set_text (GTK_ENTRY(param->url), p);
g_free (p);
g_free (url);
}
}
gtk_widget_grab_focus(param->url);
}
static void
select_web_cb (GtkWidget *widget,
AreaInfoDialog_t *param)
{
set_url (widget, param, "https://");
}
static void
select_ftp_cb (GtkWidget *widget,
AreaInfoDialog_t *param)
{
set_url(widget, param, "ftp://");
}
static void
select_gopher_cb (GtkWidget *widget,
AreaInfoDialog_t *param)
{
set_url (widget, param, "gopher://");
}
static void
select_other_cb (GtkWidget *widget,
AreaInfoDialog_t *param)
{
set_url (widget, param, "");
}
static void
select_file_cb (GtkWidget *widget,
AreaInfoDialog_t *param)
{
set_url (widget, param, "file:/");
}
static void
select_wais_cb (GtkWidget *widget,
AreaInfoDialog_t *param)
{
set_url (widget, param, "wais://");
}
static void
select_telnet_cb (GtkWidget *widget,
AreaInfoDialog_t *param)
{
set_url (widget, param, "telnet://");
}
static void
select_email_cb (GtkWidget *widget,
AreaInfoDialog_t *param)
{
set_url (widget, param, "mailto:");
}
static void
append_page (GtkWidget *notebook, GtkWidget *page, const gchar *icon_name,
const gchar *label_name)
{
GtkWidget *hbox, *icon, *label;
hbox = gtk_box_new (GTK_ORIENTATION_HORIZONTAL, 1);
gtk_widget_show(hbox);
icon = gtk_image_new_from_icon_name (icon_name, GTK_ICON_SIZE_MENU);
gtk_box_pack_start (GTK_BOX (hbox), icon, FALSE, FALSE, 0);
gtk_widget_show (icon);
label = gtk_label_new_with_mnemonic (label_name);
gtk_box_pack_start (GTK_BOX (hbox), label, TRUE, TRUE, 0);
gtk_widget_show (label);
gtk_notebook_append_page(GTK_NOTEBOOK(notebook), page, hbox);
}
static void
create_link_tab (AreaInfoDialog_t *dialog,
GtkWidget *notebook)
{
BrowseWidget_t *browse;
GtkWidget *grid;
GtkWidget *label;
GtkWidget *subgrid;
GtkWidget *frame;
GSList *group;
grid = gtk_grid_new ();
gtk_container_set_border_width (GTK_CONTAINER (grid), 12);
gtk_grid_set_row_spacing (GTK_GRID (grid), 6);
gtk_widget_show (grid);
frame = pika_frame_new (_("Link Type"));
gtk_grid_attach (GTK_GRID (grid), frame, 0, 0, 2, 1);
gtk_widget_show (frame);
subgrid = gtk_grid_new ();
gtk_container_add (GTK_CONTAINER (frame), subgrid);
gtk_widget_show (subgrid);
dialog->web_site = create_radio_button_in_grid (subgrid, NULL, 0, 0,
_("_Web Site"));
g_signal_connect(dialog->web_site, "toggled",
G_CALLBACK (select_web_cb), (gpointer) dialog);
group = gtk_radio_button_get_group(GTK_RADIO_BUTTON(dialog->web_site));
dialog->ftp_site = create_radio_button_in_grid (subgrid, group, 0, 1,
_("_FTP Site"));
g_signal_connect(dialog->ftp_site, "toggled",
G_CALLBACK (select_ftp_cb), (gpointer) dialog);
group = gtk_radio_button_get_group(GTK_RADIO_BUTTON(dialog->ftp_site));
dialog->gopher = create_radio_button_in_grid (subgrid, group, 0, 2,
_("_Gopher"));
g_signal_connect(dialog->gopher, "toggled",
G_CALLBACK (select_gopher_cb), (gpointer) dialog);
group = gtk_radio_button_get_group(GTK_RADIO_BUTTON(dialog->gopher));
dialog->other = create_radio_button_in_grid (subgrid, group, 0, 3,
_("Ot_her"));
g_signal_connect(dialog->other, "toggled",
G_CALLBACK (select_other_cb), (gpointer) dialog);
group = gtk_radio_button_get_group(GTK_RADIO_BUTTON(dialog->other));
dialog->file = create_radio_button_in_grid (subgrid, group, 1, 0,
_("F_ile"));
g_signal_connect(dialog->file, "toggled",
G_CALLBACK (select_file_cb), (gpointer) dialog);
group = gtk_radio_button_get_group(GTK_RADIO_BUTTON(dialog->file));
dialog->wais = create_radio_button_in_grid (subgrid, group, 1, 1,
_("WAI_S"));
g_signal_connect(dialog->wais, "toggled",
G_CALLBACK (select_wais_cb), (gpointer) dialog);
group = gtk_radio_button_get_group(GTK_RADIO_BUTTON(dialog->wais));
dialog->telnet = create_radio_button_in_grid (subgrid, group, 1, 2,
_("Tel_net"));
g_signal_connect(dialog->telnet, "toggled",
G_CALLBACK (select_telnet_cb), (gpointer) dialog);
group = gtk_radio_button_get_group(GTK_RADIO_BUTTON(dialog->telnet));
dialog->email = create_radio_button_in_grid (subgrid, group, 1, 3,
_("e-_mail"));
g_signal_connect(dialog->email, "toggled",
G_CALLBACK (select_email_cb), (gpointer) dialog);
label = create_label_in_grid (
grid, 2, 0,
_("_URL to activate when this area is clicked: (required)"));
browse = browse_widget_new( _("Select HTML file"));
browse_widget_set_filter(browse, relative_filter, (gpointer) dialog);
gtk_grid_attach (GTK_GRID (grid), browse->hbox, 0, 3, 1, 1);
dialog->url = browse->file;
g_signal_connect(dialog->url, "changed", G_CALLBACK(url_changed),
dialog);
gtk_label_set_mnemonic_widget(GTK_LABEL(label), dialog->url);
dialog->relative_link = create_check_button_in_grid (grid, 4, 0,
_("Relati_ve link"));
gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(dialog->relative_link),
TRUE);
label = create_label_in_grid (
grid, 6, 0,
_("_Target frame name/ID: (optional - used for FRAMES only)"));
dialog->target = create_entry_in_grid (grid, label, 7, 0);
label = create_label_in_grid (grid, 9, 0, _("ALT te_xt: (optional)"));
dialog->comment = create_entry_in_grid (grid, label, 10, 0);
label = create_label_in_grid (grid, 12, 0, _("Access _Key: (optional)"));
dialog->accesskey = create_entry_in_grid (grid, label, 13, 0);
label = create_label_in_grid (grid, 15, 0, _("Ta_b Index: (optional)"));
dialog->tabindex = create_entry_in_grid (grid, label, 16, 0);
append_page (notebook, grid, PIKA_ICON_WEB, _("_Link"));
}
static void
geometry_changed(Object_t *obj, gpointer data)
{
AreaInfoDialog_t *dialog = (AreaInfoDialog_t*) data;
if (dialog->geometry_lock) {
dialog->geometry_lock = FALSE;
} else {
if (dialog->obj == obj) {
object_update_info_widget(obj, dialog->infotab);
obj->class->assign(obj, dialog->clone);
}
}
}
static void
toggle_preview_cb(GtkWidget *widget, AreaInfoDialog_t *param)
{
param->preview = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(widget));
edit_area_info_dialog_emit_geometry_signal(param);
}
static void
create_info_tab(AreaInfoDialog_t *dialog, GtkWidget *notebook)
{
GtkWidget *vbox, *frame, *preview;
Object_t *obj = dialog->obj;
vbox = gtk_box_new (GTK_ORIENTATION_VERTICAL, 1);
gtk_container_set_border_width(GTK_CONTAINER(vbox), 12);
gtk_widget_show(vbox);
frame = pika_frame_new(_("Dimensions"));
gtk_box_pack_start(GTK_BOX(vbox), frame, FALSE, FALSE, 0);
gtk_widget_show(frame);
preview = gtk_check_button_new_with_mnemonic(_("Pre_view"));
g_signal_connect(preview, "toggled",
G_CALLBACK (toggle_preview_cb), (gpointer) dialog);
gtk_box_pack_start(GTK_BOX(vbox), preview, FALSE, FALSE, 0);
gtk_widget_show(preview);
dialog->infotab = obj->class->create_info_widget(frame);
append_page (notebook, vbox, obj->class->get_icon_name (),
gettext (obj->class->name));
}
static void
create_java_script_tab (AreaInfoDialog_t *dialog,
GtkWidget *notebook)
{
GtkWidget *vbox, *grid, *label;
vbox = gtk_box_new (GTK_ORIENTATION_VERTICAL, 1);
gtk_widget_show(vbox);
grid = gtk_grid_new ();
gtk_box_pack_start (GTK_BOX (vbox), grid, FALSE, FALSE, 0);
gtk_container_set_border_width (GTK_CONTAINER (grid), 12);
gtk_grid_set_row_spacing (GTK_GRID (grid), 6);
gtk_widget_show (grid);
label = create_label_in_grid (grid, 0, 0, "o_nMouseover:");
dialog->mouse_over = create_entry_in_grid (grid, label, 1, 0);
label = create_label_in_grid (grid, 3, 0, "on_Mouseout:");
dialog->mouse_out = create_entry_in_grid (grid, label, 4, 0);
label = create_label_in_grid (grid, 6, 0, "on_Focus (HTML 4.0):");
dialog->focus = create_entry_in_grid (grid, label, 7, 0);
label = create_label_in_grid (grid, 9, 0, "on_Blur (HTML 4.0):");
dialog->blur = create_entry_in_grid (grid, label, 10, 0);
label = create_label_in_grid (grid, 12, 0, "onC_lick:");
dialog->click = create_entry_in_grid (grid, label, 13, 0);
append_page (notebook, vbox, IMAP_JAVA, _("_JavaScript"));
}
static gboolean
object_was_changed(AreaInfoDialog_t *dialog)
{
Object_t *clone = dialog->clone;
Object_t *obj = dialog->obj;
gint old_x, old_y, old_width, old_height;
gint new_x, new_y, new_width, new_height;
object_get_dimensions(clone, &old_x, &old_y, &old_width, &old_height);
object_get_dimensions(obj, &new_x, &new_y, &new_width, &new_height);
return new_x != old_x || new_y != old_y || new_width != old_width ||
new_height != old_height || clone->selected != obj->selected;
}
static void
edit_area_apply_cb (gpointer data)
{
AreaInfoDialog_t *param = (AreaInfoDialog_t*) data;
Object_t *obj = param->obj;
object_set_url (obj, gtk_entry_get_text (GTK_ENTRY(param->url)));
object_set_target (obj, gtk_entry_get_text (GTK_ENTRY(param->target)));
object_set_comment (obj, gtk_entry_get_text (GTK_ENTRY(param->comment)));
object_set_accesskey (obj, gtk_entry_get_text (GTK_ENTRY(param->accesskey)));
object_set_tabindex (obj, gtk_entry_get_text (GTK_ENTRY(param->tabindex)));
object_set_mouse_over (obj,
gtk_entry_get_text (GTK_ENTRY (param->mouse_over)));
object_set_mouse_out (obj,
gtk_entry_get_text (GTK_ENTRY (param->mouse_out)));
object_set_focus (obj, gtk_entry_get_text (GTK_ENTRY (param->focus)));
object_set_blur (obj, gtk_entry_get_text (GTK_ENTRY (param->blur)));
object_set_click (obj, gtk_entry_get_text (GTK_ENTRY (param->click)));
object_update (obj, param->infotab);
update_shape (obj);
if (object_was_changed (param))
preview_redraw();
}
static void
edit_area_ok_cb(gpointer data)
{
AreaInfoDialog_t *param = (AreaInfoDialog_t*) data;
Object_t *obj = param->obj;
object_list_remove_geometry_cb(obj->list, param->geometry_cb_id);
/* Fix me: nasty hack */
if (param->add)
command_list_add(edit_object_command_new(obj));
edit_area_apply_cb(data);
object_unlock(obj);
object_unref(param->clone);
}
static void
edit_area_cancel_cb(gpointer data)
{
AreaInfoDialog_t *dialog = (AreaInfoDialog_t*) data;
Object_t *obj = dialog->obj;
gboolean changed = object_was_changed(dialog);
gboolean selected = obj->selected;
object_list_remove_geometry_cb(obj->list, dialog->geometry_cb_id);
object_unlock(obj);
object_assign(dialog->clone, obj);
obj->selected = selected;
object_unref(dialog->clone);
if (changed)
preview_redraw();
}
static void
switch_page(GtkWidget *widget, gpointer page, gint page_num,
gpointer data)
{
AreaInfoDialog_t *param = (AreaInfoDialog_t*) data;
if (page_num == 0) {
gtk_widget_grab_focus(param->url);
} else if (page_num == 1) {
Object_t *obj = param->obj;
obj->class->set_initial_focus(obj, param->infotab);
} else {
gtk_widget_grab_focus(param->mouse_over);
}
}
AreaInfoDialog_t*
create_edit_area_info_dialog(Object_t *obj)
{
AreaInfoDialog_t *data = g_new(AreaInfoDialog_t, 1);
GtkWidget *notebook;
data->geometry_lock = FALSE;
data->preview = FALSE;
data->obj = obj;
data->browse = NULL;
data->dialog = make_default_dialog(_("Area Settings"));
default_dialog_set_ok_cb(data->dialog, edit_area_ok_cb, data);
default_dialog_set_apply_cb(data->dialog, edit_area_apply_cb, data);
default_dialog_set_cancel_cb(data->dialog, edit_area_cancel_cb, data);
data->notebook = notebook = gtk_notebook_new();
g_signal_connect_after(notebook, "switch-page",
G_CALLBACK(switch_page), (gpointer) data);
gtk_box_pack_start(GTK_BOX(data->dialog->vbox), notebook, TRUE, TRUE, 0);
create_link_tab(data, notebook);
create_info_tab(data, notebook);
create_java_script_tab(data, notebook);
gtk_widget_show(notebook);
return data;
}
void
edit_area_info_dialog_show(AreaInfoDialog_t *dialog, Object_t *obj,
gboolean add)
{
gchar *title;
object_unlock (dialog->obj);
object_lock(obj);
dialog->obj = obj;
dialog->clone = object_clone(obj);
dialog->add = add;
object_fill_info_tab (obj, dialog->infotab);
gtk_entry_set_text (GTK_ENTRY (dialog->url), obj->url);
gtk_entry_set_text (GTK_ENTRY (dialog->target), obj->target);
gtk_entry_set_text (GTK_ENTRY (dialog->comment), obj->comment);
gtk_entry_set_text (GTK_ENTRY (dialog->accesskey), obj->accesskey);
gtk_entry_set_text (GTK_ENTRY (dialog->tabindex), obj->tabindex);
gtk_entry_set_text (GTK_ENTRY (dialog->mouse_over), obj->mouse_over);
gtk_entry_set_text (GTK_ENTRY (dialog->mouse_out), obj->mouse_out);
gtk_entry_set_text (GTK_ENTRY (dialog->focus), obj->focus);
gtk_entry_set_text (GTK_ENTRY (dialog->blur), obj->blur);
gtk_entry_set_text (GTK_ENTRY (dialog->click), obj->click);
gtk_widget_grab_focus (dialog->url);
dialog->geometry_cb_id =
object_list_add_geometry_cb (obj->list, geometry_changed, dialog);
title = g_strdup_printf (_("Area #%d Settings"),
object_get_position_in_list(obj) + 1);
default_dialog_set_title (dialog->dialog, title);
g_free (title);
default_dialog_show (dialog->dialog);
}
void
edit_area_info_dialog_emit_geometry_signal(AreaInfoDialog_t *dialog)
{
if (dialog->preview) {
dialog->geometry_lock = TRUE;
object_emit_geometry_signal(dialog->obj);
}
}