]> git.proxmox.com Git - grub2.git/blobdiff - gentpl.py
add changelog entry
[grub2.git] / gentpl.py
index 7a5986a9e8eeddd501c7da34686e0ffeda51216e..a42a6066748b22c4dca2b3a6c81eb74299fd6400 100644 (file)
--- a/gentpl.py
+++ b/gentpl.py
@@ -10,16 +10,43 @@ GRUB_PLATFORMS = [ "emu", "i386_pc", "i386_efi", "i386_qemu", "i386_coreboot",
                    "powerpc_ieee1275" ]
 
 GROUPS = {}
-GROUPS["i386"]    = [ "i386_pc", "i386_efi", "i386_qemu", "i386_coreboot", "i386_multiboot", "i386_ieee1275" ]
-GROUPS["x86_64"]  = [ "x86_64_efi" ]
-GROUPS["mips"]    = [ "mips_yeeloong" ]
-GROUPS["sparc64"] = [ "sparc64_ieee1275" ]
-GROUPS["powerpc"] = [ "powerpc_ieee1275" ]
-GROUPS["x86"]     = GROUPS["i386"] + GROUPS["x86_64"]
-GROUPS["x86_efi"] = [ "i386_efi", "x86_64_efi" ]
-GROUPS["common"]  = GRUB_PLATFORMS[:]
-GROUPS["nonemu"]  = GRUB_PLATFORMS[:]
-GROUPS["nonemu"].remove("emu")
+
+GROUPS["common"]   = GRUB_PLATFORMS[:]
+
+# Groups based on CPU
+GROUPS["i386"]     = [ "i386_pc", "i386_efi", "i386_qemu", "i386_coreboot", "i386_multiboot", "i386_ieee1275" ]
+GROUPS["x86_64"]   = [ "x86_64_efi" ]
+GROUPS["x86"]      = GROUPS["i386"] + GROUPS["x86_64"]
+GROUPS["mips"]     = [ "mips_yeeloong" ]
+GROUPS["sparc64"]  = [ "sparc64_ieee1275" ]
+GROUPS["powerpc"]  = [ "powerpc_ieee1275" ]
+
+# Groups based on firmware
+GROUPS["x86_efi"]  = [ "i386_efi", "x86_64_efi" ]
+GROUPS["ieee1275"]   = [ "i386_ieee1275", "sparc64_ieee1275", "powerpc_ieee1275" ]
+
+# emu is a special case so many core functionality isn't needed on this platform
+GROUPS["noemu"]   = GRUB_PLATFORMS[:]; GROUPS["noemu"].remove("emu")
+
+# Groups based on hardware features
+GROUPS["cmos"] = GROUPS["x86"][:] + ["mips_yeeloong"]; GROUPS["cmos"].remove("i386_efi"); GROUPS["cmos"].remove("x86_64_efi")
+GROUPS["pci"]      = GROUPS["x86"] + GROUPS["mips"]
+GROUPS["usb"]      = GROUPS["pci"]
+
+# If gfxterm is main output console integrate it into kernel
+GROUPS["videoinkernel"] = ["mips_yeeloong"]
+GROUPS["videomodules"]   = GRUB_PLATFORMS[:];
+for i in GROUPS["videoinkernel"]: GROUPS["videomodules"].remove(i)
+
+# Similar for terminfo
+GROUPS["terminfoinkernel"] = ["mips_yeeloong"] + GROUPS["ieee1275"];
+GROUPS["terminfomodule"]   = GRUB_PLATFORMS[:];
+for i in GROUPS["terminfoinkernel"]: GROUPS["terminfomodule"].remove(i)
+
+# Miscelaneous groups schedulded to disappear in future
+GROUPS["nosparc64"] = GRUB_PLATFORMS[:]; GROUPS["nosparc64"].remove("sparc64_ieee1275")
+GROUPS["i386_coreboot_multiboot_qemu"] = ["i386_coreboot", "i386_multiboot", "i386_qemu"]
+GROUPS["nopc"] = GRUB_PLATFORMS[:]; GROUPS["nopc"].remove("i386_pc")
 
 #
 # Create platform => groups reverse map, where groups covering that
@@ -48,16 +75,15 @@ for platform in GRUB_PLATFORMS:
 #
 # Global variables
 #
-GVARS = []
+GVARS = set()
 
 def gvar_add(var, value):
-    if var not in GVARS:
-        GVARS.append(var)
+    GVARS.add(var)
     return var + " += " + value + "\n"
 
 def global_variable_initializers():
     r = ""
-    for var in GVARS:
+    for var in sorted(GVARS):
         r += var + " ?= \n"
     return r
 
@@ -65,6 +91,16 @@ def global_variable_initializers():
 # Per PROGRAM/SCRIPT variables 
 #
 
+def vars_init(*var_list):
+    r = "[+ IF (if (not (assoc-ref seen-vars (get \".name\"))) \"seen\") +]"
+    r += "[+ (out-suspend \"v\") +]"
+    for var in var_list:
+        r += var + "  = \n"
+    r += "[+ (out-resume \"v\") +]"
+    r += "[+ (set! seen-vars (assoc-set! seen-vars (get \".name\") 0)) +]"
+    r += "[+ ENDIF +]"
+    return first_time(r)
+
 def var_set(var, value):
     return var + "  = " + value + "\n"
 
@@ -75,231 +111,245 @@ def var_add(var, value):
 # Autogen constructs
 #
 
-def if_tag(tag, closure):
-    return "[+ IF " + tag + " +]" + closure() + "[+ ENDIF +]"
+def set_canonical_name_suffix(suffix): return "[+ % name `export cname=$(echo %s" + suffix + " | sed -e 's/[^0-9A-Za-z@_]/_/g')` +]"
+def cname(): return "[+ % name `echo $cname` +]"
 
