/datum/browser var/mob/user var/title var/window_id // window_id is used as the window name for browse and onclose var/width = 0 var/height = 0 var/atom/ref = null var/window_options = "can_close=1;can_minimize=1;can_maximize=0;can_resize=1;titlebar=1;" // window option is set using window_id var/stylesheets[0] var/scripts[0] var/title_image var/head_elements var/body_elements var/head_content = "" var/content = "" /datum/browser/New(nuser, nwindow_id, ntitle = 0, nwidth = 0, nheight = 0, var/atom/nref = null) user = nuser window_id = nwindow_id if (ntitle) title = format_text(ntitle) if (nwidth) width = nwidth if (nheight) height = nheight if (nref) ref = nref add_stylesheet("common", 'html/browser/common.css') // this CSS sheet is common to all UIs /datum/browser/proc/add_head_content(nhead_content) head_content = nhead_content /datum/browser/proc/set_window_options(nwindow_options) window_options = nwindow_options /datum/browser/proc/set_title_image(ntitle_image) //title_image = ntitle_image /datum/browser/proc/add_stylesheet(name, file) stylesheets["[ckey(name)].css"] = file register_asset("[ckey(name)].css", file) /datum/browser/proc/add_script(name, file) scripts["[ckey(name)].js"] = file register_asset("[ckey(name)].js", file) /datum/browser/proc/set_content(ncontent) content = ncontent /datum/browser/proc/add_content(ncontent) content += ncontent /datum/browser/proc/get_header() var/file for (file in stylesheets) head_content += "" for (file in scripts) head_content += "" var/title_attributes = "class='uiTitle'" if (title_image) title_attributes = "class='uiTitle icon' style='background-image: url([title_image]);'" return {" [head_content]
[title ? "
[title]
" : ""]
"} //" This is here because else the rest of the file looks like a string in notepad++. /datum/browser/proc/get_footer() return {"
"} /datum/browser/proc/get_content() return {" [get_header()] [content] [get_footer()] "} /datum/browser/proc/open(use_onclose = 1) if(isnull(window_id)) //null check because this can potentially nuke goonchat WARNING("Browser [title] tried to open with a null ID") to_chat(user, "The [title] browser you tried to open failed a sanity check! Please report this on github!") return var/window_size = "" if (width && height) window_size = "size=[width]x[height];" if (stylesheets.len) send_asset_list(user, stylesheets, verify=FALSE) if (scripts.len) send_asset_list(user, scripts, verify=FALSE) user << browse(get_content(), "window=[window_id];[window_size][window_options]") if (use_onclose) setup_onclose() /datum/browser/proc/setup_onclose() set waitfor = 0 //winexists sleeps, so we don't need to. for (var/i in 1 to 10) if (user && winexists(user, window_id)) onclose(user, window_id, ref) break /datum/browser/proc/close() if(!isnull(window_id))//null check because this can potentially nuke goonchat user << browse(null, "window=[window_id]") else WARNING("Browser [title] tried to close with a null ID") /datum/browser/modal/alert/New(User,Message,Title,Button1="Ok",Button2,Button3,StealFocus = 1,Timeout=6000) if (!User) return var/output = {"
[Message]

[Button1]"} if (Button2) output += {"[Button2]"} if (Button3) output += {"[Button3]"} output += {"
"} ..(User, ckey("[User]-[Message]-[Title]-[world.time]-[rand(1,10000)]"), Title, 350, 150, src, StealFocus, Timeout) set_content(output) /datum/browser/modal/alert/Topic(href,href_list) if (href_list["close"] || !user || !user.client) opentime = 0 return if (href_list["button"]) var/button = text2num(href_list["button"]) if (button <= 3 && button >= 1) selectedbutton = button opentime = 0 close() //designed as a drop in replacement for alert(); functions the same. (outside of needing User specified) /proc/tgalert(var/mob/User, Message, Title, Button1="Ok", Button2, Button3, StealFocus = 1, Timeout = 6000) if (!User) User = usr switch(askuser(User, Message, Title, Button1, Button2, Button3, StealFocus, Timeout)) if (1) return Button1 if (2) return Button2 if (3) return Button3 //Same shit, but it returns the button number, could at some point support unlimited button amounts. /proc/askuser(var/mob/User,Message, Title, Button1="Ok", Button2, Button3, StealFocus = 1, Timeout = 6000) if (!istype(User)) if (istype(User, /client/)) var/client/C = User User = C.mob else return var/datum/browser/modal/alert/A = new(User, Message, Title, Button1, Button2, Button3, StealFocus, Timeout) A.open() A.wait() if (A.selectedbutton) return A.selectedbutton /datum/browser/modal var/opentime = 0 var/timeout var/selectedbutton = 0 var/stealfocus /datum/browser/modal/New(nuser, nwindow_id, ntitle = 0, nwidth = 0, nheight = 0, var/atom/nref = null, StealFocus = 1, Timeout = 6000) ..() stealfocus = StealFocus if (!StealFocus) window_options += "focus=false;" timeout = Timeout /datum/browser/modal/close() .=..() opentime = 0 /datum/browser/modal/open() set waitfor = 0 opentime = world.time if (stealfocus) . = ..(use_onclose = 1) else var/focusedwindow = winget(user, null, "focus") . = ..(use_onclose = 1) //waits for the window to show up client side before attempting to un-focus it //winexists sleeps until it gets a reply from the client, so we don't need to bother sleeping for (var/i in 1 to 10) if (user && winexists(user, window_id)) if (focusedwindow) winset(user, focusedwindow, "focus=true") else winset(user, "mapwindow", "focus=true") break if (timeout) addtimer(CALLBACK(src, .proc/close), timeout) /datum/browser/modal/proc/wait() while (opentime && selectedbutton <= 0 && (!timeout || opentime+timeout > world.time)) stoplag(1) /datum/browser/modal/listpicker var/valueslist = list() /datum/browser/modal/listpicker/New(User,Message,Title,Button1="Ok",Button2,Button3,StealFocus = 1, Timeout = FALSE,list/values,inputtype="checkbox", width, height, slidecolor) if (!User) return var/output = {"
"} if (Button2) output += {""} if (Button3) output += {""} output += {"
"} ..(User, ckey("[User]-[Message]-[Title]-[world.time]-[rand(1,10000)]"), Title, width, height, src, StealFocus, Timeout) set_content(output) /datum/browser/modal/listpicker/Topic(href,href_list) if (href_list["close"] || !user || !user.client) opentime = 0 return if (href_list["button"]) var/button = text2num(href_list["button"]) if (button <= 3 && button >= 1) selectedbutton = button for (var/item in href_list) switch(item) if ("close", "button", "src") continue else valueslist[item] = href_list[item] opentime = 0 close() /proc/presentpicker(var/mob/User,Message, Title, Button1="Ok", Button2, Button3, StealFocus = 1,Timeout = 6000,list/values, inputtype = "checkbox", width, height, slidecolor) if (!istype(User)) if (istype(User, /client/)) var/client/C = User User = C.mob else return var/datum/browser/modal/listpicker/A = new(User, Message, Title, Button1, Button2, Button3, StealFocus,Timeout, values, inputtype, width, height, slidecolor) A.open() A.wait() if (A.selectedbutton) return list("button" = A.selectedbutton, "values" = A.valueslist) /proc/input_bitfield(var/mob/User, title, bitfield, current_value, nwidth = 350, nheight = 350, nslidecolor, allowed_edit_list = null) if (!User || !(bitfield in GLOB.bitfields)) return var/list/pickerlist = list() for (var/i in GLOB.bitfields[bitfield]) var/can_edit = 1 if(!isnull(allowed_edit_list) && !(allowed_edit_list & GLOB.bitfields[bitfield][i])) can_edit = 0 if (current_value & GLOB.bitfields[bitfield][i]) pickerlist += list(list("checked" = 1, "value" = GLOB.bitfields[bitfield][i], "name" = i, "allowed_edit" = can_edit)) else pickerlist += list(list("checked" = 0, "value" = GLOB.bitfields[bitfield][i], "name" = i, "allowed_edit" = can_edit)) var/list/result = presentpicker(User, "", title, Button1="Save", Button2 = "Cancel", Timeout=FALSE, values = pickerlist, width = nwidth, height = nheight, slidecolor = nslidecolor) if (islist(result)) if (result["button"] == 2) // If the user pressed the cancel button return . = 0 for (var/flag in result["values"]) . |= GLOB.bitfields[bitfield][flag] else return /datum/browser/modal/preflikepicker var/settings = list() var/icon/preview_icon = null var/datum/callback/preview_update /datum/browser/modal/preflikepicker/New(User,Message,Title,Button1="Ok",Button2,Button3,StealFocus = 1, Timeout = FALSE,list/settings,inputtype="checkbox", width = 600, height, slidecolor) if (!User) return src.settings = settings ..(User, ckey("[User]-[Message]-[Title]-[world.time]-[rand(1,10000)]"), Title, width, height, src, StealFocus, Timeout) set_content(ShowChoices(User)) /datum/browser/modal/preflikepicker/proc/ShowChoices(mob/user) if (settings["preview_callback"]) var/datum/callback/callback = settings["preview_callback"] preview_icon = callback.Invoke(settings) if (preview_icon) user << browse_rsc(preview_icon, "previewicon.png") var/dat = "" for (var/name in settings["mainsettings"]) var/setting = settings["mainsettings"][name] if (setting["type"] == "datum") if (setting["subtypesonly"]) dat += "[setting["desc"]]: [setting["value"]]
" else dat += "[setting["desc"]]: [setting["value"]]
" else dat += "[setting["desc"]]: [setting["value"]]
" if (preview_icon) dat += "" dat += "
" dat += "" dat += "" dat += "
Ok " dat += "
" return dat /datum/browser/modal/preflikepicker/Topic(href,href_list) if (href_list["close"] || !user || !user.client) opentime = 0 return if (href_list["task"] == "input") var/setting = href_list["setting"] switch (href_list["type"]) if ("datum") var/oldval = settings["mainsettings"][setting]["value"] if (href_list["subtypesonly"]) settings["mainsettings"][setting]["value"] = pick_closest_path(null, make_types_fancy(subtypesof(text2path(href_list["path"])))) else settings["mainsettings"][setting]["value"] = pick_closest_path(null, make_types_fancy(typesof(text2path(href_list["path"])))) if (isnull(settings["mainsettings"][setting]["value"])) settings["mainsettings"][setting]["value"] = oldval if ("string") settings["mainsettings"][setting]["value"] = stripped_input(user, "Enter new value for [settings["mainsettings"][setting]["desc"]]", "Enter new value for [settings["mainsettings"][setting]["desc"]]", settings["mainsettings"][setting]["value"]) if ("number") settings["mainsettings"][setting]["value"] = input(user, "Enter new value for [settings["mainsettings"][setting]["desc"]]", "Enter new value for [settings["mainsettings"][setting]["desc"]]") as num if ("color") settings["mainsettings"][setting]["value"] = input(user, "Enter new value for [settings["mainsettings"][setting]["desc"]]", "Enter new value for [settings["mainsettings"][setting]["desc"]]", settings["mainsettings"][setting]["value"]) as color if ("boolean") settings["mainsettings"][setting]["value"] = input(user, "[settings["mainsettings"][setting]["desc"]]?") in list("Yes","No") if ("ckey") settings["mainsettings"][setting]["value"] = input(user, "[settings["mainsettings"][setting]["desc"]]?") in list("none") + GLOB.directory if (settings["mainsettings"][setting]["callback"]) var/datum/callback/callback = settings["mainsettings"][setting]["callback"] settings = callback.Invoke(settings) if (href_list["button"]) var/button = text2num(href_list["button"]) if (button <= 3 && button >= 1) selectedbutton = button if (selectedbutton != 1) set_content(ShowChoices(user)) open() return for (var/item in href_list) switch(item) if ("close", "button", "src") continue opentime = 0 close() /proc/presentpreflikepicker(var/mob/User,Message, Title, Button1="Ok", Button2, Button3, StealFocus = 1,Timeout = 6000,list/settings, width, height, slidecolor) if (!istype(User)) if (istype(User, /client/)) var/client/C = User User = C.mob else return var/datum/browser/modal/preflikepicker/A = new(User, Message, Title, Button1, Button2, Button3, StealFocus,Timeout, settings, width, height, slidecolor) A.open() A.wait() if (A.selectedbutton) return list("button" = A.selectedbutton, "settings" = A.settings) // This will allow you to show an icon in the browse window // This is added to mob so that it can be used without a reference to the browser object // There is probably a better place for this... /mob/proc/browse_rsc_icon(icon, icon_state, dir = -1) // Registers the on-close verb for a browse window (client/verb/.windowclose) // this will be called when the close-button of a window is pressed. // // This is usually only needed for devices that regularly update the browse window, // e.g. canisters, timers, etc. // // windowid should be the specified window name // e.g. code is : user << browse(text, "window=fred") // then use : onclose(user, "fred") // // Optionally, specify the "ref" parameter as the controlled atom (usually src) // to pass a "close=1" parameter to the atom's Topic() proc for special handling. // Otherwise, the user mob's machine var will be reset directly. // /proc/onclose(mob/user, windowid, atom/ref=null) if(!user.client) return var/param = "null" if(ref) param = "[REF(ref)]" winset(user, windowid, "on-close=\".windowclose [param]\"") // the on-close client verb // called when a browser popup window is closed after registering with proc/onclose() // if a valid atom reference is supplied, call the atom's Topic() with "close=1" // otherwise, just reset the client mob's machine var. // /client/verb/windowclose(atomref as text) set hidden = 1 // hide this verb from the user's panel set name = ".windowclose" // no autocomplete on cmd line if(atomref!="null") // if passed a real atomref var/hsrc = locate(atomref) // find the reffed atom var/href = "close=1" if(hsrc) usr = src.mob src.Topic(href, params2list(href), hsrc) // this will direct to the atom's return // Topic() proc via client.Topic() // no atomref specified (or not found) // so just reset the user mob's machine var if(src && src.mob) src.mob.unset_machine()