#include <grp.h>
#endif
+#if defined (_POSIX_VERSION)
+#include <utime.h>
+#else
+struct utimbuf
+{
+ long actime;
+ long modtime;
+};
+#endif
+
#if defined(_POSIX_VERSION) || defined(DIRENT)
#include <dirent.h>
#ifdef direct
extern void print_header();
union record *start_header();
-void add_mangle();
-void add_symlink_mangle();
void blank_name_list();
int check_exclude();
PTR ck_malloc();
void dump_file();
void write_dir_file();
void write_eot();
-void write_mangled();
int zero_record();
/* This code moved from tar.h since create.c is the only file that cares
free(buf);
} else {
p = name_next(1);
- if(!p)
- dump_file(".", -1, 1);
- else {
- do dump_file(p, -1, 1);
- while (p = name_next(1));
- }
+ do
+ dump_file(p, -1, 1);
+ while (p = name_next(1));
}
- write_mangled();
write_eot();
close_archive();
if(f_gnudump)
char save_linkflag;
extern time_t new_time;
int critical_error = 0;
+ struct utimbuf restore_times;
/* int sparse_ind = 0;*/
errors++;
return;
}
+
+ restore_times.actime = hstat.st_atime;
+ restore_times.modtime = hstat.st_mtime;
#ifdef S_ISHIDDEN
if (S_ISHIDDEN (hstat.st_mode)) {
char *link_name = lp->name;
/* We found a link. */
- hstat.st_size = 0;
- header = start_header(p, &hstat);
- if (header == NULL)
- {
- critical_error = 1;
- goto badfile;
- }
while(!f_absolute_paths && *link_name == '/') {
static int link_warn = 0;
}
link_name++;
}
- strncpy(header->header.linkname,
+ if (link_name - lp->name >= NAMSIZ)
+ write_long (link_name, LF_LONGLINK);
+ current_link_name = link_name;
+
+ hstat.st_size = 0;
+ header = start_header(p, &hstat);
+ if (header == NULL)
+ {
+ critical_error = 1;
+ goto badfile;
+ }
+ strncpy(header->header.arch_linkname,
link_name,NAMSIZ);
- if(header->header.linkname[NAMSIZ-1]) {
- char *mangled;
- extern char *find_mangled();
- mangled=find_mangled(link_name);
- msg("%s: link name too long: mangled to %s",link_name,mangled);
- strncpy(header->header.linkname,mangled,NAMSIZ);
- }
+ /* Force null truncated */
+ header->header.arch_linkname [NAMSIZ-1] = 0;
+
header->header.linkflag = LF_LINK;
finish_header(header);
/* FIXME: Maybe remove from list after all links found? */
if (unlink (p) == -1)
msg_perror ("cannot remove %s", p);
}
+ if (f_atime_preserve)
+ utime (p, &restore_times);
return;
/*
save_name=0;
if(f>=0)
(void)close(f);
- return;
+ if (f_atime_preserve)
+ utime (p, &restore_times);
+ return;
}
#ifdef S_ISLNK
else if(S_ISLNK(hstat.st_mode))
{
int size;
+ char *buf = alloca (PATH_MAX + 1);
+
+ size = readlink (p, buf, PATH_MAX + 1);
+ if (size < 0)
+ goto badperror;
+ buf[size] = '\0';
+ if (size >= NAMSIZ)
+ write_long (buf, LF_LONGLINK);
+ current_link_name = buf;
hstat.st_size = 0; /* Force 0 size on symlink */
header = start_header(p, &hstat);
critical_error = 1;
goto badfile;
}
- size = readlink(p, header->header.linkname, NAMSIZ);
- if (size < 0) goto badperror;
- if (size == NAMSIZ) {
- char *buf = ck_malloc(PATH_MAX);
-
- readlink(p,buf,PATH_MAX);
- /* next_mangle(header->header.linkname); */
- add_symlink_mangle(buf,p,header->header.linkname);
- msg("symbolic link %s too long: mangling to %s",p, header->header.linkname);
- /* size=strlen(header->header.linkname); */
- free(buf);
- } else
- header->header.linkname[size] = '\0';
+ strncpy (header->header.arch_linkname, buf, NAMSIZ);
+ header->header.arch_linkname[NAMSIZ - 1] = '\0';
header->header.linkflag = LF_SYMLINK;
finish_header(header); /* Nothing more to do to it */
if (f_remove_files)
}
if(f_multivol)
save_name = 0;
+ if (f_atime_preserve)
+ utime (p, &restore_times);
return;
}
* See if we are crossing from one file system to another,
* and avoid doing so if the user only wants to dump one file system.
*/
- if (f_local_filesys && toplevel && curdev != hstat.st_dev) {
+ if (f_local_filesys && !toplevel && curdev != hstat.st_dev) {
if(f_verbose)
msg("%s: is on a different filesystem; not dumped",p);
return;
closedir(dirp);
free(namebuf);
+ if (f_atime_preserve)
+ utime (p, &restore_times);
return;
}
{
register union record *header;
+ if (strlen (name) >= NAMSIZ)
+ write_long (name, LF_LONGNAME);
+
header = (union record *) findrec();
bzero(header->charptr, sizeof(*header)); /* XXX speed up */
msg("Removing leading / from absolute path names in the archive.");
}
}
- strncpy(header->header.name, name, NAMSIZ);
- if (header->header.name[NAMSIZ-1]) {
-/* char *mangled;*/
-
- /* next_mangle(header->header.name); */
- add_mangle(name,header->header.name);
- msg("%s: is too long: mangling to %s", name, header->header.name);
- }
+ current_file_name = name;
+ strncpy(header->header.arch_name, name, NAMSIZ);
+ header->header.arch_name[NAMSIZ-1] = '\0';
to_oct((long) (st->st_mode & 07777),
8, header->header.mode);
userec(p);
}
}
+
+/* Write a LF_LONGLINK or LF_LONGNAME record. */
+write_long (p, type)
+ char *p;
+ char type;
+{
+ int size = strlen (p) + 1;
+ int bufsize;
+ union record *header;
+ struct stat foo;
+
+
+ bzero (&foo, sizeof foo);
+ foo.st_size = size;
+
+ header = start_header ("././@LongLink", &foo);
+ header->header.linkflag = type;
+ finish_header (header);
+
+ header = findrec ();
+
+ bufsize = endofrecs ()->charptr - header->charptr;
+
+ while (bufsize < size)
+ {
+ bcopy (p, header->charptr, bufsize);
+ p += bufsize;
+ size -= bufsize;
+ userec (header + (bufsize - 1)/RECORDSIZE);
+ header = findrec ();
+ bufsize = endofrecs ()->charptr - header->charptr;
+ }
+ bcopy (p, header->charptr, size);
+ bzero (header->charptr + size, bufsize - size);
+ userec (header + (size - 1)/RECORDSIZE);
+}
projects / chaz / tar / blobdiff