From: Lady <redacted>
Date: Mon, 22 Jan 2024 00:44:23 +0000 (-0500)
Subject: Add uninstall command; fix other phonies
X-Git-Tag: 0.4.3~4
X-Git-Url: https://git.ladys.computer/Shushe/commitdiff_plain/964a6521326c8630f5589de971afaac5f6d68870?ds=inline

Add uninstall command; fix other phonies

`make uninstall` can now be used to remove (only) installed files. Note
that it only removes files which correspond to presently‐extant source
files; if a source is removed, then `make uninstall` will not remove
any previously‐installed derivatives.

`make all` used to compile assets, but this is unnecessary.

`make clean` now guards against `BUILDDIR` being empty (which would
otherwise result in a dangerous `rm -rf /`).
---

diff --git a/GNUmakefile b/GNUmakefile
index 8ce3537..a0f6983 100644
--- a/GNUmakefile
+++ b/GNUmakefile
@@ -49,7 +49,7 @@ override define makefileinfo
 ║│                                                            │║
 ║│ • `make clean´: Remove `BUILDDIR´.                         │║
 ║│                                                            │║
-║│ • `make gone´: Remove installed files.                     │║
+║│ • `make gone´: Remove `BUILDDIR´ and installed files.      │║
 ║│                                                            │║
 ║│ • `make help´ (default): Print this message.               │║
 ║│                                                            │║
@@ -59,6 +59,9 @@ override define makefileinfo
 ║│ • `make list´: List all recognized source files and their  │║
 ║│   classification (including media type and dependencies).  │║
 ║│                                                            │║
+║│ • `make uninstall´: Remove installed files, but not        │║
+║│   `BUILDDIR´.                                              │║
+║│                                                            │║
 ║│ Set `VERBOSE=1´ to see the text of commands as they are    │║
 ║│ executed.                                                  │║
 ║│                                                            │║
@@ -305,6 +308,11 @@ override recursivefiles := $(foreach file,$(filter-out $(assetfiles),$(sourcefil
 # This is all of the non·asset, nonrecursive files.
 override compilablefiles := $(filter-out $(assetfiles) $(recursivefiles),$(sourcefiles))
 
+# Collect all files which can be installed.
+#
+# This is all of the comilable files and all asset sources.
+override installablefiles := $(compilablefiles) $(filter $(assetfiles),$(sourcefiles))
+
 ifneq ($(wildcard $(BUILDDIR)/destinations),)
 # Get the output of the destination transform.
 override destinations := $(shell $(CAT) $(BUILDDIR)/destinations)
@@ -343,23 +351,26 @@ help:
 	@$(PRINTF) '%b' '$(subst $(newline),\n,$(makefileinfo))'
 
 # Compile all files, or error if any are recursive.
-all: $(call compiled,$(recursivefiles) $(compilablefiles) $(filter $(sourcefiles),$(assetfiles)));
+all: $(call compiled,$(recursivefiles) $(compilablefiles));
 
 # Destroy buildfiles.
 clean:
-	$(silent)$(RM) -rf $(BUILDDIR)/
+	$(if $(BUILDDIR),$(silent)$(RM) -rf $(call quote,$(BUILDDIR)/),)
 
-# Destroy buildfiles and the install directory.
-gone:
-	$(silent)$(RM) -rf $(BUILDDIR)/ $(call compiled,$(recursivefiles) $(compilablefiles))
+# Destroy build directory and installed files.
+gone: clean uninstall;
 
-# Install the compiled files into `DESTDIR´.
-install: $(call installed,$(recursivefiles) $(compilablefiles) $(filter $(sourcefiles),$(assetfiles)));
+# Install the compiled files into `DESTDIR´, or error if any are recursive.
+install: $(call installed,$(recursivefiles) $(installablefiles));
 
 # List all source files and includes and their computed types.
 list:
 	@$(PRINTF) '%b' $(call quote,$(foreach file,$(sort $(sourcefiles)) $(sort $(sourceincludes)),\0033[1m$(file)\0033[22m|$(call typeoffile,$(file))|[\0033[3m$(if $(filter $(file),$(xmlfiles)),xml,$(if $(filter $(file),$(plaintextfiles)),text,asset))$(if $(filter $(file),$(sourceincludes)),|include,)\0033[23m]$(if $(call dependencies,$(file))$(call recursives,$(file)), $(strip $(foreach recursive,$(call recursives,$(file)),\0033[93;41m•|Recursive|Dependency|\0033[39;49m|$(recursive)) $(foreach dependency,$(call dependencies,$(file)),\0033[2m•|Dependency|\0033[22m|$(dependency))))$(if $(filter $(file),$(sourcefiles)), →|<\0033[4m/$(call destination,$(file))\0033[24m>,) )) | $(TR) ' |' '\n '
 
+# Destroy build directory and installed files.
+uninstall:
+	$(foreach file,$(installablefiles),$(if $(wildcard $(call installed,$(file))),$(silent)$(PRINTF) '%s\n' $(call quote,Removing </$(patsubst $(DESTDIR)/%,%,$(call installed,$(file)))>…)$(newline)$(silent)$(RM) -f $(call quote,$(call installed,$(file)))$(newline),))
+
 # Raise an error when attempting to build any files with recursive dependencies.
 $(call compiled,$(recursivefiles)):
 	@$(PRINTF) '%b\n' $(call quote,\0033[93;41mError:\0033[39;49m `$(call uncompiled,$@)´ has recursive dependencies:\n$(subst |, ,$(subst $(space),$(newline),$(foreach recursive,$(call recursives,$(call uncompiled,$@)),•|$(recursive))))) && false
@@ -372,8 +383,8 @@ $(call compiled,$(recursivefiles)):
 # Don’t use any implicit rules.
 .SUFFIXES: ;
 
-# Phony rules; always consider these out‐of‐date.
-.PHONY: all default clean gone info install list $(call compiled,$(recursivefiles));
+# Phony rules; always consider these out·of·date.
+.PHONY: all default clean gone info install list uninstall $(call compiled,$(recursivefiles));
 
 ifneq ($(wildcard $(BUILDDIR)/.update-types)$(wildcard $(BUILDDIR)/dependencies),)
 # Reload this make·file if the dependency graph has changed.