392 lines
8.5 KiB
C
392 lines
8.5 KiB
C
/*-
|
|
* Copyright (c) 2009 Michihiro NAKAJIMA
|
|
* Copyright (c) 2003-2007 Tim Kientzle
|
|
* All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR(S) ``AS IS'' AND ANY EXPRESS OR
|
|
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
|
|
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
|
|
* IN NO EVENT SHALL THE AUTHOR(S) BE LIABLE FOR ANY DIRECT, INDIRECT,
|
|
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
|
|
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
|
|
* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
|
|
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
|
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
|
|
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
*/
|
|
|
|
#include "archive_platform.h"
|
|
__FBSDID("$FreeBSD$");
|
|
|
|
#ifdef HAVE_SYS_TYPES_H
|
|
#include <sys/types.h>
|
|
#endif
|
|
#ifdef HAVE_STDLIB_H
|
|
#include <stdlib.h>
|
|
#endif
|
|
#ifdef HAVE_STRING_H
|
|
#include <string.h>
|
|
#endif
|
|
|
|
#include "archive.h"
|
|
#include "archive_private.h"
|
|
#include "archive_string.h"
|
|
|
|
#if ARCHIVE_VERSION_NUMBER < 3000000
|
|
/* These disappear in libarchive 3.0 */
|
|
/* Deprecated. */
|
|
int
|
|
archive_api_feature(void)
|
|
{
|
|
return (ARCHIVE_API_FEATURE);
|
|
}
|
|
|
|
/* Deprecated. */
|
|
int
|
|
archive_api_version(void)
|
|
{
|
|
return (ARCHIVE_API_VERSION);
|
|
}
|
|
|
|
/* Deprecated synonym for archive_version_number() */
|
|
int
|
|
archive_version_stamp(void)
|
|
{
|
|
return (archive_version_number());
|
|
}
|
|
|
|
/* Deprecated synonym for archive_version_string() */
|
|
const char *
|
|
archive_version(void)
|
|
{
|
|
return (archive_version_string());
|
|
}
|
|
#endif
|
|
|
|
int
|
|
archive_version_number(void)
|
|
{
|
|
return (ARCHIVE_VERSION_NUMBER);
|
|
}
|
|
|
|
const char *
|
|
archive_version_string(void)
|
|
{
|
|
return (ARCHIVE_VERSION_STRING);
|
|
}
|
|
|
|
int
|
|
archive_errno(struct archive *a)
|
|
{
|
|
return (a->archive_error_number);
|
|
}
|
|
|
|
const char *
|
|
archive_error_string(struct archive *a)
|
|
{
|
|
|
|
if (a->error != NULL && *a->error != '\0')
|
|
return (a->error);
|
|
else
|
|
return ("(Empty error message)");
|
|
}
|
|
|
|
int
|
|
archive_file_count(struct archive *a)
|
|
{
|
|
return (a->file_count);
|
|
}
|
|
|
|
int
|
|
archive_format(struct archive *a)
|
|
{
|
|
return (a->archive_format);
|
|
}
|
|
|
|
const char *
|
|
archive_format_name(struct archive *a)
|
|
{
|
|
return (a->archive_format_name);
|
|
}
|
|
|
|
|
|
int
|
|
archive_compression(struct archive *a)
|
|
{
|
|
return (a->compression_code);
|
|
}
|
|
|
|
const char *
|
|
archive_compression_name(struct archive *a)
|
|
{
|
|
return (a->compression_name);
|
|
}
|
|
|
|
|
|
/*
|
|
* Return a count of the number of compressed bytes processed.
|
|
*/
|
|
int64_t
|
|
archive_position_compressed(struct archive *a)
|
|
{
|
|
return (a->raw_position);
|
|
}
|
|
|
|
/*
|
|
* Return a count of the number of uncompressed bytes processed.
|
|
*/
|
|
int64_t
|
|
archive_position_uncompressed(struct archive *a)
|
|
{
|
|
return (a->file_position);
|
|
}
|
|
|
|
void
|
|
archive_clear_error(struct archive *a)
|
|
{
|
|
archive_string_empty(&a->error_string);
|
|
a->error = NULL;
|
|
}
|
|
|
|
void
|
|
archive_set_error(struct archive *a, int error_number, const char *fmt, ...)
|
|
{
|
|
va_list ap;
|
|
|
|
a->archive_error_number = error_number;
|
|
if (fmt == NULL) {
|
|
a->error = NULL;
|
|
return;
|
|
}
|
|
|
|
va_start(ap, fmt);
|
|
archive_string_vsprintf(&(a->error_string), fmt, ap);
|
|
va_end(ap);
|
|
a->error = a->error_string.s;
|
|
}
|
|
|
|
void
|
|
archive_copy_error(struct archive *dest, struct archive *src)
|
|
{
|
|
dest->archive_error_number = src->archive_error_number;
|
|
|
|
archive_string_copy(&dest->error_string, &src->error_string);
|
|
dest->error = dest->error_string.s;
|
|
}
|
|
|
|
void
|
|
__archive_errx(int retvalue, const char *msg)
|
|
{
|
|
static const char *msg1 = "Fatal Internal Error in libarchive: ";
|
|
size_t s;
|
|
|
|
s = write(2, msg1, strlen(msg1));
|
|
(void)s; /* UNUSED */
|
|
s = write(2, msg, strlen(msg));
|
|
(void)s; /* UNUSED */
|
|
s = write(2, "\n", 1);
|
|
(void)s; /* UNUSED */
|
|
exit(retvalue);
|
|
}
|
|
|
|
/*
|
|
* Parse option strings
|
|
* Detail of option format.
|
|
* - The option can accept:
|
|
* "opt-name", "!opt-name", "opt-name=value".
|
|
*
|
|
* - The option entries are separated by comma.
|
|
* e.g "compression=9,opt=XXX,opt-b=ZZZ"
|
|
*
|
|
* - The name of option string consist of '-' and alphabet
|
|
* but character '-' cannot be used for the first character.
|
|
* (Regular expression is [a-z][-a-z]+)
|
|
*
|
|
* - For a specfic format/filter, using the format name with ':'.
|
|
* e.g "zip:compression=9"
|
|
* (This "compression=9" option entry is for "zip" format only)
|
|
*
|
|
* If another entries follow it, those are not for
|
|
* the specfic format/filter.
|
|
* e.g handle "zip:compression=9,opt=XXX,opt-b=ZZZ"
|
|
* "zip" format/filter handler will get "compression=9"
|
|
* all format/filter handler will get "opt=XXX"
|
|
* all format/filter handler will get "opt-b=ZZZ"
|
|
*
|
|
* - Whitespace and tab are bypassed.
|
|
*
|
|
*/
|
|
int
|
|
__archive_parse_options(const char *p, const char *fn, int keysize, char *key,
|
|
int valsize, char *val)
|
|
{
|
|
const char *p_org;
|
|
int apply;
|
|
int kidx, vidx;
|
|
int negative;
|
|
enum {
|
|
/* Requested for initialization. */
|
|
INIT,
|
|
/* Finding format/filter-name and option-name. */
|
|
F_BOTH,
|
|
/* Finding option-name only.
|
|
* (already detected format/filter-name) */
|
|
F_NAME,
|
|
/* Getting option-value. */
|
|
G_VALUE,
|
|
} state;
|
|
|
|
p_org = p;
|
|
state = INIT;
|
|
kidx = vidx = negative = 0;
|
|
apply = 1;
|
|
while (*p) {
|
|
switch (state) {
|
|
case INIT:
|
|
kidx = vidx = 0;
|
|
negative = 0;
|
|
apply = 1;
|
|
state = F_BOTH;
|
|
break;
|
|
case F_BOTH:
|
|
case F_NAME:
|
|
if ((*p >= 'a' && *p <= 'z') ||
|
|
(*p >= '0' && *p <= '9') || *p == '-') {
|
|
if (kidx == 0 && !(*p >= 'a' && *p <= 'z'))
|
|
/* Illegal sequence. */
|
|
return (-1);
|
|
if (kidx >= keysize -1)
|
|
/* Too many characters. */
|
|
return (-1);
|
|
key[kidx++] = *p++;
|
|
} else if (*p == '!') {
|
|
if (kidx != 0)
|
|
/* Illegal sequence. */
|
|
return (-1);
|
|
negative = 1;
|
|
++p;
|
|
} else if (*p == ',') {
|
|
if (kidx == 0)
|
|
/* Illegal sequence. */
|
|
return (-1);
|
|
if (!negative)
|
|
val[vidx++] = '1';
|
|
/* We have got boolean option data. */
|
|
++p;
|
|
if (apply)
|
|
goto complete;
|
|
else
|
|
/* This option does not apply to the
|
|
* format which the fn variable
|
|
* indicate. */
|
|
state = INIT;
|
|
} else if (*p == ':') {
|
|
/* obuf data is format name */
|
|
if (state == F_NAME)
|
|
/* We already found it. */
|
|
return (-1);
|
|
if (kidx == 0)
|
|
/* Illegal sequence. */
|
|
return (-1);
|
|
if (negative)
|
|
/* We cannot accept "!format-name:". */
|
|
return (-1);
|
|
key[kidx] = '\0';
|
|
if (strcmp(fn, key) != 0)
|
|
/* This option does not apply to the
|
|
* format which the fn variable
|
|
* indicate. */
|
|
apply = 0;
|
|
kidx = 0;
|
|
++p;
|
|
state = F_NAME;
|
|
} else if (*p == '=') {
|
|
if (kidx == 0)
|
|
/* Illegal sequence. */
|
|
return (-1);
|
|
if (negative)
|
|
/* We cannot accept "!opt-name=value". */
|
|
return (-1);
|
|
++p;
|
|
state = G_VALUE;
|
|
} else if (*p == ' ') {
|
|
/* Pass the space character */
|
|
++p;
|
|
} else {
|
|
/* Illegal character. */
|
|
return (-1);
|
|
}
|
|
break;
|
|
case G_VALUE:
|
|
if (*p == ',') {
|
|
if (vidx == 0)
|
|
/* Illegal sequence. */
|
|
return (-1);
|
|
/* We have got option data. */
|
|
++p;
|
|
if (apply)
|
|
goto complete;
|
|
else
|
|
/* This option does not apply to the
|
|
* format which the fn variable
|
|
* indicate. */
|
|
state = INIT;
|
|
} else if (*p == ' ') {
|
|
/* Pass the space character */
|
|
++p;
|
|
} else {
|
|
if (vidx >= valsize -1)
|
|
/* Too many characters. */
|
|
return (-1);
|
|
val[vidx++] = *p++;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
|
|
switch (state) {
|
|
case F_BOTH:
|
|
case F_NAME:
|
|
if (kidx != 0) {
|
|
if (!negative)
|
|
val[vidx++] = '1';
|
|
/* We have got boolean option. */
|
|
if (apply)
|
|
/* This option apply to the format which the
|
|
* fn variable indicate. */
|
|
goto complete;
|
|
}
|
|
break;
|
|
case G_VALUE:
|
|
if (vidx == 0)
|
|
/* Illegal sequence. */
|
|
return (-1);
|
|
/* We have got option value. */
|
|
if (apply)
|
|
/* This option apply to the format which the fn
|
|
* variable indicate. */
|
|
goto complete;
|
|
break;
|
|
case INIT:/* nothing */
|
|
break;
|
|
}
|
|
|
|
/* End of Option string. */
|
|
return (0);
|
|
|
|
complete:
|
|
key[kidx] = '\0';
|
|
val[vidx] = '\0';
|
|
/* Return a size which we've consumed for detecting option */
|
|
return ((int)(p - p_org));
|
|
}
|