Implemented coder functions.

This commit is contained in:
Sergey Poznyakoff
2003-09-01 17:03:33 +00:00
parent 33b63ebe94
commit 4189af3785

View File

@@ -25,37 +25,53 @@
#include "common.h"
/* Forward declarations */
static void dummy_handler (struct tar_stat_info *st, char *keyword, char *arg);
#define obstack_chunk_alloc xmalloc
#define obstack_chunk_free free
#include <obstack.h>
static void atime_coder (struct tar_stat_info *st, char *keyword, char *arg);
/* Forward declarations */
static void dummy_coder (struct tar_stat_info *st, char *keyword,
struct xheader *xhdr);
static void dummy_decoder (struct tar_stat_info *st, char *keyword, char *arg);
static void atime_coder (struct tar_stat_info *st, char *keyword,
struct xheader *xhdr);
static void atime_decoder (struct tar_stat_info *st, char *keyword, char *arg);
static void gid_coder (struct tar_stat_info *st, char *keyword, char *arg);
static void gid_coder (struct tar_stat_info *st, char *keyword,
struct xheader *xhdr);
static void gid_decoder (struct tar_stat_info *st, char *keyword, char *arg);
static void gname_coder (struct tar_stat_info *st, char *keyword, char *arg);
static void gname_coder (struct tar_stat_info *st, char *keyword,
struct xheader *xhdr);
static void gname_decoder (struct tar_stat_info *st, char *keyword, char *arg);
static void linkpath_coder (struct tar_stat_info *st, char *keyword, char *arg);
static void linkpath_coder (struct tar_stat_info *st, char *keyword,
struct xheader *xhdr);
static void linkpath_decoder (struct tar_stat_info *st, char *keyword, char *arg);
static void mtime_coder (struct tar_stat_info *st, char *keyword, char *arg);
static void mtime_coder (struct tar_stat_info *st, char *keyword,
struct xheader *xhdr);
static void mtime_decoder (struct tar_stat_info *st, char *keyword, char *arg);
static void ctime_coder (struct tar_stat_info *st, char *keyword, char *arg);
static void ctime_coder (struct tar_stat_info *st, char *keyword,
struct xheader *xhdr);
static void ctime_decoder (struct tar_stat_info *st, char *keyword, char *arg);
static void path_coder (struct tar_stat_info *st, char *keyword, char *arg);
static void path_coder (struct tar_stat_info *st, char *keyword,
struct xheader *xhdr);
static void path_decoder (struct tar_stat_info *st, char *keyword, char *arg);
static void size_coder (struct tar_stat_info *st, char *keyword, char *arg);
static void size_coder (struct tar_stat_info *st, char *keyword,
struct xheader *xhdr);
static void size_decoder (struct tar_stat_info *st, char *keyword, char *arg);
static void uid_coder (struct tar_stat_info *st, char *keyword, char *arg);
static void uid_coder (struct tar_stat_info *st, char *keyword,
struct xheader *xhdr);
static void uid_decoder (struct tar_stat_info *st, char *keyword, char *arg);
static void uname_coder (struct tar_stat_info *st, char *keyword, char *arg);
static void uname_coder (struct tar_stat_info *st, char *keyword,
struct xheader *xhdr);
static void uname_decoder (struct tar_stat_info *st, char *keyword, char *arg);
/* General Interface */
@@ -63,14 +79,14 @@ static void uname_decoder (struct tar_stat_info *st, char *keyword, char *arg);
struct xhdr_tab
{
char *keyword;
void (*coder) (struct tar_stat_info *st, char *keyword, char *arg);
void (*coder) (struct tar_stat_info *st, char *keyword, struct xheader *xhdr);
void (*decoder) (struct tar_stat_info *st, char *keyword, char *arg);
};
struct xhdr_tab xhdr_tab[] = {
{ "atime", atime_coder, atime_decoder },
{ "comment", dummy_handler, dummy_handler },
{ "charset", dummy_handler, dummy_handler },
{ "comment", dummy_coder, dummy_decoder },
{ "charset", dummy_coder, dummy_decoder },
{ "ctime", ctime_coder, ctime_decoder },
{ "gid", gid_coder, gid_decoder },
{ "gname", gname_coder, gname_decoder },
@@ -148,44 +164,178 @@ xheader_decode (struct tar_stat_info *st)
{
char *p, *endp;
p = extended_header.blocks->buffer;
endp = &extended_header.blocks[extended_header.nblocks-1].buffer
[sizeof(extended_header.blocks[0])-1];
p = extended_header.buffer;
endp = &extended_header.buffer[extended_header.size-1];
while (p < endp)
if (decode_record (&p, st))
break;
}
void
xheader_store (char *keyword, struct tar_stat_info *st)
{
struct xhdr_tab *t;
if (extended_header.buffer)
return;
t = locate_handler (keyword);
if (!t)
return;
if (!extended_header.stk)
{
extended_header.stk = xmalloc (sizeof (*extended_header.stk));
obstack_init (extended_header.stk);
}
t->coder (st, keyword, &extended_header);
}
void
xheader_read (union block *p, size_t size)
{
size_t i;
size_t i, j;
size_t nblocks;
free (extended_header.blocks);
extended_header.nblocks = (size + BLOCKSIZE - 1) / BLOCKSIZE;
extended_header.blocks = xmalloc (sizeof (extended_header.blocks[0]) *
extended_header.nblocks);
free (extended_header.buffer);
extended_header.size = size;
nblocks = (size + BLOCKSIZE - 1) / BLOCKSIZE;
extended_header.buffer = xmalloc (size + 1);
set_next_block_after (p);
for (i = 0; i < extended_header.nblocks; i++)
for (i = j = 0; i < nblocks; i++)
{
size_t len;
p = find_next_block ();
memcpy (&extended_header.blocks[i], p, sizeof (p[0]));
len = size;
if (len > BLOCKSIZE)
len = BLOCKSIZE;
memcpy (&extended_header.buffer[j], p->buffer, len);
set_next_block_after (p);
j += len;
size -= len;
}
}
size_t
format_uintmax (uintmax_t val, char *buf, size_t s)
{
if (!buf)
{
s = 0;
do
s++;
while ((val /= 10) != 0);
}
else
{
char *p = buf + s - 1;
do
{
*p-- = val % 10 + '0';
}
while ((val /= 10) != 0);
while (p >= buf)
*p-- = '0';
}
return s;
}
void
xheader_print (struct xheader *xhdr, char *keyword, char *value)
{
size_t len = strlen (keyword) + strlen (value) + 3; /* ' ' + '=' + '\n' */
size_t p, n = 0;
char nbuf[100];
do
{
p = n;
n = format_uintmax (len + p, NULL, 0);
}
while (n != p);
format_uintmax (len + n, nbuf, n);
obstack_grow (xhdr->stk, nbuf, n);
obstack_1grow (xhdr->stk, ' ');
obstack_grow (xhdr->stk, keyword, strlen (keyword));
obstack_1grow (xhdr->stk, '=');
obstack_grow (xhdr->stk, value, strlen (value));
obstack_1grow (xhdr->stk, '\n');
}
void
xheader_finish (struct xheader *xhdr)
{
obstack_1grow (xhdr->stk, 0);
xhdr->buffer = obstack_finish (xhdr->stk);
xhdr->size = strlen (xhdr->buffer);
}
void
xheader_destroy (struct xheader *xhdr)
{
if (xhdr->stk)
{
obstack_free (xhdr->stk, NULL);
free (xhdr->stk);
xhdr->stk = NULL;
}
else
free (xhdr->buffer);
xhdr->buffer = 0;
xhdr->size = 0;
}
/* Implementations */
static void
dummy_handler (struct tar_stat_info *st, char *keyword, char *arg)
code_string (char *string, char *keyword, struct xheader *xhdr)
{
xheader_print (xhdr, keyword, string);
}
static void
code_time (time_t t, char *keyword, struct xheader *xhdr)
{
char sbuf[100];
size_t s = format_uintmax (t, NULL, 0);
format_uintmax (t, sbuf, s);
sbuf[s++] = '.';
format_uintmax (0, sbuf + s, 9);
sbuf[s+9] = 0;
xheader_print (xhdr, keyword, sbuf);
}
static void
code_num (uintmax_t value, char *keyword, struct xheader *xhdr)
{
char sbuf[100];
size_t s = format_uintmax (value, NULL, 0);
format_uintmax (value, sbuf, s);
sbuf[s] = 0;
xheader_print (xhdr, keyword, sbuf);
}
static void
dummy_coder (struct tar_stat_info *st, char *keyword, struct xheader *xhdr)
{
}
static void
atime_coder (struct tar_stat_info *st, char *keyword, char *arg)
dummy_decoder (struct tar_stat_info *st, char *keyword, char *arg)
{
}
static void
atime_coder (struct tar_stat_info *st, char *keyword, struct xheader *xhdr)
{
code_time (st->stat.st_atime, keyword, xhdr);
}
static void
atime_decoder (struct tar_stat_info *st, char *keyword, char *arg)
{
@@ -193,8 +343,9 @@ atime_decoder (struct tar_stat_info *st, char *keyword, char *arg)
}
static void
gid_coder (struct tar_stat_info *st, char *keyword, char *arg)
gid_coder (struct tar_stat_info *st, char *keyword, struct xheader *xhdr)
{
code_num (st->stat.st_gid, keyword, xhdr);
}
static void
@@ -204,30 +355,33 @@ gid_decoder (struct tar_stat_info *st, char *keyword, char *arg)
}
static void
gname_coder (struct tar_stat_info *st, char *keyword, char *arg)
gname_coder (struct tar_stat_info *st, char *keyword, struct xheader *xhdr)
{
code_string (st->gname, keyword, xhdr);
}
static void
gname_decoder (struct tar_stat_info *st, char *keyword, char *arg)
{
st->gname = strdup (arg);
assign_string (&st->gname, arg);
}
static void
linkpath_coder (struct tar_stat_info *st, char *keyword, char *arg)
linkpath_coder (struct tar_stat_info *st, char *keyword, struct xheader *xhdr)
{
code_string (st->link_name, keyword, xhdr);
}
static void
linkpath_decoder (struct tar_stat_info *st, char *keyword, char *arg)
{
st->link_name = strdup (arg);
assign_string (&st->link_name, arg);
}
static void
ctime_coder (struct tar_stat_info *st, char *keyword, char *arg)
ctime_coder (struct tar_stat_info *st, char *keyword, struct xheader *xhdr)
{
code_time (st->stat.st_ctime, keyword, xhdr);
}
static void
@@ -237,8 +391,9 @@ ctime_decoder (struct tar_stat_info *st, char *keyword, char *arg)
}
static void
mtime_coder (struct tar_stat_info *st, char *keyword, char *arg)
mtime_coder (struct tar_stat_info *st, char *keyword, struct xheader *xhdr)
{
code_time (st->stat.st_mtime, keyword, xhdr);
}
static void
@@ -248,8 +403,9 @@ mtime_decoder (struct tar_stat_info *st, char *keyword, char *arg)
}
static void
path_coder (struct tar_stat_info *st, char *keyword, char *arg)
path_coder (struct tar_stat_info *st, char *keyword, struct xheader *xhdr)
{
code_string (st->orig_file_name, keyword, xhdr);
}
static void
@@ -261,8 +417,9 @@ path_decoder (struct tar_stat_info *st, char *keyword, char *arg)
}
static void
size_coder (struct tar_stat_info *st, char *keyword, char *arg)
size_coder (struct tar_stat_info *st, char *keyword, struct xheader *xhdr)
{
code_num (st->stat.st_size, keyword, xhdr);
}
static void
@@ -272,8 +429,9 @@ size_decoder (struct tar_stat_info *st, char *keyword, char *arg)
}
static void
uid_coder (struct tar_stat_info *st, char *keyword, char *arg)
uid_coder (struct tar_stat_info *st, char *keyword, struct xheader *xhdr)
{
code_num (st->stat.st_uid, keyword, xhdr);
}
static void
@@ -283,13 +441,14 @@ uid_decoder (struct tar_stat_info *st, char *keyword, char *arg)
}
static void
uname_coder (struct tar_stat_info *st, char *keyword, char *arg)
uname_coder (struct tar_stat_info *st, char *keyword, struct xheader *xhdr)
{
code_string (st->uname, keyword, xhdr);
}
static void
uname_decoder (struct tar_stat_info *st, char *keyword, char *arg)
{
st->uname = strdup (arg);
assign_string (&st->uname, arg);
}