home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
linuxmafia.com 2016
/
linuxmafia.com.tar
/
linuxmafia.com
/
pub
/
linux
/
backup
/
star-1.3.1.tar.gz
/
star-1.3.1.tar
/
star-1.3.1
/
star
/
append.c
next >
Wrap
C/C++ Source or Header
|
2001-04-07
|
4KB
|
182 lines
/* @(#)append.c 1.12 01/04/07 Copyright 1992 J. Schilling */
#ifndef lint
static char sccsid[] =
"@(#)append.c 1.12 01/04/07 Copyright 1992 J. Schilling";
#endif
/*
* Routines used to append files to an existing
* tape archive
*
* Copyright (c) 1992 J. Schilling
*/
/*
* 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, 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; see the file COPYING. If not, write to
* the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
*/
#include <mconfig.h>
#include <stdio.h>
#include <standard.h>
#include <schily.h>
#include "star.h"
#include "starsubs.h"
extern BOOL debug;
extern BOOL cflag;
extern BOOL uflag;
extern BOOL rflag;
/*
* XXX We should try to share the hash code with lhash.c
*/
static struct h_elem {
struct h_elem *h_next;
Ulong h_time;
short h_len;
char h_data[1]; /* Variable size. */
} **h_tab;
static unsigned h_size;
LOCAL int cachesize;
EXPORT void skipall __PR((void));
LOCAL void hash_new __PR((unsigned size));
LOCAL struct h_elem * uhash_lookup __PR((FINFO *info));
LOCAL void hash_add __PR((FINFO *info));
EXPORT BOOL update_newer __PR((FINFO *info));
LOCAL int hashval __PR((Uchar *str, Uint maxsize));
EXPORT void
skipall()
{
FINFO finfo;
TCB tb;
char name[PATH_MAX+1];
register TCB *ptb = &tb;
if (uflag)
hash_new(100);
fillbytes((char *)&finfo, sizeof(finfo), '\0');
finfo.f_tcb = ptb;
for (;;) {
if (get_tcb(ptb) == EOF) {
if (debug)
error("used %d bytes for update cache.\n",
cachesize);
return;
}
finfo.f_name = name;
if (tcb_to_info(ptb, &finfo) == EOF)
return;
if (debug)
printf("R %s\n", finfo.f_name);
if (uflag)
hash_add(&finfo);
void_file(&finfo);
}
}
#include <strdefs.h>
LOCAL void
hash_new(size)
unsigned size;
{
register int i;
h_size = size;
h_tab = (struct h_elem **)__malloc(size * sizeof (struct h_elem *));
for (i=0; i<size; i++) h_tab[i] = 0;
cachesize += size * sizeof (struct h_elem *);
}
LOCAL struct h_elem *
uhash_lookup(info)
FINFO *info;
{
register char *name = info->f_name;
register struct h_elem *hp;
register int hv;
hv = hashval((unsigned char *)name, h_size);
for (hp = h_tab[hv]; hp; hp=hp->h_next) {
if (streql(name, hp->h_data))
return (hp);
}
return (0);
}
LOCAL void
hash_add(info)
FINFO *info;
{
register int len;
register struct h_elem *hp;
register int hv;
/*
* XXX nsec beachten wenn im Archiv!
*/
if ((hp = uhash_lookup(info)) != 0) {
if (hp->h_time < info->f_mtime)
hp->h_time = info->f_mtime;
return;
}
len = strlen(info->f_name);
hp = __malloc((unsigned)len + sizeof (struct h_elem));
cachesize += len + sizeof (struct h_elem);
strcpy(hp->h_data, info->f_name);
hp->h_time = info->f_mtime;
hv = hashval((unsigned char *)info->f_name, h_size);
hp->h_next = h_tab[hv];
h_tab[hv] = hp;
}
EXPORT BOOL
update_newer(info)
FINFO *info;
{
register struct h_elem *hp;
/*
* XXX nsec beachten wenn im Archiv!
*/
if ((hp = uhash_lookup(info)) != 0) {
if (info->f_mtime > hp->h_time)
return (TRUE);
return (FALSE);
}
return (TRUE);
}
LOCAL int
hashval(str, maxsize)
register Uchar *str;
Uint maxsize;
{
register int sum = 0;
register int i;
register int c;
for (i=0; (c = *str++) != '\0'; i++)
sum ^= (c << (i&7));
return sum % maxsize;
}