Advertisement
xXm0dzXx

Untitled

May 24th, 2012
368
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.02 KB | None | 0 0
  1. fs.makeDir("bit.ly")
  2. local websitename = "www.bit.ly"
  3. local enableSearching = true --Change to false if you don't want bots to search your site
  4. local password = os.getComputerID() --Change if you want a custom password
  5.  
  6. function record(text)
  7. print(text)
  8. log = fs.open("rednet.log", "w")
  9. log.writeLine(text)
  10. log.close()
  11. end
  12.  
  13. local x,y = term.getSize()
  14. local cPrint = function(text)
  15. local x2,y2 = term.getCursorPos()
  16. term.setCursorPos(math.ceil((x / 2) - (text:len() / 2)), y2)
  17.  
  18. print(text)
  19. end
  20.  
  21. rednet.open("top")
  22. term.clear()
  23. cPrint("Hosting " ..websitename.. "...\n")
  24. cPrint("Go to " ..websitename.. "/editor to edit it! (PASS: " ..os.getComputerID().. ")\n")
  25. test = fs.open(websitename, "r")
  26. fileContents = test:readAll()
  27. test.close()
  28. while true do
  29. sleep(0)
  30. id, message = rednet.receive()
  31. if message == "bit.ly" then
  32. record(" [" ..os.time().."] [" ..id.. "] Pinged Website.")
  33. rednet.send(id, fileContents)
  34. record(" [" ..os.time().."] [" ..id.. "] Received Data")
  35. elseif message == "bit.ly/editor" then
  36. rednet.send(id, "EditorMode")
  37. rednet.send(id, tostring(password))
  38. rednet.send(id, fileContents)
  39. elseif string.sub(message, 1, string.len("bit.ly/newAPI?v=")) == "bit.ly/newAPI?v=" then
  40. urlshortener = fs.open("bit.ly/" ..string.sub(message, string.len("bit.ly/newAPI?v=")+1, string.len("bit.ly/newAPI?v=9999")),"w")
  41. if urlshortener then
  42. urlshortener.write(string.sub(message, string.len("bit.ly/newAPI?v=9999&l=*") , string.len(message) ))
  43. urlshortener.close()
  44. record(" [" ..os.time().."] [" ..id.. "] bit.ly/" ..string.sub(message, string.len("bit.ly/newAPI?v=")+1, string.len("bit.ly/newAPI?v=9999")).. " = " ..string.sub(message, string.len("bit.ly/newAPI?v=9999&l=*") , string.len(message) ) )
  45. else
  46. record(" [" ..os.time().."] [" ..id.. "] Link creation failed... :(")
  47. end
  48. elseif fs.exists(message) then
  49. urlreader = fs.open( message , "r")
  50. if urlreader then
  51. rednet.send(id, 'reDirect("' ..urlreader.readAll().. '")')
  52. urlreader.close()
  53. end
  54.  
  55. elseif message == "rednet.api.ping.searchengine" and enableSearching == true then
  56. rednet.send(id, websitename)
  57. record(" [" ..os.time().."] [" ..id.. "] Searched by &e0!") --I made it fail on purpose :P
  58. elseif message == websitename.. "/editor EDITED COMPLED!" then
  59. id, message = rednet.receive(0.001)
  60. fs.delete(websitename)
  61. webpage = fs.open(websitename, "w")
  62. webpage.write(message)
  63. webpage.close()
  64.  
  65.  
  66. test = fs.open(websitename, "r")
  67. fileContents = test:readAll()
  68. test.close()
  69. record(" [" ..os.time().."] [" ..id.. "] Updated Website!")
  70. end
  71. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement