src/editors.c

   1 /*
   2  * Geeqie
   3  * (C) 2006 John Ellis
   4  * Copyright (C) 2008 - 2009 The Geeqie Team
   5  *
   6  * Author: John Ellis
   7  *
   8  * This software is released under the GNU General Public License (GNU GPL).
   9  * Please read the included file COPYING for more information.
  10  * This software comes with no warranty of any kind, use at your own risk!
  11  */
  12
  13
  14 #include "main.h"
  15 #include "editors.h"
  16
  17 #include "filedata.h"
  18 #include "filefilter.h"
  19 #include "misc.h"
  20 #include "ui_fileops.h"
  21 #include "ui_spinner.h"
  22 #include "ui_utildlg.h"
  23 #include "utilops.h"
  24
  25 #include <errno.h>
  26
  27
  28 #define EDITOR_WINDOW_WIDTH 500
  29 #define EDITOR_WINDOW_HEIGHT 300
  30
  31
  32
  33 typedef struct _EditorVerboseData EditorVerboseData;
  34 struct _EditorVerboseData {
  35         GenericDialog *gd;
  36         GtkWidget *button_close;
  37         GtkWidget *button_stop;
  38         GtkWidget *text;
  39         GtkWidget *progress;
  40         GtkWidget *spinner;
  41 };
  42
  43 typedef struct _EditorData EditorData;
  44 struct _EditorData {
  45         gint flags;
  46         GPid pid;
  47         GList *list;
  48         gint count;
  49         gint total;
  50         gboolean stopping;
  51         EditorVerboseData *vd;
  52         EditorCallback callback;
  53         gpointer data;
  54         const EditorDescription *editor;
  55 };
  56
  57
  58 static void editor_verbose_window_progress(EditorData *ed, const gchar *text);
  59 static gint editor_command_next_start(EditorData *ed);
  60 static gint editor_command_next_finish(EditorData *ed, gint status);
  61 static gint editor_command_done(EditorData *ed);
  62
  63 /*
  64  *-----------------------------------------------------------------------------
  65  * external editor routines
  66  *-----------------------------------------------------------------------------
  67  */
  68
  69 GHashTable *editors = NULL;
  70
  71 #ifdef G_KEY_FILE_DESKTOP_GROUP
  72 #define DESKTOP_GROUP G_KEY_FILE_DESKTOP_GROUP
  73 #else
  74 #define DESKTOP_GROUP "Desktop Entry"
  75 #endif
  76
  77 void editor_description_free(EditorDescription *editor)
  78 {
  79         if (!editor) return;
  80
  81         g_free(editor->key);
  82         g_free(editor->name);
  83         g_free(editor->icon);
  84         g_free(editor->exec);
  85         g_free(editor->menu_path);
  86         g_free(editor->hotkey);
  87         string_list_free(editor->ext_list);
  88         g_free(editor->file);
  89         g_free(editor);
  90 }
  91
  92 static GList *editor_mime_types_to_extensions(gchar **mime_types)
  93 {
  94         /* FIXME: this should be rewritten to use the shared mime database, as soon as we switch to gio */
  95
  96         static const gchar *conv_table[][2] = {
  97                 {"application/x-ufraw", "%raw"},
  98                 {"image/*",             "*"},
  99                 {"image/bmp",           ".bmp"},
 100                 {"image/gif",           ".gif"},
 101                 {"image/jpeg",          ".jpeg;.jpg"},
 102                 {"image/jpg",           ".jpg;.jpeg"},
 103                 {"image/pcx",           ".pcx"},
 104                 {"image/png",           ".png"},
 105                 {"image/svg",           ".svg"},
 106                 {"image/svg+xml",       ".svg"},
 107                 {"image/svg+xml-compressed",    ".svg"},
 108                 {"image/tiff",          ".tiff;.tif"},
 109                 {"image/x-bmp",         ".bmp"},
 110                 {"image/x-canon-crw",   ".crw"},
 111                 {"image/x-cr2",         ".cr2"},
 112                 {"image/x-dcraw",       "%raw"},
 113                 {"image/x-ico",         ".ico"},
 114                 {"image/x-mrw",         ".mrw"},
 115                 {"image/x-MS-bmp",      ".bmp"},
 116                 {"image/x-nef",         ".nef"},
 117                 {"image/x-orf",         ".orf"},
 118                 {"image/x-pcx",         ".pcx"},
 119                 {"image/xpm",           ".xpm"},
 120                 {"image/x-png",         ".png"},
 121                 {"image/x-portable-anymap",     ".pam"},
 122                 {"image/x-portable-bitmap",     ".pbm"},
 123                 {"image/x-portable-graymap",    ".pgm"},
 124                 {"image/x-portable-pixmap",     ".ppm"},
 125                 {"image/x-psd",         ".psd"},
 126                 {"image/x-raf",         ".raf"},
 127                 {"image/x-sgi",         ".sgi"},
 128                 {"image/x-tga",         ".tga"},
 129                 {"image/x-xbitmap",     ".xbm"},
 130                 {"image/x-xcf",         ".xcf"},
 131                 {"image/x-xpixmap",     ".xpm"},
 132                 {"image/x-x3f",         ".x3f"},
 133                 {NULL, NULL}};
 134
 135         gint i, j;
 136         GList *list = NULL;
 137
 138         for (i = 0; mime_types[i]; i++)
 139                 for (j = 0; conv_table[j][0]; j++)
 140                         if (strcmp(mime_types[i], conv_table[j][0]) == 0)
 141                                 list = g_list_concat(list, filter_to_list(conv_table[j][1]));
 142
 143         return list;
 144 }
 145
 146 static gboolean editor_read_desktop_file(const gchar *path)
 147 {
 148         GKeyFile *key_file;
 149         EditorDescription *editor;
 150         gchar *extensions;
 151         gchar *type;
 152         const gchar *key = filename_from_path(path);
 153         gchar **categories, **only_show_in, **not_show_in;
 154         gchar *try_exec;
 155
 156         if (g_hash_table_lookup(editors, key)) return FALSE; /* the file found earlier wins */
 157
 158         key_file = g_key_file_new();
 159         if (!g_key_file_load_from_file(key_file, path, 0, NULL))
 160                 {
 161                 g_key_file_free(key_file);
 162                 return FALSE;
 163                 }
 164
 165         type = g_key_file_get_string(key_file, DESKTOP_GROUP, "Type", NULL);
 166         if (!type || strcmp(type, "Application") != 0)
 167                 {
 168                 /* We only consider desktop entries of Application type */
 169                 return FALSE;
 170                 }
 171
 172         editor = g_new0(EditorDescription, 1);
 173
 174         editor->key = g_strdup(key);
 175         editor->file = g_strdup(path);
 176
 177         g_hash_table_insert(editors, editor->key, editor);
 178
 179         if (g_key_file_get_boolean(key_file, DESKTOP_GROUP, "Hidden", NULL)
 180             || g_key_file_get_boolean(key_file, DESKTOP_GROUP, "NoDisplay", NULL))
 181                 {
 182                 editor->hidden = TRUE;
 183                 }
 184
 185         categories = g_key_file_get_string_list(key_file, DESKTOP_GROUP, "Categories", NULL, NULL);
 186         if (categories)
 187                 {
 188                 gboolean found = FALSE;
 189                 gint i;
 190                 for (i = 0; categories[i]; i++)
 191                         /* IMHO "Graphics" is exactly the category that we are interested in, so this does not have to be configurable */
 192                         if (strcmp(categories[i], "Graphics") == 0 ||
 193                             strcmp(categories[i], "X-Geeqie") == 0)
 194                                 {
 195                                 found = TRUE;
 196                                 break;
 197                                 }
 198                 if (!found) editor->hidden = TRUE;
 199                 g_strfreev(categories);
 200                 }
 201         else
 202                 {
 203                 editor->hidden = TRUE;
 204                 }
 205
 206         only_show_in = g_key_file_get_string_list(key_file, DESKTOP_GROUP, "OnlyShowIn", NULL, NULL);
 207         if (only_show_in)
 208                 {
 209                 gboolean found = FALSE;
 210                 gint i;
 211                 for (i = 0; only_show_in[i]; i++)
 212                         if (strcmp(only_show_in[i], "X-Geeqie") == 0)
 213                                 {
 214                                 found = TRUE;
 215                                 break;
 216                                 }
 217                 if (!found) editor->hidden = TRUE;
 218                 g_strfreev(only_show_in);
 219                 }
 220
 221         not_show_in = g_key_file_get_string_list(key_file, DESKTOP_GROUP, "NotShowIn", NULL, NULL);
 222         if (not_show_in)
 223                 {
 224                 gboolean found = FALSE;
 225                 gint i;
 226                 for (i = 0; not_show_in[i]; i++)
 227                         if (strcmp(not_show_in[i], "X-Geeqie") == 0)
 228                                 {
 229                                 found = TRUE;
 230                                 break;
 231                                 }
 232                 if (found) editor->hidden = TRUE;
 233                 g_strfreev(not_show_in);
 234                 }
 235
 236
 237         try_exec = g_key_file_get_string(key_file, DESKTOP_GROUP, "TryExec", NULL);
 238         if (try_exec && !editor->hidden)
 239                 {
 240                 gchar *try_exec_res = g_find_program_in_path(try_exec);
 241                 if (!try_exec_res) editor->hidden = TRUE;
 242                 g_free(try_exec_res);
 243                 g_free(try_exec);
 244                 }
 245
 246         if (editor->hidden)
 247                 {
 248                 /* hidden editors will be deleted, no need to parse the rest */
 249                 g_key_file_free(key_file);
 250                 return TRUE;
 251                 }
 252
 253         editor->name = g_key_file_get_locale_string(key_file, DESKTOP_GROUP, "Name", NULL, NULL);
 254         editor->icon = g_key_file_get_string(key_file, DESKTOP_GROUP, "Icon", NULL);
 255
 256         editor->exec = g_key_file_get_string(key_file, DESKTOP_GROUP, "Exec", NULL);
 257
 258         /* we take only editors that accept parameters, FIXME: the test can be improved */
 259         if (!strchr(editor->exec, '%')) editor->hidden = TRUE;
 260
 261         editor->menu_path = g_key_file_get_string(key_file, DESKTOP_GROUP, "X-Geeqie-Menu-Path", NULL);
 262         if (!editor->menu_path) editor->menu_path = g_strdup("EditMenu/ExternalMenu");
 263
 264         editor->hotkey = g_key_file_get_string(key_file, DESKTOP_GROUP, "X-Geeqie-Hotkey", NULL);
 265
 266         extensions = g_key_file_get_string(key_file, DESKTOP_GROUP, "X-Geeqie-File-Extensions", NULL);
 267         if (extensions)
 268                 editor->ext_list = filter_to_list(extensions);
 269         else
 270                 {
 271                 gchar **mime_types = g_key_file_get_string_list(key_file, DESKTOP_GROUP, "MimeType", NULL, NULL);
 272                 if (mime_types)
 273                         {
 274                         editor->ext_list = editor_mime_types_to_extensions(mime_types);
 275                         g_strfreev(mime_types);
 276                         if (!editor->ext_list) editor->hidden = TRUE;
 277                         }
 278                 }
 279
 280         if (g_key_file_get_boolean(key_file, DESKTOP_GROUP, "X-Geeqie-Keep-Fullscreen", NULL)) editor->flags |= EDITOR_KEEP_FS;
 281         if (g_key_file_get_boolean(key_file, DESKTOP_GROUP, "X-Geeqie-Verbose", NULL)) editor->flags |= EDITOR_VERBOSE;
 282         if (g_key_file_get_boolean(key_file, DESKTOP_GROUP, "X-Geeqie-Verbose-Multi", NULL)) editor->flags |= EDITOR_VERBOSE_MULTI;
 283         if (g_key_file_get_boolean(key_file, DESKTOP_GROUP, "X-Geeqie-Filter", NULL)) editor->flags |= EDITOR_DEST;
 284         if (g_key_file_get_boolean(key_file, DESKTOP_GROUP, "Terminal", NULL)) editor->flags |= EDITOR_TERMINAL;
 285
 286         editor->flags |= editor_command_parse(editor, NULL, NULL);
 287         g_key_file_free(key_file);
 288
 289         return TRUE;
 290 }
 291
 292 static gboolean editor_remove_desktop_file_cb(gpointer key, gpointer value, gpointer user_data)
 293 {
 294         EditorDescription *editor = value;
 295         return editor->hidden;
 296 }
 297
 298 static void editor_read_desktop_dir(const gchar *path)
 299 {
 300         DIR *dp;
 301         struct dirent *dir;
 302         gchar *pathl;
 303
 304         pathl = path_from_utf8(path);
 305         dp = opendir(pathl);
 306         g_free(pathl);
 307         if (!dp)
 308                 {
 309                 /* dir not found */
 310                 return;
 311                 }
 312         while ((dir = readdir(dp)) != NULL)
 313                 {
 314                 gchar *namel = dir->d_name;
 315
 316                 if (g_str_has_suffix(namel, ".desktop"))
 317                         {
 318                         gchar *name = path_to_utf8(namel);
 319                         gchar *dpath = g_build_filename(path, name, NULL);
 320                         editor_read_desktop_file(dpath);
 321                         g_free(dpath);
 322                         g_free(name);
 323                         }
 324                 }
 325         closedir(dp);
 326 }
 327
 328 void editor_load_descriptions(void)
 329 {
 330         gchar *path;
 331         gchar *xdg_data_dirs;
 332         gchar *all_dirs;
 333         gchar **split_dirs;
 334         gint i;
 335
 336         if (!editors)
 337                 {
 338                 editors = g_hash_table_new_full(g_str_hash, g_str_equal, NULL, (GDestroyNotify)editor_description_free);
 339                 }
 340
 341         xdg_data_dirs = getenv("XDG_DATA_DIRS");
 342         if (xdg_data_dirs && xdg_data_dirs[0])
 343                 xdg_data_dirs = path_to_utf8(xdg_data_dirs);
 344         else
 345                 xdg_data_dirs = g_strdup("/usr/share");
 346
 347         all_dirs = g_strconcat(get_rc_dir(), ":", GQ_APP_DIR, ":", xdg_data_home_get(), ":", xdg_data_dirs, NULL);
 348
 349         g_free(xdg_data_dirs);
 350
 351         split_dirs = g_strsplit(all_dirs, ":", 0);
 352
 353         g_free(all_dirs);
 354
 355         for (i = 0; split_dirs[i]; i++)
 356                 {
 357                 path = g_build_filename(split_dirs[i], "applications", NULL);
 358                 editor_read_desktop_dir(path);
 359                 g_free(path);
 360                 }
 361
 362         g_strfreev(split_dirs);
 363
 364         g_hash_table_foreach_remove(editors, editor_remove_desktop_file_cb, NULL);
 365 }
 366
 367 static void editor_list_add_cb(gpointer key, gpointer value, gpointer data)
 368 {
 369         GList **listp = data;
 370         EditorDescription *editor = value;
 371
 372         /* do not show the special commands in any list, they are called explicitly */
 373         if (strcmp(editor->key, CMD_COPY) == 0 ||
 374             strcmp(editor->key, CMD_MOVE) == 0 ||
 375             strcmp(editor->key, CMD_RENAME) == 0 ||
 376             strcmp(editor->key, CMD_DELETE) == 0 ||
 377             strcmp(editor->key, CMD_FOLDER) == 0) return;
 378
 379         *listp = g_list_prepend(*listp, editor);
 380 }
 381
 382 static gint editor_sort(gconstpointer a, gconstpointer b)
 383 {
 384         const EditorDescription *ea = a;
 385         const EditorDescription *eb = b;
 386         gint ret;
 387
 388         ret = strcmp(ea->menu_path, eb->menu_path);
 389         if (ret != 0) return ret;
 390
 391         return g_utf8_collate(ea->name, eb->name);
 392 }
 393
 394 GList *editor_list_get(void)
 395 {
 396         GList *editors_list = NULL;
 397         g_hash_table_foreach(editors, editor_list_add_cb, &editors_list);
 398         editors_list = g_list_sort(editors_list, editor_sort);
 399
 400         return editors_list;
 401 }
 402
 403 /* ------------------------------ */
 404
 405
 406 static void editor_verbose_data_free(EditorData *ed)
 407 {
 408         if (!ed->vd) return;
 409         g_free(ed->vd);
 410         ed->vd = NULL;
 411 }
 412
 413 static void editor_data_free(EditorData *ed)
 414 {
 415         editor_verbose_data_free(ed);
 416         g_free(ed);
 417 }
 418
 419 static void editor_verbose_window_close(GenericDialog *gd, gpointer data)
 420 {
 421         EditorData *ed = data;
 422
 423         generic_dialog_close(gd);
 424         editor_verbose_data_free(ed);
 425         if (ed->pid == -1) editor_data_free(ed); /* the process has already terminated */
 426 }
 427
 428 static void editor_verbose_window_stop(GenericDialog *gd, gpointer data)
 429 {
 430         EditorData *ed = data;
 431         ed->stopping = TRUE;
 432         ed->count = 0;
 433         editor_verbose_window_progress(ed, _("stopping..."));
 434 }
 435
 436 static void editor_verbose_window_enable_close(EditorVerboseData *vd)
 437 {
 438         vd->gd->cancel_cb = editor_verbose_window_close;
 439
 440         spinner_set_interval(vd->spinner, -1);
 441         gtk_widget_set_sensitive(vd->button_stop, FALSE);
 442         gtk_widget_set_sensitive(vd->button_close, TRUE);
 443 }
 444
 445 static EditorVerboseData *editor_verbose_window(EditorData *ed, const gchar *text)
 446 {
 447         EditorVerboseData *vd;
 448         GtkWidget *scrolled;
 449         GtkWidget *hbox;
 450         gchar *buf;
 451
 452         vd = g_new0(EditorVerboseData, 1);
 453
 454         vd->gd = file_util_gen_dlg(_("Edit command results"), "editor_results",
 455                                    NULL, FALSE,
 456                                    NULL, ed);
 457         buf = g_strdup_printf(_("Output of %s"), text);
 458         generic_dialog_add_message(vd->gd, NULL, buf, NULL);
 459         g_free(buf);
 460         vd->button_stop = generic_dialog_add_button(vd->gd, GTK_STOCK_STOP, NULL,
 461                                                    editor_verbose_window_stop, FALSE);
 462         gtk_widget_set_sensitive(vd->button_stop, FALSE);
 463         vd->button_close = generic_dialog_add_button(vd->gd, GTK_STOCK_CLOSE, NULL,
 464                                                     editor_verbose_window_close, TRUE);
 465         gtk_widget_set_sensitive(vd->button_close, FALSE);
 466
 467         scrolled = gtk_scrolled_window_new(NULL, NULL);
 468         gtk_scrolled_window_set_shadow_type(GTK_SCROLLED_WINDOW(scrolled), GTK_SHADOW_IN);
 469         gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(scrolled),
 470                                        GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC);
 471         gtk_box_pack_start(GTK_BOX(vd->gd->vbox), scrolled, TRUE, TRUE, 5);
 472         gtk_widget_show(scrolled);
 473
 474         vd->text = gtk_text_view_new();
 475         gtk_text_view_set_editable(GTK_TEXT_VIEW(vd->text), FALSE);
 476         gtk_widget_set_size_request(vd->text, EDITOR_WINDOW_WIDTH, EDITOR_WINDOW_HEIGHT);
 477         gtk_container_add(GTK_CONTAINER(scrolled), vd->text);
 478         gtk_widget_show(vd->text);
 479
 480         hbox = gtk_hbox_new(FALSE, 0);
 481         gtk_box_pack_start(GTK_BOX(vd->gd->vbox), hbox, FALSE, FALSE, 0);
 482         gtk_widget_show(hbox);
 483
 484         vd->progress = gtk_progress_bar_new();
 485         gtk_progress_bar_set_fraction(GTK_PROGRESS_BAR(vd->progress), 0.0);
 486         gtk_box_pack_start(GTK_BOX(hbox), vd->progress, TRUE, TRUE, 0);
 487         gtk_widget_show(vd->progress);
 488
 489         vd->spinner = spinner_new(NULL, SPINNER_SPEED);
 490         gtk_box_pack_start(GTK_BOX(hbox), vd->spinner, FALSE, FALSE, 0);
 491         gtk_widget_show(vd->spinner);
 492
 493         gtk_widget_show(vd->gd->dialog);
 494
 495         ed->vd = vd;
 496         return vd;
 497 }
 498
 499 static void editor_verbose_window_fill(EditorVerboseData *vd, gchar *text, gint len)
 500 {
 501         GtkTextBuffer *buffer;
 502         GtkTextIter iter;
 503
 504         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(vd->text));
 505         gtk_text_buffer_get_iter_at_offset(buffer, &iter, -1);
 506         gtk_text_buffer_insert(buffer, &iter, text, len);
 507 }
 508
 509 static void editor_verbose_window_progress(EditorData *ed, const gchar *text)
 510 {
 511         if (!ed->vd) return;
 512
 513         if (ed->total)
 514                 {
 515                 gtk_progress_bar_set_fraction(GTK_PROGRESS_BAR(ed->vd->progress), (gdouble)ed->count / ed->total);
 516                 }
 517
 518         gtk_progress_bar_set_text(GTK_PROGRESS_BAR(ed->vd->progress), (text) ? text : "");
 519 }
 520
 521 static gboolean editor_verbose_io_cb(GIOChannel *source, GIOCondition condition, gpointer data)
 522 {
 523         EditorData *ed = data;
 524         gchar buf[512];
 525         gsize count;
 526
 527         if (condition & G_IO_IN)
 528                 {
 529                 while (g_io_channel_read_chars(source, buf, sizeof(buf), &count, NULL) == G_IO_STATUS_NORMAL)
 530                         {
 531                         if (!g_utf8_validate(buf, count, NULL))
 532                                 {
 533                                 gchar *utf8;
 534
 535                                 utf8 = g_locale_to_utf8(buf, count, NULL, NULL, NULL);
 536                                 if (utf8)
 537                                         {
 538                                         editor_verbose_window_fill(ed->vd, utf8, -1);
 539                                         g_free(utf8);
 540                                         }
 541                                 else
 542                                         {
 543                                         editor_verbose_window_fill(ed->vd, "Error converting text to valid utf8\n", -1);
 544                                         }
 545                                 }
 546                         else
 547                                 {
 548                                 editor_verbose_window_fill(ed->vd, buf, count);
 549                                 }
 550                         }
 551                 }
 552
 553         if (condition & (G_IO_ERR | G_IO_HUP))
 554                 {
 555                 g_io_channel_shutdown(source, TRUE, NULL);
 556                 return FALSE;
 557                 }
 558
 559         return TRUE;
 560 }
 561
 562 typedef enum {
 563         PATH_FILE,
 564         PATH_FILE_URL,
 565         PATH_DEST
 566 } PathType;
 567
 568
 569 static gchar *editor_command_path_parse(const FileData *fd, PathType type, const EditorDescription *editor)
 570 {
 571         GString *string;
 572         gchar *pathl;
 573         const gchar *p;
 574
 575         string = g_string_new("");
 576
 577         if (type == PATH_FILE || type == PATH_FILE_URL)
 578                 {
 579                 GList *work = editor->ext_list;
 580
 581                 if (!work)
 582                         p = fd->path;
 583                 else
 584                         {
 585                         while (work)
 586                                 {
 587                                 GList *work2;
 588                                 gchar *ext = work->data;
 589                                 work = work->next;
 590
 591                                 if (strcmp(ext, "*") == 0 ||
 592                                     g_ascii_strcasecmp(ext, fd->extension) == 0)
 593                                         {
 594                                         p = fd->path;
 595                                         break;
 596                                         }
 597
 598                                 work2 = fd->sidecar_files;
 599                                 while (work2)
 600                                         {
 601                                         FileData *sfd = work2->data;
 602                                         work2 = work2->next;
 603
 604                                         if (g_ascii_strcasecmp(ext, sfd->extension) == 0)
 605                                                 {
 606                                                 p = sfd->path;
 607                                                 break;
 608                                                 }
 609                                         }
 610                                 if (p) break;
 611                                 }
 612                         if (!p) return NULL;
 613                         }
 614                 }
 615         else if (type == PATH_DEST)
 616                 {
 617                 if (fd->change && fd->change->dest)
 618                         p = fd->change->dest;
 619                 else
 620                         p = "";
 621                 }
 622
 623         g_assert(p);
 624         while (*p != '\0')
 625                 {
 626                 /* must escape \, ", `, and $ to avoid problems,
 627                  * we assume system shell supports bash-like escaping
 628                  */
 629                 if (strchr("\\\"`$", *p) != NULL)
 630                         {
 631                         string = g_string_append_c(string, '\\');
 632                         }
 633                 string = g_string_append_c(string, *p);
 634                 p++;
 635                 }
 636
 637         if (type == PATH_FILE_URL) g_string_prepend(string, "file://");
 638         pathl = path_from_utf8(string->str);
 639         g_string_free(string, TRUE);
 640
 641         if (pathl && !pathl[0]) /* empty string case */
 642                 {
 643                 g_free(pathl);
 644                 pathl = NULL;
 645                 }
 646
 647         return pathl;
 648 }
 649
 650
 651 gint editor_command_parse(const EditorDescription *editor, GList *list, gchar **output)
 652 {
 653         gint flags = 0;
 654         const gchar *p;
 655         GString *result = NULL;
 656
 657         if (output)
 658                 result = g_string_new("");
 659
 660         if (editor->exec[0] == '\0')
 661                 {
 662                 flags |= EDITOR_ERROR_EMPTY;
 663                 goto err;
 664                 }
 665
 666         p = editor->exec;
 667         /* skip leading whitespaces if any */
 668         while (g_ascii_isspace(*p)) p++;
 669
 670         /* command */
 671
 672         while (*p)
 673                 {
 674                 if (*p != '%')
 675                         {
 676                         if (output) result = g_string_append_c(result, *p);
 677                         }
 678                 else /* *p == '%' */
 679                         {
 680                         gchar *pathl = NULL;
 681
 682                         p++;
 683
 684                         switch (*p)
 685                                 {
 686                                 case 'f': /* single file */
 687                                 case 'u': /* single url */
 688                                         flags |= EDITOR_FOR_EACH;
 689                                         if (flags & EDITOR_SINGLE_COMMAND)
 690                                                 {
 691                                                 flags |= EDITOR_ERROR_INCOMPATIBLE;
 692                                                 goto err;
 693                                                 }
 694                                         if (list)
 695                                                 {
 696                                                 /* use the first file from the list */
 697                                                 if (!list->data)
 698                                                         {
 699                                                         flags |= EDITOR_ERROR_NO_FILE;
 700                                                         goto err;
 701                                                         }
 702                                                 pathl = editor_command_path_parse((FileData *)list->data,
 703                                                                                   (*p == 'f') ? PATH_FILE : PATH_FILE_URL,
 704                                                                                   editor);
 705                                                 if (!pathl)
 706                                                         {
 707                                                         flags |= EDITOR_ERROR_NO_FILE;
 708                                                         goto err;
 709                                                         }
 710                                                 if (output)
 711                                                         {
 712                                                         result = g_string_append_c(result, '"');
 713                                                         result = g_string_append(result, pathl);
 714                                                         result = g_string_append_c(result, '"');
 715                                                         }
 716                                                 g_free(pathl);
 717                                                 }
 718                                         break;
 719
 720                                 case 'F':
 721                                 case 'U':
 722                                         flags |= EDITOR_SINGLE_COMMAND;
 723                                         if (flags & (EDITOR_FOR_EACH | EDITOR_DEST))
 724                                                 {
 725                                                 flags |= EDITOR_ERROR_INCOMPATIBLE;
 726                                                 goto err;
 727                                                 }
 728
 729                                         if (list)
 730                                                 {
 731                                                 /* use whole list */
 732                                                 GList *work = list;
 733                                                 gboolean ok = FALSE;
 734
 735                                                 while (work)
 736                                                         {
 737                                                         FileData *fd = work->data;
 738                                                         pathl = editor_command_path_parse(fd, (*p == 'F') ? PATH_FILE : PATH_FILE_URL, editor);
 739                                                         if (pathl)
 740                                                                 {
 741                                                                 ok = TRUE;
 742
 743                                                                 if (output)
 744                                                                         {
 745                                                                         ok = TRUE;
 746                                                                         if (work != list) g_string_append_c(result, ' ');
 747                                                                         result = g_string_append_c(result, '"');
 748                                                                         result = g_string_append(result, pathl);
 749                                                                         result = g_string_append_c(result, '"');
 750                                                                         }
 751                                                                 g_free(pathl);
 752                                                                 }
 753                                                         work = work->next;
 754                                                         }
 755                                                 if (!ok)
 756                                                         {
 757                                                         flags |= EDITOR_ERROR_NO_FILE;
 758                                                         goto err;
 759                                                         }
 760                                                 }
 761                                         break;
 762                                 case 'i':
 763                                         if (output)
 764                                                 {
 765                                                 result = g_string_append(result, editor->icon);
 766                                                 }
 767                                         break;
 768                                 case 'c':
 769                                         if (output)
 770                                                 {
 771                                                 result = g_string_append(result, editor->name);
 772                                                 }
 773                                         break;
 774                                 case 'k':
 775                                         if (output)
 776                                                 {
 777                                                 result = g_string_append(result, editor->file);
 778                                                 }
 779                                         break;
 780                                 case '%':
 781                                         /* %% = % escaping */
 782                                         if (output) result = g_string_append_c(result, *p);
 783                                         break;
 784                                 case 'd':
 785                                 case 'D':
 786                                 case 'n':
 787                                 case 'N':
 788                                 case 'v':
 789                                 case 'm':
 790                                         /* deprecated according to spec, ignore */
 791                                         break;
 792                                 default:
 793                                         flags |= EDITOR_ERROR_SYNTAX;
 794                                         goto err;
 795                                 }
 796                         }
 797                 p++;
 798                 }
 799
 800         if (output) *output = g_string_free(result, FALSE);
 801         return flags;
 802
 803
 804 err:
 805         if (output)
 806                 {
 807                 g_string_free(result, TRUE);
 808                 *output = NULL;
 809                 }
 810         return flags;
 811 }
 812
 813
 814 static void editor_child_exit_cb(GPid pid, gint status, gpointer data)
 815 {
 816         EditorData *ed = data;
 817         g_spawn_close_pid(pid);
 818         ed->pid = -1;
 819
 820         editor_command_next_finish(ed, status);
 821 }
 822
 823
 824 static gint editor_command_one(const EditorDescription *editor, GList *list, EditorData *ed)
 825 {
 826         gchar *command;
 827         FileData *fd = list->data;
 828         GPid pid;
 829         gint standard_output;
 830         gint standard_error;
 831         gboolean ok;
 832
 833         ed->pid = -1;
 834         ed->flags = editor->flags | editor_command_parse(editor, list, &command);
 835
 836         ok = !EDITOR_ERRORS(ed->flags);
 837
 838         if (ok)
 839                 {
 840                 ok = (options->shell.path && *options->shell.path);
 841                 if (!ok) log_printf("ERROR: empty shell command\n");
 842
 843                 if (ok)
 844                         {
 845                         ok = (access(options->shell.path, X_OK) == 0);
 846                         if (!ok) log_printf("ERROR: cannot execute shell command '%s'\n", options->shell.path);
 847                         }
 848
 849                 if (!ok) ed->flags |= EDITOR_ERROR_CANT_EXEC;
 850                 }
 851
 852         if (ok)
 853                 {
 854                 gchar *working_directory;
 855                 gchar *args[4];
 856                 guint n = 0;
 857
 858                 working_directory = remove_level_from_path(fd->path);
 859                 args[n++] = options->shell.path;
 860                 if (options->shell.options && *options->shell.options)
 861                         args[n++] = options->shell.options;
 862                 args[n++] = command;
 863                 args[n] = NULL;
 864
 865                 if ((ed->flags & EDITOR_DEST) && fd->change && fd->change->dest) /* FIXME: error handling */
 866                         {
 867                         g_setenv("GEEQIE_DESTINATION", fd->change->dest, TRUE);
 868                         }
 869                 else
 870                         {
 871                         g_unsetenv("GEEQIE_DESTINATION");
 872                         }
 873
 874                 ok = g_spawn_async_with_pipes(working_directory, args, NULL,
 875                                       G_SPAWN_DO_NOT_REAP_CHILD, /* GSpawnFlags */
 876                                       NULL, NULL,
 877                                       &pid,
 878                                       NULL,
 879                                       ed->vd ? &standard_output : NULL,
 880                                       ed->vd ? &standard_error : NULL,
 881                                       NULL);
 882
 883                 g_free(working_directory);
 884
 885                 if (!ok) ed->flags |= EDITOR_ERROR_CANT_EXEC;
 886                 }
 887
 888         if (ok)
 889                 {
 890                 g_child_watch_add(pid, editor_child_exit_cb, ed);
 891                 ed->pid = pid;
 892                 }
 893
 894         if (ed->vd)
 895                 {
 896                 if (!ok)
 897                         {
 898                         gchar *buf;
 899
 900                         buf = g_strdup_printf(_("Failed to run command:\n%s\n"), editor->file);
 901                         editor_verbose_window_fill(ed->vd, buf, strlen(buf));
 902                         g_free(buf);
 903
 904                         }
 905                 else
 906                         {
 907                         GIOChannel *channel_output;
 908                         GIOChannel *channel_error;
 909
 910                         channel_output = g_io_channel_unix_new(standard_output);
 911                         g_io_channel_set_flags(channel_output, G_IO_FLAG_NONBLOCK, NULL);
 912                         g_io_channel_set_encoding(channel_output, NULL, NULL);
 913
 914                         g_io_add_watch_full(channel_output, G_PRIORITY_HIGH, G_IO_IN | G_IO_ERR | G_IO_HUP,
 915                                             editor_verbose_io_cb, ed, NULL);
 916                         g_io_channel_unref(channel_output);
 917
 918                         channel_error = g_io_channel_unix_new(standard_error);
 919                         g_io_channel_set_flags(channel_error, G_IO_FLAG_NONBLOCK, NULL);
 920                         g_io_channel_set_encoding(channel_error, NULL, NULL);
 921
 922                         g_io_add_watch_full(channel_error, G_PRIORITY_HIGH, G_IO_IN | G_IO_ERR | G_IO_HUP,
 923                                             editor_verbose_io_cb, ed, NULL);
 924                         g_io_channel_unref(channel_error);
 925                         }
 926                 }
 927
 928         g_free(command);
 929
 930         return EDITOR_ERRORS(ed->flags);
 931 }
 932
 933 static gint editor_command_next_start(EditorData *ed)
 934 {
 935         if (ed->vd) editor_verbose_window_fill(ed->vd, "\n", 1);
 936
 937         if (ed->list && ed->count < ed->total)
 938                 {
 939                 FileData *fd;
 940                 gint error;
 941
 942                 fd = ed->list->data;
 943
 944                 if (ed->vd)
 945                         {
 946                         if (ed->flags & EDITOR_FOR_EACH)
 947                                 editor_verbose_window_progress(ed, fd->path);
 948                         else
 949                                 editor_verbose_window_progress(ed, _("running..."));
 950                         }
 951                 ed->count++;
 952
 953                 error = editor_command_one(ed->editor, ed->list, ed);
 954                 if (!error && ed->vd)
 955                         {
 956                         gtk_widget_set_sensitive(ed->vd->button_stop, (ed->list != NULL) );
 957                         if (ed->flags & EDITOR_FOR_EACH)
 958                                 {
 959                                 editor_verbose_window_fill(ed->vd, fd->path, strlen(fd->path));
 960                                 editor_verbose_window_fill(ed->vd, "\n", 1);
 961                                 }
 962                         }
 963
 964                 if (!error)
 965                         return 0;
 966
 967                 /* command was not started, call the finish immediately */
 968                 return editor_command_next_finish(ed, 0);
 969                 }
 970
 971         /* everything is done */
 972         return editor_command_done(ed);
 973 }
 974
 975 static gint editor_command_next_finish(EditorData *ed, gint status)
 976 {
 977         gint cont = ed->stopping ? EDITOR_CB_SKIP : EDITOR_CB_CONTINUE;
 978
 979         if (status)
 980                 ed->flags |= EDITOR_ERROR_STATUS;
 981
 982         if (ed->flags & EDITOR_FOR_EACH)
 983                 {
 984                 /* handle the first element from the list */
 985                 GList *fd_element = ed->list;
 986
 987                 ed->list = g_list_remove_link(ed->list, fd_element);
 988                 if (ed->callback)
 989                         {
 990                         cont = ed->callback(ed->list ? ed : NULL, ed->flags, fd_element, ed->data);
 991                         if (ed->stopping && cont == EDITOR_CB_CONTINUE) cont = EDITOR_CB_SKIP;
 992                         }
 993                 filelist_free(fd_element);
 994                 }
 995         else
 996                 {
 997                 /* handle whole list */
 998                 if (ed->callback)
 999                         cont = ed->callback(NULL, ed->flags, ed->list, ed->data);
1000                 filelist_free(ed->list);
1001                 ed->list = NULL;
1002                 }
1003
1004         switch (cont)
1005                 {
1006                 case EDITOR_CB_SUSPEND:
1007                         return EDITOR_ERRORS(ed->flags);
1008                 case EDITOR_CB_SKIP:
1009                         return editor_command_done(ed);
1010                 }
1011
1012         return editor_command_next_start(ed);
1013 }
1014
1015 static gint editor_command_done(EditorData *ed)
1016 {
1017         gint flags;
1018
1019         if (ed->vd)
1020                 {
1021                 if (ed->count == ed->total)
1022                         {
1023                         editor_verbose_window_progress(ed, _("done"));
1024                         }
1025                 else
1026                         {
1027                         editor_verbose_window_progress(ed, _("stopped by user"));
1028                         }
1029                 editor_verbose_window_enable_close(ed->vd);
1030                 }
1031
1032         /* free the not-handled items */
1033         if (ed->list)
1034                 {
1035                 ed->flags |= EDITOR_ERROR_SKIPPED;
1036                 if (ed->callback) ed->callback(NULL, ed->flags, ed->list, ed->data);
1037                 filelist_free(ed->list);
1038                 ed->list = NULL;
1039                 }
1040
1041         ed->count = 0;
1042
1043         flags = EDITOR_ERRORS(ed->flags);
1044
1045         if (!ed->vd) editor_data_free(ed);
1046
1047         return flags;
1048 }
1049
1050 void editor_resume(gpointer ed)
1051 {
1052         editor_command_next_start(ed);
1053 }
1054
1055 void editor_skip(gpointer ed)
1056 {
1057         editor_command_done(ed);
1058 }
1059
1060 static gint editor_command_start(const EditorDescription *editor, const gchar *text, GList *list, EditorCallback cb, gpointer data)
1061 {
1062         EditorData *ed;
1063         gint flags = editor->flags;
1064
1065         if (EDITOR_ERRORS(flags)) return EDITOR_ERRORS(flags);
1066
1067         ed = g_new0(EditorData, 1);
1068         ed->list = filelist_copy(list);
1069         ed->flags = flags;
1070         ed->editor = editor;
1071         ed->total = (flags & EDITOR_SINGLE_COMMAND) ? 1 : g_list_length(list);
1072         ed->callback = cb;
1073         ed->data =  data;
1074
1075         if ((flags & EDITOR_VERBOSE_MULTI) && list && list->next)
1076                 flags |= EDITOR_VERBOSE;
1077
1078         if (flags & EDITOR_VERBOSE)
1079                 editor_verbose_window(ed, text);
1080
1081         editor_command_next_start(ed);
1082         /* errors from editor_command_next_start will be handled via callback */
1083         return EDITOR_ERRORS(flags);
1084 }
1085
1086 gboolean is_valid_editor_command(const gchar *key)
1087 {
1088         if (!key) return FALSE;
1089         return g_hash_table_lookup(editors, key) != NULL;
1090 }
1091
1092 gint start_editor_from_filelist_full(const gchar *key, GList *list, EditorCallback cb, gpointer data)
1093 {
1094         gint error;
1095         EditorDescription *editor;
1096         if (!key) return FALSE;
1097
1098         editor = g_hash_table_lookup(editors, key);
1099
1100         if (!list) return FALSE;
1101         if (!editor) return FALSE;
1102
1103         error = editor_command_start(editor, editor->name, list, cb, data);
1104
1105         if (EDITOR_ERRORS(error))
1106                 {
1107                 gchar *text = g_strdup_printf(_("%s\n\"%s\""), editor_get_error_str(error), editor->file);
1108
1109                 file_util_warning_dialog(_("Invalid editor command"), text, GTK_STOCK_DIALOG_ERROR, NULL);
1110                 g_free(text);
1111                 }
1112
1113         return error;
1114 }
1115
1116 gint start_editor_from_filelist(const gchar *key, GList *list)
1117 {
1118         return start_editor_from_filelist_full(key, list,  NULL, NULL);
1119 }
1120
1121 gint start_editor_from_file_full(const gchar *key, FileData *fd, EditorCallback cb, gpointer data)
1122 {
1123         GList *list;
1124         gint error;
1125
1126         if (!fd) return FALSE;
1127
1128         list = g_list_append(NULL, fd);
1129         error = start_editor_from_filelist_full(key, list, cb, data);
1130         g_list_free(list);
1131         return error;
1132 }
1133
1134 gint start_editor_from_file(const gchar *key, FileData *fd)
1135 {
1136         return start_editor_from_file_full(key, fd, NULL, NULL);
1137 }
1138
1139 gint editor_window_flag_set(const gchar *key)
1140 {
1141         EditorDescription *editor;
1142         if (!key) return TRUE;
1143
1144         editor = g_hash_table_lookup(editors, key);
1145         if (!editor) return TRUE;
1146
1147         return (editor->flags & EDITOR_KEEP_FS);
1148 }
1149
1150 gint editor_is_filter(const gchar *key)
1151 {
1152         EditorDescription *editor;
1153         if (!key) return TRUE;
1154
1155         editor = g_hash_table_lookup(editors, key);
1156         if (!editor) return TRUE;
1157
1158         return (editor->flags & EDITOR_DEST);
1159 }
1160
1161 const gchar *editor_get_error_str(gint flags)
1162 {
1163         if (flags & EDITOR_ERROR_EMPTY) return _("Editor template is empty.");
1164         if (flags & EDITOR_ERROR_SYNTAX) return _("Editor template has incorrect syntax.");
1165         if (flags & EDITOR_ERROR_INCOMPATIBLE) return _("Editor template uses incompatible macros.");
1166         if (flags & EDITOR_ERROR_NO_FILE) return _("Can't find matching file type.");
1167         if (flags & EDITOR_ERROR_CANT_EXEC) return _("Can't execute external editor.");
1168         if (flags & EDITOR_ERROR_STATUS) return _("External editor returned error status.");
1169         if (flags & EDITOR_ERROR_SKIPPED) return _("File was skipped.");
1170         return _("Unknown error.");
1171 }
1172
1173 const gchar *editor_get_name(const gchar *key)
1174 {
1175         EditorDescription *editor = g_hash_table_lookup(editors, key);
1176
1177         if (!editor) return NULL;
1178
1179         return editor->name;
1180 }
1181 /* vim: set shiftwidth=8 softtabstop=0 cindent cinoptions={1s: */