PasswordProtectedFiles (#5067)

This PR adds password protected files. When creating a file an additional prompt will come up. This will ask if you would like to set a password. If left blank a password will not be set and the file will function normally. If a password is set, when viewing, cloning, renaming, or deleting a file, the password prompt will again come up asking for the previously set password. When cloned, the cloned file retains the password.

code/modules/modular_computers/file_system/computer_file.dm

@@ -6,7 +6,8 @@ var/global/file_uid = 0
 	var/size = 1											// File size in GQ. Integers only!
 	var/obj/item/weapon/computer_hardware/hard_drive/holder	// Holder that contains this file.
 	var/unsendable = 0										// Whether the file may be sent to someone via NTNet transfer or other means.
-	var/undeletable = 0										// Whether the file may be deleted. Setting to 1 prevents deletion/renaming/etc.
+	var/undeletable = 0                                     // Whether the file may be deleted. Setting to 1 prevents deletion/renaming/etc.
+	var/password = ""                                       // Placeholder for password protected files.
 	var/uid													// UID of this file
 
 /datum/computer_file/New()
@@ -31,9 +32,21 @@ var/global/file_uid = 0
 	temp.unsendable = unsendable
 	temp.undeletable = undeletable
 	temp.size = size
+	temp.password = password
 	if(rename)
 		temp.filename = filename + "(Copy)"
 	else
 		temp.filename = filename
 	temp.filetype = filetype
 	return temp
+
+/datum/computer_file/proc/can_access_file(var/mob/user, input_password = "")
+	if(!password)
+		return TRUE
+	else
+		if (!input_password)
+			input_password = sanitize(input(user, "Please enter a password to access file '[filename]':"))
+		if (input_password == password)
+			return TRUE
+		else
+			return FALSE

code/modules/modular_computers/file_system/programs/system/file_browser.dm

@@ -19,7 +19,14 @@
 
 	if(href_list["PRG_openfile"])
 		. = 1
-		open_file = href_list["PRG_openfile"]
+		var/obj/item/weapon/computer_hardware/hard_drive/HDD = computer.hard_drive
+		var/datum/computer_file/F = HDD.find_file_by_name(href_list["PRG_openfile"])
+		if (!F)
+			return
+		if (F.can_access_file(usr))
+			open_file = href_list["PRG_openfile"]
+		else
+			return
 	if(href_list["PRG_newtextfile"])
 		. = 1
 		var/newname = sanitize(input(usr, "Enter file name or leave blank to cancel:", "File rename"))
@@ -144,6 +151,29 @@
 			return 1
 		var/datum/computer_file/C = F.clone(0)
 		HDD.store_file(C)
+	if(href_list["PRG_encrypt"])
+		. = 1
+		var/obj/item/weapon/computer_hardware/hard_drive/HDD = computer.hard_drive
+		if (!HDD)
+			return
+		var/datum/computer_file/F = HDD.find_file_by_name(href_list["PRG_encrypt"])
+		if(!F || F.undeletable)
+			return
+		if(F.password)
+			return
+		F.password = sanitize(input(usr, "Enter an encryption key:", "Encrypt File"))
+	if(href_list["PRG_decrypt"])
+		. = 1
+		var/obj/item/weapon/computer_hardware/hard_drive/HDD = computer.hard_drive
+		if (!HDD)
+			return
+		var/datum/computer_file/F = HDD.find_file_by_name(href_list["PRG_encrypt"])
+		if(!F || F.undeletable)
+			return
+		if (F.can_access_file(usr))
+			F.password = ""
+		else
+			return
 	if(.)
 		SSnanoui.update_uis(NM)
 
@@ -185,7 +215,8 @@
 					"name" = F.filename,
 					"type" = F.filetype,
 					"size" = F.size,
-					"undeletable" = F.undeletable
+					"undeletable" = F.undeletable,
+					"encrypted" = !!F.password
 				)))
 			data["files"] = files
 			if(RHDD)
@@ -196,7 +227,8 @@
 						"name" = F.filename,
 						"type" = F.filetype,
 						"size" = F.size,
-						"undeletable" = F.undeletable
+						"undeletable" = F.undeletable,
+						"encrypted" = !!F.password
 					)))
 				data["usbfiles"] = usbfiles