-def if_tag_defined(tag, closure):
-    return "[+ IF " + tag + " defined +]" + closure() + "[+ ENDIF +]"
-
-def for_tag(tag, closure):
-    return "[+ FOR ." + tag + " +]" + closure() + "[+ ENDFOR +]"
-
-def collect_values(tag, prefix=""):
-    return for_tag(tag, lambda: prefix + "[+ ." + tag + " +] ")
+def rule(target, source, cmd):
+    if cmd[0] == "\n":
+        return "\n" + target + ": " + source + cmd.replace("\n", "\n\t") + "\n"
+    else:
+        return "\n" + target + ": " + source + "\n\t" + cmd.replace("\n", "\n\t") + "\n"
 
-def each_group(platform, suffix, closure):
-    r = None
+#
+# Template for keys with platform names as values, for example:
+#
+# kernel = {
+#   nostrip = emu;
+#   ...
+# }
+#
+def if_platform_tagged(platform, tag, snippet_if, snippet_else=None):
+    r = ""
+    r += "[+ IF " + tag + " defined +]"
+    r += "[+ FOR " + tag + " +][+ CASE " + tag + " +]"
     for group in RMAP[platform]:
-        if r == None:
-            r = "[+ IF ." + group + suffix + " +]"
-        else:
-            r += "[+ ELIF ." + group + suffix + " +]"
-            
-        r += closure(group)
+        r += "[+ = \"" + group + "\" +]" + snippet_if
 
-    if r:
-        r += "[+ ELSE +]"
-        r += closure(None)
-        r += "[+ ENDIF +]"
-    else:
-        r = closure(None)
+    if snippet_else != None: r += "[+ * +]" + snippet_else
+    r += "[+ ESAC +][+ ENDFOR +]"
 
-    return r
-
-def each_platform(closure):
-    r = ""
-    for platform in GRUB_PLATFORMS:
-        for group in RMAP[platform]:
-            if group == RMAP[platform][0]:
-                r += "[+ IF ." + group + " defined +]"
-            else:
-                r += "[+ ELIF ." + group + " defined +]"
-
-            r += "if COND_" + platform + "\n"
-            r += closure(platform)
-            r += "endif\n"
+    if snippet_else == None:
         r += "[+ ENDIF +]"
-    return r
+        return r
 
-def canonical_name():   return "[+ % name `echo -n %s | sed -e 's/[^0-9A-Za-z@_]/_/g'` +]"
-def canonical_module(): return canonical_name() + "_module"
-def canonical_kernel(): return canonical_name() + "_img"
-def canonical_image(): return canonical_name() + "_image"
-
-def shared_sources(prefix=""):        return collect_values("shared", prefix)
-def shared_nodist_sources(prefix=""): return collect_values("nodist_shared", prefix)
-
-def default_sources(prefix=""):        return collect_values("source", prefix)
-def default_nodist_sources(prefix=""): return collect_values("nodist", prefix)
-def default_ldadd():        return collect_values("ldadd")
-def default_cflags():       return collect_values("cflags")
-def default_ldflags():      return collect_values("ldflags")
-def default_cppflags():     return collect_values("cppflags")
-def default_ccasflags():    return collect_values("ccasflags")
-def default_extra_dist(): return collect_values("extra_dist")
-
-def group_sources(group, prefix=""):        return collect_values(group, prefix) if group else default_sources(prefix)
-def group_nodist_sources(group, prefix=""): return collect_values(group + "_nodist", prefix) if group else default_nodist_sources(prefix)
-
-def platform_sources(platform, prefix=""):        return each_group(platform, "", lambda g: collect_values(g, prefix) if g else default_sources(prefix))
-def platform_nodist_sources(platform, prefix=""): return each_group(platform, "_nodist", lambda g: collect_values(g + "_nodist", prefix) if g else default_nodist_sources(prefix))
-
-def platform_ldadd(platform):        return each_group(platform, "_ldadd", lambda g: collect_values(g + "_ldadd") if g else default_ldadd())
-def platform_cflags(platform):       return each_group(platform, "_cflags", lambda g: collect_values(g + "_cflags") if g else default_cflags())
-def platform_ldflags(platform):      return each_group(platform, "_ldflags", lambda g: collect_values(g + "_ldflags") if g else default_ldflags())
-def platform_cppflags(platform):     return each_group(platform, "_cppflags", lambda g: collect_values(g + "_cppflags") if g else default_cppflags())
-def platform_ccasflags(platform):    return each_group(platform, "_ccasflags", lambda g: collect_values(g + "_ccasflags") if g else default_ccasflags())
-def platform_extra_dist(platform): return each_group(platform, "_extra_dist", lambda g: collect_values(g + "_extra_dist") if g else default_extra_dist())
-def platform_format(platform):       return each_group(platform, "_format", lambda g: collect_values(g + "_format") if g else "binary")
+    r += "[+ ELSE +]" + snippet_else + "[+ ENDIF +]"
+    return r
 
-def module(platform):
-    r  = gvar_add("noinst_PROGRAMS", "[+ name +].module")
-    r += gvar_add("MODULE_FILES", "[+ name +].module$(EXEEXT)")
+#
+# Template for tagged values
+#
+# module = {
+#   extra_dist = ...
+#   extra_dist = ...
+#   ...
+# };
+#
+def foreach_value(tag, closure):
+    return "[+ FOR " + tag + " +]" + closure("[+ ." + tag + " +]") + "[+ ENDFOR +]"
 
