mirrors/make
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/make.git synced 2025-02-06 22:45:27 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Formerly arscan.c.~22~

Browse source
This commit is contained in:
Roland McGrath 1992-06-16 23:43:25 +00:00
parent 37fbe2a271
commit ade465512f
1 changed files with 17 additions and 14 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

31
arscan.c
View file

@ -283,9 +283,6 @@ ar_name_equal (name, mem)
char *name, *mem; char *name, *mem;
{ {
char *p; char *p;
unsigned int namelen, memlen;
struct ar_hdr h;
unsigned int max = sizeof (h.ar_name);
p = rindex (name, '/'); p = rindex (name, '/');
if (p != 0) if (p != 0)
@ -293,20 +290,26 @@ ar_name_equal (name, mem)
#if !defined (AIAMAG) && !defined (APOLLO) #if !defined (AIAMAG) && !defined (APOLLO)
/* `reallylongname.o' matches `reallylongnam.o'. {
If member names have a trailing slash, that's `reallylongna.o'. */ /* `reallylongname.o' matches `reallylongnam.o'.
If member names have a trailing slash, that's `reallylongna.o'. */
if (strncmp (name, mem, max - 3)) struct ar_hdr h;
return 0; unsigned int max = sizeof (h.ar_name);
unsigned int namelen, memlen;
namelen = strlen (name); if (strncmp (name, mem, max - 3))
memlen = strlen (mem); return 0;
if (namelen > memlen && memlen >= max - 1
&& name[namelen - 2] == '.' && name[namelen - 1] == 'o'
&& mem[memlen - 2] == '.' && mem[memlen - 1] == 'o')
return 1;
return !strcmp (name + max - 3, mem + max - 3); namelen = strlen (name);
memlen = strlen (mem);
if (namelen > memlen && memlen >= max - 1
&& name[namelen - 2] == '.' && name[namelen - 1] == 'o'
&& mem[memlen - 2] == '.' && mem[memlen - 1] == 'o')
return 1;
return !strcmp (name + max - 3, mem + max - 3);
}
#else /* AIX or APOLLO. */ #else /* AIX or APOLLO. */