From a55a5ee5a4a5bad50c3c972bf9dcae849324c1f4 Mon Sep 17 00:00:00 2001
From: YoshiRulz <OSSYoshiRulz+git@gmail.com>
Date: Wed, 12 Jun 2024 09:41:15 +1000
Subject: [PATCH] Add `--help` command-line flag

---
 src/BizHawk.Client.Common/ArgParser.cs | 25 +++++++++++++++++++++++--
 src/BizHawk.Client.EmuHawk/Program.cs  |  3 ++-
 2 files changed, 25 insertions(+), 3 deletions(-)

diff --git a/src/BizHawk.Client.Common/ArgParser.cs b/src/BizHawk.Client.Common/ArgParser.cs
index 89b65acdb8..02796fd981 100644
--- a/src/BizHawk.Client.Common/ArgParser.cs
+++ b/src/BizHawk.Client.Common/ArgParser.cs
@@ -25,6 +25,8 @@ namespace BizHawk.Client.Common
 
 		private static readonly Argument<string?> ArgumentRomFilePath = new("rom", () => null);
 
+		private static readonly IReadOnlyList<Option> GeneratedOptions;
+
 		private static readonly BespokeOption<string?> OptionAVDumpAudioSync = new(name: "--audiosync", description: "bool; `true` is the only truthy value, all else falsey; if not set, uses remembered state from config");
 
 		private static readonly BespokeOption<int?> OptionAVDumpEndAtFrame = new("--dump-length");
@@ -112,7 +114,7 @@ namespace BizHawk.Client.Common
 
 			Parser = new CommandLineBuilder(root)
 //				.UseVersionOption() // "cannot be combined with other arguments" which is fair enough but `--config` is crucial on NixOS
-//				.UseHelp() //TODO
+				.UseHelp()
 //				.UseEnvironmentVariableDirective() // useless
 				.UseParseDirective()
 				.UseSuggestDirective()
@@ -122,10 +124,16 @@ namespace BizHawk.Client.Common
 //				.UseExceptionHandler() // we're only using the parser, so nothing should be throwing
 //				.CancelOnProcessTermination() // we're only using the parser, so there's not really anything to cancel
 				.Build();
+			GeneratedOptions = root.Options.Where(static o =>
+			{
+				var t = o.GetType();
+				return !t.IsGenericType || t.GetGenericTypeDefinition() != typeof(BespokeOption<>); // no there is no simpler way to do this
+			}).ToArray();
 		}
 
+		/// <return>exit code, or <see langword="null"/> if should not exit</return>
 		/// <exception cref="ArgParserException">parsing failure, or invariant broken</exception>
-		public static void ParseArguments(out ParsedCLIFlags parsed, string[] args)
+		public static int? ParseArguments(out ParsedCLIFlags parsed, string[] args)
 		{
 			parsed = default;
 			var result = Parser.Parse(args);
@@ -136,6 +144,18 @@ namespace BizHawk.Client.Common
 				foreach (var error in result.Errors) Console.WriteLine(error.Message);
 				throw new ArgParserException($"failed to parse command-line arguments: {result.Errors[0].Message}");
 			}
+			var triggeredGeneratedOption = GeneratedOptions.FirstOrDefault(o => result.FindResultFor(o) is not null);
+			if (triggeredGeneratedOption is not null)
+			{
+				// means e.g. `./EmuHawkMono.sh --help` was passed, run whatever behaviour it normally has...
+				var exitCode = result.Invoke();
+				// ...and maybe exit
+				if (exitCode is not 0
+					|| triggeredGeneratedOption.Name is "help") // `Name` may be localised meaning this won't work? I can't grok the source for `HelpOption`
+				{
+					return exitCode;
+				}
+			}
 
 			var autoDumpLength = result.GetValueForOption(OptionAVDumpEndAtFrame);
 			HashSet<int>? currAviWriterFrameList = null;
@@ -202,6 +222,7 @@ namespace BizHawk.Client.Common
 				userdataUnparsedPairs: userdataUnparsedPairs,
 				cmdRom: result.GetValueForArgument(ArgumentRomFilePath)
 			);
+			return null;
 		}
 
 		public sealed class ArgParserException : Exception
diff --git a/src/BizHawk.Client.EmuHawk/Program.cs b/src/BizHawk.Client.EmuHawk/Program.cs
index 2b2c151dbc..6c00180fc1 100644
--- a/src/BizHawk.Client.EmuHawk/Program.cs
+++ b/src/BizHawk.Client.EmuHawk/Program.cs
@@ -150,11 +150,12 @@ namespace BizHawk.Client.EmuHawk
 			ParsedCLIFlags cliFlags = default;
 			try
 			{
-				ArgParser.ParseArguments(out cliFlags, args);
+				if (ArgParser.ParseArguments(out cliFlags, args) is int exitCode1) return exitCode1;
 			}
 			catch (ArgParser.ArgParserException e)
 			{
 				new ExceptionBox(e.Message).ShowDialog();
+				return 1;
 			}
 
 			var configPath = cliFlags.cmdConfigFile ?? Path.Combine(PathUtils.ExeDirectoryPath, "config.ini");