-    r += var_set(canonical_module() + "_SOURCES", platform_sources(platform) + "## platform sources")
-    r += var_add(canonical_module() + "_SOURCES", shared_sources() + "## shared sources")
-    r += var_set("nodist_" + canonical_module() + "_SOURCES", platform_nodist_sources(platform) + "## platform nodist sources")
-    r += var_add("nodist_" + canonical_module() + "_SOURCES", shared_nodist_sources() + "## shared nodist sources")
-    r += var_set(canonical_module() + "_LDADD", platform_ldadd(platform))
-    r += var_set(canonical_module() + "_CFLAGS", "$(AM_CFLAGS) $(CFLAGS_MODULE) " + platform_cflags(platform))
-    r += var_set(canonical_module() + "_LDFLAGS", "$(AM_LDFLAGS) $(LDFLAGS_MODULE) " + platform_ldflags(platform))
-    r += var_set(canonical_module() + "_CPPFLAGS", "$(AM_CPPFLAGS) $(CPPFLAGS_MODULE) " + platform_cppflags(platform))
-    r += var_set(canonical_module() + "_CCASFLAGS", "$(AM_CCASFLAGS) $(CCASFLAGS_MODULE) " + platform_ccasflags(platform))
-
-    r += gvar_add("EXTRA_DIST", platform_extra_dist(platform))
-    r += gvar_add("BUILT_SOURCES", "$(nodist_" + canonical_module() + "_SOURCES)")
-    r += gvar_add("CLEANFILES", "$(nodist_" + canonical_module() + "_SOURCES)")
-
-    r += gvar_add("DEF_FILES", "def-[+ name +].lst")
-    r += gvar_add("UND_FILES", "und-[+ name +].lst")
-    r += gvar_add("MOD_FILES", "[+ name +].mod")
-    r += gvar_add("platform_DATA", "[+ name +].mod")
-    r += gvar_add("CLEANFILES", "def-[+ name +].lst und-[+ name +].lst mod-[+ name +].c mod-[+ name +].o [+ name +].mod")
-
-    r += gvar_add("COMMAND_FILES", "command-[+ name +].lst")
-    r += gvar_add("FS_FILES", "fs-[+ name +].lst")
-    r += gvar_add("VIDEO_FILES", "video-[+ name +].lst")
-    r += gvar_add("PARTMAP_FILES", "partmap-[+ name +].lst")
-    r += gvar_add("HANDLER_FILES", "handler-[+ name +].lst")
-    r += gvar_add("PARTTOOL_FILES", "parttool-[+ name +].lst")
-    r += gvar_add("TERMINAL_FILES", "terminal-[+ name +].lst")
-    r += gvar_add("CLEANFILES", "command-[+ name +].lst fs-[+ name +].lst")
-    r += gvar_add("CLEANFILES", "handler-[+ name +].lst terminal-[+ name +].lst")
-    r += gvar_add("CLEANFILES", "video-[+ name +].lst partmap-[+ name +].lst parttool-[+ name +].lst")
-
-    r += gvar_add("CLEANFILES", "[+ name +].pp")
-    r += """
-[+ name +].pp: $(""" + canonical_module() + """_SOURCES) $(nodist_""" + canonical_module() + """_SOURCES)
-       $(TARGET_CPP) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(""" + canonical_module() + """_CPPFLAGS) $(CPPFLAGS) $^ > $@ || (rm -f $@; exit 1)
+#
+# Template for handling best matched values for a platform, for example:
+#
+# module = {
+#   cflags = '-Wall';
+#   emu_cflags = '-Wall -DGRUB_EMU=1';
+#   ...
+# }
+#
+def foreach_platform_specific_value(platform, suffix, nonetag, closure):
+    r = ""
+    for group in RMAP[platform]:
+        gtag = group + suffix
 
-def-[+ name +].lst: [+ name +].module$(EXEEXT)
-       if test x$(USE_APPLE_CC_FIXES) = xyes; then \
-         $(NM) -g -P -p $< | grep -E '^[a-zA-Z0-9_]* [TDS]' | sed "s/^\\([^ ]*\\).*/\\1 [+ name +]/" >> $@; \
-       else \
-         $(NM) -g --defined-only -P -p $< | sed "s/^\\([^ ]*\\).*/\\1 [+ name +]/" >> $@; \
-       fi
+        if group == RMAP[platform][0]:
+            r += "[+ IF " + gtag + " +]"
+        else:
+            r += "[+ ELIF " + gtag + " +]"
 
-und-[+ name +].lst: [+ name +].module$(EXEEXT)
-       $(NM) -u -P -p $< | sed "s/^\\([^ ]*\\).*/\\1 [+ name +]/" >> $@
+        r += "[+ FOR " + gtag + " +]" + closure("[+ ." + gtag + " +]") + "[+ ENDFOR +]"
+    r += "[+ ELSE +][+ FOR " + nonetag + " +]" + closure("[+ ." + nonetag + " +]") + "[+ ENDFOR +][+ ENDIF +]"
+    return r
 
-mod-[+ name +].c: [+ name +].module$(EXEEXT) $(top_builddir)/moddep.lst $(top_srcdir)/genmodsrc.sh
-       sh $(top_srcdir)/genmodsrc.sh [+ name +] $(top_builddir)/moddep.lst > $@ || (rm -f $@; exit 1)
+#
+# Template for handling values from sum of all groups for a platform,
+# for example:
+#
+# module = {
+#   common = kern/misc.c;
+#   emu = kern/emu/misc.c;
+#   ...
+# }
+#
+def foreach_platform_value (platform, suffix, closure):
+    r = ""
+    for group in RMAP[platform]:
+        gtag = group + suffix
 
-mod-[+ name +].o: mod-[+ name +].c
-       $(TARGET_CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(CPPFLAGS_MODULE) $(CPPFLAGS) $(CFLAGS_MODULE) $(CFLAGS) -c -o $@ $<
+        r += "[+ IF " + gtag + " +]"
+        r += "[+ FOR " + gtag + " +]" + closure("[+ ." + gtag + " +]") + "[+ ENDFOR +]"
+        r += "[+ ENDIF +]"
+    return r
 
-[+ name +].mod: [+ name +].module$(EXEEXT) mod-[+ name +].o
-       if test x$(USE_APPLE_CC_FIXES) = xyes; then \
-         $(CCLD) $(LDFLAGS_MODULE) $(LDFLAGS) -o $@.bin $^; \
-         $(OBJCONV) -f$(TARGET_MODULE_FORMAT) -nr:_grub_mod_init:grub_mod_init -nr:_grub_mod_fini:grub_mod_fini -wd1106 -nu -nd $@.bin $@; \
-         rm -f $@.bin; \
-       else \
-         $(CCLD) -o $@ $(LDFLAGS_MODULE) $(LDFLAGS) $^; \
-         if test ! -z '$(TARGET_OBJ2ELF)'; then $(TARGET_OBJ2ELF) $@ || (rm -f $@; exit 1); fi; \
-         $(STRIP) --strip-unneeded -K grub_mod_init -K grub_mod_fini -K _grub_mod_init -K _grub_mod_fini -R .note -R .comment $@; \
-       fi
+#
+# Template for gaurding with platform specific "enable" keys, for example:
+#
+#  module = {
+#    name = pci;
+#    noemu = bus/pci.c;
+#    emu = bus/emu/pci.c;
+#    emu = commands/lspci.c;
+#
+#    enable = emu;
+#    enable = i386_pc;
+#    enable = x86_efi;
+#    enable = i386_ieee1275;
+#    enable = i386_coreboot;
+#  };
+#
+def foreach_enabled_platform(closure):
+    r = "[+ IF - enable undefined +]"
+    for platform in GRUB_PLATFORMS:
+        r += "\nif COND_" + platform + "\n" + closure(platform) + "endif\n"
+    r += "[+ ELSE +]"
+    for platform in GRUB_PLATFORMS:
+        x = "\nif COND_" + platform + "\n" + closure(platform) + "endif\n"
+        r += if_platform_tagged(platform, "enable", x)
+    r += "[+ ENDIF +]"
+    return r
 
-command-[+ name +].lst: [+ name +].pp $(top_srcdir)/gencmdlist.sh
-       cat $< | sh $(top_srcdir)/gencmdlist.sh [+ name +] > $@ || (rm -f $@; exit 1)
+#
+# Template for gaurding with platform specific automake conditionals,
+# for example:
+#
+#  module = {
+#    name = usb;
+#    common = bus/usb/usb.c;
+#    noemu = bus/usb/usbtrans.c;
+#    noemu = bus/usb/usbhub.c;
+#    enable = emu;
+#    enable = i386;
+#    enable = mips_yeeloong;
+#    emu_condition = COND_GRUB_EMU_USB;
+#  };
+#
+def under_platform_specific_conditionals(platform, snippet):
+    r  = foreach_platform_specific_value(platform, "_condition", "condition", lambda cond: "if " + cond + "\n")
+    r += snippet
+    r += foreach_platform_specific_value(platform, "_condition", "condition", lambda cond: "endif " + cond + "\n")
+    return r
 
-fs-[+ name +].lst: [+ name +].pp $(top_srcdir)/genfslist.sh
-       cat $< | sh $(top_srcdir)/genfslist.sh [+ name +] > $@ || (rm -f $@; exit 1)
+def platform_specific_values(platform, suffix, nonetag):
+    return foreach_platform_specific_value(platform, suffix, nonetag,
+                                           lambda value: value + " ")
 
-video-[+ name +].lst: [+ name +].pp $(top_srcdir)/genvideolist.sh
-       cat $< | sh $(top_srcdir)/genvideolist.sh [+ name +] > $@ || (rm -f $@; exit 1)
+def platform_values(platform, suffix):
+    return foreach_platform_value(platform, suffix, lambda value: value + " ")
 
-partmap-[+ name +].lst: [+ name +].pp $(top_srcdir)/genpartmaplist.sh
-       cat $< | sh $(top_srcdir)/genpartmaplist.sh [+ name +] > $@ || (rm -f $@; exit 1)
+def extra_dist():
+    return foreach_value("extra_dist", lambda value: value + " ")
 
-parttool-[+ name +].lst: [+ name +].pp $(top_srcdir)/genparttoollist.sh
-       cat $< | sh $(top_srcdir)/genparttoollist.sh [+ name +] > $@ || (rm -f $@; exit 1)
+def platform_sources(p): return platform_values(p, "")
+def platform_nodist_sources(p): return platform_values(p, "_nodist")
+def platform_dependencies(p): return platform_values(p, "dependencies", "_dependencies")
 
-handler-[+ name +].lst: [+ name +].pp $(top_srcdir)/genhandlerlist.sh
-       cat $< | sh $(top_srcdir)/genhandlerlist.sh [+ name +] > $@ || (rm -f $@; exit 1)
+def platform_startup(p): return platform_specific_values(p, "_startup", "startup")
+def platform_ldadd(p): return platform_specific_values(p, "_ldadd", "ldadd")
+def platform_cflags(p): return platform_specific_values(p, "_cflags", "cflags")
+def platform_ldflags(p): return platform_specific_values(p, "_ldflags", "ldflags")
+def platform_cppflags(p): return platform_specific_values(p, "_cppflags", "cppflags")
+def platform_ccasflags(p): return platform_specific_values(p, "_ccasflags", "ccasflags")
+def platform_stripflags(p): return platform_specific_values(p, "_stripflags", "stripflags")
+def platform_objcopyflags(p): return platform_specific_values(p, "_objcopyflags", "objcopyflags")
 
-terminal-[+ name +].lst: [+ name +].pp $(top_srcdir)/genterminallist.sh
-       cat $< | sh $(top_srcdir)/genterminallist.sh [+ name +] > $@ || (rm -f $@; exit 1)
-"""
+#
+# Emit snippet only the first time through for the current name.
+#
+def first_time(snippet):
+    r = "[+ IF (if (not (assoc-ref seen-target (get \".name\"))) \"seen\") +]"
+    r += snippet
+    r += "[+ ENDIF +]"
     return r
 
