/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */ /* * Engrampa * * Copyright (C) 2001, 2003, 2004 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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. */ #define _XOPEN_SOURCE /* strptime */ #include #include #include #include #include "file-data.h" #include "file-utils.h" #include "fr-command.h" #include "fr-command-ar.h" #define LS_AR_DATE_FORMAT "%b %e %H:%M %Y" static void fr_command_ar_class_init (FrCommandArClass *class); static void fr_command_ar_init (FrCommand *afile); static void fr_command_ar_finalize (GObject *object); /* Parent Class */ static FrCommandClass *parent_class = NULL; /* -- list -- */ static time_t mktime_from_string (const char *time_s) { struct tm tm = {0, }; tm.tm_isdst = -1; strptime (time_s, LS_AR_DATE_FORMAT, &tm); return mktime (&tm); } static char* ar_get_last_field (const char *line, int start_from, int field_n) { const char *f_start, *f_end; line = line + start_from; f_start = line; while ((*f_start == ' ') && (*f_start != *line)) f_start++; f_end = f_start; while ((field_n > 0) && (*f_end != 0)) { if (*f_end == ' ') { field_n--; if (field_n == 1) f_start = f_end; } f_end++; } if (*f_start == ' ') f_start++; return g_strdup (f_start); } static void process_line (char *line, gpointer data) { FileData *fdata; FrCommand *comm = FR_COMMAND (data); char **fields; int date_idx; char *field_date; char *field_size, *field_name; g_return_if_fail (line != NULL); fdata = file_data_new (); date_idx = file_list__get_index_from_pattern (line, "%c%c%c %a%n %n%n:%n%n %n%n%n%n"); field_size = file_list__get_prev_field (line, date_idx, 1); fdata->size = g_ascii_strtoull (field_size, NULL, 10); g_free (field_size); field_date = g_strndup (line + date_idx, 17); fdata->modified = mktime_from_string (field_date); g_free (field_date); /* Full path */ field_name = ar_get_last_field (line, date_idx, 5); fields = g_strsplit (field_name, " -> ", 2); if (fields[0] == NULL) { g_strfreev (fields); g_free (field_name); file_data_free (fdata); return; } if (fields[1] == NULL) { g_strfreev (fields); fields = g_strsplit (field_name, " link to ", 2); } if (*(fields[0]) == '/') { fdata->full_path = g_strdup (fields[0]); fdata->original_path = fdata->full_path; } else { fdata->full_path = g_strconcat ("/", fields[0], NULL); fdata->original_path = fdata->full_path + 1; } if (fields[1] != NULL) fdata->link = g_strdup (fields[1]); g_strfreev (fields); g_free (field_name); 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 (comm, fdata); } static void fr_command_ar_list (FrCommand *comm) { fr_process_set_out_line_func (comm->process, process_line, comm); fr_process_begin_command (comm->process, "ar"); fr_process_add_arg (comm->process, "tv"); fr_process_add_arg (comm->process, comm->filename); fr_process_end_command (comm->process); fr_process_start (comm->process); } static void fr_command_ar_add (FrCommand *comm, const char *from_file, GList *file_list, const char *base_dir, gboolean update, gboolean recursive) { GList *scan; fr_process_begin_command (comm->process, "ar"); if (update) fr_process_add_arg (comm->process, "ru"); else fr_process_add_arg (comm->process, "r"); if (base_dir != NULL) fr_process_set_working_dir (comm->process, base_dir); 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_ar_delete (FrCommand *comm, const char *from_file, GList *file_list) { GList *scan; fr_process_begin_command (comm->process, "ar"); fr_process_add_arg (comm->process, "d"); 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_ar_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, "ar"); if (dest_dir != NULL) fr_process_set_working_dir (comm->process, dest_dir); fr_process_add_arg (comm->process, "x"); 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_ar_handle_error (FrCommand *comm, FrProcError *error) { /* FIXME */ } const char *ar_mime_type[] = { "application/x-archive", "application/vnd.debian.binary-package", NULL }; static const char ** fr_command_ar_get_mime_types (FrCommand *comm) { return ar_mime_type; } static FrCommandCap fr_command_ar_get_capabilities (FrCommand *comm, const char *mime_type, gboolean check_command) { FrCommandCap capabilities; capabilities = FR_COMMAND_CAN_ARCHIVE_MANY_FILES; if (is_program_available ("ar", check_command)) { if (is_mime_type (mime_type, "application/vnd.debian.binary-package")) capabilities |= FR_COMMAND_CAN_READ; else if (is_mime_type (mime_type, "application/x-archive")) capabilities |= FR_COMMAND_CAN_READ_WRITE; } return capabilities; } static const char * fr_command_ar_get_packages (FrCommand *comm, const char *mime_type) { return PACKAGES ("binutils"); } static void fr_command_ar_class_init (FrCommandArClass *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_ar_finalize; afc->list = fr_command_ar_list; afc->add = fr_command_ar_add; afc->delete = fr_command_ar_delete; afc->extract = fr_command_ar_extract; afc->handle_error = fr_command_ar_handle_error; afc->get_mime_types = fr_command_ar_get_mime_types; afc->get_capabilities = fr_command_ar_get_capabilities; afc->get_packages = fr_command_ar_get_packages; } static void fr_command_ar_init (FrCommand *comm) { comm->propAddCanUpdate = TRUE; comm->propAddCanReplace = TRUE; comm->propAddCanStoreFolders = FALSE; comm->propExtractCanAvoidOverwrite = FALSE; comm->propExtractCanSkipOlder = FALSE; comm->propExtractCanJunkPaths = FALSE; comm->propPassword = FALSE; comm->propTest = FALSE; } static void fr_command_ar_finalize (GObject *object) { g_return_if_fail (object != NULL); g_return_if_fail (FR_IS_COMMAND_AR (object)); /* Chain up */ if (G_OBJECT_CLASS (parent_class)->finalize) G_OBJECT_CLASS (parent_class)->finalize (object); } GType fr_command_ar_get_type () { static GType type = 0; if (! type) { GTypeInfo type_info = { sizeof (FrCommandArClass), NULL, NULL, (GClassInitFunc) fr_command_ar_class_init, NULL, NULL, sizeof (FrCommandAr), 0, (GInstanceInitFunc) fr_command_ar_init, NULL }; type = g_type_register_static (FR_TYPE_COMMAND, "FRCommandAr", &type_info, 0); } return type; }