mirror of
https://github.com/vgstation-coders/vgstation13.git
synced 2025-12-09 16:14:13 +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.8 KiB
Plaintext
88 lines
2.8 KiB
Plaintext
//By Carnwennan
|
|
//fetches an external list and processes it into a list of ip addresses.
|
|
//It then stores the processed list into a savefile for later use
|
|
#define TORFILE "data/ToR_ban.bdb"
|
|
#define TOR_UPDATE_INTERVAL 216000 //~6 hours
|
|
|
|
/proc/ToRban_isbanned(var/ip_address)
|
|
var/savefile/F = new(TORFILE)
|
|
if(F)
|
|
if( ip_address in F.dir )
|
|
return 1
|
|
return 0
|
|
|
|
/proc/ToRban_autoupdate()
|
|
var/savefile/F = new(TORFILE)
|
|
if(F)
|
|
var/last_update
|
|
F["last_update"] >> last_update
|
|
if((last_update + TOR_UPDATE_INTERVAL) < world.realtime) //we haven't updated for a while
|
|
ToRban_update()
|
|
return
|
|
|
|
/proc/ToRban_update()
|
|
spawn(0)
|
|
diary << "Downloading updated ToR data..."
|
|
var/http[] = world.Export("http://exitlist.torproject.org/exit-addresses")
|
|
|
|
var/list/rawlist = file2list(http["CONTENT"])
|
|
if(rawlist.len)
|
|
fdel(TORFILE)
|
|
var/savefile/F = new(TORFILE)
|
|
for( var/line in rawlist )
|
|
if(!line) continue
|
|
if( copytext(line,1,12) == "ExitAddress" )
|
|
var/cleaned = copytext(line,13,length(line)-19)
|
|
if(!cleaned) continue
|
|
F[cleaned] << 1
|
|
F["last_update"] << world.realtime
|
|
diary << "ToR data updated!"
|
|
if(usr) usr << "ToRban updated."
|
|
return 1
|
|
diary << "ToR data update aborted: no data."
|
|
return 0
|
|
|
|
/client/proc/ToRban(task in list("update","toggle","show","remove","remove all","find"))
|
|
set name = "ToRban"
|
|
set category = "Server"
|
|
if(!holder) return
|
|
switch(task)
|
|
if("update")
|
|
ToRban_update()
|
|
if("toggle")
|
|
if(config)
|
|
if(config.ToRban)
|
|
config.ToRban = 0
|
|
message_admins("<font color='red'>ToR banning disabled.</font>")
|
|
else
|
|
config.ToRban = 1
|
|
message_admins("<font colot='green'>ToR banning enabled.</font>")
|
|
if("show")
|
|
var/savefile/F = new(TORFILE)
|
|
var/dat
|
|
if( length(F.dir) )
|
|
for( var/i=1, i<=length(F.dir), i++ )
|
|
dat += "<tr><td>#[i]</td><td> [F.dir[i]]</td></tr>"
|
|
dat = "<table width='100%'>[dat]</table>"
|
|
else
|
|
dat = "No addresses in list."
|
|
src << browse(dat,"window=ToRban_show")
|
|
if("remove")
|
|
var/savefile/F = new(TORFILE)
|
|
var/choice = input(src,"Please select an IP address to remove from the ToR banlist:","Remove ToR ban",null) as null|anything in F.dir
|
|
if(choice)
|
|
F.dir.Remove(choice)
|
|
src << "<b>Address removed</b>"
|
|
if("remove all")
|
|
src << "<b>[TORFILE] was [fdel(TORFILE)?"":"not "]removed.</b>"
|
|
if("find")
|
|
var/input = input(src,"Please input an IP address to search for:","Find ToR ban",null) as null|text
|
|
if(input)
|
|
if(ToRban_isbanned(input))
|
|
src << "<font color='green'><b>Address is a known ToR address</b></font>"
|
|
else
|
|
src << "<font color='red'><b>Address is not a known ToR address</b></font>"
|
|
return
|
|
|
|
#undef TORFILE
|
|
#undef TOR_UPDATE_INTERVAL |