-def rule(target, source, cmd):
-    if cmd[0] == "\n":
-        return "\n" + target + ": " + source + cmd.replace("\n", "\n\t") + "\n"
-    else:
-        return "\n" + target + ": " + source + "\n\t" + cmd.replace("\n", "\n\t") + "\n"
+def module(platform):
+    r = set_canonical_name_suffix(".module")
 
-def image_nostrip(platform):
-    return if_tag_defined("image_nostrip." + platform, lambda: rule("[+ name +].img", "[+ name +].exec", "cp $< $@"))
+    r += gvar_add("noinst_PROGRAMS", "[+ name +].module")
+    r += gvar_add("MODULE_FILES", "[+ name +].module$(EXEEXT)")
 
-def image_strip(platform):
-    return if_tag_defined("image_strip." + platform, lambda: rule("[+ name +].img", "[+ name +].exec", "$(STRIP) -o $@ -R .rel.dyn -R .reginfo -R .note -R .comment $<"))
+    r += var_set(cname() + "_SOURCES", platform_sources(platform) + " ## platform sources")
+    r += var_set("nodist_" + cname() + "_SOURCES", platform_nodist_sources(platform) + " ## platform nodist sources")
+    r += var_set(cname() + "_LDADD", platform_ldadd(platform))
+    r += var_set(cname() + "_CFLAGS", "$(AM_CFLAGS) $(CFLAGS_MODULE) " + platform_cflags(platform))
+    r += var_set(cname() + "_LDFLAGS", "$(AM_LDFLAGS) $(LDFLAGS_MODULE) " + platform_ldflags(platform))
+    r += var_set(cname() + "_CPPFLAGS", "$(AM_CPPFLAGS) $(CPPFLAGS_MODULE) " + platform_cppflags(platform))
+    r += var_set(cname() + "_CCASFLAGS", "$(AM_CCASFLAGS) $(CCASFLAGS_MODULE) " + platform_ccasflags(platform))
+    # r += var_set(cname() + "_DEPENDENCIES", platform_dependencies(platform) + " " + platform_ldadd(platform))
 
