home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #20 / NN_1992_20.iso / spool / gnu / utils / bug / 1537 < prev    next >
Encoding:
Text File  |  1992-09-10  |  9.9 KB  |  359 lines
  1. Newsgroups: gnu.utils.bug
  2. Path: sparky!uunet!zaphod.mps.ohio-state.edu!cis.ohio-state.edu!cadlab.CAdlab.DE!joost
  3. From: joost@cadlab.CAdlab.DE (Michael Joosten)
  4. Subject: Re: GNU make-3.62, SVR4 and long filenames
  5. Message-ID: <JOOST.92Sep10194258@ori.cadlab.de>
  6. Sender: gnulists@ai.mit.edu
  7. Reply-To: joost@cadlab.cadlab.de
  8. Organization: CADLAB, Paderborn, FRG
  9. References: joost@cadlab.CAdlab.DE (Michael Joosten)
  10. Distribution: gnu
  11. Date: Thu, 10 Sep 1992 18:42:58 GMT
  12. Approved: bug-gnu-utils@prep.ai.mit.edu
  13. Lines: 344
  14.  
  15. In article <JOOST.92Sep9210420@ori.cadlab.de> joost@cadlab.CAdlab.DE (Michael Joosten) writes:
  16.  
  17.    again. Eventually I discovered that SVR4 has a special extension for archives,
  18.    allowing them to store filenames longer than 15 chars. This is made by a
  19.    special entry '/' (that is "//<8spaces here>") that contains a "filename
  20.    table". The code in arscan.c doesn't know about that and is thus failing for
  21.    archive files with longer names. 
  22.  
  23. Well, it wasn't really difficult, the most complicated part was to merge the
  24. #ifdef's (the best would be to separate the AIX AIAMAG stuff in a separate
  25. function). Here it a patch, combined with Chip Salzenberg's patches for SCO :
  26.  
  27. Note: Now you need also "-DUSGr4" in the "defines" variable in the Makefile:
  28. defines =-O -DUSG -DUSGr3 -DUSGr4 -DHAVE_SYS_WAIT -DPOSIX -DENUM_BITFIELD #for SysVR4
  29.  
  30. Michael
  31.  
  32. *** arscan.c    Wed Oct 23 02:30:25 1991
  33. --- /sun4_fw2/joost/arscan.c    Thu Sep 10 19:19:43 1992
  34. ***************
  35. *** 43,48 ****
  36. --- 43,52 ----
  37.   #define    ANSI_STRING
  38.   #else    /* No standard headers.  */
  39.   
  40. + #ifdef USGr4
  41. + #include <ctype.h>
  42. + #endif
  43. + 
  44.   #ifdef    USG
  45.   
  46.   #include <string.h>
  47. ***************
  48. *** 70,82 ****
  49.   #endif    /* Standard headers.  */
  50.   
  51.   #ifdef    ANSI_STRING
  52.   #define    index(s, c)    strchr((s), (c))
  53.   #define    rindex(s, c)    strrchr((s), (c))
  54.   
  55.   #define bcmp(s1, s2, n)    memcmp ((s1), (s2), (n))
  56.   #define bzero(s, n)    memset ((s), 0, (n))
  57.   #define bcopy(s, d, n)    memcpy ((d), (s), (n))
  58. ! #endif    ANSI_STRING
  59.   #undef    ANSI_STRING
  60.   
  61.   
  62. --- 74,90 ----
  63.   #endif    /* Standard headers.  */
  64.   
  65.   #ifdef    ANSI_STRING
  66. + #ifndef index
  67.   #define    index(s, c)    strchr((s), (c))
  68. + #endif
  69. + #ifndef rindex
  70.   #define    rindex(s, c)    strrchr((s), (c))
  71. + #endif
  72.   
  73.   #define bcmp(s1, s2, n)    memcmp ((s1), (s2), (n))
  74.   #define bzero(s, n)    memset ((s), 0, (n))
  75.   #define bcopy(s, d, n)    memcpy ((d), (s), (n))
  76. ! #endif    /* ANSI_STRING */
  77.   #undef    ANSI_STRING
  78.   
  79.   
  80. ***************
  81. *** 135,140 ****
  82. --- 143,153 ----
  83.   #ifdef AIAMAG
  84.     FL_HDR fl_header;
  85.   #endif
  86. + #ifdef USGr4
  87. +   char *name_table = (char*)0;
  88. +   char *real_name = (char*)0;
  89. +   extern char *malloc();
  90. + #endif
  91.     register int desc = open (archive, O_RDONLY, 0);
  92.     if (desc < 0)
  93.       return -1;
  94. ***************
  95. *** 160,169 ****
  96.     }
  97.   #else
  98.     {
  99. ! #ifndef M_XENIX
  100. !     int buf;
  101. ! #else
  102.       unsigned short int buf;
  103.   #endif
  104.       register int nread = read(desc, &buf, sizeof (buf));
  105.       if (nread != sizeof (buf) || buf != ARMAG)
  106. --- 173,182 ----
  107.     }
  108.   #else
  109.     {
  110. ! #if defined(M_XENIX) && !defined(M_UNIX)
  111.       unsigned short int buf;
  112. + #else
  113. +     int buf;
  114.   #endif
  115.       register int nread = read(desc, &buf, sizeof (buf));
  116.       if (nread != sizeof (buf) || buf != ARMAG)
  117. ***************
  118. *** 187,197 ****
  119.       sscanf (fl_header.fl_fstmoff, "%12ld", &member_offset);
  120.       sscanf (fl_header.fl_lstmoff, "%12ld", &last_member_offset);
  121.   #else
  122. ! #ifndef    M_XENIX
  123. !     register long int member_offset = sizeof (int);
  124. ! #else    /* Xenix.  */
  125.       register long int member_offset = sizeof (unsigned short int);
  126. ! #endif    /* Not Xenix.  */
  127.   #endif
  128.   #endif
  129.   
  130. --- 200,210 ----
  131.       sscanf (fl_header.fl_fstmoff, "%12ld", &member_offset);
  132.       sscanf (fl_header.fl_lstmoff, "%12ld", &last_member_offset);
  133.   #else
  134. ! #if defined(M_XENIX) && !defined(M_UNIX)
  135.       register long int member_offset = sizeof (unsigned short int);
  136. ! #else    /* Not Xenix.  */
  137. !     register long int member_offset = sizeof (int);
  138. ! #endif    /* Xenix.  */
  139.   #endif
  140.   #endif
  141.   
  142. ***************
  143. *** 215,220 ****
  144. --- 228,236 ----
  145.       if (lseek (desc, member_offset, 0) < 0)
  146.         {
  147.           (void) close (desc);
  148. + #ifdef USGr4
  149. +             if (name_table) free(name_table);
  150. + #endif
  151.           return -2;
  152.         }
  153.   
  154. ***************
  155. *** 254,260 ****
  156.                  dateval, uidval, gidval,
  157.                  eltmode, arg);
  158.   
  159. ! #else
  160.       nread = read (desc, (char *) &member_header, sizeof (struct ar_hdr));
  161.       if (nread == 0)
  162.         /* No data left means end of file; that is OK.  */
  163. --- 270,276 ----
  164.                  dateval, uidval, gidval,
  165.                  eltmode, arg);
  166.   
  167. ! #else /* ! AIAMAG */
  168.       nread = read (desc, (char *) &member_header, sizeof (struct ar_hdr));
  169.       if (nread == 0)
  170.         /* No data left means end of file; that is OK.  */
  171. ***************
  172. *** 267,272 ****
  173. --- 283,291 ----
  174.           )
  175.         {
  176.           (void) close (desc);
  177. + #ifdef USGr4
  178. +             if (name_table) free(name_table);
  179. + #endif
  180.           return -2;
  181.         }
  182.   
  183. ***************
  184. *** 281,313 ****
  185.   #endif
  186.       }
  187.   
  188. ! #ifndef    M_XENIX
  189. !     sscanf (member_header.ar_mode, "%o", &eltmode);
  190. !     eltsize = atol (member_header.ar_size);
  191. ! #else    /* Xenix.  */
  192. !     eltmode = (unsigned short int) member_header.ar_mode;
  193. !     eltsize = member_header.ar_size;
  194. ! #endif    /* Not Xenix.  */
  195. ! 
  196.       fnval =
  197.         (*function) (desc, name, member_offset,
  198.                  member_offset + sizeof (member_header), eltsize,
  199. ! #ifndef    M_XENIX
  200. !                atol (member_header.ar_date),
  201. !                atoi (member_header.ar_uid),
  202. !                atoi (member_header.ar_gid),
  203. ! #else    /* Xenix.  */
  204. !                member_header.ar_date,
  205. !                member_header.ar_uid,
  206. !                member_header.ar_gid,
  207. ! #endif    /* Not Xenix.  */
  208.                  eltmode, arg);
  209.   
  210.   #endif  /* Not AIAMAG */
  211.   
  212.       if (fnval)
  213.         {
  214.           (void) close (desc);
  215.           return fnval;
  216.         }
  217.   
  218. --- 300,381 ----
  219.   #endif
  220.       }
  221.   
  222. ! #if   defined(M_XENIX) && !defined(M_UNIX)
  223. !       eltmode = (unsigned short int) member_header.ar_mode;
  224. !       eltsize = member_header.ar_size;
  225. ! #else /* Not Xenix.  */
  226. !       sscanf (member_header.ar_mode, "%o", &eltmode);
  227. !       eltsize = atol (member_header.ar_size);
  228. ! #endif        /* Xenix.  */
  229. ! 
  230. ! #ifdef USGr4
  231. !         if (name[0] == '/' && name[1] == '\0') {
  232. !             /* this name indicates a SVR4 extension, the string table
  233. !              * of long (>15) file names. just read it in an appropriate
  234. !              * space for later use (mj) */
  235. !             register char *p;
  236. !             if (name_table) free(name_table);
  237. !             name_table = malloc((int)eltsize);
  238. !             nread = read(desc, name_table, eltsize);
  239. !             if (nread <= 0 || nread != eltsize) {
  240. !                 free(name_table);
  241. !                 (void) close (desc);
  242. !                 return -2;
  243. !             }
  244. !             fnval = 0;
  245. !             p = name_table+(int)eltsize;
  246. !             while (p > name_table)
  247. !                 if (*--p == '/') *p = '\0';
  248. !             
  249. !         }
  250. !         else {
  251. !             if (name[0] == '/' && isdigit(name[1])) {
  252. !                 /* this is (was) a long file name. instead of the name the
  253. !                  * decimal index of the string in the string table is 
  254. !                  * stored.  (mj) */
  255. !                 long offset = atol(name+1);
  256. !                 if (offset < 0) {
  257. !                     free(name_table);
  258. !                     (void) close (desc);
  259. !                     return -2;
  260. !                 }
  261. !                 real_name = &name_table[offset];
  262. !             }
  263. !             else real_name = name;
  264. ! 
  265. !             fnval =
  266. !                 (*function) (desc, real_name, member_offset,
  267. !                              member_offset + sizeof (member_header), eltsize,
  268. !                              atol (member_header.ar_date),
  269. !                              atoi (member_header.ar_uid),
  270. !                              atoi (member_header.ar_gid),
  271. !                              eltmode, arg);
  272. !         }
  273. ! #else
  274. !             
  275.       fnval =
  276.         (*function) (desc, name, member_offset,
  277.                  member_offset + sizeof (member_header), eltsize,
  278. ! #if   defined(M_XENIX) && !defined(M_UNIX)
  279. !                      member_header.ar_date,
  280. !                      member_header.ar_uid,
  281. !                      member_header.ar_gid,
  282. ! #else /* Not Xenix.  */
  283. !                      atol (member_header.ar_date),
  284. !                      atoi (member_header.ar_uid),
  285. !                      atoi (member_header.ar_gid),
  286. ! #endif        /* Xenix.  */
  287.                  eltmode, arg);
  288.   
  289. + #endif  /* ! USGr4 */
  290.   #endif  /* Not AIAMAG */
  291.   
  292.       if (fnval)
  293.         {
  294.           (void) close (desc);
  295. + #ifdef USGr4
  296. +             if (name_table) free(name_table);
  297. + #endif
  298.           return fnval;
  299.         }
  300.   
  301. ***************
  302. *** 330,335 ****
  303. --- 398,406 ----
  304.     }
  305.   
  306.     close (desc);
  307. + #ifdef USGr4
  308. +   if (name_table) free(name_table);
  309. + #endif
  310.     return 0;
  311.   }
  312.   
  313. ***************
  314. *** 346,352 ****
  315.     if (p != 0)
  316.       name = p + 1;
  317.   
  318. ! #ifndef    APOLLO
  319.   
  320.     if (!strncmp (name, mem, AR_NAMELEN))
  321.       return 1;
  322. --- 417,424 ----
  323.     if (p != 0)
  324.       name = p + 1;
  325.   
  326. ! #if !defined(APOLLO) && !defined(USGr4)  /* SVR4 & APOLLO have long 
  327. !                                           * member names (mj) */
  328.   
  329.     if (!strncmp (name, mem, AR_NAMELEN))
  330.       return 1;
  331. ***************
  332. *** 365,371 ****
  333.       }
  334.     return 0;
  335.   
  336. ! #else    /* APOLLO.  */
  337.     return !strcmp (name, mem);
  338.   #endif
  339.   }
  340. --- 437,443 ----
  341.       }
  342.     return 0;
  343.   
  344. ! #else    /* APOLLO, USGr4  */
  345.     return !strcmp (name, mem);
  346.   #endif
  347.   }
  348. --
  349.  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  350. | Michael Joosten   |       Tel.  : (+49) (+) 5251-284 120                 |
  351. | CADLAB            |       Fax   : (+49) (+) 5251-284 140                 |
  352. | Bahnhofstr. 32    |       E-Mail: joost@cadlab.de                        |
  353. | D-4790 Paderborn  |                ...!uunet!unido!cadlab!joost           | 
  354. | FRG               | Mass mail to: joost@pbinfo.uni-paderborn.de          |
  355. |--------------------------------------------------------------------------|
  356. | CADLAB is a cooperation between Uni-GH Paderborn & SNI AG                |
  357.  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  358.  
  359.