CMP扩展包：集cmp4 PHP代理/插件/开发帮助/期待终版测试12-12

1203598

不错！PHP版17173测试可以！谢谢楼主的分享.
楼主能不能做个rayfile代理!

qq415686397

兄弟看看这几个能不能弄个asp和php程序
激动网http://client.joy.cn/flvplayer/v20081022.swf?strvid=40367588
魔方网http://v.mofile.com/show/3C72ANVM.shtml
爆米花http://video.pomoho.com/swf/out_player.swf?flvid=3952704

qq415686397

回复 9# 7huo
17173的看来地址真是防盗连的测试不能用，不过还是谢谢兄弟的分享精神！

1. http://www.2vmm.cn/mp4/mv.asp?v=603223

复制代码

MV全局调用增强插件能不能写个asp现在很多空间对php支持不是很好
请复制以下代码保存为src_handler.php到cmp目录下

7huo

回复 5# sxw2005


为了方便我们找到
论坛代码：

1. [flash=500,395]http://vlog.17173.com/playercs2008.swf?Flvid=644381[/flash]

复制代码

Flvid=后面就是我们要的参数 644381
则
视屏列表：<m type="2" src="mv.php?1=644381" label="名称"/>

7huo

支持rayfile：请复制以下代码保存为m.php到cmp目录下

1. <?/*
   
2. 新浪地址：http://you.video.sina.com.cn/b/32391253-1734798373.html
   
3. 视屏列表：<m type="2" src="m.php?s=32391253_1734798373" label="名称"/>
   
4. rayfile地址：http://www.rayfile.com/zh-cn/files/c97ce4ca-43ef-11df-ad27-0015c55db73d/
   
5. 视屏列表：<m type="2" src="m.php?r=c97ce4ca-43ef-11df-ad27-0015c55db73d" label="名称"/>
   
6. 特别注明：mv.php?获取网站简称=视屏编号        s：为sina        r:为rayfile
   
7. 本程序由：wo0.cn编写，请保留本信息。*/
   
8. function vita_get_url_content($url) {
   
9. $ch = curl_init();
   
10. //$User_Agent = "baiduspider+(+http://www.baidu.com/search/spider.htm)";
    
11. //$Referer_Url = 'http://www.wo0.cn/';
    
12. $timeout = 5;
    
13. curl_setopt ($ch, CURLOPT_URL, $url);
    
14. curl_setopt ($ch, CURLOPT_RETURNTRANSFER, 1);
    
15. //curl_setopt ($ch, CURLOPT_USERAGENT, $User_Agent);
    
16. //curl_setopt ($ch, CURLOPT_REFERER, $Referer_Url);
    
17. curl_setopt ($ch, CURLOPT_CONNECTTIMEOUT, $timeout);
    
18. $file_contents = curl_exec($ch);
    
19. curl_close($ch);
    
20. return $file_contents;
    
21. }
    
22. 
    
23. $ms=$_GET['s'];
    
24. $mr=$_GET['r'];
    
25. if ($mr){
    
26. $url="http://www.rayfile.com/zh-cn/files/".$mr;
    
27. $file=vita_get_url_content($url);
    
28. $regx='<div class="btn_indown_zh-cn"><a href="([^\<]*)"></a></div>';
    
29. eregi($regx,$file,$rg);
    
30. $file=vita_get_url_content($rg[1]);
    
31. $regx="downloads_url = \['([^\[]*)'\]";
    
32. eregi($regx,$file,$rg);
    
33. $rg[1] = str_replace("zh-cn/","c8c0/zh-cn/",$rg[1]);
    
34. } else {
    
35. $url="http://v.iask.com/v_play.php?vid=".$mvs;
    
36. $file=vita_get_url_content($url);
    
37. $regx="<url><!\[CDATA\[([^\[]*)\]\]><\/url>";
    
38. eregi($regx,$file,$rg);
    
39. }
    
40. //echo $rg[1];
    
41. Header("HTTP/1.1 303 See Other");
    
42. header("location: $rg[1]");
    
43. ?>

复制代码

新浪音乐视屏调用：请复制以下代码保存为m.php到cmp目录下

1. <?/*
   
2. 新浪地址：http://you.video.sina.com.cn/b/32391253-1734798373.html
   
3. 视屏列表：<m type="2" src="m.php?s=32391253_1734798373" label="名称"/>
   
4. 新浪音乐：http://music.sina.com.cn/yueku/m.php?id=1239642&FLAG_ADDLIST=0
   
5. 视屏列表：<m type="1" src="m.php?m=1239642" label="名称"/>
   
6. 特别注明：m.php?获取网站简称=视屏编号        s：为sina        m:为新浪音乐
   
7. 本程序由：wo0.cn编写，请保留本信息。*/
   
8. function vita_get_url_content($url) {
   
9. $ch = curl_init();
   
10. //$User_Agent = "baiduspider+(+http://www.baidu.com/search/spider.htm)";
    
11. //$Referer_Url = 'http://www.wo0.cn/';
    
12. $timeout = 5;
    
13. curl_setopt ($ch, CURLOPT_URL, $url);
    
14. curl_setopt ($ch, CURLOPT_RETURNTRANSFER, 1);
    
15. //curl_setopt ($ch, CURLOPT_USERAGENT, $User_Agent);
    
16. //curl_setopt ($ch, CURLOPT_REFERER, $Referer_Url);
    
17. curl_setopt ($ch, CURLOPT_CONNECTTIMEOUT, $timeout);
    
18. $file_contents = curl_exec($ch);
    
19. curl_close($ch);
    
20. return $file_contents;
    
21. }
    
