From 8b42466881a890e85a8eb655fa7e23adef783e30 Mon Sep 17 00:00:00 2001
From: Akamaru <akamaru92@live.de>
Date: Sun, 26 Apr 2015 13:28:06 +0200
Subject: [PATCH] new plugin furaffinity (does not work yet)

---
 plugins/furaffinity.lua | 45 +++++++++++++++++++++++++++++++++++++++++
 1 file changed, 45 insertions(+)
 create mode 100644 plugins/furaffinity.lua

diff --git a/plugins/furaffinity.lua b/plugins/furaffinity.lua
new file mode 100644
index 0000000..12a4745
--- /dev/null
+++ b/plugins/furaffinity.lua
@@ -0,0 +1,45 @@
+local ltn12 = require("ltn12")
+local rex = require("rex_pcre")
+
+function run(msg, matches)
+  local cookies = 'a=' .. get_db_key('global', 'faa') .. '; b=' .. get_db_key('global', 'fab')
+
+  local t = {}
+  body, code, status, headers = http.request {
+    url = 'http://www.furaffinity.net/full/' .. matches[1],
+    headers = { Cookie = cookies },
+    sink = ltn12.sink.table(t)
+  }
+
+  local page = table.concat(t)
+
+  print('Loaded ' .. matches[1])
+
+  local img = rex.match(page, 'img.+submissionImg.+src="(.+?)"')
+  local rating = rex.match(page, 'rating".+src="/img/labels/(.+).gif"')
+
+  local chan_rating = get_db_key('chan:' .. msg.to.id, 'fa')
+
+  if chan_rating == "general" or not chan_rating then
+    if rating == "explicit" or rating == "mature" then
+      return nil
+    end
+  elseif chan_rating == "mature" then
+    if rating == "explicit" then
+      return nil
+    end
+  end
+
+  local file_path = download_to_file('http:' .. img)
+
+  send_photo(get_receiver(msg), file_path, ok_cb, false)
+
+  return nil
+end
+
+return {
+  description = "Mirrors FA images",
+  usage = "furaffinity.net/view/123456",
+  patterns = {"furaffinity.net/view/([0-9]+)", "furaffinity.net/full/([0-9]+)"},
+  run = run
+  }
\ No newline at end of file