mirror of
https://github.com/vgstation-coders/vgstation13.git
synced 2025-12-10 18:32:03 +00:00
7b720a20b6
>Replaced dd_text2list, dd_text2listcase, tg_text2listcase and tg_text2list with text2list and text2listEx. text2list will return a list of each and every character in the string if you set separator="" >added return_file_text(filepath) which returns text from a file after doing some checks: does the file exist? is the file empty? It prints helpful error messages to the world.log if it runs into problems >Replaced dd_file2list(filepath, seperator) with file2list(filepath, seperator). It just calls text2list(return_file_text(filepath), seperator). rather than copypasta >Replaced time_stamp() so it's not as retarded >Lots of the world setup stuff uses file2list now, rather than file2text -> sanity -> text2list >Added error() warning() testing() procs. These print messages to world.log with a prefix. e.g. ## ERROR: msg. git-svn-id: http://tgstation13.googlecode.com/svn/trunk@4948 316c924e-a436-60f5-8080-3fe189b3f50e
88 lines
2.1 KiB
Plaintext
88 lines
2.1 KiB
Plaintext
/*
|
|
* This datum gets revision info from local svn 'entries' file
|
|
* Path to the directory containing it should be in 'config/svndir.txt' file
|
|
*
|
|
*/
|
|
|
|
var/global/datum/getrev/revdata = new("config/svndir.txt")
|
|
|
|
//Oh yeah, I'm an OOP fag, lalala
|
|
/datum/getrev
|
|
var/revision
|
|
var/commiter
|
|
var/svndirpath
|
|
var/revhref
|
|
|
|
proc/abort()
|
|
world.log << "Unable to get revision info."
|
|
spawn()
|
|
del src
|
|
|
|
New(filename)
|
|
..()
|
|
var/list/Lines = file2list(filename)
|
|
if(!Lines.len) return abort()
|
|
for(var/t in Lines)
|
|
if(!t) continue
|
|
t = trim(t)
|
|
if (length(t) == 0)
|
|
continue
|
|
else if (copytext(t, 1, 2) == "#")
|
|
continue
|
|
var/pos = findtext(t, " ")
|
|
var/name = null
|
|
var/value = null
|
|
if (pos)
|
|
name = lowertext(copytext(t, 1, pos))
|
|
value = copytext(t, pos + 1)
|
|
else
|
|
name = lowertext(t)
|
|
if(!name)
|
|
continue
|
|
switch(name)
|
|
if("svndir")
|
|
svndirpath = value
|
|
if("revhref")
|
|
revhref = value
|
|
|
|
if(svndirpath && fexists(svndirpath) && fexists("[svndirpath]/entries") && isfile(file("[svndirpath]/entries")))
|
|
var/list/filelist = file2list("[svndirpath]/entries")
|
|
if(filelist.len < 4)
|
|
return abort()
|
|
revision = filelist[4]
|
|
commiter = filelist[12]
|
|
world.log << "Running TG Revision Number: [revision]."
|
|
diary << "Revision info loaded succesfully"
|
|
return
|
|
return abort()
|
|
|
|
proc/getRevisionText()
|
|
var/output
|
|
if(revhref)
|
|
output = {"<a href="[revhref][revision]">[revision]</a>"}
|
|
else
|
|
output = revision
|
|
return output
|
|
|
|
proc/showInfo()
|
|
return {"<html>
|
|
<head>
|
|
</head>
|
|
<body>
|
|
<p><b>Server Revision:</b> [getRevisionText()]<br/>
|
|
<b>Author:</b> [commiter]</p>
|
|
</body>
|
|
<html>"}
|
|
|
|
client/verb/showrevinfo()
|
|
set category = "OOC"
|
|
set name = "Show Server Revision"
|
|
var/output = "Sorry, the revision info is unavailable."
|
|
if(revdata)
|
|
output = revdata.showInfo()
|
|
|
|
output += "Current Infomational Settings: <br>"
|
|
output += "Protect Authority Roles From Tratior: [config.protect_roles_from_antagonist]<br>"
|
|
usr << browse(output,"window=revdata");
|
|
return
|