-def image_strip_keep_kernel(platform):
-    return if_tag_defined("image_strip_keep_kernel." + platform, lambda: rule("[+ name +].img", "[+ name +].exec", "$(STRIP) -o $@ --strip-unneeded -K start -R .note -R .comment $<"))
+    r += gvar_add("EXTRA_DIST", extra_dist())
+    r += gvar_add("BUILT_SOURCES", "$(nodist_" + cname() + "_SOURCES)")
+    r += gvar_add("CLEANFILES", "$(nodist_" + cname() + "_SOURCES)")
 
-def image_strip_macho2img(platform):
-    return if_tag_defined("image_strip_macho2img." + platform, lambda: rule("[+ name +].img", "[+ name +].exec", """
-if test "x$(TARGET_APPLE_CC)" = x1; then \
-  $(MACHO2IMG) --bss $< $@ || exit 1; \
-else \
-  $(STRIP) -o $@ -O binary --strip-unneeded -R .note -R .comment -R .note.gnu.build-id -R .reginfo -R .rel.dyn $< || exit 1; \
-fi
-"""))
+    r += gvar_add("MOD_FILES", "[+ name +].mod")
+    r += gvar_add("MARKER_FILES", "[+ name +].marker")
+    r += gvar_add("CLEANFILES", "[+ name +].marker")
+    r += """
+[+ name +].marker: $(""" + cname() + """_SOURCES) $(nodist_""" + cname() + """_SOURCES)
+       $(TARGET_CPP) -DGRUB_LST_GENERATOR $(CPPFLAGS_MARKER) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(""" + cname() + """_CPPFLAGS) $(CPPFLAGS) $^ > $@.new || (rm -f $@; exit 1)
+       grep 'MARKER' $@.new > $@; rm -f $@.new
+"""
+    return r
 
 def kernel(platform):
-    r  = gvar_add("noinst_PROGRAMS", "[+ name +].img")
-    r += var_set(canonical_kernel() + "_SOURCES", platform_sources(platform))
-    r += var_add(canonical_kernel() + "_SOURCES", shared_sources())
-    r += var_set("nodist_" + canonical_kernel() + "_SOURCES", platform_nodist_sources(platform) + "## platform nodist sources")
-    r += var_add("nodist_" + canonical_kernel() + "_SOURCES", shared_nodist_sources() + "## shared nodist sources")
-    r += var_set(canonical_kernel() + "_LDADD", platform_ldadd(platform))
-    r += var_set(canonical_kernel() + "_CFLAGS", "$(AM_CFLAGS) $(CFLAGS_KERNEL) " + platform_cflags(platform))
-    r += var_set(canonical_kernel() + "_LDFLAGS", "$(AM_LDFLAGS) $(LDFLAGS_KERNEL) " + platform_ldflags(platform))
-    r += var_set(canonical_kernel() + "_CPPFLAGS", "$(AM_CPPFLAGS) $(CPPFLAGS_KERNEL) " + platform_cppflags(platform))
-    r += var_set(canonical_kernel() + "_CCASFLAGS", "$(AM_CCASFLAGS) $(CCASFLAGS_KERNEL) " + platform_ccasflags(platform))
-
-    r += gvar_add("EXTRA_DIST", platform_extra_dist(platform))
-    r += gvar_add("BUILT_SOURCES", "$(nodist_" + canonical_kernel() + "_SOURCES)")
-    r += gvar_add("CLEANFILES", "$(nodist_" + canonical_kernel() + "_SOURCES)")
+    r = set_canonical_name_suffix(".exec")
+    r += gvar_add("noinst_PROGRAMS", "[+ name +].exec")
+    r += var_set(cname() + "_SOURCES", platform_startup(platform))
+    r += var_add(cname() + "_SOURCES", platform_sources(platform))
+    r += var_set("nodist_" + cname() + "_SOURCES", platform_nodist_sources(platform) + " ## platform nodist sources")
+    r += var_set(cname() + "_LDADD", platform_ldadd(platform))
+    r += var_set(cname() + "_CFLAGS", "$(AM_CFLAGS) $(CFLAGS_KERNEL) " + platform_cflags(platform))
+    r += var_set(cname() + "_LDFLAGS", "$(AM_LDFLAGS) $(LDFLAGS_KERNEL) " + platform_ldflags(platform))
+    r += var_set(cname() + "_CPPFLAGS", "$(AM_CPPFLAGS) $(CPPFLAGS_KERNEL) " + platform_cppflags(platform))
+    r += var_set(cname() + "_CCASFLAGS", "$(AM_CCASFLAGS) $(CCASFLAGS_KERNEL) " + platform_ccasflags(platform))
+    r += var_set(cname() + "_STRIPFLAGS", "$(AM_STRIPFLAGS) $(STRIPFLAGS_KERNEL) " + platform_stripflags(platform))
+    # r += var_set(cname() + "_DEPENDENCIES", platform_dependencies(platform) + " " + platform_ldadd(platform))
+
+    r += gvar_add("EXTRA_DIST", extra_dist())
+    r += gvar_add("BUILT_SOURCES", "$(nodist_" + cname() + "_SOURCES)")
+    r += gvar_add("CLEANFILES", "$(nodist_" + cname() + "_SOURCES)")
 
     r += gvar_add("platform_DATA", "[+ name +].img")