22. error_reporting(0);
    
23. $ms=$_GET['s'];
    
24. $m=$_GET['m'];
    
25. if ($m){
    
26. $url="http://music.sina.com.cn/yueku/intro/musina_mpw_playlist.php?id[]=".$m;
    
27. $file=vita_get_url_content($url);
    
28. $regx='MP3_URL":"(.*)",';
    
29. eregi($regx,$file,$rg);
    
30. $url = str_replace("\\","",$rg[1]);
    
31. $file=vita_get_url_content($url);
    
32. $regx='="(.*)"';
    
33. eregi($regx,$file,$rg);
    
34. } else {
    
35. $url="http://v.iask.com/v_play.php?vid=".$ms;
    
36. $file=vita_get_url_content($url);
    
37. $regx="<url><!\[CDATA\[([^\[]*)\]\]><\/url>";
    
38. eregi($regx,$file,$rg);
    
39. }
    
40. //echo $rg[1];
    
41. Header("HTTP/1.1 303 See Other");
    
42. header("location: $rg[1]");
    
43. ?>

复制代码

顺便问一下大家都是用的哪里的视屏。如果有好的资源的话可以直接加到全局调用src_handler.php里，更加方便一些。




php版高级应用之简洁链接：
我们把m.php放到cmp下 比如：http://wo0.cn/cmp/
再新建一个.htaccess

1. <IfModule mod_rewrite.c>
   
2.   RewriteEngine on
   
3.   # Rewrite URLs of the form 'x' to the form 'index.php?q=x'.
   
4.   RewriteCond %{REQUEST_FILENAME} !-f
   
5.   RewriteCond %{REQUEST_FILENAME} !-d
   
6.   RewriteRule ^m(.*)$ m.php?m=$1 [L,QSA]
   
7.   RewriteRule ^s([^r]*)$ m.php?s=$1 [L,QSA]
   
8.   RewriteRule ^r(.*)$ m.php?r=$1 [L,QSA]
   
9. </IfModule>

复制代码

现在我们的调用就变成了：
原：m.php?s=32391253_1734798373    新：s32391253_1734798373
原：m.php?m=1239642              新：m1239642

是不是少了些字母，如果不能用说明你的服务器不支持。
个人认为，只是少了些字，对流量不大的站，没意义，不过有朋友提出，也做出来让大家参考一下。
我站上没放这些文件，小站没么多流量来分享，如不支持也没办法。


17173 asp版

1. <%
   
2. '17173地址：[flash=500,395]http://vlog.17173.com/playercs2008.swf?Flvid=603223[/flash]
   
3. '视屏列表：<m type="2" src="mv.asp?v=603223" label="名称"/>
   
4. '本程序由：wo0.cn编写，请保留本信息。
   
5. On Error Resume Next
   
6. Server.ScriptTimeOut=999999999
   
7. Function GetPage(url)
   
8.         Set Retrieval = CreateObject("Microsoft.XMLHTTP")
   
9.         With Retrieval
   
10.         .Open "Get", url, False, "", ""
    
11.         .Send
    
12.         GetPage = BytesToBstr(.ResponseBody)
    
13.         End With
    
14.         Set Retrieval = Nothing
    
15. End Function
    
16. 
    
17. Function BytesToBstr(body)
    
18.         dim objstream
    
19.         set objstream = Server.CreateObject("adodb.stream")
    
20.         objstream.Type = 1
    
21.         objstream.Mode =3
    
22.         objstream.Open
    
23.         objstream.Write body
    
24.         objstream.Position = 0
    
25.         objstream.Type = 2
    
26.         objstream.Charset = "gb2312"
    
27.         BytesToBstr = objstream.ReadText
    
28.         objstream.Close
    
29.         set objstream = nothing
    
30. End Function
    
31. 
    
32. Function GetKey(HTML,Start,Last)
    
33. filearray=split(HTML,Start)
    
34. filearray2=split(filearray(1),Last)
    
35. GetKey=filearray2(0)
    
36. End Function
    
37. 
    
38. v=request("v")
    
39. 
    
40. ch="http://vlog.17173.com/port/pconfig_r.php?id="&v
    
41. '获取网址
    
42. dydb = GetPage(ch)
    
43. '获取内容
    
44. dydb = GetKey(dydb,"MD5=","||")
    
45. 'GetKey函數(dydb,"获取内容之前","获取内容之后")
    
46. response.redirect dydb
    
47. %>

复制代码

lovecxw

谢谢楼主的分享，顶死你了。

17173的这个地址怎么写呢？按帖子里的写了还是不行

...
sxw2005 发表于 2010-5-2 09:52

下面有引用地址。。。。

qq415686397

测试17173不能正常使用，哥们能不能帮写个asp的程序，我空间不支持php

sxw2005

谢谢楼主的分享，顶死你了。

17173的这个地址怎么写呢？按帖子里的写了还是不行

http://vlog.17173.com/v/5/6/64/NjQ0Mzgx

7huo

最好可以把他们程序发上来，我直接加比较快。

qq415686397

谢谢哥们的分享精神，不过这个代理已经好几个了，只是没php的，哥们看能不能做下这几个站，17173.魔方网，爆米花，激动网代理地址调用，我见过有人能用asp写出魔方网真实地址调用!