--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/tool/patchhook.c	Sat Jun 06 04:51:15 2015 +0000
@@ -0,0 +1,42 @@
+/*
+ * This module implements the "patch hook" that checks if an archive member
+ * needs to be patched and invokes all necessary patch processing.
+ */
+
+#include <sys/types.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <strings.h>
+#include <time.h>
+#include "ar.h"
+#include "globals.h"
+#include "patchinfo.h"
+
+extern struct ar_hdr ar_hdr;
+
+update_ar_timestamp()
+{
+	time_t curtime;
+
+	time(&curtime);
+	sprintf(ar_hdr.ar_date, "%-12lu", (u_long) curtime);
+}
+
+patch_hook()
+{
+	struct patch_module_desc *pmd;
+	struct patch_desc *patch;
+
+	for (pmd = patch_module_list; pmd; pmd = pmd->next)
+		if (!strcmp(pmd->member_name, member_name))
+			break;
+	if (!pmd)
+		return(0);
+	/* yes, we need to patch it: start digging into it */
+	parse_coff_hdr();
+	for (patch = pmd->patches; patch; patch = patch->next)
+		apply_patch(patch);
+	update_ar_timestamp();
+	return(1);
+}