+    r += gvar_add("CLEANFILES", "[+ name +].img")
+    r += rule("[+ name +].img", "[+ name +].exec$(EXEEXT)",
+              if_platform_tagged(platform, "nostrip", "cp $< $@",
+                                 "$(STRIP) $(" + cname() + "_STRIPFLAGS) -o $@ $<"))
     return r
 
 def image(platform):
-    r  = gvar_add("noinst_PROGRAMS", "[+ name +].image")
-    r += var_set(canonical_image() + "_SOURCES", platform_sources(platform))
-    r += var_add(canonical_image() + "_SOURCES", shared_sources())
-    r += var_set("nodist_" + canonical_image() + "_SOURCES", platform_nodist_sources(platform) + "## platform nodist sources")
-    r += var_add("nodist_" + canonical_image() + "_SOURCES", shared_nodist_sources() + "## shared nodist sources")
-    r += var_set(canonical_image() + "_LDADD", platform_ldadd(platform))
-    r += var_set(canonical_image() + "_CFLAGS", "$(AM_CFLAGS) $(CFLAGS_IMAGE) " + platform_cflags(platform))
-    r += var_set(canonical_image() + "_LDFLAGS", "$(AM_LDFLAGS) $(LDFLAGS_IMAGE) " + platform_ldflags(platform))
-    r += var_set(canonical_image() + "_CPPFLAGS", "$(AM_CPPFLAGS) $(CPPFLAGS_IMAGE) " + platform_cppflags(platform))
-    r += var_set(canonical_image() + "_CCASFLAGS", "$(AM_CCASFLAGS) $(CCASFLAGS_IMAGE) " + platform_ccasflags(platform))
-
-    r += gvar_add("EXTRA_DIST", platform_extra_dist(platform))
-    r += gvar_add("BUILT_SOURCES", "$(nodist_" + canonical_image() + "_SOURCES)")
-    r += gvar_add("CLEANFILES", "$(nodist_" + canonical_image() + "_SOURCES)")
+    r = set_canonical_name_suffix(".image")
+    r += gvar_add("noinst_PROGRAMS", "[+ name +].image")
+    r += var_set(cname() + "_SOURCES", platform_sources(platform))
+    r += var_set("nodist_" + cname() + "_SOURCES", platform_nodist_sources(platform) + "## platform nodist sources")
+    r += var_set(cname() + "_LDADD", platform_ldadd(platform))
+    r += var_set(cname() + "_CFLAGS", "$(AM_CFLAGS) $(CFLAGS_IMAGE) " + platform_cflags(platform))
+    r += var_set(cname() + "_LDFLAGS", "$(AM_LDFLAGS) $(LDFLAGS_IMAGE) " + platform_ldflags(platform))
+    r += var_set(cname() + "_CPPFLAGS", "$(AM_CPPFLAGS) $(CPPFLAGS_IMAGE) " + platform_cppflags(platform))
+    r += var_set(cname() + "_CCASFLAGS", "$(AM_CCASFLAGS) $(CCASFLAGS_IMAGE) " + platform_ccasflags(platform))
+    r += var_set(cname() + "_OBJCOPYFLAGS", "$(OBJCOPYFLAGS_IMAGE) " + platform_objcopyflags(platform))
+    # r += var_set(cname() + "_DEPENDENCIES", platform_dependencies(platform) + " " + platform_ldadd(platform))
+
+    r += gvar_add("EXTRA_DIST", extra_dist())
+    r += gvar_add("BUILT_SOURCES", "$(nodist_" + cname() + "_SOURCES)")
+    r += gvar_add("CLEANFILES", "$(nodist_" + cname() + "_SOURCES)")
 
     r += gvar_add("platform_DATA", "[+ name +].img")
     r += gvar_add("CLEANFILES", "[+ name +].img")
@@ -307,25 +357,32 @@ def image(platform):
 if test x$(USE_APPLE_CC_FIXES) = xyes; then \
   $(MACHO2IMG) $< $@; \
 else \
