View difference between Paste ID: FgAggvy1 and g2ijEJ3S

---[[ /gitget
+if not http then error("HTTP API must be enabled.") end
-	GitHub downloading utility for CC.
+if not term.isColor() then error("An Advanced Computer is required to play this game.") end
-	Developed by apemanzilla.
+
 ------------------------------------------------------------------ utils
- 	Modified into an installer by Detective_Smith
+
-
+local controls = {["\n"]="\\n", ["\r"]="\\r", ["\t"]="\\t", ["\b"]="\\b", ["\f"]="\\f", ["\""]="\\\"", ["\\"]="\\\\"}
-	This requires ElvishJerricco's JSON parsing API.
+local whites = {['\n']=true; ['\r']=true; ['\t']=true; [' ']=true; [',']=true; [':']=true}
-	Direct link: http://pastebin.com/raw.php?i=4nRg9CHU
+local function removeWhite(str)
---]]
+	while whites[str:sub(1, 1)] do
 		str = str:sub(2)
-if not http then
+	end
-  error("HTTP API Must be Enabled.")
+	return str
 end
 
-if not term.isColor() then
+------------------------------------------------------------------ decoding
-  error("Advanced Computer Required to play this game")
+
 local parseBoolean, parseNull, parseNumber, parseString, parseArray, parseMember, parseObject, parseValue
 local decodeControls = {}
 for k,v in pairs(controls) do
