ROX-Filer/src/main.c

   1 /*
   2  * $Id$
   3  *
   4  * ROX-Filer, filer for the ROX desktop project
   5  * Copyright (C) 2000, Thomas Leonard, <tal197@ecs.soton.ac.uk>.
   6  *
   7  * This program is free software; you can redistribute it and/or modify it
   8  * under the terms of the GNU General Public License as published by the Free
   9  * Software Foundation; either version 2 of the License, or (at your option)
  10  * any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful, but WITHOUT
  13  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  14  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
  15  * more details.
  16  *
  17  * You should have received a copy of the GNU General Public License along with
  18  * this program; if not, write to the Free Software Foundation, Inc., 59 Temple
  19  * Place, Suite 330, Boston, MA  02111-1307  USA
  20  */
  21
  22 #include "config.h"
  23
  24 #include <stdlib.h>
  25 #include <stdio.h>
  26 #include <sys/types.h>
  27 #include <signal.h>
  28 #include <sys/wait.h>
  29 #include <unistd.h>
  30 #include <fcntl.h>
  31 #include <pwd.h>
  32 #include <grp.h>
  33
  34 #ifdef HAVE_GETOPT_LONG
  35 #  include <getopt.h>
  36 #endif
  37
  38 #include <gtk/gtk.h>
  39 #include "collection.h"
  40
  41 #include "main.h"
  42 #include "support.h"
  43 #include "gui_support.h"
  44 #include "filer.h"
  45 #include "display.h"
  46 #include "mount.h"
  47 #include "menu.h"
  48 #include "dnd.h"
  49 #include "options.h"
  50 #include "choices.h"
  51 #include "type.h"
  52 #include "pixmaps.h"
  53 #include "dir.h"
  54 #include "action.h"
  55 #include "i18n.h"
  56 #include "remote.h"
  57 #include "pinboard.h"
  58 #include "run.h"
  59
  60 int number_of_windows = 0;      /* Quit when this reaches 0 again... */
  61 int to_error_log = -1;          /* Write here to log errors */
  62
  63 uid_t euid;
  64 gid_t egid;
  65 int ngroups;                    /* Number of supplemental groups */
  66 gid_t *supplemental_groups = NULL;
  67 char *home_dir, *app_dir;
  68
  69 /* Static prototypes */
  70 static void show_features(void);
  71
  72
  73 #define COPYING                                                         \
  74              N_("Copyright (C) 2000 Thomas Leonard.\n"                  \
  75                 "ROX-Filer comes with ABSOLUTELY NO WARRANTY,\n"        \
  76                 "to the extent permitted by law.\n"                     \
  77                 "You may redistribute copies of ROX-Filer\n"            \
  78                 "under the terms of the GNU General Public License.\n"  \
  79                 "For more information about these matters, "            \
  80                 "see the file named COPYING.\n")
  81
  82 #ifdef HAVE_GETOPT_LONG
  83 #  define USAGE   N_("Try `ROX-Filer/AppRun --help' for more information.\n")
  84 #  define SHORT_ONLY_WARNING ""
  85 #else
  86 #  define USAGE   N_("Try `ROX-Filer/AppRun -h' for more information.\n")
  87 #  define SHORT_ONLY_WARNING    \
  88                 _("NOTE: Your system does not support long options - \n" \
  89                 "you must use the short versions instead.\n\n")
  90 #endif
  91
  92 #define HELP N_("Usage: ROX-Filer/AppRun [OPTION]... [FILE]...\n"       \
  93        "Open each directory or file listed, or the current working\n"   \
  94        "directory if no arguments are given.\n\n"                       \
  95        "  -b, --bottom=DIR      open DIR as a bottom-edge panel\n"      \
  96        "  -h, --help            display this help and exit\n"                 \
  97        "  -n, --new             start a new filer, even if already running\n"  \
  98        "  -o, --override        override window manager control of panels\n" \
  99        "  -p, --pinboard=PIN    use pinboard PIN as the pinboard\n"     \
 100        "  -t, --top=DIR         open DIR as a top-edge panel\n"         \
 101        "  -v, --version         display the version information and exit\n"   \
 102        "\nThe latest version can be found at:\n"                        \
 103        "\thttp://rox.sourceforge.net\n"                                 \
 104        "\nReport bugs to <tal197@users.sourceforge.net>.\n")
 105
 106 #define SHORT_OPS "t:b:op:hvn"
 107
 108 #ifdef HAVE_GETOPT_LONG
 109 static struct option long_opts[] =
 110 {
 111         {"top", 1, NULL, 't'},
 112         {"bottom", 1, NULL, 'b'},
 113         {"override", 0, NULL, 'o'},
 114         {"pinboard", 1, NULL, 'p'},
 115         {"help", 0, NULL, 'h'},
 116         {"version", 0, NULL, 'v'},
 117         {"new", 0, NULL, 'n'},
 118         {NULL, 0, NULL, 0},
 119 };
 120 #endif
 121
 122 /* Take control of panels away from WM? */
 123 gboolean override_redirect = FALSE;
 124
 125 /* Always start a new filer, even if one seems to be already running */
 126 gboolean new_copy = FALSE;
 127
 128 /* Maps child PIDs to Callback pointers */
 129 static GHashTable *death_callbacks = NULL;
 130 static gboolean child_died_flag = FALSE;
 131
 132 /* This is called as a signal handler; simply ensures that
 133  * child_died_callback() will get called later.
 134  */
 135 static void child_died(int signum)
 136 {
 137         child_died_flag = TRUE;
 138         write(to_error_log, '\0', 1);   /* Wake up! */
 139 }
 140
 141 static void child_died_callback(void)
 142 {
 143         int             status;
 144         int             child;
 145
 146         child_died_flag = FALSE;
 147
 148         /* Find out which children exited and allow them to die */
 149         do
 150         {
 151                 Callback        *cb;
 152
 153                 child = waitpid(-1, &status, WNOHANG);
 154
 155                 if (child == 0 || child == -1)
 156                         return;
 157
 158                 cb = g_hash_table_lookup(death_callbacks, (gpointer) child);
 159                 if (cb)
 160                 {
 161                         cb->callback(cb->data);
 162                         g_hash_table_remove(death_callbacks, (gpointer) child);
 163                 }
 164
 165         } while (1);
 166 }
 167
 168 #define BUFLEN 40
 169 void stderr_cb(gpointer data, gint source, GdkInputCondition condition)
 170 {
 171         char buf[BUFLEN];
 172         static GtkWidget *log = NULL;
 173         static GtkWidget *window = NULL;
 174         ssize_t len;
 175
 176         if (!window)
 177         {
 178                 GtkWidget       *hbox, *scrollbar;
 179
 180                 window = gtk_window_new(GTK_WINDOW_TOPLEVEL);
 181                 gtk_window_set_title(GTK_WINDOW(window),
 182                                                 _("ROX-Filer message log"));
 183                 gtk_window_set_position(GTK_WINDOW(window), GTK_WIN_POS_CENTER);
 184                 gtk_window_set_default_size(GTK_WINDOW(window), 600, 300);
 185                 gtk_signal_connect_object(GTK_OBJECT(window), "delete_event",
 186                                 gtk_widget_hide, GTK_OBJECT(window));
 187
 188
 189                 hbox = gtk_hbox_new(FALSE, 0);
 190                 gtk_container_add(GTK_CONTAINER(window), hbox);
 191                 scrollbar = gtk_vscrollbar_new(NULL);
 192
 193                 log = gtk_text_new(NULL,
 194                                 gtk_range_get_adjustment(GTK_RANGE(scrollbar)));
 195                 gtk_box_pack_start(GTK_BOX(hbox), log, TRUE, TRUE, 0);
 196                 gtk_box_pack_start(GTK_BOX(hbox), scrollbar, FALSE, TRUE, 0);
 197         }
 198
 199         len = read(source, buf, BUFLEN);
 200
 201         if (child_died_flag)
 202         {
 203                 child_died_callback();
 204                 if (len == 1 && !*buf)
 205                         return;
 206         }
 207
 208         if (len > 0)
 209         {
 210                 if (!GTK_WIDGET_MAPPED(window))
 211                         gtk_widget_show_all(window);
 212                 gtk_text_insert(GTK_TEXT(log), NULL, NULL, NULL, buf, len);
 213         }
 214 }
 215
 216 /* The value that goes with an option */
 217 #define VALUE (*optarg == '=' ? optarg + 1 : optarg)
 218
 219 int main(int argc, char **argv)
 220 {
 221         int              stderr_pipe[2];
 222         int              i;
 223         struct sigaction act;
 224         guchar          *tmp;
 225
 226         /* This is a list of \0 separated strings. Each string starts with a
 227          * character indicating what kind of operation to perform:
 228          *
 229          * fFILE        open this file (or directory)
 230          * dDIR         open this dir (even if it looks like an app)
 231          * pPIN         display this pinboard
 232          * tDIR         open DIR as a top-panel
 233          * bDIR         open DIR as a bottom-panel
 234          */
 235         GString         *to_open;
 236
 237         to_open = g_string_new(NULL);
 238
 239         choices_init();
 240         i18n_init();
 241
 242         home_dir = g_get_home_dir();
 243         app_dir = g_strdup(getenv("APP_DIR"));
 244         if (app_dir)
 245                 unsetenv("APP_DIR");
 246         else
 247         {
 248                 g_warning("APP_DIR environment variable was unset!\n"
 249                         "Use the AppRun script to invoke ROX-Filer...\n");
 250                 app_dir = g_get_current_dir();
 251         }
 252
 253         death_callbacks = g_hash_table_new(NULL, NULL);
 254
 255 #ifdef HAVE_LIBVFS
 256         mc_vfs_init();
 257 #endif
 258         gtk_init(&argc, &argv);
 259
 260         while (1)
 261         {
 262                 int     c;
 263 #ifdef HAVE_GETOPT_LONG
 264                 int     long_index;
 265                 c = getopt_long(argc, argv, SHORT_OPS,
 266                                 long_opts, &long_index);
 267 #else
 268                 c = getopt(argc, argv, SHORT_OPS);
 269 #endif
 270
 271                 if (c == EOF)
 272                         break;          /* No more options */
 273
 274                 switch (c)
 275                 {
 276                         case 'n':
 277                                 new_copy = TRUE;
 278                                 break;
 279                         case 'o':
 280                                 override_redirect = TRUE;
 281                                 break;
 282                         case 'v':
 283                                 fprintf(stderr, "ROX-Filer %s\n", VERSION);
 284                                 fprintf(stderr, _(COPYING));
 285                                 show_features();
 286                                 return EXIT_SUCCESS;
 287                         case 'h':
 288                                 fprintf(stderr, _(HELP));
 289                                 fprintf(stderr, _(SHORT_ONLY_WARNING));
 290                                 return EXIT_SUCCESS;
 291                         case 't':
 292                         case 'b':
 293                                 g_string_append_c(to_open, '<');
 294                                 g_string_append_c(to_open, c);
 295                                 g_string_append_c(to_open, '>');
 296                                 tmp = pathdup(VALUE);
 297                                 g_string_append(to_open, tmp);
 298                                 g_free(tmp);
 299                                 break;
 300                         case 'p':
 301                                 g_string_append(to_open, "<p>");
 302                                 g_string_append(to_open, VALUE);
 303                                 break;
 304                         default:
 305                                 printf(_(USAGE));
 306                                 return EXIT_FAILURE;
 307                 }
 308         }
 309
 310         i = optind;
 311         while (i < argc)
 312         {
 313                 tmp = pathdup(argv[i++]);
 314
 315                 g_string_append(to_open, "<f>");
 316                 g_string_append(to_open, tmp);
 317         }
 318
 319         if (to_open->len == 0)
 320         {
 321                 guchar  *dir;
 322
 323                 dir = g_get_current_dir();
 324                 g_string_sprintf(to_open, "<d>%s", dir);
 325                 g_free(dir);
 326         }
 327
 328         gui_support_init();
 329         if (remote_init(to_open, new_copy))
 330                 return EXIT_SUCCESS;    /* Already running */
 331         pixmaps_init();
 332
 333         dir_init();
 334         menu_init();
 335         dnd_init();
 336         filer_init();
 337         display_init();
 338         mount_init();
 339         options_init();
 340         type_init();
 341         action_init();
 342
 343         options_load();
 344
 345         /* Let child processes die */
 346         act.sa_handler = child_died;
 347         sigemptyset(&act.sa_mask);
 348         act.sa_flags = SA_NOCLDSTOP;
 349         sigaction(SIGCHLD, &act, NULL);
 350
 351         /* Ignore SIGPIPE - check for EPIPE errors instead */
 352         act.sa_handler = SIG_IGN;
 353         sigemptyset(&act.sa_mask);
 354         act.sa_flags = 0;
 355         sigaction(SIGPIPE, &act, NULL);
 356
 357         euid = geteuid();
 358         egid = getegid();
 359         ngroups = getgroups(0, NULL);
 360         if (ngroups < 0)
 361                 ngroups = 0;
 362         else if (ngroups > 0)
 363         {
 364                 supplemental_groups = g_malloc(sizeof(gid_t) * ngroups);
 365                 getgroups(ngroups, supplemental_groups);
 366         }
 367
 368         if (euid == 0)
 369         {
 370                 if (get_choice(_("!!!DANGER!!!"),
 371                         _("Running ROX-Filer as root is VERY dangerous. If I "
 372                         "had a warranty (I don't) then doing this would "
 373                         "void it"), 2,
 374                         _("Don't click here"), _("Quit")) != 0)
 375                         exit(EXIT_SUCCESS);
 376         }
 377
 378         run_list(to_open->str);
 379         g_string_free(to_open, TRUE);
 380
 381         pipe(stderr_pipe);
 382         close_on_exec(stderr_pipe[0], TRUE);
 383         close_on_exec(stderr_pipe[1], TRUE);
 384         gdk_input_add(stderr_pipe[0], GDK_INPUT_READ, stderr_cb, NULL);
 385         to_error_log = stderr_pipe[1];
 386
 387         if (number_of_windows > 0)
 388                 gtk_main();
 389
 390         return EXIT_SUCCESS;
 391 }
 392
 393 static void show_features(void)
 394 {
 395         g_printerr("\n-- %s --\n\n", _("features set at compile time"));
 396         g_printerr("%s... %s\n", _("VFS support"),
 397 #ifdef HAVE_LIBVFS
 398                 _("Yes")
 399 #else
 400                 _("No (couldn't find a valid libvfs)")
 401 #endif
 402                 );
 403         g_printerr("%s... %s\n", _("ImLib support"),
 404 #ifdef HAVE_IMLIB
 405                 _("Yes")
 406 #else
 407                 _("No (the imlib-config command didn't work)")
 408 #endif
 409                 );
 410 }
 411
 412 /* Register a function to be called when process number 'child' dies. */
 413 void on_child_death(int child, CallbackFn callback, gpointer data)
 414 {
 415         Callback        *cb;
 416
 417         g_return_if_fail(callback != NULL);
 418
 419         cb = g_new(Callback, 1);
 420
 421         cb->callback = callback;
 422         cb->data = data;
 423
 424         g_hash_table_insert(death_callbacks, (gpointer) child, cb);
 425 }