这是一个创建于 3763 天前的主题，其中的信息可能已经有所发展或是发生改变。
(defun robot-vote(project-id)
(let* ((cookie-jar (make-instance 'drakma:cookie-jar))
(proj-res (multiple-value-list
(drakma:http-request (concatenate 'string "http://i.100offer.com/projects/" (write-to-string project-id))
:cookie-jar cookie-jar)))
(html-str (car proj-res))
(csrf-token
(car (map 'list
#'(lambda (node)
(plump:attribute node "content"))
(clss:select "meta[name=csrf-token]" (plump:parse html-str)))))
(vote-result (drakma:http-request "http://i.100offer.com/projects/vote"
:method :post
:parameters `(,(cons "project_id" (write-to-string project-id)))
:additional-headers `(,(cons "X-CSRF-Token" csrf-token))
:cookie-jar cookie-jar)))
vote-result))
分分钟一千票啊，这玩意儿算钱啊，最具人气奖直接给我吧哈哈～
http://i.100offer.com/projects/140
帮忙 @ 一下 100offer 负责人吧，没找到。
已邮件至 li*****[email protected]
发现：
http://i.100offer.com/projects/
这个页面的内容不是机器生成，应该是手工整理的。
第 1 条附言 · 2015 年 9 月 22 日
截个装逼图：
26 条回复 • 2015-09-23 08:48:48 +08:00
 |
1
xsjguagua 2015 年 9 月 22 日
..5000 到手
|
 |
2
dai269619118 2015 年 9 月 22 日  2
应该拿刷票工具参加 23333
|
 |
3
sneezry 2015 年 9 月 22 日 via iPhone
赞楼主的探索精神！
|
 |
4
vitovan OP |
|
5
sneezry 2015 年 9 月 22 日 via iPhone
哈哈，洞补上了😄
|
 |
7
scarlex 2015 年 9 月 22 日
居然是 lisp ?
|
 |
8
ob 2015 年 9 月 22 日 3
感谢楼主为 wikipedia 做出贡献。
|
 |
9
cxl008 2015 年 9 月 22 日
服务器没记录 ip ？
|
 |
11
frankel 2015 年 9 月 22 日
首先感谢楼主发现 Bug~~
我们已经紧急修复了，楼主再看看？ |
 |
12
ibcker 2015 年 9 月 22 日
刷票服务出租，有好几台 vps XD
|
 |
14
aliuwr 2015 年 9 月 22 日
楼主的浏览器用的什么主体？
|
 |
15
lincanbin 2015 年 9 月 22 日
|
 |
16
MOsky 2015 年 9 月 22 日
才发现页面全是宋体。。。。
|
 |
17
enda 2015 年 9 月 22 日
这是啥语言
|
 |
23
BikeMan 2015 年 9 月 22 日
Gentoo 以前是我最爱的 Linux 个人服务器系统, 现在批量管理, 就直接用 Ubuntu 了.
|
 |
24
iamleung 2015 年 9 月 22 日 1
awesome 真的是逼格与实用性并存的窗口管理神器
|
|
26
vitovan OP |
Select Language