-    local p = p or ""
+	decodeControls[v] = k
-    local file = shell.resolve(file)
+
-    if not (fs.exists(string.sub(file,1,#file - #fs.getName(file))) and fs.isDir(string.sub(file,1,#file - #fs.getName(file)))) then
+
-      if fs.exists(string.sub(file,1,#file - #fs.getName(file))) then fs.delete(string.sub(file,1,#file - #fs.getName(file))) end
+parseBoolean = function(str)
-      fs.makeDir(string.sub(file,1,#file - #fs.getName(file)))
+	if str:sub(1, 4) == "true" then
-    end
+		return true, removeWhite(str:sub(5))
-    local f = fs.open(file, "w")
+	else
-    if file == p.. "/MiniatureCraft" then
+		return false, removeWhite(str:sub(6))
-      local line = "local MainFolder = '" ..p.. "'"
+	end
-      f.writeLine(line)
+
-    end
+
-    f.write(data)
+parseNull = function(str)
-    f.close()
+	return nil, removeWhite(str:sub(5))
 end
 
-local function download(url, file, p)
+local numChars = {['e']=true; ['E']=true; ['+']=true; ['-']=true; ['.']=true}
-    save(http.get(url).readAll(), file, p)
+parseNumber = function(str)
 	local i = 1; while numChars[str:sub(i, i)] or tonumber(str:sub(i, i)) do i = i + 1 end
 	return tonumber(str:sub(1, i - 1)), removeWhite(str:sub(i))
-if not json then
+
-    print()
+
-    print("Temporarily Downloading JSON api...\n(Credits to ElvishJerricco!)")
+parseString = function(str)
-    print()
+	str = str:sub(2)
-    download("http://pastebin.com/raw.php?i=4nRg9CHU","json")
+	local s = ""
-    os.loadAPI("json")
+	while str:sub(1,1) ~= "\"" do
-    sleep(1)
+		local next = str:sub(1,1)
 		str = str:sub(2)
 		assert(next ~= "\n", "Unclosed string")
-local blacklist = {
+
-  ".gitattributes",
+		if next == "\\" then
-  ".gitignore",
+			local escape = str:sub(1,1)
-  "LICENSE",
+			str = str:sub(2)
-  "README.md"
+
-}
+			next = assert(decodeControls[next..escape], "Invalid escape character")
 		end
 
-  for i = 1, #blacklist do
+		s = s .. next
-    if blacklist[i] == str then
+	end
-      return false
+	return s, removeWhite(str:sub(2))
-    end
+
-  end
+
-  return true
+parseArray = function(str)
 	str = removeWhite(str:sub(2))
 
-term.clear()
+	local val = {}
-term.setCursorPos(1,1)
+	local i = 1
-print("Folder to install to: ")
+	while str:sub(1, 1) ~= "]" do
-print()
+		local v = nil
-print("Leave Blank for default 'MiniatureCraft' Folder")
+		v, str = parseValue(str)
-print("Put '/' for root")
+		val[i] = v
-term.setCursorPos(23, 1)
+		i = i + 1
 		str = removeWhite(str)
-local path = read()
+	end
 	return val, removeWhite(str:sub(2))
-if path == "" then
+
-	path = "MiniatureCraft"
+
 parseMember = function(str)
 	local k, str = parseValue(str)
-term.setCursorPos(1, 6)
+	local val, str = parseValue(str)
-term.setTextColor(colors.blue)
+	return k, val, str
-print("Beginning Installation.")
+
-print()
+
 parseObject = function(str)
-local data = json.decode(http.get("https://api.github.com/repos/DetectiveSmith/MiniatureCraft/git/trees/master?recursive=1").readAll())
+	str = removeWhite(str:sub(2))
-if data.message and data.message == "Not found" then error("Could not find files.",2) else
+
-  for k,v in pairs(data.tree) do -- Create Directories
+	local val = {}
-  		if v.type == "tree" then
+	while str:sub(1, 1) ~= "}" do
-    		fs.makeDir(fs.combine(path, v.path))
+		local k, v = nil, nil
-    		term.setTextColor(colors.green)
+		k, v, str = parseMember(str)
-    		print("Creating Directory: " ..fs.combine(path, v.path))
+		val[k] = v
-  		end
+		str = removeWhite(str)
- 	end
+	end
-	 print()
+	return val, removeWhite(str:sub(2))
-  for k,v in pairs(data.tree) do -- Download Files
+
-  		if v.type == "blob" then
+
-  			 if allowed(v.path) then
+parseValue = function(str)
-        download("https://raw.github.com/DetectiveSmith/MiniatureCraft/master/"..v.path, fs.combine(path, v.path), path)
+	local fchar = str:sub(1, 1)
-      		term.setTextColor(colors.yellow)
+	if fchar == "{" then
-    			 term.write("Downloading File: ")
+		return parseObject(str)
-        term.setTextColor(colors.green)
+	elseif fchar == "[" then
-        term.write(path.. "/")
+		return parseArray(str)
-        term.setTextColor(colors.white)
+	elseif tonumber(fchar) ~= nil or numChars[fchar] then
-        term.write(v.path)
+		return parseNumber(str)
-        print()
+	elseif str:sub(1, 4) == "true" or str:sub(1, 5) == "false" then
-  		  end
+		return parseBoolean(str)
-    end
+	elseif fchar == "\"" then
-	 end
+		return parseString(str)
 	elseif str:sub(1, 4) == "null" then
 		return parseNull(str)
-os.unloadAPI("json")
+	end
-fs.delete("json")
+
-term.setTextColor(colors.blue)
+
-if path == "/" then path = "" else path = path.. "/" end
+local function decode(str)
-print()
+	return parseValue(removeWhite(str))
-print("Installation Complete. Run " ..path.. "MiniatureCraft to play.")
+
-print()
+
-term.setTextColor(colors.white)
+------------------------------------------------------------------ main code
 
 local blacklist = {".gitattributes", ".gitignore", "LICENSE", "README.md"}
 local tArgs = {...}; local sx, sy = term.getSize()
 
 local function save(data, file, p)
  	local p = p or ""
 	local file = shell.resolve(file)
 	if not (fs.exists(string.sub(file,1,#file - #fs.getName(file))) and fs.isDir(string.sub(file,1,#file - #fs.getName(file)))) then
 		if fs.exists(string.sub(file,1,#file - #fs.getName(file))) then fs.delete(string.sub(file,1,#file - #fs.getName(file))) end
 		fs.makeDir(string.sub(file,1,#file - #fs.getName(file)))
 	end
 	local f = fs.open(file, "w")
 	f.write(data); f.close()
 end
 
 local function download(url, file, p) save(http.get(url).readAll(), file, p) end
 
 local function allowed(str)
 	for i = 1, #blacklist do
 		if blacklist[i] == str then return end
 	end; return true
 end
 
 if not tArgs[1] then
 	term.setBackgroundColor(colors.white)
 	term.setTextColor(colors.lightGray)
 	term.clear()
 	term.setCursorPos(1, sy - 1)
 	term.write("Credits to apemanzilla for their Gitget program")
 	term.setCursorPos(1, sy)
 	term.write("Credits to ElvishJerricco's for their JSON API")
 
 	term.setTextColor(colors.cyan)
 	term.setCursorPos((sx / 2) - 12, 3)
 	term.write("MiniatureCraft Installer")
 	term.setTextColor(colors.blue)
 	term.setCursorPos((sx / 2) - 9, 6)
 	term.write("Path to install to:")
 	term.setCursorPos((sx / 2) - 21, 10)
 	term.write("Leave blank for default folder, '/' for root.")
 	paintutils.drawLine(sx / 4, 8, (sx / 4) * 3, 8, colors.gray)
 	term.setCursorPos(sx / 4, 8)
 	term.setTextColor(colors.yellow)
 	path = read(); if path == "" then path = "MC/" end
 
 	term.setTextColor(colors.blue)
 	paintutils.drawLine(sx / 4, 6, (sx / 4) * 3, 6, colors.white)
 	term.setCursorPos((sx / 2) - 7, 6)
 	term.write("Installing...")
 end
 
 local branch = tArgs[2] and "Alpha" or "master"
 local data = decode(http.get("https://api.github.com/repos/DetectiveSmith/MiniatureCraft/git/trees/"..branch.."?recursive=1").readAll())
 if data.message and data.message == "Not found" then error("Could not find files.", 2) end
 
 if not tArgs[1] then
 	totalBar, currentPart = #data.tree - #blacklist, 0
 	paintutils.drawLine(sx / 4, 8, (sx / 4) * 3, 8, colors.white)
 	paintutils.drawLine((sx / 2) - (totalBar / 2), 8, (sx / 2) + (totalBar / 2), 8, colors.gray)
 end
 
 local path = path or tArgs[1]
 term.setTextColor(colors.green)
 for k, v in pairs(data.tree) do -- Create Directories
     if v.type == "tree" then
 	    fs.makeDir(fs.combine(path, v.path))
 	    if not tArgs[1] then
 		    paintutils.drawPixel((sx / 2) - (#data.tree / 2) + currentPart, 8, colors.lime)
 		    paintutils.drawLine(1, 10, sx, 10, colors.white)
 		    local str = "Creating Directory " ..fs.combine(path, v.path)
 		    term.setCursorPos((sx / 2) - (#str / 2), 10)
 		    print(str)
 		    currentPart = currentPart + 1
 	    end
 	end
 end
 
 term.setTextColor(colors.yellow)
 for k,v in pairs(data.tree) do -- Download Files
 	if v.type == "blob" then
 		if allowed(v.path) then
 			download("https://raw.github.com/DetectiveSmith/MiniatureCraft/"..branch.."/"..v.path, fs.combine(path, v.path), path)
 			if not tArgs[1] then
 				paintutils.drawPixel((sx / 2) - (#data.tree / 2) + currentPart, 8, colors.lime)
 				paintutils.drawLine(1, 10, sx, 10, colors.white)
 				local fulltext = "Downloading File " ..path.. "" ..v.path
 				term.setCursorPos((sx / 2) - (#fulltext / 2), 10)
 				term.write(fulltext)
 				currentPart = currentPart + 1
 			end
 		end
 	end
 end
 
 if not tArgs[1] then
 	term.setTextColor(colors.blue)
 	term.setBackgroundColor(colors.black)
 	term.clear()
 	term.setCursorPos(1, 1)
 	print()
 	if string.find(path, "/") then print("Installation Complete. Run " ..path.. "mc to play.")
 	else print("Installation Complete. Run " ..path.. "/mc to play.") end
 	print()
 	term.setTextColor(colors.white)
 end