contrib/bmake/arch.c

89  * of archives. The first time an archive is referenced, all of its members'
90  * headers are read and hashed and the archive closed again. All hashed
91  * archives are kept on a list which is searched each time an archive member
95  *	Arch_ParseArchive   	Given an archive specification, return a list
100  *	Arch_Touch	    	Alter the modification time of the archive
110  *	    	  	    	an archive *in the archive*. The time is also
115  *	    	  	    	an archive. Called when the member doesn't
116  *	    	  	    	already exist. Looks in the archive for the
180     char	  *name;      /* Name of archive */
181     Hash_Table	  members;    /* All the members of the archive described
231  *	Free memory used by an archive
265  *	Parse the archive specification in the given line and find/create
266  *	the nodes for the specified archive members, placing their nodes
276  *	to point to the first non-space after the archive spec. The
374 	    printf("No closing parenthesis in archive specification\n");
390 	 * SuffExpandChildren, both for the archive and the member portions.
394 	 * This will slow down archive specs with dynamic sources, of course,
410 	     * Now form an archive spec and recurse to deal with nested
468 		     * the world knows it's an archive member, without having
490 		 * world knows it's an archive member, without having to
529  *	See if the given archive is the one we are looking for. Called
553  *	Locate a member of an archive, given the path of the archive and
557  *	archive		Path to the archive
560  *	hash		TRUE if archive should be hashed if not already so.
565  *	archive members. This is mostly because we have no assurances that
566  *	The archive will remain constant after we read all the headers, so
574 ArchStatMember(char *archive, char *member, Boolean hash)
576     FILE *	  arch;	      /* Stream to archive */
577     int		  size;       /* Size of archive member */
580     LstNode	  ln;	      /* Lst member containing archive descriptor */
583     struct ar_hdr arh;        /* archive-member header for reading archive */
598     ln = Lst_Find(archives, archive, ArchFindArchive);
626 	 * again. Since the archive is not to be hashed, we assume there's
632 	 arch = ArchFindMember(archive, member, &sarh, "r");
643      * We don't have this archive on the list yet, so we want to find out
646     arch = fopen(archive, "r");
652      * We use the ARMAG string to make sure this is an archive we
662     ar->name = bmake_strdup(archive);
671 	     * The header is bogus, so the archive is bad
750      * Now that the archive has been read and cached, we can look into
779  *	-1: Bad data in archive
785  *	If a table is read, the file pointer is moved to the next archive
809 	 * This is a table of archive names, so we build one for
836 	    fprintf(debug_file, "Found svr4 archive name table with %lu entries\n",
874  *	Locate a member of an archive, given the path of the archive and
875  *	the path of the desired member. If the archive is to be modified,
879  *	archive		Path to the archive
896 ArchFindMember(char *archive, char *member, struct ar_hdr *arhPtr,
899     FILE *	  arch;	      /* Stream to archive */
900     int		  size;       /* Size of archive member */
905     arch = fopen(archive, mode);
911      * We use the ARMAG string to make sure this is an archive we
938 	      * The header is bogus, so the archive is bad
1028      * archive and return NULL -- an error.
1037  *	Touch a member of an archive.
1046  *	The modification time of the entire archive is also changed.
1055     FILE *	  arch;	  /* Stream open to archive, positioned properly */
1100     FILE *	    arch;	/* Stream open to archive */
1120  *	Return the modification time of a member of an archive.
1123  *	gn		Node describing archive member
1161  *	Given a non-existent archive member's node, get its modification
1189 	     * If the parent is an archive specification and is being made
1244     char	    *libName;   /* file name for archive */
1282  *	    	  is out-of-date). We don't compare of the archive time
1286  *		  of the archive, not by ranlib rules, which affect the