ASP 版的千千静听 LRC 歌词查询 [jscript]

在网上没有看到有 ASP 版本的代码，也翻译一份放上来，因为图方便，便用 jscript 写

省下许多功夫。

1. <%@ codepage=\"65001\" %><script runat=\"server\" language=\"jscript\">
   
2. 
   
3. /**
   
4. * @author 林俊海(ialvin.cn) 广东·普宁·里湖
   
5. */
   
6. 
   
7. String.prototype.trim = function() {
   
8.     return this.replace(/^\\s+|\\s+$/g, \'\');
   
9. };
   
10. 
    
11. function httpGet(strURL) {
    
12.     with (Server.CreateObject(\"MSXML2.XMLHTTP\")) {
    
13.         open(\"GET\", strURL, false);
    
14.         send(null);
    
15.         return responseText;
    
16.     }
    
17. }
    
18. 
    
19. function encode(str) {   
    
20.     str = (str||\"\").replace(/[ \']/g, \"\").toLowerCase();  
    
21.     return escape(str).replace(/%u(..)(..)|%(..)|(.)/g, function($, $1, $2, $3, $4) {  
    
22.         if ($1) return $2 + $1;  
    
23.         if ($3) return $3 + \"00\";  
    
24.         return (\"0\"+$4.charCodeAt(0).toString(16)).slice(-2) + \'00\';  
    
25.     });  
    
26. }  
    
27. 
    
28. function loadXML(strXML) {
    
29.     var x = Server.CreateObject(\"MSXML2.DOMDocument\");
    
30.     x.loadXML(strXML);
    
31.     return x;
    
32. }
    
33. 
    
34. 
    
35. function conv(i) {
    
36.     var r = i % 4294967296;
    
37.     if (i >= 0 && r > 2147483648)
    
38.         r = r - 4294967296;
    
39.     if (i < 0 && r < 2147483648)
    
40.         r = r + 4294967296;
    
41.     return r;
    
42. }
    
43. 
    
44. function mConv(ia, ib) {
    
45.     var o = (ia>0 && ib>0) ? 1 : (ia<0 && ib<0) ? 1 : -1;
    
46.     var a = ia.toString(2).replace(/\\D/g,\'\').split(\"\").reverse();
    
47.     var b = ib.toString(2).replace(/\\D/g,\'\').split(\"\").reverse();
    
48.     var c = []; c.length = 34; c = c.join(\"0\").split(\"\");
    
49.     for (var i=0; i<b.length; i++) {
    
50.         if (b[i ]==\'1\') {
    
51.             for (var j=0; j<a.length && j+i<33; j++)
    
52.                 c[j+i] = c[j+i]-(-a[j]);
    
53.         }
    
54.     }
    
55.     for (var i=0; i<32; i++) {
    
56.         c[i+1] += parseInt(c[i ]/2);
    
57.         c[i ] = c[i ] % 2;
    
58.     }
    
59.     c = parseInt(c.slice(0, 32).reverse().join(\"\"), 2)*o;
    
60.     if (o == 1 && c > 2147483648)
    
61.         c = c - 4294967296;
    
62.     if (o == -1 && c < 2147483648)
    
63.         c = c + 4294967296;
    
64.     return c;
    
65. }
    
66. 
    
67. 
    
68. function verifyCode(artist, title, lrcId) {
    
69.     var song = [];
    
70.     encodeURIComponent(artist+title).replace(/%(..)|(.)/g, function($, $1, $2) {
    
71.         if ($1)
    
72.             song.push(parseInt($1, 16));
    
73.         else
    
74.             song.push($2.charCodeAt(0));
    
75.     });
    
76.     var intVal2 = 0, intVal3 = 0;
    
77.     var intVal1 = (lrcId & 0xFF00) >> 8;
    
78.     if ((lrcId & 0xFF0000) == 0) {
    
79.         intVal3 = 0xFF & ~intVal1;
    
80.     } else {
    
81.         intVal3 = 0xFF & ((lrcId & 0xFF0000) >> 16);
    
82.     }
    
83.     intVal3 = intVal3 | ((0xFF & lrcId) << 8);
    
84.     intVal3 = intVal3 << 8;
    
85.     intVal3 = intVal3 | (0xFF & intVal1);
    
86.     intVal3 = intVal3 << 8;
    
87.     if ((lrcId & 0xFF000000) == 0) {
    
88.         intVal3 = intVal3 | (0xFF & (~lrcId));
    
89.     } else {
    
90.         intVal3 = intVal3 | (0xFF & (lrcId >> 24));
    
91.     }
    
92.     var uBound = song.length - 1;
    
93.     while (uBound >= 0) {
    
94.         var c = song[uBound];
    
95.         if (c >= 0x80)
    
96.             c = c - 0x100;
    
97.         intVal1 = (c + intVal2) & 0xFFFFFFFF;
    
98.         intVal2 = (intVal2 << (uBound % 2 + 4)) & 0xFFFFFFFF;
    
99.         intVal2 = (intVal1 + intVal2) & 0xFFFFFFFF;
    
100.         uBound -= 1;
     
101.     }
     
102.     uBound = 0;
     
103.     intVal1 = 0;
     
104.     while (uBound <= song.length - 1) {
     
105.         var c = song[uBound];
     
106.         if (c >= 128)
     
107.             c = c - 256;
     
108.         var intVal4 = (c + intVal1) & 0xFFFFFFFF;
     
109.         intVal1 = (intVal1 << (uBound % 2 + 3)) & 0xFFFFFFFF;
     
110.         intVal1 = (intVal1 + intVal4) & 0xFFFFFFFF;
     
111.         uBound += 1;
     
112.     }
     
113.     var intVal5 = conv(intVal2 ^ intVal3) & 0xFFFFFFFF;
     
114.     intVal5 = conv(intVal5 + (intVal1 | lrcId)) & 0xFFFFFFFF;
     
115.     intVal5 = mConv(intVal5 , intVal1 | intVal3);
     
116.     intVal5 = mConv(intVal5 , intVal2 ^ lrcId);
     
117.     var longVal6 = intVal5;
     
118.     if (intVal5 > 2147483648)
     
119.         intVal5 = (intVal5 - 4294967296) & 0xFFFFFFFF;
     
120.     return intVal5.toString();
     
121. }
     
122. 
     
123. 
     
124. function query(artist, title) {
     
125.     var url = \"http://ttlrcct.qianqian.com/dll/lyricsvr.dll?sh?Artist=\" + encode(artist) + \"&Title=\" + encode(title)+\"&Flags=0\";
     
126.     // 这里可能有多个匹配的结果，这里只选取第一个
     
127.     var lrc = loadXML(httpGet(url)).selectSingleNode(\"/result/lrc\");
     
128.     if  (lrc == null)
     
129.         throw new Error(\"在服务器上找不到匹配的歌词。\");
     
130.     var lrcId = lrc.getAttribute(\"id\");
     
131.     artist = lrc.getAttribute(\"artist\");
     
132.     title = lrc.getAttribute(\"title\");
     
133.     url = \"http://ttlrcct2.qianqian.com/dll/lyricsvr.dll?dl?Id=\" + lrcId + \"&Code=\" + verifyCode(artist, title, lrcId);
     
134.     return {ar:artist, ti:title, lrc:httpGet(url)};
     
135. }
     
136. 
     
137. Response.ContentType = \"text/html; charset=utf-8\";
     
138. try {
     
139.     var artist = (Request.QueryString(\"artist\").Item || \'\').trim();
     
140.     var title = (Request.QueryString(\"title\").Item || \'\').trim();
     
141.     if (title == \'\')
     
142.         throw new Error(\"请传入音乐名称!\");
     
143.    
     
144.     var result = query(artist, title);
     
145.     var fileName = result.ar + \" - \" + result.ti + \".lrc\";
     
146.     Response.ContentType = \"text/plain; charset=utf-8\";
     
147.     Response.AddHeader(\"Content-Disposition\", \"inline; filename=\\\"\" + encodeURIComponent(fileName) + \"\\\"\");
     
148.     Response.Write(result.lrc);
     
149. } catch(e) {
     
150.     Response.Write(\"查询错误：\" + e.message);
     
151. }
     
152. </script>

复制代码

Java 版的可以参考: http://www.iscripts.org/bbs/viewthread.php?tid=85

当然，这里建议在每查询获得一个音乐的 LRC 歌词的时候，把歌词内容存入本地文件或者数据库中，
这样再下次查询时，可以先从本地查询，查不到了再从千千静听的歌词服务器查询，这样子平均上很大程度的提高 WEB 应用的的响应速度。

嘿嘿 收藏了