网站安全之ASP程序加密解密方法全面解析
如今，用ASP技術構建的網站隨處可見。由于ASP腳本是在服務器上解釋執行的(無法編譯)，因此你辛苦開發出來的ASP代碼，很容易被人拷去任意修改，如何保護ASP源代碼呢?這是每個ASP站長都會遇到的難題，網上求解這類問題的帖子非常多，下面我們就來談談ASP程序的加密方法。
一、如何加密ASP程序?
目前對ASP程序的加密方法主要有三種：腳本編碼器(SRCENC.EXE)加密、組件加密、自編程序加密，下面我們就來展開介紹這三種加密方法。
1、使用微軟的MS Script Encode進行加密
微軟提供了腳本編碼器MS Script Encode(下載地址http://www.itgene.cn/itgene/download/download.aspID=232)，可以對ASP程序進行加密。這是一個簡單的命令行工具，其執行文件是SRCENC.EXE，需要在DOS下運行。它只加密頁面中嵌入的腳本代碼，把網頁中之間的ASP代碼轉換成不可讀的亂碼，其他部分則保持原樣不變。加密后的程序，必須使用Internet Explorer 5.0以上版本才能正常瀏覽。
用SRCENC加密之后，文件中被加密過的部分將變成只讀類型，假如你修改了加密部分(哪怕只改動一個字)，就會導致整個文件不能使用。對于 VBScript，加密后在源文件的第一行會顯示：<SCRIPT LANGUAGE="VBScript.Encode">；而JScript（或 JavaScript）則會顯示：<SCRIPT LANGUAGE="JScript.Encode">
(1)加密方法
單擊“開始”/程序/附件/命令提示符，在MS-DOS 命令行中輸入以下命令，即可對某個asp文件加密：
SRCENC ?[switches] ?<要加密asp文件名> ?<加密后的文件名>
其中[switches]項目可以選以下5個參數
[switches] 含義 舉例
/s 可選。命令中帶了該參數，加密過程中屏幕上就不會有輸出。 screnc /s lacl.sct ulacl.sct
對當前目錄中的腳本小程序lacl.sct加密，加密過程中屏幕不顯示任何信息
/f 可選。指定輸出文件是否覆蓋同名輸入文件。忽略，將不執行覆蓋。 screnc /f lacl.asp
對文件 lacl.asp加密，并用編碼后的同名文件覆蓋原文件
/xl 可選。是否在.asp文件的頂部添加@Language指令。忽略，將添加。
/l defLanguage 可選。指定Script Encoder加密中選擇的缺省腳本語言。文件中不包含這種腳本語言特性的腳本將被Script Encoder 忽略。
對于HTML文件，JScript為內置缺省腳本語言;對于ASP文件，VBScript為缺省腳本語言;對于擴展名為.vbs或.js的文件，Script Encoder也有自適應能力。 screnc /l vbscript lacl.htm ulacl.htm
對文件 lacl.htm加密，并生成輸出文件 ulacl.htm，確保沒有指定語言屬性的腳本塊使用 VBScript
/e defExtension 可選。指定待加密文件的文件擴展名。缺省狀態下，Script Encoder能識別asa,asp,cdx,htm,html,js,sct和vbs文件。 screnc /e asp 11\*.* f:\labxw-jm
對11目錄中的所有.ASP 文件進行加密，并把編碼后的輸出文件放在f:\labxw-jm目錄中
(2)操作舉例
例如要加密當前目錄中的lacl.asp文件，生成加密文件ulacl.asp，則在DOS下輸入命令：
screnc lacl.asp ulacl.asp
對當前目錄中的所有 .ASP 文件進行加密，并把編碼后的輸出文件放在f:\labxw中，則使用命令：
screnc *.asp f:\labxw
?
2、使用組件加密asp
以上被screnc加密過的程序，是可以解密的(解密方法下文有介紹)，如果你想徹底保護自己的asp代碼，可以通過開發activex dll組件的方法進行保護。
Dll文件是被編譯過的機器代碼，如果沒有源項目文件，是不可能被反編譯的，所以組件加密這種方法最安全，也不可能被破解。下面我們來舉例說明操作過程，例如你要保護以下asp代碼：
| 以下是引用片段： set?rs=server.createobject("adodb.recordset") sql="select?*?from?gq?where?xs=1?order?by?date?asc" rs.open?sql,conn,1,1 if?rs.eof?and?rs.bof?then response.write"<A HREF=new0.asp?lbid=gqx ><%= gqx %></A>" else Response.Write?"" end?if set?rs=nothing conn.close set?conn=nothing |
可以把它們改寫成VB組件，然后在ASP文件中調用組件即可。操作步驟如下：
(1)新建一個vb6的activex dll項目
在屬性窗口中，命名你的庫模塊和項目文件(例如項目名lacl，模塊名disp)，以后在asp文件中，調用的對象名將為lacl_disp
選擇vb6中的項目菜單中的references ，選中microsoft activex data objects 2.0 library
(2)編寫VB組件
接下來把<欲保護的asp代碼>改寫成VB組件，代碼如下：
| 以下是引用片段： public?function?html_combo(disp_table?as?string)?as?string dim?outstring?as?string dim?conn?as?adodb.connection dim?rst?as?adodb.recordset dim?sqlstring?as?string set?conn?=?createobject("adodb.connection") set?rst?=?createobject("adodb.recordset") sqlstring?=?"select?*?from?"?&?disp_table?&?"?where?xs=1?order?by?date?asc" '以上是在VB中打開數據庫操作，數據庫中的表名、字段名，你可以根據自己的需要修改 conn.open?"dsn=sumnet" rst.open?sqlstring,?conn,?3,?3 if?rst.eof?and?rst.bof?then outstring?=?"還沒有這類單位信息" else rst.movefirst outstring?=?"<A HREF=new0.asp?lbid="&request("lbid") & "></A>" end?if html_combo?=?outstring rst.close conn.close end?function |
寫好以上VB代碼后，保存項目并開始編譯。
(3)生成安裝文件
打開visual studio 6中附帶的package deployment wizard程序，選擇剛才建立的activex項目文件lacl;選擇package，選擇要打包的腳本或使用默認腳本，選擇標準安裝，為生成的安裝文件選擇一個存放目錄，選擇single cab. 其他均默認;然后單擊下一步，安裝文件就自動生成了!
(4)在IIS服務器上安裝組件
在IIS服務器上運行這個安裝文件，把組件安裝到服務器上。
?
(5)在網頁中調用組件
以后在ASP文件中，通過調用該組件完成原來的功能。在網頁中調用你制作的組件，方法如下：
| 以下是引用片段： ??<%@?language="vbscript"?%> ??<% ??set?diaoyong?=?server.createobject("lacl_disp.disp") ??%>?????????????????????????? ??<html> ??<body> ??<%=?diaoyong.html_combo("gq")%> ??<br> ??</body> ??</html> |
你看，現在Asp文件中的內容只是組件的調用(與以前完全不同)，別人即使得到該文件，也無法編輯修改源代碼，因為代碼都被封裝在VB組件中了，對于組件中的代碼，外人是無法看到、也不能反編譯的!
3、自己編寫加密程序
組件加密方法雖然不可破解，但是要求你熟悉VB編程，需要把ASP代碼改寫成VB組件，工作量很大，所以建議大家自己編程來保護asp代碼，其基本思路是：寫一個加密函數base64Encode和解密函數base64Decode，先用加密函數處理<要保護的asp代碼>，得到對應的密文hu；然后再用execute(base64Decode(hu))替換<欲保護的asp代碼>。
例如我們要保護上面那段asp代碼，可以這樣操作：
(1)用WORD處理<要保護的ASP代碼>
將<要保護的ASP代碼>拷到WORD中;在WORD中，把代碼里的段落標記(回車換行)全部替換成“水”這個漢字，方法是：點擊“編輯”/替換，光標移到“查找內容”欄，點“高級”/特殊字符，選擇“段落標記”;光標移到“替換為”欄，輸入“水”，最后點“全部替換”。同法，把代碼中的單引號也全部替換成“加”這個漢字。
(2)編寫、運行加密程序
在FrontPage中編寫加密程序，該程序中有初始化函數initCodecs、加密函數base64Encode(代碼如下)，把WORD處理后的代碼，copy粘貼在inp = ""這句中，最后以test1.asp名存盤;在IE中輸入http://127.0.0.1/test1.asp本地運行該文件;屏幕上會顯示一大段亂碼(例如c2V0IHJzPXNlcnZlci5jcmVhd...)，這就是《要保護的asp代碼》對應的密文!
| 以下是引用片段： OPTION?EXPLICIT const?BASE_64_MAP_INIT?=?"ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/" dim?newline dim?Base64EncMap(63) dim?Base64DecMap(127) dim?inp,hu,encode call?initCodecs?'初始化 inp?=?"<WORD處理后的asp代碼>"?'將要保護的asp代碼用WORD處理，然后填在此處 hu=?base64Encode(inp)?'調用函數base64Encode進行加密，得到密文hu Response.Write(hu)?'顯示密文 PUBLIC?SUB?initCodecs()?'初始化函數initCodecs newline?=?"<P>" & chr(13) & chr(10) dim?max,?idx max?=?len(BASE_64_MAP_INIT) for?idx?=?0?to?max?-?1 Base64EncMap(idx)?=?mid(BASE_64_MAP_INIT,?idx?+?1,?1) next for?idx?=?0?to?max?-?1 Base64DecMap(ASC(Base64EncMap(idx)))?=?idx next END?SUB PUBLIC?FUNCTION?base64Encode(plain)?'加密函數base64Encode if?len(plain)?=?0?then base64Encode?=?"" exit?function end?if dim?ret,?ndx,?by3,?first,?second,?third by3?=?(len(plain)?\?3)?*?3 ndx?=?1 do?while?ndx?<=?by3 first?=?asc(mid(plain,?ndx+0,?1)) second?=?asc(mid(plain,?ndx+1,?1)) third?=?asc(mid(plain,?ndx+2,?1)) ret?=?ret?&?Base64EncMap(?(first?\?4)?AND?63?) ret?=?ret?&?Base64EncMap(?((first?*?16)?AND?48)?+?((second?\?16)?AND?15?)?) ret?=?ret?&?Base64EncMap(?((second?*?4)?AND?60)?+?((third?\?64)?AND?3?)?) ret?=?ret?&?Base64EncMap(?third?AND?63) ndx?=?ndx?+?3 loop if?by3?<?len(plain)?then first?=?asc(mid(plain,?ndx+0,?1)) ret?=?ret?&?Base64EncMap(?(first?\?4)?AND?63?) if?(len(plain)?MOD?3?)?=?2?then second?=?asc(mid(plain,?ndx+1,?1)) ret?=?ret?&?Base64EncMap(?((first?*?16)?AND?48)?+?((second?\?16)?AND?15?)?) ret?=?ret?&?Base64EncMap(?((second?*?4)?AND?60)?) else ret?=?ret?&?Base64EncMap(?(first?*?16)?AND?48) ret?=?ret?'&?"=" end?if ret?=?ret?'&?"=" end?if base64Encode?=?ret END?FUNCTION |
(3)重新改寫要保護的asp文件
改寫原來的asp文件，在文件中增加UnEncode 和base64Decode函數，全部代碼如下：
| 以下是引用片段： Dim?Hu,Hu2 '拷貝“欲保護asp代碼”的密文?將之存放到Hu變量中 Hu=”c2V0IHJzPXNlcnZlci5jcmVhdGVvYmplY3Qo12Fkb2RiLnJlY29yZHNldOMpICAgICDuc3FsPeNzZWxlY3QgKiBmcm9tIGdxICB3aGVyZSB4cz0xIG9yZGVyIGJ5IGRhdGUgYXNj1yAgICAgsnJzLm9wZW4gc3FsLGNvbm4sMSwxICAgICDuaWYgcnMuZW9mIGFuZCBycy5ib2YgdGhlbiDucmVzcG9uc2Uud3JpdGUTvSD7INAg5iAgILUgvyAFILITsmVsc2UgsiAgICAgUmVzcG9uc2UuV3JpdGUg1zxBIEhSRUY9bmV3MC5hc3A/bGJpZD0TJnJlcXVlc3Qo12xiaWQTKSAmIOM+PC9BPuPuZW5kIGlmICAgIL5zZXQgcnM9bm90aGluZyAgICAgICAgsmNvbm4uY2xvc2UgICAgICDuc2V0IGNvbm49bm90aGluZyAgIL4” Hu2=?base64Decode(hu)?'還原要保護的ASP代碼 execute(UnEncode(Hu2))?'還原單引號、回車換行，并執行原代碼 ’解密函數base64Decode FUNCTION?base64Decode(scrambled) if?len(scrambled)?=?0?then base64Decode?=?"" exit?function end?if dim?realLen realLen?=?len(scrambled) do?while?mid(scrambled,?realLen,?1)?=?"=" realLen?=?realLen?-?1 loop dim?ret,?ndx,?by4,?first,?second,?third,?fourth ret?=?"" by4?=?(realLen?\?4)?*?4 ndx?=?1 do?while?ndx?<=?by4 first?=?Base64DecMap(asc(mid(scrambled,?ndx+0,?1))) second?=?Base64DecMap(asc(mid(scrambled,?ndx+1,?1))) third?=?Base64DecMap(asc(mid(scrambled,?ndx+2,?1))) fourth?=?Base64DecMap(asc(mid(scrambled,?ndx+3,?1))) ret?=?ret?&?chr(?((first?*?4)?AND?255)?+?((second?\?16)?AND?3)) ret?=?ret?&?chr(?((second?*?16)?AND?255)?+?((third?\?4)?AND?15)) ret?=?ret?&?chr(?((third?*?64)?AND?255)?+?(fourth?AND?63)) ndx?=?ndx?+?4 loop if?ndx?<?realLen?then first?=?Base64DecMap(asc(mid(scrambled,?ndx+0,?1))) second?=?Base64DecMap(asc(mid(scrambled,?ndx+1,?1))) ret?=?ret?&?chr(?((first?*?4)?AND?255)?+?((second?\?16)?AND?3)) if?realLen?MOD?4?=?3?then third?=?Base64DecMap(asc(mid(scrambled,ndx+2,1))) ret?=?ret?&?chr(?((second?*?16)?AND?255)?+?((third?\?4)?AND?15)) end?if end?if base64Decode?=?ret END?FUNCTION '還原單引號、回車換行函數UnEncode function?UnEncode(cc) for?i?=?1?to?len(cc) if?mid(cc,i,1)<>?"水"?then if?mid(cc,i,1)="加"?then temp?=?""""?&?temp else temp?=?Mid(cc,?i,?1)?+?temp end?if else temp=newline&temp end?if next UnEncode=temp end?function |
將以上代碼以test2.asp名存盤。
(4)用SRCENC加密test2.asp
用SRCENC加密test2.asp，然后把它發布到服務器上，這樣別人即使得到該文件、破解了SRCENC加密，也無法看到原代碼，因為原代碼在test2.asp中是密文(Hu=”c2V0IHJzPXNlcnZlc...)，所以ASP代碼就被保護起來了!
?
二、加密過的asp程序如何解密?
如何對加密過的asp程序解密呢?首先我們要告訴大家，用組件法加密的asp程序是無法解密的，而screnc加密過的程序則可以解密，方法是：使用解密軟件(ZWDECODE.EXE)。
ZWDECODE.EXE(下載地址http://www.mydown.com/softdown/45/45183.html)可以對MS Script Encode加密的ASP文件進行解密，還原出源代碼。
(1)解密方法
單擊“開始”/程序/附件/命令提示符，在MS-DOS 命令行中輸入以下命令，即可恢復原代碼：
ZWDECODE <已加密asp文件名>
其中<已加密asp文件名>必需輸入，該文件名可帶目錄路徑;也必需輸入，這是要生成的輸出文件名，也可以帶路徑信息。
(2)舉例
例如F:\22\lacl.asp曾被screnc加密處理過，現在要恢復其中的源代碼，你可以在MS-DOS中輸入以下命令：
ZWDECODE F:\22\lacl.asp d:\ulacl.asp
執行完畢，在D盤上就會生成一個ulacl.asp文件，打開該文件，你就能看到源代碼了!?
總結
以上是生活随笔為你收集整理的网站安全之ASP程序加密解密方法全面解析的全部內容，希望文章能夠幫你解決所遇到的問題。
- 上一篇： [原]Console小技巧——Conso
- 下一篇： 初涉大数运算（下）