#include "archive_platform.h"
__FBSDID("$FreeBSD: head/lib/libarchive/archive_util.c 201098 2009-12-28 02:58:14Z kientzle $");
#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
int
archive_api_feature(void)
{
return (ARCHIVE_API_FEATURE);
}
int
archive_api_version(void)
{
return (ARCHIVE_API_VERSION);
}
int
archive_version_stamp(void)
{
return (archive_version_number());
}
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);
}
int64_t
archive_position_compressed(struct archive *a)
{
return (a->raw_position);
}
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;
s = write(2, msg, strlen(msg));
(void)s;
s = write(2, "\n", 1);
(void)s;
exit(retvalue);
}
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 {
INIT,
F_BOTH,
F_NAME,
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'))
return (-1);
if (kidx >= keysize -1)
return (-1);
key[kidx++] = *p++;
} else if (*p == '!') {
if (kidx != 0)
return (-1);
negative = 1;
++p;
} else if (*p == ',') {
if (kidx == 0)
return (-1);
if (!negative)
val[vidx++] = '1';
++p;
if (apply)
goto complete;
else
state = INIT;
} else if (*p == ':') {
if (state == F_NAME)
return (-1);
if (kidx == 0)
return (-1);
if (negative)
return (-1);
key[kidx] = '\0';
if (strcmp(fn, key) != 0)
apply = 0;
kidx = 0;
++p;
state = F_NAME;
} else if (*p == '=') {
if (kidx == 0)
return (-1);
if (negative)
return (-1);
++p;
state = G_VALUE;
} else if (*p == ' ') {
++p;
} else {
return (-1);
}
break;
case G_VALUE:
if (*p == ',') {
if (vidx == 0)
return (-1);
++p;
if (apply)
goto complete;
else
state = INIT;
} else if (*p == ' ') {
++p;
} else {
if (vidx >= valsize -1)
return (-1);
val[vidx++] = *p++;
}
break;
}
}
switch (state) {
case F_BOTH:
case F_NAME:
if (kidx != 0) {
if (!negative)
val[vidx++] = '1';
if (apply)
goto complete;
}
break;
case G_VALUE:
if (vidx == 0)
return (-1);
if (apply)
goto complete;
break;
case INIT:
break;
}
return (0);
complete:
key[kidx] = '\0';
val[vidx] = '\0';
return ((int)(p - p_org));
}