-  $(OBJCOPY) -O """ + platform_format(platform) + """ --strip-unneeded -R .note -R .comment -R .note.gnu.build-id -R .reginfo -R .rel.dyn $< $@; \
+  $(OBJCOPY) $(""" + cname() + """_OBJCOPYFLAGS) --strip-unneeded -R .note -R .comment -R .note.gnu.build-id -R .reginfo -R .rel.dyn $< $@; \
 fi
 """)
     return r
 
 def library(platform):
-    r  = gvar_add("noinst_LIBRARIES", "[+ name +]")
-    r += var_set(canonical_name() + "_SOURCES", platform_sources(platform))
-    r += var_add(canonical_name() + "_SOURCES", shared_sources())
-    r += var_set("nodist_" + canonical_name() + "_SOURCES", platform_nodist_sources(platform))
-    r += var_add("nodist_" + canonical_name() + "_SOURCES", shared_nodist_sources())
-    r += var_set(canonical_name() + "_CFLAGS", "$(AM_CFLAGS) $(CFLAGS_LIBRARY) " + platform_cflags(platform))
-    r += var_set(canonical_name() + "_CPPFLAGS", "$(AM_CPPFLAGS) $(CPPFLAGS_LIBRARY) " + platform_cppflags(platform))
-    r += var_set(canonical_name() + "_CCASFLAGS", "$(AM_CCASFLAGS) $(CCASFLAGS_LIBRARY) " + platform_ccasflags(platform))
-
-    r += gvar_add("EXTRA_DIST", platform_extra_dist(platform))
-    r += gvar_add("BUILT_SOURCES", "$(nodist_" + canonical_name() + "_SOURCES)")
-    r += gvar_add("CLEANFILES", "$(nodist_" + canonical_name() + "_SOURCES)")
-
+    r = set_canonical_name_suffix("")
+
+    r += vars_init(cname() + "_SOURCES",
+                   "nodist_" + cname() + "_SOURCES",
+                   cname() + "_CFLAGS",
+                   cname() + "_CPPFLAGS",
+                   cname() + "_CCASFLAGS")
+    #              cname() + "_DEPENDENCIES")
+
+    r += first_time(gvar_add("noinst_LIBRARIES", "[+ name +]"))
+    r += var_add(cname() + "_SOURCES", platform_sources(platform))
+    r += var_add("nodist_" + cname() + "_SOURCES", platform_nodist_sources(platform))
+    r += var_add(cname() + "_CFLAGS", first_time("$(AM_CFLAGS) $(CFLAGS_LIBRARY) ") + platform_cflags(platform))
+    r += var_add(cname() + "_CPPFLAGS", first_time("$(AM_CPPFLAGS) $(CPPFLAGS_LIBRARY) ") + platform_cppflags(platform))
+    r += var_add(cname() + "_CCASFLAGS", first_time("$(AM_CCASFLAGS) $(CCASFLAGS_LIBRARY) ") + platform_ccasflags(platform))
+    # r += var_add(cname() + "_DEPENDENCIES", platform_dependencies(platform) + " " + platform_ldadd(platform))
+
+    r += gvar_add("EXTRA_DIST", extra_dist())
+    r += first_time(gvar_add("BUILT_SOURCES", "$(nodist_" + cname() + "_SOURCES)"))
+    r += first_time(gvar_add("CLEANFILES", "$(nodist_" + cname() + "_SOURCES)"))
     return r
 
 def installdir(default="bin"):
@@ -334,105 +391,100 @@ def installdir(default="bin"):
 def manpage():
     r  = "if COND_MAN_PAGES\n"
     r += gvar_add("man_MANS", "[+ name +].[+ mansection +]\n")
-    r += rule("[+ name +].[+ mansection +]", "", """
-$(MAKE) $(AM_MAKEFLAGS) [+ name +]
+    r += rule("[+ name +].[+ mansection +]", "[+ name +]", """
 chmod a+x [+ name +]
-$(HELP2MAN) --section=[+ mansection +] -o $@ ./[+ name +]
+PATH=$(builddir):$$PATH $(HELP2MAN) --section=[+ mansection +] -i $(top_srcdir)/docs/man/[+ name +].h2m -o $@ [+ name +]
 """)
     r += gvar_add("CLEANFILES", "[+ name +].[+ mansection +]")
     r += "endif\n"
     return r
 
 def program(platform, test=False):
-    if test:
-        r = gvar_add("check_PROGRAMS", "[+ name +]")
-    else:
-        r  = gvar_add(installdir() + "_PROGRAMS", "[+ name +]")
-
-    r += var_set(canonical_name() + "_SOURCES", platform_sources(platform))
-    r += var_add(canonical_name() + "_SOURCES", shared_sources())
-    r += var_set("nodist_" + canonical_name() + "_SOURCES", platform_nodist_sources(platform))
-    r += var_add("nodist_" + canonical_name() + "_SOURCES", shared_nodist_sources())
-    r += var_set(canonical_name() + "_LDADD", platform_ldadd(platform))
-    r += var_set(canonical_name() + "_CFLAGS", "$(AM_CFLAGS) $(CFLAGS_PROGRAM) " + platform_cflags(platform))
-    r += var_set(canonical_name() + "_LDFLAGS", "$(AM_LDFLAGS) $(LDFLAGS_PROGRAM) " + platform_ldflags(platform))
-    r += var_set(canonical_name() + "_CPPFLAGS", "$(AM_CPPFLAGS) $(CPPFLAGS_PROGRAM) " + platform_cppflags(platform))
-    r += var_set(canonical_name() + "_CCASFLAGS", "$(AM_CCASFLAGS) $(CCASFLAGS_PROGRAM) " + platform_ccasflags(platform))
-
-    r += gvar_add("EXTRA_DIST", platform_extra_dist(platform))
-    r += gvar_add("BUILT_SOURCES", "$(nodist_" + canonical_name() + "_SOURCES)")
-    r += gvar_add("CLEANFILES", "$(nodist_" + canonical_name() + "_SOURCES)")
-
-    if test:
-        r += if_tag_defined("enable", lambda: gvar_add("TESTS", "[+ name +]"))
-    else:
-        r += if_tag("mansection", lambda: manpage())
-
+    r = set_canonical_name_suffix("")
+
+    r += "[+ IF testcase defined +]"
+    r += gvar_add("check_PROGRAMS", "[+ name +]")
+    r += gvar_add("TESTS", "[+ name +]")
+    r += "[+ ELSE +]"
+    r += var_add(installdir() + "_PROGRAMS", "[+ name +]")
+    r += "[+ IF mansection +]" + manpage() + "[+ ENDIF +]"
+    r += "[+ ENDIF +]"
+
+    r += var_set(cname() + "_SOURCES", platform_sources(platform))
+    r += var_set("nodist_" + cname() + "_SOURCES", platform_nodist_sources(platform))
+    r += var_set(cname() + "_LDADD", platform_ldadd(platform))
+    r += var_set(cname() + "_CFLAGS", "$(AM_CFLAGS) $(CFLAGS_PROGRAM) " + platform_cflags(platform))
+    r += var_set(cname() + "_LDFLAGS", "$(AM_LDFLAGS) $(LDFLAGS_PROGRAM) " + platform_ldflags(platform))
+    r += var_set(cname() + "_CPPFLAGS", "$(AM_CPPFLAGS) $(CPPFLAGS_PROGRAM) " + platform_cppflags(platform))
+    r += var_set(cname() + "_CCASFLAGS", "$(AM_CCASFLAGS) $(CCASFLAGS_PROGRAM) " + platform_ccasflags(platform))
+    # r += var_set(cname() + "_DEPENDENCIES", platform_dependencies(platform) + " " + platform_ldadd(platform))
+
+    r += gvar_add("EXTRA_DIST", extra_dist())
+    r += gvar_add("BUILT_SOURCES", "$(nodist_" + cname() + "_SOURCES)")
+    r += gvar_add("CLEANFILES", "$(nodist_" + cname() + "_SOURCES)")
     return r
 
