From f5a46bd70fd6403188236c793ecbfa025c6a75e4 Mon Sep 17 00:00:00 2001
From: Jaime Passos <lazymyuutsu@gmail.com>
Date: Sun, 9 Feb 2020 16:11:52 -0300
Subject: [PATCH 1/3] Don't add a TOL_ twice.

---
 src/dehacked.c | 45 +++++++++++++++++++++++++++++++--------------
 1 file changed, 31 insertions(+), 14 deletions(-)

diff --git a/src/dehacked.c b/src/dehacked.c
index 45f00b8cf..1c4be1d03 100644
--- a/src/dehacked.c
+++ b/src/dehacked.c
@@ -585,17 +585,26 @@ static void readfreeslots(MYFILE *f)
 					continue;
 				// Copy in the spr2 name and increment free_spr2.
 				if (free_spr2 < NUMPLAYERSPRITES) {
-					CONS_Printf("Sprite SPR2_%s allocated.\n",word);
 					strncpy(spr2names[free_spr2],word,4);
 					spr2defaults[free_spr2] = 0;
 					spr2names[free_spr2++][4] = 0;
 				} else
-					CONS_Alert(CONS_WARNING, "Ran out of free SPR2 slots!\n");
+					deh_warning("Ran out of free SPR2 slots!\n");
 			}
 			else if (fastcmp(type, "TOL"))
 			{
-				if (lastcustomtol > 31)
-					CONS_Alert(CONS_WARNING, "Ran out of free typeoflevel slots!\n");
+				// Search if we already have a typeoflevel by that name...
+				for (i = 0; i < numtolinfo; i++)
+					if (fastcmp(word, TYPEOFLEVEL[i].name))
+						break;
+
+				// We found it? Then don't allocate another one.
+				if (i < numtolinfo)
+					continue;
+
+				// We don't, so freeslot it.
+				if (lastcustomtol > 31) // Unless you have way too many, since they're flags.
+					deh_warning("Ran out of free typeoflevel slots!\n");
 				else
 				{
 					G_AddTOL((1<<lastcustomtol), word);
@@ -10465,16 +10474,24 @@ static inline int lib_freeslot(lua_State *L)
 		}
 		else if (fastcmp(type, "TOL"))
 		{
-			if (lastcustomtol > 31)
-				CONS_Alert(CONS_WARNING, "Ran out of free typeoflevel slots!\n");
-			else
-			{
-				UINT32 newtol = (1<<lastcustomtol);
-				CONS_Printf("TypeOfLevel TOL_%s allocated.\n",word);
-				G_AddTOL(newtol, word);
-				lua_pushinteger(L, newtol);
-				lastcustomtol++;
-				r++;
+			// Search if we already have a typeoflevel by that name...
+			int i;
+			for (i = 0; i < numtolinfo; i++)
+				if (fastcmp(word, TYPEOFLEVEL[i].name))
+					break;
+
+			// We don't, so allocate a new one.
+			if (i >= numtolinfo) {
+				if (lastcustomtol > 31) // Unless you have way too many, since they're flags.
+					CONS_Alert(CONS_WARNING, "Ran out of free typeoflevel slots!\n");
+				else {
+					UINT32 newtol = (1<<lastcustomtol);
+					CONS_Printf("TypeOfLevel TOL_%s allocated.\n",word);
+					G_AddTOL(newtol, word);
+					lua_pushinteger(L, newtol);
+					lastcustomtol++;
+					r++;
+				}
 			}
 		}
 		Z_Free(s);

From 83112c82486d27ddea9edadee4b1a3618da7fa0b Mon Sep 17 00:00:00 2001
From: Jaime Passos <lazymyuutsu@gmail.com>
Date: Wed, 12 Feb 2020 13:41:30 -0300
Subject: [PATCH 2/3] Add MAXTOL

---
 src/dehacked.c | 56 +++++++++++---------------------------------------
 src/doomstat.h |  9 ++++----
 src/g_game.c   | 42 +++++++++++++++++++++++++++++++------
 3 files changed, 53 insertions(+), 54 deletions(-)

diff --git a/src/dehacked.c b/src/dehacked.c
index 958eaad32..79d0b46dd 100644
--- a/src/dehacked.c
+++ b/src/dehacked.c
@@ -594,21 +594,21 @@ static void readfreeslots(MYFILE *f)
 			else if (fastcmp(type, "TOL"))
 			{
 				// Search if we already have a typeoflevel by that name...
-				for (i = 0; i < numtolinfo; i++)
+				for (i = 0; TYPEOFLEVEL[i].name; i++)
 					if (fastcmp(word, TYPEOFLEVEL[i].name))
 						break;
 
 				// We found it? Then don't allocate another one.
-				if (i < numtolinfo)
+				if (TYPEOFLEVEL[i].name)
 					continue;
 
 				// We don't, so freeslot it.
-				if (lastcustomtol > 31) // Unless you have way too many, since they're flags.
+				if (lastcustomtol == MAXTOL) // Unless you have way too many, since they're flags.
 					deh_warning("Ran out of free typeoflevel slots!\n");
 				else
 				{
-					G_AddTOL((1<<lastcustomtol), word);
-					lastcustomtol++;
+					G_AddTOL(lastcustomtol, word);
+					lastcustomtol <<= 1;
 				}
 			}
 			else
@@ -1114,38 +1114,7 @@ static void readsprite2(MYFILE *f, INT32 num)
 	Z_Free(s);
 }
 
-INT32 numtolinfo = NUMBASETOL;
-UINT32 lastcustomtol = 13;
-
-tolinfo_t TYPEOFLEVEL[NUMMAXTOL] = {
-	{"SOLO",TOL_SP},
-	{"SP",TOL_SP},
-	{"SINGLEPLAYER",TOL_SP},
-	{"SINGLE",TOL_SP},
-
-	{"COOP",TOL_COOP},
-	{"CO-OP",TOL_COOP},
-
-	{"COMPETITION",TOL_COMPETITION},
-	{"RACE",TOL_RACE},
-
-	{"MATCH",TOL_MATCH},
-	{"TAG",TOL_TAG},
-	{"CTF",TOL_CTF},
-
-	{"2D",TOL_2D},
-	{"MARIO",TOL_MARIO},
-	{"NIGHTS",TOL_NIGHTS},
-	{"OLDBRAK",TOL_ERZ3},
-
-	{"XMAS",TOL_XMAS},
-	{"CHRISTMAS",TOL_XMAS},
-	{"WINTER",TOL_XMAS},
-
-	{NULL, 0}
-};
-
-// copypasted from readPlayer :sleep:
+// copypasted from readPlayer :]
 static const char *const GAMETYPERULE_LIST[];
 static void readgametype(MYFILE *f, char *gtname)
 {
@@ -10479,20 +10448,19 @@ static inline int lib_freeslot(lua_State *L)
 		{
 			// Search if we already have a typeoflevel by that name...
 			int i;
-			for (i = 0; i < numtolinfo; i++)
+			for (i = 0; TYPEOFLEVEL[i].name; i++)
 				if (fastcmp(word, TYPEOFLEVEL[i].name))
 					break;
 
 			// We don't, so allocate a new one.
-			if (i >= numtolinfo) {
-				if (lastcustomtol > 31) // Unless you have way too many, since they're flags.
+			if (TYPEOFLEVEL[i].name == NULL) {
+				if (lastcustomtol == MAXTOL) // Unless you have way too many, since they're flags.
 					CONS_Alert(CONS_WARNING, "Ran out of free typeoflevel slots!\n");
 				else {
-					UINT32 newtol = (1<<lastcustomtol);
 					CONS_Printf("TypeOfLevel TOL_%s allocated.\n",word);
-					G_AddTOL(newtol, word);
-					lua_pushinteger(L, newtol);
-					lastcustomtol++;
+					G_AddTOL(lastcustomtol, word);
+					lua_pushinteger(L, lastcustomtol);
+					lastcustomtol <<= 1;
 					r++;
 				}
 			}
diff --git a/src/doomstat.h b/src/doomstat.h
index c7c12632a..cf02e4389 100644
--- a/src/doomstat.h
+++ b/src/doomstat.h
@@ -437,6 +437,7 @@ extern const char *Gametype_ConstantNames[NUMGAMETYPES];
 extern INT32 pointlimits[NUMGAMETYPES];
 extern INT32 timelimits[NUMGAMETYPES];
 
+// TypeOfLevel things
 enum TypeOfLevel
 {
 	TOL_SP          = 0x01, ///< Single Player
@@ -461,16 +462,16 @@ enum TypeOfLevel
 	TOL_XMAS   = 0x1000, ///< Christmas NiGHTS
 };
 
-#define NUMBASETOL 18
-#define NUMMAXTOL (18 + NUMGAMETYPEFREESLOTS)
+#define MAXTOL             (1<<31)
+#define NUMBASETOLNAMES    (19)
+#define NUMTOLNAMES        (NUMBASETOLNAMES + NUMGAMETYPEFREESLOTS)
 
 typedef struct
 {
 	const char *name;
 	UINT32 flag;
 } tolinfo_t;
-extern tolinfo_t TYPEOFLEVEL[NUMMAXTOL];
-extern INT32 numtolinfo;
+extern tolinfo_t TYPEOFLEVEL[NUMTOLNAMES];
 extern UINT32 lastcustomtol;
 
 extern tic_t totalplaytime;
diff --git a/src/g_game.c b/src/g_game.c
index efc96a50f..9f6a6882f 100644
--- a/src/g_game.c
+++ b/src/g_game.c
@@ -3384,6 +3384,36 @@ UINT32 gametypetol[NUMGAMETYPES] =
 	TOL_CTF, // CTF
 };
 
+tolinfo_t TYPEOFLEVEL[NUMTOLNAMES] = {
+	{"SOLO",TOL_SP},
+	{"SP",TOL_SP},
+	{"SINGLEPLAYER",TOL_SP},
+	{"SINGLE",TOL_SP},
+
+	{"COOP",TOL_COOP},
+	{"CO-OP",TOL_COOP},
+
+	{"COMPETITION",TOL_COMPETITION},
+	{"RACE",TOL_RACE},
+
+	{"MATCH",TOL_MATCH},
+	{"TAG",TOL_TAG},
+	{"CTF",TOL_CTF},
+
+	{"2D",TOL_2D},
+	{"MARIO",TOL_MARIO},
+	{"NIGHTS",TOL_NIGHTS},
+	{"OLDBRAK",TOL_ERZ3},
+
+	{"XMAS",TOL_XMAS},
+	{"CHRISTMAS",TOL_XMAS},
+	{"WINTER",TOL_XMAS},
+
+	{NULL, 0}
+};
+
+UINT32 lastcustomtol = (TOL_XMAS<<1);
+
 //
 // G_AddTOL
 //
@@ -3391,16 +3421,16 @@ UINT32 gametypetol[NUMGAMETYPES] =
 //
 void G_AddTOL(UINT32 newtol, const char *tolname)
 {
-	TYPEOFLEVEL[numtolinfo].name = Z_StrDup(tolname);
-	TYPEOFLEVEL[numtolinfo].flag = newtol;
-	numtolinfo++;
+	INT32 i;
+	for (i = 0; TYPEOFLEVEL[i].name; i++)
+		;
 
-	TYPEOFLEVEL[numtolinfo].name = NULL;
-	TYPEOFLEVEL[numtolinfo].flag = 0;
+	TYPEOFLEVEL[i].name = Z_StrDup(tolname);
+	TYPEOFLEVEL[i].flag = newtol;
 }
 
 //
-// G_AddTOL
+// G_AddGametypeTOL
 //
 // Assigns a type of level to a gametype.
 //

From 495812aa0ee5ff61f3ae5da6d39f00dc012cdb66 Mon Sep 17 00:00:00 2001
From: Jaime Passos <lazymyuutsu@gmail.com>
Date: Wed, 12 Feb 2020 13:59:08 -0300
Subject: [PATCH 3/3] Cast Moment

---
 src/dehacked.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/dehacked.c b/src/dehacked.c
index 79d0b46dd..4d1147276 100644
--- a/src/dehacked.c
+++ b/src/dehacked.c
@@ -603,7 +603,7 @@ static void readfreeslots(MYFILE *f)
 					continue;
 
 				// We don't, so freeslot it.
-				if (lastcustomtol == MAXTOL) // Unless you have way too many, since they're flags.
+				if (lastcustomtol == (UINT32)MAXTOL) // Unless you have way too many, since they're flags.
 					deh_warning("Ran out of free typeoflevel slots!\n");
 				else
 				{
@@ -10454,7 +10454,7 @@ static inline int lib_freeslot(lua_State *L)
 
 			// We don't, so allocate a new one.
 			if (TYPEOFLEVEL[i].name == NULL) {
-				if (lastcustomtol == MAXTOL) // Unless you have way too many, since they're flags.
+				if (lastcustomtol == (UINT32)MAXTOL) // Unless you have way too many, since they're flags.
 					CONS_Alert(CONS_WARNING, "Ran out of free typeoflevel slots!\n");
 				else {
 					CONS_Printf("TypeOfLevel TOL_%s allocated.\n",word);