static void
fr_command_7z_extract (FrCommand *command,
const char *from_file,
GList *file_list,
const char *dest_dir,
gboolean overwrite,
gboolean skip_older,
gboolean junk_paths)
{
FrArchive *archive = FR_ARCHIVE (command);
GList *scan;
fr_process_use_standard_locale (command->process, TRUE);
fr_process_set_out_line_func (command->process,
process_line__extract,
command);
fr_command_7z_begin_command (command);
if (junk_paths)
fr_process_add_arg (command->process, "e");
else
fr_process_add_arg (command->process, "x");
fr_process_add_arg (command->process, "-bd");
fr_process_add_arg (command->process, "-y");
add_password_arg (command, archive->password, FALSE);
if (dest_dir != NULL)
fr_process_add_arg_concat (command->process, "-o", dest_dir, NULL);
if (from_file != NULL)
fr_process_add_arg_concat (command->process, "-i@", from_file, NULL);
if (from_file == NULL)
for (scan = file_list; scan; scan = scan->next)
/* Files prefixed with '@' need to be handled specially */
if (g_str_has_prefix (scan->data, "@"))
fr_process_add_arg_concat (command->process, "-i!", scan->data, NULL);
fr_process_add_arg (command->process, "--");
fr_process_add_arg (command->process, command->filename);
if (from_file == NULL)
for (scan = file_list; scan; scan = scan->next)
/* Skip files prefixed with '@', already added */
if (!g_str_has_prefix (scan->data, "@"))
fr_process_add_arg (command->process, scan->data);
fr_process_end_command (command->process);
}
static void
fr_command_unarchiver_extract (FrCommand *comm,
const char *from_file,
GList *file_list,
const char *dest_dir,
gboolean overwrite,
gboolean skip_older,
gboolean junk_paths)
{
FrCommandUnarchiver *unar_comm = FR_COMMAND_UNARCHIVER (comm);
GList *scan;
unar_comm->n_line = 0;
fr_process_use_standard_locale (comm->process, TRUE);
fr_process_set_out_line_func (comm->process,
process_line__extract,
comm);
fr_process_begin_command (comm->process, "unar");
if (overwrite)
fr_process_add_arg (comm->process, "-f");
else
fr_process_add_arg (comm->process, "-s");
fr_process_add_arg (comm->process, "-D");
if ((comm->password != NULL) && (comm->password[0] != '\0'))
fr_process_add_arg_concat (comm->process, "-password="******"-output-directory=", dest_dir, NULL);
fr_process_add_arg (comm->process, comm->filename);
for (scan = file_list; scan; scan = scan->next) {
char *escaped;
escaped = escape_str (scan->data, "[");
fr_process_add_arg (comm->process, escaped);
g_free (escaped);
}
fr_process_end_command (comm->process);
}
static void
fr_command_arj_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, "arj");
if (junk_paths)
fr_process_add_arg (comm->process, "e");
else
fr_process_add_arg (comm->process, "x");
if (dest_dir != NULL)
fr_process_add_arg_concat (comm->process, "-ht/", dest_dir, NULL);
if (! overwrite)
fr_process_add_arg (comm->process, "-n");
if (skip_older)
fr_process_add_arg (comm->process, "-u");
if (comm->password != NULL)
fr_process_add_arg_concat (comm->process, "-g/", comm->password, NULL);
else
fr_process_add_arg (comm->process, "-g/");
fr_process_add_arg (comm->process, "-i");
fr_process_add_arg (comm->process, "-y");
fr_process_add_arg (comm->process, "-");
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_7z_delete (FrCommand *command,
const char *from_file,
GList *file_list)
{
FrArchive *archive = FR_ARCHIVE (command);
GList *scan;
fr_command_7z_begin_command (command);
fr_process_add_arg (command->process, "d");
fr_process_add_arg (command->process, "-bd");
fr_process_add_arg (command->process, "-y");
if (_g_mime_type_matches (FR_ARCHIVE (command)->mime_type, "application/x-ms-dos-executable"))
fr_process_add_arg (command->process, "-sfx");
if (_g_mime_type_matches (archive->mime_type, "application/zip")
|| _g_mime_type_matches (archive->mime_type, "application/x-cbz"))
{
fr_process_add_arg (command->process, "-tzip");
}
if (from_file != NULL)
fr_process_add_arg_concat (command->process, "-i@", from_file, NULL);
if (from_file == NULL)
for (scan = file_list; scan; scan = scan->next)
/* Files prefixed with '@' need to be handled specially */
if (g_str_has_prefix (scan->data, "@"))
fr_process_add_arg_concat (command->process, "-i!", scan->data, NULL);
add_password_arg (command, FR_ARCHIVE (command)->password, FALSE);
fr_process_add_arg (command->process, "--");
fr_process_add_arg (command->process, command->filename);
if (from_file == NULL)
for (scan = file_list; scan; scan = scan->next)
/* Skip files prefixed with '@', already added */
if (!g_str_has_prefix (scan->data, "@"))
fr_process_add_arg (command->process, scan->data);
fr_process_end_command (command->process);
}
static void
fr_command_cpio_list (FrCommand *comm)
{
fr_process_set_out_line_func (comm->process, list__process_line, comm);
fr_process_begin_command (comm->process, "sh");
fr_process_add_arg (comm->process, "-c");
fr_process_add_arg_concat (comm->process, "cpio -itv < ", comm->e_filename, NULL);
fr_process_end_command (comm->process);
fr_process_start (comm->process);
}
static gboolean
fr_command_cpio_list (FrCommand *comm)
{
fr_process_set_out_line_func (comm->process, list__process_line, comm);
fr_process_begin_command (comm->process, "sh");
fr_process_add_arg (comm->process, "-c");
fr_process_add_arg_concat (comm->process, CPIO_PATH " -itv < ", comm->e_filename, NULL);
fr_process_end_command (comm->process);
return TRUE;
}
static void
fr_command_arj_test (FrCommand *comm)
{
fr_process_begin_command (comm->process, "arj");
fr_process_add_arg (comm->process, "t");
if (comm->password != NULL)
fr_process_add_arg_concat (comm->process, "-g/", comm->password, NULL);
fr_process_add_arg (comm->process, "-i");
fr_process_add_arg (comm->process, "-y");
fr_process_add_arg (comm->process, "-");
fr_process_add_arg (comm->process, comm->filename);
fr_process_end_command (comm->process);
}
static void
fr_command_arj_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, "arj");
fr_process_add_arg (comm->process, "a");
if (base_dir != NULL)
fr_process_set_working_dir (comm->process, base_dir);
if (update)
fr_process_add_arg (comm->process, "-u");
if (comm->password != NULL)
fr_process_add_arg_concat (comm->process, "-g/", comm->password, NULL);
switch (comm->compression) {
case FR_COMPRESSION_VERY_FAST:
fr_process_add_arg (comm->process, "-m3"); break;
case FR_COMPRESSION_FAST:
fr_process_add_arg (comm->process, "-m2"); break;
case FR_COMPRESSION_NORMAL:
fr_process_add_arg (comm->process, "-m1"); break;
case FR_COMPRESSION_MAXIMUM:
fr_process_add_arg (comm->process, "-m1"); break;
}
fr_process_add_arg (comm->process, "-i");
fr_process_add_arg (comm->process, "-y");
fr_process_add_arg (comm->process, "-");
fr_process_add_arg (comm->process, comm->filename);
for (scan = file_list; scan; scan = scan->next)
fr_process_add_arg (comm->process, (gchar*) scan->data);
fr_process_end_command (comm->process);
}
static gboolean
fr_command_unarchiver_list (FrCommand *comm)
{
FrCommandUnarchiver *unar_comm = FR_COMMAND_UNARCHIVER (comm);
_g_object_unref (unar_comm->stream);
unar_comm->stream = g_memory_input_stream_new ();
fr_process_set_out_line_func (comm->process, process_line, comm);
fr_process_begin_command (comm->process, "lsar");
fr_process_set_end_func (comm->process, list_command_completed, comm);
fr_process_add_arg (comm->process, "-j");
if ((FR_ARCHIVE (comm)->password != NULL) && (FR_ARCHIVE (comm)->password[0] != '\0'))
fr_process_add_arg_concat (comm->process, "-password=", FR_ARCHIVE (comm)->password, NULL);
fr_process_add_arg (comm->process, comm->filename);
fr_process_end_command (comm->process);
return TRUE;
}
static void
fr_command_tar_recompress (FrCommand *comm)
{
FrCommandTar *c_tar = FR_COMMAND_TAR (comm);
FrArchive *archive = FR_ARCHIVE (comm);
char *new_name = NULL;
if (can_create_a_compressed_archive (comm))
return;
if (_g_mime_type_matches (archive->mime_type, "application/x-compressed-tar")) {
fr_process_begin_command (comm->process, "gzip");
fr_process_set_begin_func (comm->process, begin_func__recompress, comm);
fr_process_set_continue_func (comm->process, gzip_continue_func, comm);
switch (archive->compression) {
case FR_COMPRESSION_VERY_FAST:
fr_process_add_arg (comm->process, "-1"); break;
case FR_COMPRESSION_FAST:
fr_process_add_arg (comm->process, "-3"); break;
case FR_COMPRESSION_NORMAL:
fr_process_add_arg (comm->process, "-6"); break;
case FR_COMPRESSION_MAXIMUM:
fr_process_add_arg (comm->process, "-9"); break;
}
fr_process_add_arg (comm->process, "-f");
fr_process_add_arg (comm->process, c_tar->uncomp_filename);
fr_process_end_command (comm->process);
new_name = g_strconcat (c_tar->uncomp_filename, ".gz", NULL);
}
else if (_g_mime_type_matches (archive->mime_type, "application/x-bzip-compressed-tar")) {
fr_process_begin_command (comm->process, "bzip2");
fr_process_set_begin_func (comm->process, begin_func__recompress, comm);
switch (archive->compression) {
case FR_COMPRESSION_VERY_FAST:
fr_process_add_arg (comm->process, "-1"); break;
case FR_COMPRESSION_FAST:
fr_process_add_arg (comm->process, "-3"); break;
case FR_COMPRESSION_NORMAL:
fr_process_add_arg (comm->process, "-6"); break;
case FR_COMPRESSION_MAXIMUM:
fr_process_add_arg (comm->process, "-9"); break;
}
fr_process_add_arg (comm->process, "-f");
fr_process_add_arg (comm->process, c_tar->uncomp_filename);
fr_process_end_command (comm->process);
new_name = g_strconcat (c_tar->uncomp_filename, ".bz2", NULL);
}
else if (_g_mime_type_matches (archive->mime_type, "application/x-tarz")) {
fr_process_begin_command (comm->process, "compress");
fr_process_set_begin_func (comm->process, begin_func__recompress, comm);
fr_process_add_arg (comm->process, "-f");
fr_process_add_arg (comm->process, c_tar->uncomp_filename);
fr_process_end_command (comm->process);
new_name = g_strconcat (c_tar->uncomp_filename, ".Z", NULL);
}
else if (_g_mime_type_matches (archive->mime_type, "application/x-lrzip-compressed-tar")) {
fr_process_begin_command (comm->process, "lrzip");
fr_process_set_begin_func (comm->process, begin_func__recompress, comm);
switch (archive->compression) {
case FR_COMPRESSION_VERY_FAST:
fr_process_add_arg (comm->process, "-l"); break;
case FR_COMPRESSION_FAST:
fr_process_add_arg (comm->process, "-g"); break;
case FR_COMPRESSION_NORMAL:
fr_process_add_arg (comm->process, "-b"); break;
case FR_COMPRESSION_MAXIMUM:
fr_process_add_arg (comm->process, "-z"); break;
}
fr_process_add_arg (comm->process, "-o");
fr_process_add_arg (comm->process, c_tar->uncomp_filename);
fr_process_end_command (comm->process);
new_name = g_strconcat (c_tar->uncomp_filename, ".lrz", NULL);
}
else if (_g_mime_type_matches (archive->mime_type, "application/x-lzip-compressed-tar")) {
fr_process_begin_command (comm->process, "lzip");
fr_process_set_begin_func (comm->process, begin_func__recompress, comm);
switch (archive->compression) {
case FR_COMPRESSION_VERY_FAST:
fr_process_add_arg (comm->process, "-1"); break;
case FR_COMPRESSION_FAST:
fr_process_add_arg (comm->process, "-3"); break;
case FR_COMPRESSION_NORMAL:
fr_process_add_arg (comm->process, "-6"); break;
case FR_COMPRESSION_MAXIMUM:
fr_process_add_arg (comm->process, "-9"); break;
}
fr_process_add_arg (comm->process, "-f");
fr_process_add_arg (comm->process, c_tar->uncomp_filename);
fr_process_end_command (comm->process);
new_name = g_strconcat (c_tar->uncomp_filename, ".lz", NULL);
}
else if (_g_mime_type_matches (archive->mime_type, "application/x-lzma-compressed-tar")) {
fr_process_begin_command (comm->process, "lzma");
fr_process_set_begin_func (comm->process, begin_func__recompress, comm);
switch (archive->compression) {
case FR_COMPRESSION_VERY_FAST:
fr_process_add_arg (comm->process, "-1"); break;
case FR_COMPRESSION_FAST:
fr_process_add_arg (comm->process, "-3"); break;
case FR_COMPRESSION_NORMAL:
fr_process_add_arg (comm->process, "-6"); break;
case FR_COMPRESSION_MAXIMUM:
fr_process_add_arg (comm->process, "-9"); break;
}
fr_process_add_arg (comm->process, "-f");
fr_process_add_arg (comm->process, c_tar->uncomp_filename);
fr_process_end_command (comm->process);
new_name = g_strconcat (c_tar->uncomp_filename, ".lzma", NULL);
}
else if (_g_mime_type_matches (archive->mime_type, "application/x-xz-compressed-tar")) {
fr_process_begin_command (comm->process, "xz");
fr_process_set_begin_func (comm->process, begin_func__recompress, comm);
switch (archive->compression) {
case FR_COMPRESSION_VERY_FAST:
fr_process_add_arg (comm->process, "-1"); break;
case FR_COMPRESSION_FAST:
fr_process_add_arg (comm->process, "-3"); break;
case FR_COMPRESSION_NORMAL:
fr_process_add_arg (comm->process, "-6"); break;
case FR_COMPRESSION_MAXIMUM:
fr_process_add_arg (comm->process, "-9"); break;
}
fr_process_add_arg (comm->process, "-f");
fr_process_add_arg (comm->process, c_tar->uncomp_filename);
fr_process_end_command (comm->process);
new_name = g_strconcat (c_tar->uncomp_filename, ".xz", NULL);
}
else if (_g_mime_type_matches (archive->mime_type, "application/x-lzop-compressed-tar")) {
fr_process_begin_command (comm->process, "lzop");
fr_process_set_begin_func (comm->process, begin_func__recompress, comm);
switch (archive->compression) {
case FR_COMPRESSION_VERY_FAST:
fr_process_add_arg (comm->process, "-1"); break;
case FR_COMPRESSION_FAST:
fr_process_add_arg (comm->process, "-3"); break;
case FR_COMPRESSION_NORMAL:
fr_process_add_arg (comm->process, "-6"); break;
case FR_COMPRESSION_MAXIMUM:
fr_process_add_arg (comm->process, "-9"); break;
}
fr_process_add_arg (comm->process, "-fU");
fr_process_add_arg (comm->process, "--no-stdin");
fr_process_add_arg (comm->process, c_tar->uncomp_filename);
fr_process_end_command (comm->process);
new_name = g_strconcat (c_tar->uncomp_filename, ".lzo", NULL);
}
else if (_g_mime_type_matches (archive->mime_type, "application/x-7z-compressed-tar")) {
FrCommandTar *comm_tar = (FrCommandTar*) comm;
fr_process_begin_command (comm->process, comm_tar->compress_command);
fr_process_set_begin_func (comm->process, begin_func__recompress, comm);
switch (archive->compression) {
case FR_COMPRESSION_VERY_FAST:
fr_process_add_arg (comm->process, "-mx=1"); break;
case FR_COMPRESSION_FAST:
fr_process_add_arg (comm->process, "-mx=5"); break;
case FR_COMPRESSION_NORMAL:
fr_process_add_arg (comm->process, "-mx=5"); break;
case FR_COMPRESSION_MAXIMUM:
fr_process_add_arg (comm->process, "-mx=7"); break;
}
fr_process_add_arg (comm->process, "a");
fr_process_add_arg (comm->process, "-bd");
fr_process_add_arg (comm->process, "-y");
fr_process_add_arg (comm->process, "-l");
new_name = g_strconcat (c_tar->uncomp_filename, ".7z", NULL);
fr_process_add_arg_concat (comm->process, new_name, NULL);
fr_process_add_arg (comm->process, c_tar->uncomp_filename);
fr_process_end_command (comm->process);
/* remove the uncompressed tar */
fr_process_begin_command (comm->process, "rm");
fr_process_add_arg (comm->process, "-f");
fr_process_add_arg (comm->process, c_tar->uncomp_filename);
fr_process_end_command (comm->process);
}
if (c_tar->name_modified) {
char *tmp_dir;
/* Restore original name. */
fr_process_begin_command (comm->process, "mv");
fr_process_add_arg (comm->process, "-f");
fr_process_add_arg (comm->process, "--");
fr_process_add_arg (comm->process, new_name);
fr_process_add_arg (comm->process, comm->filename);
fr_process_end_command (comm->process);
tmp_dir = _g_path_remove_level (new_name);
fr_process_begin_command (comm->process, "rm");
fr_process_set_sticky (comm->process, TRUE);
fr_process_add_arg (comm->process, "-fr");
fr_process_add_arg (comm->process, tmp_dir);
fr_process_end_command (comm->process);
g_free (tmp_dir);
}
g_free (new_name);
g_free (c_tar->uncomp_filename);
c_tar->uncomp_filename = NULL;
}
static void
fr_command_7z_add (FrCommand *command,
const char *from_file,
GList *file_list,
const char *base_dir,
gboolean update,
gboolean follow_links)
{
FrArchive *archive = FR_ARCHIVE (command);
GList *scan;
fr_process_use_standard_locale (command->process, TRUE);
fr_process_set_out_line_func (command->process,
process_line__add,
command);
fr_command_7z_begin_command (command);
if (update)
fr_process_add_arg (command->process, "u");
else
fr_process_add_arg (command->process, "a");
if (base_dir != NULL)
fr_process_set_working_dir (command->process, base_dir);
if (_g_mime_type_matches (archive->mime_type, "application/zip")
|| _g_mime_type_matches (archive->mime_type, "application/x-cbz"))
{
fr_process_add_arg (command->process, "-tzip");
fr_process_add_arg (command->process, "-mem=AES128");
}
fr_process_add_arg (command->process, "-bd");
fr_process_add_arg (command->process, "-y");
if (follow_links)
fr_process_add_arg (command->process, "-l");
add_password_arg (command, archive->password, FALSE);
if ((archive->password != NULL)
&& (*archive->password != 0)
&& archive->encrypt_header
&& fr_archive_is_capable_of (archive, FR_ARCHIVE_CAN_ENCRYPT_HEADER))
{
fr_process_add_arg (command->process, "-mhe=on");
}
/* fr_process_add_arg (command->process, "-ms=off"); FIXME: solid mode off? */
switch (archive->compression) {
case FR_COMPRESSION_VERY_FAST:
fr_process_add_arg (command->process, "-mx=1");
break;
case FR_COMPRESSION_FAST:
fr_process_add_arg (command->process, "-mx=5");
break;
case FR_COMPRESSION_NORMAL:
fr_process_add_arg (command->process, "-mx=7");
break;
case FR_COMPRESSION_MAXIMUM:
fr_process_add_arg (command->process, "-mx=9");
if (! _g_mime_type_matches (archive->mime_type, "application/zip")
&& ! _g_mime_type_matches (archive->mime_type, "application/x-cbz"))
{
fr_process_add_arg (command->process, "-m0=lzma2");;
}
break;
}
if (_g_mime_type_matches (archive->mime_type, "application/x-ms-dos-executable"))
fr_process_add_arg (command->process, "-sfx");
if (archive->volume_size > 0)
fr_process_add_arg_printf (command->process, "-v%ub", archive->volume_size);
if (from_file != NULL)
fr_process_add_arg_concat (command->process, "-i@", from_file, NULL);
if (from_file == NULL)
for (scan = file_list; scan; scan = scan->next)
/* Files prefixed with '@' need to be handled specially */
if (g_str_has_prefix (scan->data, "@"))
fr_process_add_arg_concat (command->process, "-i!", scan->data, NULL);
fr_process_add_arg (command->process, "--");
fr_process_add_arg (command->process, command->filename);
if (from_file == NULL)
for (scan = file_list; scan; scan = scan->next)
/* Skip files prefixed with '@', already added */
if (!g_str_has_prefix (scan->data, "@"))
fr_process_add_arg (command->process, scan->data);
fr_process_end_command (command->process);
}