-def test_program(platform):
-    return program(platform, True)
-
 def data(platform):
     r  = gvar_add("EXTRA_DIST", platform_sources(platform))
-    r += gvar_add("EXTRA_DIST", platform_extra_dist(platform))
-    r += gvar_add(installdir() + "_DATA", platform_sources(platform))
+    r += gvar_add("EXTRA_DIST", extra_dist())
+    r += var_add(installdir() + "_DATA", platform_sources(platform))
     return r
 
-def script(platform, test=False):
-    if test:
-        r = gvar_add("check_SCRIPTS", "[+ name +]")
-    else:
-        r  = gvar_add(installdir() + "_SCRIPTS", "[+ name +]")
-
-    r += rule("[+ name +]", "$(top_builddir)/config.status " + platform_sources(platform), """
-$(top_builddir)/config.status --file=-:""" + platform_sources(platform) + """ \
-  | sed -e 's,@pkglib_DATA@,$(pkglib_DATA),g' > $@
+def script(platform):
+    r  = "[+ IF testcase defined +]"
+    r += gvar_add("check_SCRIPTS", "[+ name +]")
+    r += gvar_add ("TESTS", "[+ name +]")
+    r += "[+ ELSE +]"
+    r += var_add(installdir() + "_SCRIPTS", "[+ name +]")
+    r += "[+ IF mansection +]" + manpage() + "[+ ENDIF +]"
+    r += "[+ ENDIF +]"
+
+    r += rule("[+ name +]", platform_sources(platform) + " $(top_builddir)/config.status", """
+$(top_builddir)/config.status --file=-:$< | sed -e 's,@pkglib_DATA@,$(pkglib_DATA),g' > $@
 chmod a+x [+ name +]
 """)
 
     r += gvar_add("CLEANFILES", "[+ name +]")
-    r += gvar_add("EXTRA_DIST", platform_sources(platform))
-
-    if test:
-        r += if_tag_defined("enable", lambda: gvar_add("TESTS", "[+ name +]"))
-    else:
-        r += if_tag("mansection", lambda: manpage())
-
+    r += gvar_add("dist_noinst_DATA", platform_sources(platform))
     return r
 
-def test_script(platform):
-    return script(platform, True)
-
-def with_enable_condition(x):
-    return "[+ IF enable +]if [+ enable +]\n" + x + "endif\n[+ ELSE +]" + x + "[+ ENDIF +]"
+def rules(target, closure):
+    # Create association lists for the benefit of first_time and vars_init.
+    r = "[+ (define seen-target '()) +]"
+    r += "[+ (define seen-vars '()) +]"
+    # Most output goes to a diversion.  This allows us to emit variable
+    # initializations before everything else.
+    r += "[+ (out-push-new) +]"
+
+    r += "[+ FOR " + target + " +]"
+    r += foreach_enabled_platform(
+        lambda p: under_platform_specific_conditionals(p, closure(p)))
+    # Remember that we've seen this target.
+    r += "[+ (set! seen-target (assoc-set! seen-target (get \".name\") 0)) +]"
+    r += "[+ ENDFOR +]"
+    r += "[+ (out-pop #t) +]"
+    return r
 
 def module_rules():
-    return for_tag("module", lambda: with_enable_condition(each_platform(lambda p: module(p))))
+    return rules("module", module)
 
 def kernel_rules():
-    return for_tag("kernel", lambda: with_enable_condition(each_platform(lambda p: kernel(p))))
+    return rules("kernel", kernel)
 
 def image_rules():
-    return for_tag("image", lambda: with_enable_condition(each_platform(lambda p: image(p))))
+    return rules("image", image)
 
 def library_rules():
-    return for_tag("library", lambda: with_enable_condition(each_platform(lambda p: library(p))))
+    return rules("library", library)
 
 def program_rules():
-    return for_tag("program", lambda: with_enable_condition(each_platform(lambda p: program(p))))
+    return rules("program", program)
 
 def script_rules():
-    return for_tag("script", lambda: with_enable_condition(each_platform(lambda p: script(p))))
+    return rules("script", script)
 
 def data_rules():
-    return for_tag("data", lambda: with_enable_condition(each_platform(lambda p: data(p))))
-
-def test_program_rules():
-    return for_tag("test_program", lambda: with_enable_condition(each_platform(lambda p: test_program(p))))
-
-def test_script_rules():
-    return for_tag("test_script", lambda: with_enable_condition(each_platform(lambda p: test_script(p))))
+    return rules("data", data)
 
 print "[+ AutoGen5 template +]\n"
 a = module_rules()
@@ -442,11 +494,9 @@ d = library_rules()
 e = program_rules()
 f = script_rules()
 g = data_rules()
-h = test_program_rules()
-i = test_script_rules()
 z = global_variable_initializers()
 
-print z # initializer for all vars
+print z # initializer for all vars
 print a
 print b
 print c
@@ -454,16 +504,3 @@ print d
 print e
 print f
 print g
-print h
-print i
-
-print """.PRECIOUS: modules.am
-$(srcdir)/modules.am: $(srcdir)/modules.def $(top_srcdir)/Makefile.tpl
-       autogen -T $(top_srcdir)/Makefile.tpl $(srcdir)/modules.def | sed -e '/^$$/{N;/^\\n$$/D;}' > $@.new || (rm -f $@.new; exit 1)
-       mv $@.new $@
-
-.PRECIOUS: $(top_srcdir)/Makefile.tpl
-$(top_srcdir)/Makefile.tpl: $(top_srcdir)/gentpl.py
-       python $(top_srcdir)/gentpl.py | sed -e '/^$$/{N;/^\\n$$/D;}' > $@.new || (rm -f $@.new; exit 1)
-       mv $@.new $@
-"""