From 70438138096a47b2505ac55634cd94947ce378b6 Mon Sep 17 00:00:00 2001 From: Perberos Date: Wed, 9 Nov 2011 22:53:33 -0300 Subject: initial --- src/fr-command-zoo.c | 428 +++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 428 insertions(+) create mode 100644 src/fr-command-zoo.c (limited to 'src/fr-command-zoo.c') diff --git a/src/fr-command-zoo.c b/src/fr-command-zoo.c new file mode 100644 index 0000000..00b79de --- /dev/null +++ b/src/fr-command-zoo.c @@ -0,0 +1,428 @@ +/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */ + +/* + * File-Roller + * + * Copyright (C) 2003 Free Software Foundation, Inc. + * + * 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 2 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, write to the Free Software + * Foundation, Inc., 59 Temple Street #330, Boston, MA 02111-1307, USA. + */ + +#include +#include +#include + +#include + +#include "file-data.h" +#include "file-utils.h" +#include "glib-utils.h" +#include "fr-command.h" +#include "fr-command-zoo.h" + +static void fr_command_zoo_class_init (FrCommandZooClass *class); +static void fr_command_zoo_init (FrCommand *afile); +static void fr_command_zoo_finalize (GObject *object); + +/* Parent Class */ + +static FrCommandClass *parent_class = NULL; + + +/* -- list -- */ + +static time_t +mktime_from_string_zoo (char *mday_s, + char *month_s, + char *year_s, + char *time_s) +{ + struct tm tm = {0, }; + char **fields; + int year; + + tm.tm_isdst = -1; + + /* This will break in 2075 */ + year = atoi (year_s); + if (year >= 75) { + tm.tm_year = year; + } else { + tm.tm_year = 100 + year; + } + + if (g_ascii_strncasecmp(month_s, "Jan", 3) == 0) { + tm.tm_mon = 0; + } else if (g_ascii_strncasecmp(month_s, "Feb", 3) == 0) { + tm.tm_mon = 1; + } else if (g_ascii_strncasecmp(month_s, "Mar", 3) == 0) { + tm.tm_mon = 2; + } else if (g_ascii_strncasecmp(month_s, "Apr", 3) == 0) { + tm.tm_mon = 3; + } else if (g_ascii_strncasecmp(month_s, "May", 3) == 0) { + tm.tm_mon = 4; + } else if (g_ascii_strncasecmp(month_s, "Jun", 3) == 0) { + tm.tm_mon = 5; + } else if (g_ascii_strncasecmp(month_s, "Jul", 3) == 0) { + tm.tm_mon = 6; + } else if (g_ascii_strncasecmp(month_s, "Aug", 3) == 0) { + tm.tm_mon = 7; + } else if (g_ascii_strncasecmp(month_s, "Sep", 3) == 0) { + tm.tm_mon = 8; + } else if (g_ascii_strncasecmp(month_s, "Oct", 3) == 0) { + tm.tm_mon = 9; + } else if (g_ascii_strncasecmp(month_s, "Nov", 3) == 0) { + tm.tm_mon = 10; + } else if (g_ascii_strncasecmp(month_s, "Dec", 3) == 0) { + tm.tm_mon = 11; + } + + tm.tm_mday = atoi (mday_s); + + fields = g_strsplit (time_s, ":", 3); + if (fields[0] != NULL) { + tm.tm_hour = atoi (fields[0]); + if (fields[1] != NULL) { + tm.tm_min = atoi (fields[1]); + if (fields[2] != NULL) + tm.tm_sec = atoi (fields[2]); + } + } + + g_strfreev (fields); + + return mktime (&tm); +} + + +static char ** +split_line_zoo (char *line) +{ + char **fields; + const char *scan, *field_end; + int i; + + if (line[0] == '-') { + return NULL; + } + + fields = g_new0 (char *, 6); + fields[5] = NULL; + + /* Get Length */ + scan = eat_spaces (line); + field_end = strchr (scan, ' '); + fields[0] = g_strndup (scan, field_end - scan); + scan = eat_spaces (field_end); + + /* Toss CF, Size Now */ + for (i = 0; i < 2; i++) { + field_end = strchr (scan, ' '); + scan = eat_spaces (field_end); + } + + /* Get Day, Month, Year, Time */ + for (i = 1; i < 5; i++) { + if (i == 2 && g_ascii_strncasecmp (scan, "file", 4) == 0) { + g_strfreev(fields); + return NULL; + } + field_end = strchr (scan, ' '); + fields[i] = g_strndup (scan, field_end - scan); + scan = eat_spaces (field_end); + } + + return fields; +} + + +static const char * +get_last_field_zoo (char *line) +{ + const char *field; + int i; + int n = 6; + + field = eat_spaces (line); + for (i = 0; i < n; i++) { + field = strchr (field, ' '); + field = eat_spaces (field); + } + field = strchr (field, ' '); + if (g_ascii_strncasecmp (field, " C ", 3) == 0) { + field = eat_spaces (field); + field = strchr (field, ' '); + field = eat_spaces (field); + } else + field = eat_spaces (field); + + return field; +} + + +static void +process_zoo_line (char *line, + gpointer data) +{ + FileData *fdata; + FrCommand *zoo_comm = FR_COMMAND (data); + char **fields; + const char *name_field; + + g_return_if_fail (line != NULL); + if (line[0] == '-') + return; + + fields = split_line_zoo (line); + if (fields == NULL) + return; + + fdata = file_data_new (); + + fdata->size = g_ascii_strtoull (fields[0], NULL, 10); + fdata->modified = mktime_from_string_zoo (fields[1], + fields[2], + fields[3], + fields[4]); + g_strfreev (fields); + + /* Full path */ + + name_field = get_last_field_zoo (line); + if (*(name_field) == '/') { + fdata->full_path = g_strdup (name_field); + fdata->original_path = fdata->full_path; + } else { + fdata->full_path = g_strconcat ("/", name_field, NULL); + fdata->original_path = fdata->full_path + 1; + } + + fdata->name = g_strdup (file_name_from_path (fdata->full_path)); + fdata->path = remove_level_from_path (fdata->full_path); + + if (*fdata->name == 0) + file_data_free (fdata); + else + fr_command_add_file (zoo_comm, fdata); +} + + +static void +fr_command_zoo_list (FrCommand *zoo_comm) +{ + fr_process_set_out_line_func (zoo_comm->process, process_zoo_line, zoo_comm); + + fr_process_begin_command (zoo_comm->process, "zoo"); + fr_process_add_arg (zoo_comm->process, "lq"); + fr_process_add_arg (zoo_comm->process, zoo_comm->filename); + fr_process_end_command (zoo_comm->process); + fr_process_start (zoo_comm->process); +} + + +static void +fr_command_zoo_add (FrCommand *comm, + const char *from_file, + GList *file_list, + const char *base_dir, + gboolean update, + gboolean recursive) +{ + GList *scan; + + /* Add files. */ + + fr_process_begin_command (comm->process, "zoo"); + + fr_process_set_working_dir (comm->process, base_dir); + + if (update) + fr_process_add_arg (comm->process, "auP"); + else + fr_process_add_arg (comm->process, "aP"); + + fr_process_add_arg (comm->process, comm->filename); + + for (scan = file_list; scan; scan = scan->next) + fr_process_add_arg (comm->process, scan->data); + fr_process_end_command (comm->process); +} + + +static void +fr_command_zoo_delete (FrCommand *comm, + const char *from_file, + GList *file_list) +{ + GList *scan; + + /* Delete files. */ + + fr_process_begin_command (comm->process, "zoo"); + fr_process_add_arg (comm->process, "DP"); + fr_process_add_arg (comm->process, comm->filename); + + for (scan = file_list; scan; scan = scan->next) + fr_process_add_arg (comm->process, scan->data); + fr_process_end_command (comm->process); +} + + +static void +fr_command_zoo_extract (FrCommand *comm, + const char *from_file, + GList *file_list, + const char *dest_dir, + gboolean overwrite, + gboolean skip_older, + gboolean junk_paths) +{ + GList *scan; + + fr_process_begin_command (comm->process, "zoo"); + + if (overwrite) + fr_process_add_arg (comm->process, "xO"); + else + fr_process_add_arg (comm->process, "x"); + + fr_process_add_arg (comm->process, comm->filename); + + if (dest_dir != NULL) + fr_process_set_working_dir (comm->process, dest_dir); + + for (scan = file_list; scan; scan = scan->next) + fr_process_add_arg (comm->process, scan->data); + + fr_process_end_command (comm->process); +} + + +static void +fr_command_zoo_test (FrCommand *comm) +{ + fr_process_begin_command (comm->process, "zoo"); + fr_process_add_arg (comm->process, "-test"); + fr_process_add_arg (comm->process, comm->filename); + fr_process_end_command (comm->process); +} + + +const char *zoo_mime_type[] = { "application/x-zoo", NULL }; + + +const char ** +fr_command_zoo_get_mime_types (FrCommand *comm) +{ + return zoo_mime_type; +} + + +FrCommandCap +fr_command_zoo_get_capabilities (FrCommand *comm, + const char *mime_type, + gboolean check_command) +{ + FrCommandCap capabilities; + + capabilities = FR_COMMAND_CAN_ARCHIVE_MANY_FILES; + if (is_program_available ("zoo", check_command)) + capabilities |= FR_COMMAND_CAN_READ_WRITE; + + return capabilities; +} + + +static const char * +fr_command_zoo_get_packages (FrCommand *comm, + const char *mime_type) +{ + return PACKAGES ("zoo"); +} + + +static void +fr_command_zoo_class_init (FrCommandZooClass *class) +{ + GObjectClass *gobject_class = G_OBJECT_CLASS (class); + FrCommandClass *afc; + + parent_class = g_type_class_peek_parent (class); + afc = (FrCommandClass*) class; + + gobject_class->finalize = fr_command_zoo_finalize; + + afc->list = fr_command_zoo_list; + afc->add = fr_command_zoo_add; + afc->delete = fr_command_zoo_delete; + afc->extract = fr_command_zoo_extract; + afc->test = fr_command_zoo_test; + afc->get_mime_types = fr_command_zoo_get_mime_types; + afc->get_capabilities = fr_command_zoo_get_capabilities; + afc->get_packages = fr_command_zoo_get_packages; +} + + +static void +fr_command_zoo_init (FrCommand *comm) +{ + comm->propAddCanUpdate = TRUE; + comm->propAddCanReplace = FALSE; + comm->propExtractCanAvoidOverwrite = FALSE; + comm->propExtractCanSkipOlder = FALSE; + comm->propExtractCanJunkPaths = FALSE; + comm->propPassword = FALSE; + comm->propTest = TRUE; +} + + +static void +fr_command_zoo_finalize (GObject *object) +{ + g_return_if_fail (object != NULL); + g_return_if_fail (FR_IS_COMMAND_ZOO (object)); + + /* Chain up */ + if (G_OBJECT_CLASS (parent_class)->finalize) + G_OBJECT_CLASS (parent_class)->finalize (object); +} + + +GType +fr_command_zoo_get_type () +{ + static GType type = 0; + + if (! type) { + GTypeInfo type_info = { + sizeof (FrCommandZooClass), + NULL, + NULL, + (GClassInitFunc) fr_command_zoo_class_init, + NULL, + NULL, + sizeof (FrCommandZoo), + 0, + (GInstanceInitFunc) fr_command_zoo_init + }; + + type = g_type_register_static (FR_TYPE_COMMAND, + "FRCommandZoo", + &type_info, + 0); + } + + return type; +} -- cgit v1.2.1