handle corrupted saves and re export on datSource creation (#88)

Author: QuickStick123

src/Export/Classes/GGPKSourceListControl.lua

@@ -43,7 +43,7 @@ function GGPKSourceListClass:EditDATSource(datSource, newSource)
 		controls.save.enabled = (controls.dat.buf:match("%S") or controls.ggpk.buf:match("%S")) and controls.label.buf:match("%S") and buf:match("%S")
 	end)
 	controls.save = new("ButtonControl", {"TOP",controls.spec,"TOP"}, {-45, 22, 80, 20}, "Save", function()
-		local reload = datSource.label == main.datSource.label
+		local reload = datSource.label == (main.datSource and main.datSource.label)
 		datSource.label = controls.label.buf
 		datSource.ggpkPath = controls.ggpk.buf or ""
 		datSource.datFilePath = controls.dat.buf or ""

src/Export/Main.lua

@@ -334,11 +334,13 @@ end
 
 function main:LoadDatSource(value)
 	self.leagueLabel = nil
+	local reExportState = self.reExportGGPKData
+	self.reExportGGPKData = true
+	self.datSource = value
 	local out = io.open(self.datSource.spec..(self.datSource.spec:match("%.lua$") and "" or ".lua"), "w")
 	out:write('return ')
 	writeLuaTable(out, self.datSpecs, 1)
 	out:close()
-	self.datSource = value
 	self.datSpecs = LoadModule(self.datSource.spec)
 	self:InitGGPK()
 	if USE_DAT64 then
@@ -349,6 +351,7 @@ function main:LoadDatSource(value)
 	if self.datFileByName["leaguenames"] then
 		self.leagueLabel = self.datFileByName["leaguenames"]:ReadValueText({ type = "String" }, self.datFileByName["leaguenames"].rows[2] + 8)
 	end
+	self.reExportGGPKData = reExportState
 end
 
 function main:OpenPathPopup()
@@ -520,7 +523,7 @@ function main:LoadSettings()
 	end
 	for _, node in ipairs(setXML[1]) do
 		if type(node) == "table" then
-			if node.elem == "DatSource" then
+			if node.elem == "DatSource" and (node.attrib.ggpkPath or node.attrib.path) and node.attrib.datFilePath then
 				self.datSource = self.datSource or { }
 				self.datSource.ggpkPath = node.attrib.ggpkPath or node.attrib.path
 				self.datSource.datFilePath = node.attrib.datFilePath
@@ -530,18 +533,19 @@ function main:LoadSettings()
 			if node.elem == "DatSources" then
 				self.datSources = self.datSources or { }
 				for _, child in ipairs(node) do
-					t_insert(self.datSources, { ggpkPath = child.attrib.ggpkPath, datFilePath = child.attrib.datFilePath, label = child.attrib.label, spec = child.attrib.spec })
+					if (child.attrib.ggpkPath or child.attrib.path) and child.attrib.datFilePath then
+						t_insert(self.datSources, { ggpkPath = child.attrib.ggpkPath, datFilePath = child.attrib.datFilePath, label = child.attrib.label, spec = child.attrib.spec })
+					end
 				end
 			end
 		end
 	end
-	if type(self.datSources) ~= "table" then
-		self.datSources = { }
-	end
-	if not next(self.datSources) then
+	if self.datSources and not next(self.datSources) and self.datSource then
 		t_insert(self.datSources, self.datSource)
 	end
-	self.datSource = self.datSource or self.datSources[1]
+	if not self.datSoruce and self.datSources then
+		self.datSource = self.datSources[1]
+	end
 end
 
 function main:SaveSettings()