path: root/plugins/backup-restore/backup.c

#ifdef HAVE_CONFIG_H
#include <config.h>
#endif

#include <errno.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/wait.h>

#include <libgnome/gnome-i18n.h>
#include <libgnome/gnome-util.h>

#define EVOLUTION "evolution-" BASE_VERSION
#define EVOLUTION_DIR "~/.evolution/"
#define EVOLUTION_DIR_BACKUP "~/.evolution-old/"
#define GCONF_DUMP_FILE "backup-restore-gconf.xml"
#define GCONF_DUMP_PATH EVOLUTION_DIR GCONF_DUMP_FILE
#define GCONF_DIR "/apps/evolution"
#define ARCHIVE_NAME "evolution-backup.tar.gz"

static gboolean backup_op = FALSE;
static gboolean restore_op = FALSE;
static gboolean check_op = FALSE;
static gboolean restart_arg = FALSE;

#define d(x) x

/* #define s(x) system (x) */
#define s(x) G_STMT_START { g_message (x); system (x); } G_STMT_END

static void
backup (const char *filename) 
{
    char *command;
    
    /* FIXME Will the versioned setting always work? */
    s (EVOLUTION " --force-shutdown");

    s ("gconftool-2 --dump " GCONF_DIR " > " GCONF_DUMP_PATH);

    /* FIXME stay on this file system ,other options?" */
    /* FIXME compression type?" */
    /* FIXME date/time stamp?" */
    /* FIXME archive location?" */
    command = g_strdup_printf ("cd ~ && tar zpcf %s .evolution", filename);
    s (command);
    g_free (command);

    if (restart_arg)
        s (EVOLUTION);
}

static void
restore (const char *filename) 
{
    char *command;
    
    /* FIXME Will the versioned setting always work? */
    s (EVOLUTION " --force-shutdown");

    s ("mv " EVOLUTION_DIR " " EVOLUTION_DIR_BACKUP);

    command = g_strdup_printf ("cd ~ && tar zxf %s", filename);
    s (command);
    g_free (command);

    s ("gconftool-2 --load " GCONF_DUMP_PATH);
    s ("rm -rf " GCONF_DUMP_PATH);
    s ("rm -rf " EVOLUTION_DIR_BACKUP);

    if (restart_arg)
        s (EVOLUTION);
}

static void
check (const char *filename) 
{
    char *command;
    int result;

    command = g_strdup_printf ("tar ztf %s | grep -e \"^\\.evolution/$\"", filename);
    result = system (command);
    g_free (command);

    g_message ("First result %d", result);
    if (result)
        exit (result);

    command = g_strdup_printf ("tar ztf %s | grep -e \"^\\.evolution/%s$\"", filename, GCONF_DUMP_FILE);
    result = system (command);
    g_free (command);

    g_message ("Second result %d", result);

    exit (result);
}

int
main (int argc, char **argv)
{
    GValue popt_context_value = { 0, };
    GnomeProgram *program;
    poptContext popt_context;
    const char **args;

    struct poptOption options[] = {
        { "backup", '\0', POPT_ARG_NONE, &backup_op, 0, 
          N_("Backup Evolution directory"), NULL },
        { "restore", '\0', POPT_ARG_NONE, &restore_op, 0, 
          N_("Restore Evolution directory"), NULL },
        { "check", '\0', POPT_ARG_NONE, &check_op, 0, 
          N_("Check Evolution archive"), NULL },
        { "restart", '\0', POPT_ARG_NONE, &restart_arg, 0, 
          N_("Restart Evolution"), NULL },
        { NULL, '\0', 0, NULL, 0, NULL, NULL }
    };

    bindtextdomain (GETTEXT_PACKAGE, EVOLUTION_LOCALEDIR);
    bind_textdomain_codeset (GETTEXT_PACKAGE, "UTF-8");
    textdomain (GETTEXT_PACKAGE);

    program = gnome_program_init (PACKAGE, VERSION, LIBGNOME_MODULE, argc, argv, 
                      GNOME_PROGRAM_STANDARD_PROPERTIES,
                      GNOME_PARAM_POPT_TABLE, options,
                      NULL);

    g_value_init (&popt_context_value, G_TYPE_POINTER);
    g_object_get_property (G_OBJECT (program), GNOME_PARAM_POPT_CONTEXT, &popt_context_value);
    popt_context = g_value_get_pointer (&popt_context_value);
    args = poptGetArgs (popt_context);

    if (args != NULL) {
        const char **p;
        
        for (p = args; *p != NULL; p++) {
            if (backup_op) {
                d(g_message ("Backing up to %s", (char *) *p));
                backup ((char *) *p);
            } else if (restore_op) {
                d(g_message ("Restoring from %s", (char *) *p));
                restore ((char *) *p);
            } else if (check_op) {
                d(g_message ("Checking %s", (char *) *p));
                check ((char *) *p);            
            }
        }
    }

    g_value_unset (&popt_context_value);
    
    return 0;
}