*** empty log message ***

[chaz/tar] / src / create.c

diff --git a/src/create.c b/src/create.c
index ed9f172719e2ef86cf744befb2475ed3e15597f0..cea58c1f7b32ddd7c1004451687d89b6f4b2555d 100644 (file)
--- a/src/create.c
+++ b/src/create.c
@@ -49,6 +49,16 @@ extern int   errno;
 #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
@@ -91,8 +101,6 @@ extern struct name *gnu_list_name;
 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();
@@ -115,7 +123,6 @@ void to_oct();
 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
@@ -182,7 +189,6 @@ create_archive()
                while (p = name_next(1));
        }
 
-       write_mangled();
        write_eot();
        close_archive();
        if(f_gnudump)
@@ -210,7 +216,7 @@ dump_file (p, curdev, toplevel)
        char save_linkflag;
        extern time_t new_time;
        int critical_error = 0;
-       time_t restore_times[2];
+       struct utimbuf restore_times;
 /*     int sparse_ind = 0;*/
 
 
@@ -238,8 +244,8 @@ badfile:
                return;
        }
        
-       restore_times[0] = hstat.st_atime;
-       restore_times[1] = hstat.st_utime;
+       restore_times.actime = hstat.st_atime;
+       restore_times.modtime = hstat.st_mtime;
 
 #ifdef S_ISHIDDEN
        if (S_ISHIDDEN (hstat.st_mode)) {
@@ -303,13 +309,6 @@ badfile:
                                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;
 
@@ -319,16 +318,23 @@ badfile:
                                        }
                                        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? */
@@ -579,7 +585,7 @@ badfile:
                      msg_perror ("cannot remove %s", p);
                  }
                if (f_atime_preserve)
-                 utime (p, restore_times);
+                 utime (p, &restore_times);
                return;
 
                /*
@@ -599,7 +605,7 @@ badfile:
                if(f>=0)
                        (void)close(f);
                if (f_atime_preserve)
-                 utime (p, restore_times);
+                 utime (p, &restore_times);
                return;
        }
 
@@ -607,6 +613,15 @@ badfile:
        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);
@@ -615,19 +630,8 @@ badfile:
                    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)
@@ -733,7 +737,7 @@ badfile:
                        if(f_multivol)
                                save_name = 0;
                        if (f_atime_preserve)
-                         utime (p, restore_times);
+                         utime (p, &restore_times);
                        return;
                }
 
@@ -792,7 +796,7 @@ badfile:
                closedir(dirp);
                free(namebuf);
                if (f_atime_preserve)
-                 utime (p, restore_times);
+                 utime (p, &restore_times);
                return;
        }
 
@@ -1181,6 +1185,9 @@ start_header(name, st)
 {
        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 */
 
@@ -1202,14 +1209,9 @@ start_header(name, st)
                                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);
@@ -1344,3 +1346,39 @@ write_eot()
            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);
+}