shelleo command

shell.dm

//Runs the command in the system's shell, returns a list of (error code, stdout, stderr)

#define SHELLEO_ERR "data/shelleo.err"
#define SHELLEO_OUT "data/shelleo.out"
/proc/shelleo(command)
	var/stdout = ""
	var/stderr = ""
	var/errorcode = 1
	var/static/list/interpreters = list("[MS_WINDOWS]" = "cmd /c", "[UNIX]" = "sh -c")
	var/interpreter = interpreters["[world.system_type]"]
	if(interpreter)
		errorcode = shell("[interpreter] [command] > [SHELLEO_OUT] 2> [SHELLEO_ERR]")
		if(fexists(SHELLEO_OUT))
			stdout = file2text(SHELLEO_OUT)
			fdel(SHELLEO_OUT)
		if(fexists(SHELLEO_ERR)
			stderr = file2text(SHELLEO_ERR)
			fdel(SHELLEO_ERR)
	else
		CRASH("Operating System: [world.system_type] not supported") // If you encounter this error, you are encouraged to update this proc with support for the new operating system
	. = list(errorcode, stdout, stderr)
#undef SHELLEO_ERR
#undef SHELLEO_OUT