Initialize with OpenTTD 1.9.3

src/misc/getoptdata.cpp

@@ -0,0 +1,85 @@
+/* $Id$ */
+
+/*
+ * This file is part of OpenTTD.
+ * OpenTTD is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, version 2.
+ * OpenTTD is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+ * See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with OpenTTD. If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/** @file getoptdata.cpp Library for parsing command line options. */
+
+#include "../stdafx.h"
+#include "getoptdata.h"
+
+#include "../safeguards.h"
+
+/**
+ * Find the next option.
+ * @return Function returns one
+ * - An option letter if it found another option.
+ * - -1 if option processing is finished. Inspect #argv and #numleft to find the command line arguments.
+ * - -2 if an error was encountered.
+ */
+int GetOptData::GetOpt()
+{
+	const OptionData *odata;
+
+	char *s = this->cont;
+	if (s == NULL) {
+		if (this->numleft == 0) return -1; // No arguments left -> finished.
+
+		s = this->argv[0];
+		if (*s != '-') return -1; // No leading '-' -> not an option -> finished.
+
+		this->argv++;
+		this->numleft--;
+
+		/* Is it a long option? */
+		for (odata = this->options; odata->flags != ODF_END; odata++) {
+			if (odata->longname != NULL && !strcmp(odata->longname, s)) { // Long options always use the entire argument.
+				this->cont = NULL;
+				goto set_optval;
+			}
+		}
+
+		s++; // Skip leading '-'.
+	}
+
+	/* Is it a short option? */
+	for (odata = this->options; odata->flags != ODF_END; odata++) {
+		if (odata->shortname != '\0' && *s == odata->shortname) {
+			this->cont = (s[1] != '\0') ? s + 1 : NULL;
+
+set_optval: // Handle option value of *odata .
+			this->opt = NULL;
+			switch (odata->flags) {
+				case ODF_NO_VALUE:
+					return odata->id;
+
+				case ODF_HAS_VALUE:
+				case ODF_OPTIONAL_VALUE:
+					if (this->cont != NULL) { // Remainder of the argument is the option value.
+						this->opt = this->cont;
+						this->cont = NULL;
+						return odata->id;
+					}
+					/* No more arguments, either return an error or a value-less option. */
+					if (this->numleft == 0) return (odata->flags == ODF_HAS_VALUE) ? -2 : odata->id;
+
+					/* Next argument looks like another option, let's not return it as option value. */
+					if (odata->flags == ODF_OPTIONAL_VALUE && this->argv[0][0] == '-') return odata->id;
+
+					this->opt = this->argv[0]; // Next argument is the option value.
+					this->argv++;
+					this->numleft--;
+					return odata->id;
+
+				default: NOT_REACHED();
+			}
+		}
+	}
+
+	return -2; // No other ways to interpret the text -> error.
+}
+