|
优酷全站视频代理程序 程序源于互联网/ h0 X0 m* A* c* n" E7 C1 ^
全部搜集于优酷网,版权属于优酷网!由于官网不断地改变规则,故有些视频在采集后播放不了。把代码贴出来,让大家学习研究,请不要用作它途传播!若因此而造成的任何责任,本人概不负责!1 W$ V5 Y8 C9 b! R- v' j2 h( e
5 t# Y! i3 u! J4 R5 `增加一个 电视剧代理
9 ^& Q* v9 b7 h% k9 m) w/ g/ `- }9 }7 E& i5 L+ i% A, k: ]& {4 E
- <?php2 L) g3 V+ b, f4 _
- header("Content-type:text/xml;charset=utf-8");
1 p {5 d4 }* V8 Y+ Q - $fname = 'http://' . $_SERVER['SERVER_NAME'] . $_SERVER["SCRIPT_NAME"];define("URL","$fname");
6 Q9 z* d0 e3 ^" `0 d - $xml = "<?xml version="1.0" encoding="UTF-8" ?>\n<list>\n";& k" b( R# T; h' o. l% f* h$ u# Y$ B
- if(isset ($_GET['page'])){. ^9 `, b* V& Z4 h7 l/ E
- $xml.=page($_GET['page']);
n. }* w: H M! K4 J - }elseif(isset ($_GET['id'])){
( l, Z2 u2 h7 b- Y) K - $url='http://http://www.austgl.com/-09.info/show_page/id_'.$_GET['id'].'.html';
8 C& J0 E7 F1 @( U C3 E6 f - $str = m_v($url);/ w& }4 m1 s% h5 j) @
- preg_match('/id="zySeriesTab">(.*)<\/ul>/imsU',$str,$arr);
4 o; x+ C; H( ~. s1 p2 t6 W - preg_match_all('/<li data="(.*)"/imsU',$arr[1],$id);0 @1 P. c3 S8 l) V3 I, n
- if($id[1][0] == ""){$id[1][0] = "reload_1";}. a" Z% F0 m* d8 s; W3 [" h. X
- foreach ($id[1] as $reload)
! o7 g5 j: V) U2 y - {1 U7 O" f3 b' D# Q% e4 Z: R
- $urll="http://http://www.austgl.com/-09.info/show_episode/id_".$_GET['id'].".html?dt=json&divid=" . $reload . "&__rt=1&__ro=" . $reload;
1 u% X0 E% \9 N - $url=m_v($urll);2 `: ` @9 @1 U& C( p: V4 M
- preg_match_all('|<li><a href="http://v.youku.com/v_show/id_([^"]+).html" title=|', $url, $b);$ s6 K# y! k5 z
- preg_match_all('|title="([^"]+)" charset=|', $url, $c);
) ^. N. |! t" U- C; Q - $d = count($b[1]);% O7 J9 n* [% _" |. ~. S
- for($m=0;$m<$d;$m++){
5 ^1 s9 P d2 l, z9 d - $xml .='<m type="youku" src="' . $b[1][$m] . '" label="' . $c[1][$m] . '" />'."\n";
7 `5 W$ X, _6 h; f1 O5 A5 F& y - }}}6 O* i* s% r1 }
- else{% d& P2 d, S9 y2 k1 d2 Y
- $xml.=page(1);6 h y; _* D" e8 G2 r0 ^
- }) j/ g R B6 Q2 m& u
- $xml .= '</list>';
" Q9 L* d- @+ C5 e - echo $xml;
7 T. y* J( I# |! w( d: a - function m_v($url) {
; g, o& p# N) F0 I" z - $user_agent = $_SERVER['HTTP_USER_AGENT'];# `, I5 s0 f# w. \% R& _! J$ d/ {
- $ch = curl_init(); . A' G0 p3 G" W, a9 q0 ^2 E& U
- $timeout = 30;- @. ?4 N; |6 ^4 `0 W
- curl_setopt($ch, CURLOPT_URL, $url);; F/ @, {: Q/ s, ~: j- q3 x
- curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);$ h! I6 f% ]: t
- curl_setopt($ch, CURLOPT_CONNECTTIMEOUT, $timeout);' r/ W! ^3 Y: G/ m$ U
- @ $file = curl_exec($ch);
9 ~! E& |" J {: I: z - curl_close($ch);
6 C6 Y8 h$ Y! z - return $file;1 W; E7 r: @9 {" |. K
- }. F! H5 p4 z6 a) {
- function page($page){( A; S$ E6 m! `+ v
- $a=m_v('http://tv.youku.com/search/index/_page40177_'.$page.'_cmodid_40177');
& W- A# e' W" A* G3 v; \2 ? - preg_match_all('#class="p_link"><a title="(.*)" href="http://http://www.austgl.com/-09.info/show_page/id_([A-Za-z0-9]+).html" charset="(.*)" target="_blank"></a></li>#U',$a, $b);# ?) \4 f5 Q/ j7 D0 |0 r
- foreach($b[2] as $index=>$id){. q$ A0 ^/ \; Q5 r# ~' D. ^
- $xml .='<m label="'.$b[1][$index].'" list_src="'.URL.'?id='.$id.'" />'."\n";
( ?5 \; I9 |* D - }2 e0 R' `8 ` q4 z: R' X! T/ j/ _
- if ($page==1){
Y( i0 U1 A7 g5 r: d - for ($i=2;$i<=34;$i++){: w! t8 {) r) m5 o* {
- $xml .='<m label="第'.$i.'页" list_src="'.URL.'?page='.$i.'" />'."\n";
4 ?* U) L9 k* G! _! t - } Y2 w/ Z, B2 O- `
- }
' Z; _" d3 \% }. g/ M& f- O - return $xml;
, Z& l& x$ o: L9 k9 q; ] - }: X7 Z! H' g& m( O2 `, n% W! v
- ?>
复制代码
( B4 h& p, B: w X0 z8 i7 o$ r% d! \, _( [4 d# R5 X# Q
. |# K' L1 C- U+ m( }
演示
) b/ {$ F) N9 U1 w3 ^; e2 T/ |) H3 ^# q) ^
7 u3 a6 V0 |7 ^由于设置了替换链接 默认的该词语是禁止的一些站点的链接会被替换成本站域名 导致复制的代码不能用 补上下载链接: Z- h6 Y" ?0 N4 C& u, \' a
优酷全站.rar
- d9 q+ n% C# c. F; e# E# n+ a4 O
1 Y' c3 A- A7 ]
2 N/ q2 `0 d* N; j7 v& G6 P- ?2 X/ i& C* K- Y/ m4 S
- P+ `8 ^: n3 w, K
( F/ O+ ?( T1 v
% _+ ^9 n( j1 a% k; p2 k- {$ C+ v
7 R" Z: \# |, a# @. h# f
|
|