diff options
Diffstat (limited to 'ClientHamr/GuiLua')
-rw-r--r-- | ClientHamr/GuiLua/skang.lua | 99 |
1 files changed, 99 insertions, 0 deletions
diff --git a/ClientHamr/GuiLua/skang.lua b/ClientHamr/GuiLua/skang.lua index 1b0a199..9b14551 100644 --- a/ClientHamr/GuiLua/skang.lua +++ b/ClientHamr/GuiLua/skang.lua | |||
@@ -206,7 +206,106 @@ moduleEnd(_M) | |||
206 | 206 | ||
207 | end | 207 | end |
208 | 208 | ||
209 | -- NOTE - We have swapped acl and boss around from the Java version, since boss was usually blank. | ||
210 | -- Boss is the person that owns a Thing. | ||
211 | |||
212 | --[[ The original Skang parameters and commands. | ||
213 | public final static String MY_USAGE[][] = | ||
214 | { | ||
215 | {"skinURL", "skinURL", "Y", "s", null, "URL of skin file.", "", "RI-"}, | ||
216 | {"debug", "debug", "N", "", "0", "Set debugging level to :\n\t-1 - errors and warnings only (-q)\n\t0 - basic information\n\t1 - advanced information (-v)\n\t2 - trace functions\n\t3 - trace protocol\n\t4 - dump packets + stuff\n\t5 - detail", "", ""}, | ||
217 | {"browser", "browser", "N", "", "mozilla %f", "Browser to run.", "", ""}, | ||
218 | {"downloaddir", "downloadDir", "N", "", "download", "Download directory.", "", ""}, | ||
219 | {"sessionID", "sessionID", "N", "", null, "SessionID from servlet.", "", ""}, | ||
220 | {"JSESSIONID", "JSESSIONID", "N", "", null, "JSESSIONID from servlet engine.", "", ""}, | ||
221 | {"servletpath", "servletPath", "N", "", "matrix_rad", "Servlet path.", "", ""}, | ||
222 | {"servletport", "servletPort", "N", "", null, "Servlet port.", "", ""}, | ||
223 | {"servletsslport", "servletSSLPort", "N", "", null, "Servlet SSL port.", "", ""}, | ||
224 | {"HTML", "HTML", "N", "", "false", "Output to HTML?", "", ""}, | ||
225 | {"PHP", "PHP", "N", "", "false", "Output though the PHP wrapper", "", ""}, | ||
226 | {"inbrowser", "inBrowser", "N", "", "true", "Run in browser window?", "", ""}, | ||
227 | {"SSL", "SSL", "N", "", null, "Dummy to avoid a web server bug.", "", ""}, | ||
228 | {"NOSSL", "NOSSL", "N", "", null, "Dummy to avoid a web server bug.", "", ""}, | ||
229 | {"corporate", "corporate", "N", "", null, "Are we doing corporate shit?", "", ""}, | ||
230 | {"", "", "", "", "", "", "", ""} | ||
231 | }; | ||
232 | public final static String MY_SKANG[][] = | ||
233 | { | ||
234 | -- {"module", "addModule", "file,data", "Load a module.", "", ""}, | ||
235 | {"append", "appendThing", "name,data", "Append to the current value of a Thing.", "", ""}, | ||
236 | {"#!java", "bash", "name,name,name,name,name,name,name", "A not so clever unix script compatability hack.", "", ""}, | ||
237 | {"pending", "pendingDoThing", "action", "Do an action when you are ready.", "", ""}, | ||
238 | {"applet", "doIfApplet", "action", "Only do this if we are an applet.", "", ""}, | ||
239 | {"application", "doIfApplication", "action", "Only do this if we are an application.", "", ""}, | ||
240 | {"corporateshit", "doIfCorporateShit", "action", "Only do this if we are doing corporate shit.", "", ""}, | ||
241 | {"realworld", "doIfRealWorld", "action", "Only do this if we are in the real world.", "", ""}, | ||
242 | {"servlet", "doIfServlet", "action", "Only do this if we are a servlet.", "", ""}, | ||
243 | {"do", "doThing", "action", "Do this action.", "", ""}, | ||
244 | {"grab", "getFile", "URL", "Grab a file from a URL.", "", ""}, | ||
245 | -- {"get", "getThing", "name", "Get the current value of an existing thing.", "", ""}, | ||
246 | {"gimmeskin", "gimmeSkin", "", "Returns the modules default skin.", "", ""}, | ||
247 | {"help", "helpThing", "file", "Show help page.", "", ""}, | ||
248 | {"nada", "nothing", "data", "Does nothing B-).", "", ""}, | ||
249 | {"postshow", "postShowThings", "URL,name", "POST the values of all Things to the URL, show the returned content.", "", ""}, | ||
250 | {"post", "postThings", "URL", "POST the values of all Things to the URL, return the content.", "", ""}, | ||
251 | {"postparse", "postParseThings", "URL", "POST the values of all Things to the URL, parse the returned content.", "", ""}, | ||
252 | {"quiet", "quiet", "", "Output errors and warnings only.", "", ""}, | ||
253 | {"remove", "removeThing", "name", "Remove an existing thing.", "", ""}, | ||
254 | {"sethelp", "setHelp", "name,data", "Change the help for something.", "", ""}, | ||
255 | -- {"set", "setThing", "name,data", "Set the current value of an existing Thing.", "", ""}, | ||
256 | -- {"skang", "skangRead", "URL", "Parse the contents of a skang file or URL.", "", ""}, | ||
257 | -- {"quit", "startQuit", "", "Quit, exit, remove thyself.", "", ""}, | ||
258 | {"stopwhinging", "stopWhinging", "", "Clear all messages.", "", ""}, | ||
259 | {"tell", "tellThing", "name", "Returns details of an existing Thing.", "", ""}, | ||
260 | {"togglebug", "toggleIgnoreBrowserBug", "", "Toggle ignorance of a certain browser bug.", "", ""}, | ||
261 | {"verbose", "verbose", "", "Output advanced information.", "", ""}, | ||
262 | {"", "", "", "", "", ""} | ||
263 | ]] | ||
209 | 264 | ||
265 | --[[ The original SkangAWT parameters and commands. | ||
266 | public final static String MY_USAGE[][] = | ||
267 | { | ||
268 | {"", "", "", "", "", "", "", ""} | ||
269 | }; | ||
270 | public final static String MY_SKANG[][] = | ||
271 | { | ||
272 | {"taction", "tactionWidget", "name,action", "Set the alternative action for a widget.", "", ""}, | ||
273 | {"action", "actionWidget", "name,action", "Set the action for a widget.", "", ""}, | ||
274 | {"pane", "addPane", "name,x,y,w,h,data", "Add a pane to the current module.", "", ""}, | ||
275 | {"widget", "addWidget", "name,type,lx,ly,lw,lh,data,data", "Add a widget to the current skin.", "", ""}, | ||
276 | {"checkboxgroup", "checkBoxGroup", "number", "Make the next 'number' Checkboxes part of a check box group.", "", ""}, | ||
277 | -- {"clear", "clearWidgets", "", "The current skin is cleared of all widgets.", "", ""}, | ||
278 | {"colour", "colourWidget", "name,r,g,b,alpha,r,g,b,alpha", "Set widget's background and foreground colour.", "", "GGG"}, | ||
279 | {"doaction", "doWidget", "name", "Do a widgets action.", "", "GGG"}, | ||
280 | {"disable", "disableWidget", "name", "Disable a widget.", "", "GGG"}, | ||
281 | {"enable", "enableWidget", "name", "Enable a widget.", "", "GGG"}, | ||
282 | {"hide", "hideWidget", "name", "Hide a widget.", "", "GGG"}, | ||
283 | {"hideall", "hideAllWidgets", "name,lx,ly,lw,lh", "Hide all widgets.", "", "GGG"}, | ||
284 | {"look", "lookWidget", "name,normal,ghost,active,toggle", "Set the current look of an existing widget.", "", "GGG"}, | ||
285 | {"mask", "maskWidget", "name,data", "Set the mask for a widget.", "", ""}, | ||
286 | {"onmouse", "onMouse", "name,data", "Do something on mouse hover.", "", ""}, | ||
287 | {"offmouse", "offMouse", "name,data", "Do something off mouse hover.", "", ""}, | ||
288 | {"popup", "popupWidget", "name,data,data,data,data", "Create a popup.", "", "GGG"}, | ||
289 | {"readonly", "readOnlyWidget", "name", "Make a widget read only.", "", "GGG"}, | ||
290 | {"writeonly", "writeOnlyWidget", "name", "Make a widget write only.", "", "GGG"}, | ||
291 | {"satori", "satori", "x,y", "Give me the developers menu.", "", "GGG"}, | ||
292 | {"showloginwindow", "showLoginWindow", "", "Show user login window.", "", "GGG"}, | ||
293 | {"show", "showWidget", "name", "Show a widget.", "", "GGG"}, | ||
294 | -- {"window", "setSkangFrame", "x,y,name", "Specifies the size and title of the application Frame.", "", "GGG"}, | ||
295 | {"stuff", "stuffWidget", "name,data", "Set the stuff for a widget's pane.", "", ""}, | ||
296 | {"stufflet", "stuffWidget", "name,data,data", "Set the stufflet for a widget.", "", ""}, | ||
297 | {"stufflist", "stuffListWidget", "name,data", "List the stuff in this widget.", "", ""}, | ||
298 | {"stuffload", "stuffLoadWidget", "name,data,data", "Load the stuff for a widget.", "", ""}, | ||
299 | {"stuffsave", "stuffSaveWidget", "name,data,data", "Save the stuff for a widget.", "", ""}, | ||
300 | {"stuffdelete", "stuffDeleteWidget", "name,data,data", "Delete the stuff for a widget.", "", "SSS"}, | ||
301 | {"stuffclear", "stuffClearWidget", "name,data", "Clear the stuff for a widget.", "", "SSS"}, | ||
302 | {"rowtowidgets", "rowToWidgets", "name", "Copy Grid row to matching widgets.", "", ""}, | ||
303 | {"widgetstorow", "widgetsToRow", "name,data", "Copy matching widgets to Grid row.", "", ""}, | ||
304 | {"clearrow", "clearRow", "name", "Clear Grid row and matching widgets.", "", ""}, | ||
305 | {"clearrowwidgets", "clearRowWidgets", "name", "Clear only the Grid row matching widgets.", "", ""}, | ||
306 | {"", "", "", "", "", ""} | ||
307 | }; | ||
308 | ]] | ||
210 | 309 | ||
211 | 310 | ||
212 | -- Gotta check out this _ENV thing, 5.2 only. Seems to replace the need for setfenv(). Seems like setfenv should do what we want, and is more backward compatible. | 311 | -- Gotta check out this _ENV thing, 5.2 only. Seems to replace the need for setfenv(). Seems like setfenv should do what we want, and is more backward compatible. |