破解目標：破解一經(jīng)過加密的Asp木馬登陸密碼。由于木馬里沒有版本說明，具體也不知道這木馬叫什么名。

破解思路：兩種，用加密后的密碼替換密文和利用密文及加密算法反解出密碼。

前者根本算不上真正的破解。如果得不到Asp源代碼，那么可以說對破解密碼，我毫無勝算。有位華夏的朋友說他得到了一個Web的權(quán)限，但是無法修改主頁，發(fā)現(xiàn)其中已經(jīng)有個Asp木馬，但密碼是經(jīng)過加密的。好了，廢話太多了，那么，作好準備，這次的解說將會相當?shù)穆L。

Asp木馬登陸密碼驗證關(guān)鍵代碼如下：

if Epass(trim(request.form("password")))="q_ux624q|p" then 
response.cookies("password")="8811748" 
...
<%
end select
function Epass(pass)
temppass=StrReverse(left(pass&"zxcvbnm,./",10))
templen=len(pass)
mmpassword=""
for j=1 to 10
mmpassword=mmpassword+chr(asc(mid(temppass,j,1))-templen+int(j*1.1))
next
Epass=replace(mmpassword,"'","B")
end function
%>
  

很明顯，用的是Epass函數(shù)把輸入的密碼進行加密，然后將得到的密文和原密文進行比對。如果稍有點編程基礎(chǔ)的話，特別是VB，那么Epass里的加密算法將一目了然。如果沒有，那么，沒關(guān)系，相信經(jīng)過我的講解，你很快就會明白。函數(shù)中，保存密碼的變量是pass。pass&"zxcvbnm,./" 將pass里的內(nèi)容與zxcvbnm,./相連接得到一個新的字符串。left(pass&"zxcvbnm,./",10)取前10位。StrReverse函數(shù)將得到的10位字符串次序顛倒。len(pass)獲得密碼的長度。下面是一個循環(huán)。將得到的字符串中的每一位的Ascii碼-密碼長度+取整(字符所在位*1.1),然后將得到的數(shù)值轉(zhuǎn)換成字符重新連接。最后將得到的字符串中有'字符的全部替換成B，這樣密文的產(chǎn)生了。如果我們提取加密算法用自己的密文替換原有密文，那么相映的密碼也會變成你的密碼。但我說過了，這并不是真正意義上的破解。

假如我們輸入的是love，加密過程如下：

love
lovezxcvbnm,./ '連接
lovezxcvbn   '取前10位
nbvcxzevol   '次序顛倒
n
110(ascii)-4(位數(shù))+int(1(位置)*1.1)=107
107的ascii碼為k,依次類推，最后密文：
k`ucy|hzts
  

我們可以通過密文和加密算法反推出密碼，從算法的最后一步開始往上推。最后一步用B替換所有'，有沒必要將B替換回'呢，答案是否定的。只要我們能得到最后的密文，密碼不一樣也是有可能的。如果有10個B，那原密碼的個數(shù)就2的10次方個，雖然原密碼只有一個，但是1024個密碼都是正確的。如果要完美破解的朋友，可以自己試著編寫全部的組合。那么這步可以忽略了， 上面的算法很清晰。

chr(asc(mid(temppass,j,1))-templen+int(j*1.1)) 
  

我們只要簡單的將+和-換一下就可以了。

chr(asc(mid(temppass,j,1))+templen-int(j*1.1)) 
  

但是還有一個問題，我們事先不知道密碼的長度，沒關(guān)系，幸好密碼在1-10位之間，不太長。那么我們可以用一個1到10的循環(huán)求出所有可能的密碼，再將其用StrReverse函數(shù)次序顛倒。那么最后得到的密碼我們該怎么確定哪個就是呢。可以根據(jù)pass&"zxcvbnm,./",看除密碼最后是否有zxvbnm,./的前幾位。那么這就是真正的密碼。那么如果密碼是10位，將是永遠正確的，因為后面不存在連接。所以我們可能得到兩個答案。

以下便是我編寫的解密函數(shù)：

function Ccode(code)
for templen1=1 to 10
mmcode=""
for j=1 to 10
mmcode=mmcode+chr(asc(mid(code,j,1))+templen1-int(j*1.1))
next
Ccode=strReverse(mmcode)
response.write "密碼"&templen1&":"&Ccode&"
"
if mid(Ccode,templen1+1,10-templen1)=left("zxcvbnm,./",10-templen1) and templen1<>10 then
result=left(Ccode,templen1)
next
response.write "最后密碼:"&result
end function
   

好了，算法可能在這么短的時間內(nèi)無法完全掌握，這是正常的，那么我將在壓縮包中附送說明文檔和加解密的Asp源代碼，大家拿回去好好研究吧。同樣，密碼10永恒正確的。那么我們將Asp里原有的密文拿過來看看，會有什么結(jié)果。

責(zé)任編輯 趙毅 zhaoyi#51cto.com TEL:（010）68476636-8001