Upload installer

ccptinstall.lua

@@ -0,0 +1,153 @@
+-- Read arguments
+args = {...}
+
+-- FILE MANIPULATION FUNCTIONS --
+--[[ Checks if file exists
+	@param String filepath: Filepath to check
+	@return boolean: Does the file exist?
+--]]
+function file_exists(filepath)
+	local f=io.open(filepath,"r")
+	if f~=nil then 
+		io.close(f) 
+		return true 
+	else 
+		return false 
+	end
+end
+
+--[[ Stores a file in a desired location
+	@param String filepath: Filepath where to create file (if file already exists, it gets overwritten)
+	@param String content: Content to store in file
+--]]
+function storeFile(filepath,content)
+	writefile = fs.open(filepath,"w")
+	writefile.write(content)
+	writefile.close()
+end
+
+--[[ Reads a file from a desired location
+	@param String filepath: Filepath to the file to read
+	@param String createnew: (Optional) Content to store in new file and return if file does not exist. Can be nil.
+	@return String|boolean content|error: Content of the file; If createnew is nil and file doesn't exist boolean false is returned
+--]]
+function readFile(filepath,createnew)
+	readfile = fs.open(filepath,"r")
+	if readfile == nil then
+		if not (createnew==nil) then
+			storeFile(filepath,createnew)
+			return createnew
+		else
+			return false
+		end
+	end
+	content = readfile.readAll()
+	readfile.close()
+	return content
+end
+
+--[[ Stores a table in a file
+	@param String filepath: Filepath where to create file (if file already exists, it gets overwritten)
+	@param Table data: Table to store in file
+--]]
+function storeData(filepath,data)
+	storeFile(filepath,textutils.serialize(data):gsub("\n",""))
+end
+
+--[[ Reads a table from a file in a desired location
+	@param String filepath: Filepath to the file to read
+	@param boolean createnew: If true, an empty table is stored in new file and returned if file does not exist.
+	@return Table|boolean content|error: Table thats stored in the file; If createnew is false and file doesn't exist boolean false is returned
+--]]
+function readData(filepath,createnew)
+	if createnew then
+		return textutils.unserialize(readFile(filepath,textutils.serialize({}):gsub("\n","")))
+	else
+		return textutils.unserialize(readFile(filepath,nil))
+	end
+end
+
+-- HTTP FETCH FUNCTIONS --
+--[[ Gets result of HTTP URL
+	@param String url: The desired URL
+	@return Table|boolean result|error: The result of the request; If the URL is not reachable, an error is printed in the terminal and boolean false is returned
+--]]
+function gethttpresult(url)
+	if not http.checkURL(defaultpackageurl) then
+		print("ERROR: Url '" .. url .. "' is blocked in config. Unable to fetch data.")
+		return false
+	end
+	result = http.get(url)
+	if result == nil then
+		print("ERROR: Unable to reach '" .. url .. "'")
+		return false
+	end
+	return result
+end
+
+--[[ Gets table from HTTP URL
+	@param String url: The desired URL
+	@return Table|boolean result|error: The content of the site parsed into a table; If the URL is not reachable, an error is printed in the terminal and boolean false is returned
+--]]
+function gethttpdata(url)
+	result = gethttpresult(url)
+	if result == false then 
+		return false
+	end
+	data = result.readAll()
+	data = string.gsub(data,"\n","")
+	return textutils.unserialize(data)
+end
+
+--[[ Download file HTTP URL
+	@param String filepath: Filepath where to create file (if file already exists, it gets overwritten)
+	@param String url: The desired URL
+	@return nil|boolean nil|error: nil; If the URL is not reachable, an error is printed in the terminal and boolean false is returned
+--]]
+function downloadfile(filepath,url)
+	result = gethttpresult(url)
+	if result == false then 
+		return false
+	end
+	storeFile(filepath,result.readAll())
+end
+
+-- MAIN PROGRAMM --
+if (args[1]=="install") or (args[1]==nil) then
+	print("[Installer] Well, hello there!")
+	print("[Installer] Thank you for downloading the ComputerCraft Package Tool! Installing...")
+	print("[Installer] Installing 'properprint' library...")
+	if downloadfile("lib/properprint","https://raw.githubusercontent.com/PentagonLP/properprint/main/properprint")== false then
+		return false
+	end
+	print("[Installer] Successfully installed 'properprint'!")
+	print("[Installer] Installing 'ccpt'...")
+	if downloadfile("ccpt","https://raw.githubusercontent.com/PentagonLP/ccpt/main/ccpt")==false then
+		return false
+	end
+	print("[Installer] Successfully installed 'ccpt'!")
+	print("[Installer] Running 'ccpt update'...")
+	shell.run("ccpt","update")
+	print("[Installer] Reading package data...")
+	packagedata = readData("/.ccpt/packagedata")
+	print("[Installer] Storing installed packages...")
+	storeData("/.ccpt/installedpackages",{
+		ccpt = packagedata["ccpt"]["newestversion"],
+		pprint = packagedata["pprint"]["newestversion"]
+	})
+	print("[Installer] 'ccpt' successfully installed!")
+elseif args[1]=="update" then
+	print("[Installer] Updating 'ccpt'...")
+	if downloadfile("ccpt","https://raw.githubusercontent.com/PentagonLP/ccpt/main/ccpt")==false then
+		return false
+	end
+elseif args[1]=="remove" then
+	print("[Installer] Uninstalling 'ccpt'...")
+	fs.delete("/ccpt")
+	fs.delete("/.ccpt")
+	shell.setCompletionFunction("ccpt", nil)
+	print("[Installer] Successfully uninstalled 'ccpt'!")
+	print("[Installer] So long, and thanks for all the fish!")
+else
+	print("Invalid argument: " .. args[1])
+end