Dotclear

source: inc/core/class.dc.trackback.php @ 3415:5cdbb2593595

Revision 3415:5cdbb2593595, 20.8 KB checked in by Jean-Christian Denis, 9 years ago (diff)

Open trackbacks with behaviors and add basic Webmention support, closes #1917

Line 
1<?php
2# -- BEGIN LICENSE BLOCK ---------------------------------------
3#
4# This file is part of Dotclear 2.
5#
6# Copyright (c) 2003-2013 Olivier Meunier & Association Dotclear
7# Licensed under the GPL version 2.0 license.
8# See LICENSE file or
9# http://www.gnu.org/licenses/old-licenses/gpl-2.0.html
10#
11# -- END LICENSE BLOCK -----------------------------------------
12if (!defined('DC_RC_PATH')) { return; }
13
14/**
15@ingroup DC_CORE
16@brief Trackbacks/Pingbacks sender and server
17
18Sends and receives trackbacks/pingbacks. Also handles trackbacks/pingbacks auto discovery.
19*/
20class dcTrackback
21{
22     public $core;       ///< <b>dcCore</b> dcCore instance
23     public $table;      ///< <b>string</b> done pings table name
24
25     /**
26     Object constructor
27
28     @param    core      <b>dcCore</b>       dcCore instance
29     */
30     public function __construct($core)
31     {
32          $this->core =& $core;
33          $this->con =& $this->core->con;
34          $this->table = $this->core->prefix.'ping';
35     }
36
37     /// @name Send
38     //@{
39     /**
40     Get all pings sent for a given post.
41
42     @param    post_id   <b>integer</b>      Post ID
43     @return   <b>record</b>
44     */
45     public function getPostPings($post_id)
46     {
47          $strReq = 'SELECT ping_url, ping_dt '.
48                    'FROM '.$this->table.' '.
49                    'WHERE post_id = '.(integer) $post_id;
50
51          return $this->con->select($strReq);
52     }
53
54     /**
55     Sends a ping to given <var>$url</var>.
56
57     @param    url            <b>string</b>       URL to ping
58     @param    post_id        <b>integer</b>      Post ID
59     @param    post_title     <b>string</b>       Post title
60     @param    post_excerpt   <b>string</b>       Post excerpt
61     @param    post_url       <b>string</b>       Post URL
62     */
63     public function ping($url,$post_id,$post_title,$post_excerpt,$post_url)
64     {
65          if ($this->core->blog === null) {
66               return false;
67          }
68
69          $post_id = (integer) $post_id;
70
71          # Check for previously done trackback
72          $strReq = 'SELECT post_id, ping_url FROM '.$this->table.' '.
73                    'WHERE post_id = '.$post_id.' '.
74                    "AND ping_url = '".$this->con->escape($url)."' ";
75
76          $rs = $this->con->select($strReq);
77
78          if (!$rs->isEmpty()) {
79               throw new Exception(sprintf(__('%s has still been pinged'),$url));
80          }
81
82          $ping_parts = explode('|',$url);
83          # Maybe a webmention
84          if (count($ping_parts) == 3) {
85               $payload = http_build_query(array(
86                    'source' => $post_url,
87                    'target' => $ping_parts[1]
88               ));
89
90               try {
91                    $http = self::initHttp($ping_parts[0],$path);
92                    $http->setMoreHeader('Content-Type: application/x-www-form-urlencoded');
93                    $http->post($path,$payload,'UTF-8');
94
95                    # Read response status
96                    $status = $http->getStatus();
97                    $ping_error = '0';
98               }
99               catch (Exception $e) {
100                    throw new Exception(__('Unable to ping URL'));
101               }
102
103               if (!in_array($status,array('200','201','202'))) {
104                    $ping_error = $http->getStatus();
105                    $ping_msg = __('Bad server response code');
106               }
107          }
108          # No, let's walk by the trackback way
109          elseif (count($ping_parts) < 2) {
110               $data = array(
111                    'title' => $post_title,
112                    'excerpt' => $post_excerpt,
113                    'url' => $post_url,
114                    'blog_name' => trim(html::escapeHTML(html::clean($this->core->blog->name)))
115                    //,'__debug' => false
116               );
117
118               # Ping
119               try {
120                    $http = self::initHttp($url,$path);
121                    $http->post($path,$data,'UTF-8');
122                    $res = $http->getContent();
123               }
124               catch (Exception $e) {
125                    throw new Exception(__('Unable to ping URL'));
126               }
127
128               $pattern =
129               '|<response>.*<error>(.*)</error>(.*)'.
130               '(<message>(.*)</message>(.*))?'.
131               '</response>|msU';
132
133               if (!preg_match($pattern,$res,$match)) {
134                    throw new Exception(sprintf(__('%s is not a ping URL'),$url));
135               }
136
137               $ping_error = trim($match[1]);
138               $ping_msg = (!empty($match[4])) ? $match[4] : '';
139          }
140          # Damnit ! Let's play pingback
141          else {
142               try {
143                    $xmlrpc = new xmlrpcClient($ping_parts[0]);
144                    $res = $xmlrpc->query('pingback.ping', $post_url, $ping_parts[1]);
145                    $ping_error = '0';
146               }
147               catch (xmlrpcException $e) {
148                    $ping_error = $e->getCode();
149                    $ping_msg = $e->getMessage();
150               }
151               catch (Exception $e) {
152                    throw new Exception(__('Unable to ping URL'));
153               }
154          }
155
156          if ($ping_error != '0') {
157               throw new Exception(sprintf(__('%s, ping error:'),$url).' '.$ping_msg);
158          }
159          else {
160               # Notify ping result in database
161               $cur = $this->con->openCursor($this->table);
162               $cur->post_id = $post_id;
163               $cur->ping_url = $url;
164               $cur->ping_dt = date('Y-m-d H:i:s');
165
166               $cur->insert();
167          }
168     }
169     //@}
170
171     /// @name Receive
172     //@{
173     /**
174     Receives a trackback and insert it as a comment of given post.
175
176     @param    post_id        <b>integer</b>      Post ID
177     */
178     public function receiveTrackback($post_id)
179     {
180          header('Content-Type: text/xml; charset=UTF-8');
181          if (empty($_POST)) {
182               http::head(405,'Method Not Allowed');
183               echo
184               '<?xml version="1.0" encoding="utf-8"?>'."\n".
185               "<response>\n".
186               "  <error>1</error>\n".
187               "  <message>POST request needed</message>\n".
188               "</response>";
189               return;
190          }
191
192          $post_id = (integer) $post_id;
193
194          $title = !empty($_POST['title']) ? $_POST['title'] : '';
195          $excerpt = !empty($_POST['excerpt']) ? $_POST['excerpt'] : '';
196          $url = !empty($_POST['url']) ? $_POST['url'] : '';
197          $blog_name = !empty($_POST['blog_name']) ? $_POST['blog_name'] : '';
198          $charset = '';
199          $comment = '';
200
201          $err = false;
202          $msg = '';
203
204          if ($this->core->blog === null) {
205               $err = true;
206               $msg = 'No blog.';
207          }
208          elseif ($url == '') {
209               $err = true;
210               $msg = 'URL parameter is required.';
211          }
212          elseif ($blog_name == '') {
213               $err = true;
214               $msg = 'Blog name is required.';
215          }
216
217          if (!$err) {
218               $post = $this->core->blog->getPosts(array('post_id'=>$post_id,'post_type'=>''));
219
220               if ($post->isEmpty()) {
221                    $err = true;
222                    $msg = 'No such post.';
223               }
224               elseif (!$post->trackbacksActive()) {
225                    $err = true;
226                    $msg = 'Trackbacks are not allowed for this post or weblog.';
227               }
228
229               $url = trim(html::clean($url));
230               if ($this->pingAlreadyDone($post->post_id,$url)) {
231                    $err = true;
232                    $msg = 'The trackback has already been registered';
233               }
234          }
235
236          if (!$err) {
237               $charset = self::getCharsetFromRequest();
238
239               if (!$charset) {
240                    $charset = self::detectCharset($title.' '.$excerpt.' '.$blog_name);
241               }
242
243               if (strtolower($charset) != 'utf-8') {
244                    $title = iconv($charset,'UTF-8',$title);
245                    $excerpt = iconv($charset,'UTF-8',$excerpt);
246                    $blog_name = iconv($charset,'UTF-8',$blog_name);
247               }
248
249               $title = trim(html::clean($title));
250               $title = html::decodeEntities($title);
251               $title = html::escapeHTML($title);
252               $title = text::cutString($title,60);
253
254               $excerpt = trim(html::clean($excerpt));
255               $excerpt = html::decodeEntities($excerpt);
256               $excerpt = preg_replace('/\s+/ms',' ',$excerpt);
257               $excerpt = text::cutString($excerpt,252);
258               $excerpt = html::escapeHTML($excerpt).'...';
259
260               $blog_name = trim(html::clean($blog_name));
261               $blog_name = html::decodeEntities($blog_name);
262               $blog_name = html::escapeHTML($blog_name);
263               $blog_name = text::cutString($blog_name,60);
264
265               try {
266                    $this->addBacklink($post_id,$url,$blog_name,$title,$excerpt,$comment);
267               }
268               catch (Exception $e) {
269                    $err = 1;
270                    $msg = 'Something went wrong : '.$e->getMessage();
271               }
272          }
273
274          $resp =
275          '<?xml version="1.0" encoding="utf-8"?>'."\n".
276          "<response>\n".
277          '  <error>'.(integer) $err."</error>\n";
278
279          if ($msg) {
280               $resp .= '  <message>'.$msg."</message>\n";
281          }
282
283          if (!empty($_POST['__debug'])) {
284               $resp .=
285               "  <debug>\n".
286               '    <title>'.$title."</title>\n".
287               '    <excerpt>'.$excerpt."</excerpt>\n".
288               '    <url>'.$url."</url>\n".
289               '    <blog_name>'.$blog_name."</blog_name>\n".
290               '    <charset>'.$charset."</charset>\n".
291               '    <comment>'.$comment."</comment>\n".
292               "  </debug>\n";
293          }
294
295          echo $resp."</response>";
296     }
297
298     /**
299     Receives a pingback and insert it as a comment of given post.
300
301     @param    from_url       <b>string</b>       Source URL
302     @param    to_url              <b>string</b>       Target URL
303     */
304     public function receivePingback($from_url,$to_url)
305     {
306          try {
307               $posts = $this->getTargetPost($to_url);
308
309               if ($this->pingAlreadyDone($posts->post_id,$from_url)) {
310                    throw new Exception(__('Don\'t repeat yourself, please.'), 48);
311               }
312
313               $remote_content = $this->getRemoteContent($from_url);
314
315               # We want a title...
316               if (!preg_match('!<title>([^<].*?)</title>!mis',$remote_content,$m)) {
317                    throw new Exception(__('Where\'s your title?'), 0);
318               }
319               $title = trim(html::clean($m[1]));
320               $title = html::decodeEntities($title);
321               $title = html::escapeHTML($title);
322               $title = text::cutString($title,60);
323
324               preg_match('!<body[^>]*?>(.*)?</body>!msi',$remote_content,$m);
325               $source = $m[1];
326               $source = preg_replace('![\r\n\s]+!ms',' ',$source);
327               $source = preg_replace( "/<\/*(h\d|p|th|td|li|dt|dd|pre|caption|input|textarea|button)[^>]*>/","\n\n",$source );
328               $source = strip_tags($source,'<a>');
329               $source = explode("\n\n",$source);
330
331               $excerpt = '';
332               foreach ($source as $line) {
333                    if (strpos($line, $to_url) !== false) {
334                         if (preg_match("!<a[^>]+?".$to_url."[^>]*>([^>]+?)</a>!",$line,$m)) {
335                              $excerpt = strip_tags($line);
336                              break;
337                         }
338                    }
339               }
340               if ($excerpt) {
341                    $excerpt = '(&#8230;) '.text::cutString(html::escapeHTML($excerpt),200).' (&#8230;)';
342               }
343               else {
344                    $excerpt = '(&#8230;)';
345               }
346
347               $this->addBacklink($posts->post_id,$from_url,'',$title,$excerpt,$comment);
348          }
349          catch (Exception $e) {
350               throw new Exception(__('Sorry, an internal problem has occured.'),0);
351          }
352
353          return __('Thanks, mate. It was a pleasure.');
354     }
355
356     /**
357     Receives a webmention and insert it as a comment of given post.
358     
359     NB: plugin Fair Trackback check source content to find url.
360
361     @return   <b>null</b>    Null on success, else throw an exception
362     */
363     public function receiveWebmention()
364     {
365          $err = $post_id = false;
366          header('Content-Type: text/html; charset=UTF-8');
367
368          try {
369               # Check if post and target are valid URL
370               if (empty($_POST['source']) || empty($_POST['target'])) {
371                    throw new Exception('Source or target is not valid',0);
372               }
373
374               $from_url = urldecode($_POST['source']);
375               $to_url = urldecode($_POST['target']);
376
377               self::checkURLs($from_url,$to_url);
378
379               # Try to find post
380               $posts = $this->getTargetPost($to_url);
381               $post_id = $posts->post_id;
382
383               # Check if it's an updated mention
384               if ($this->pingAlreadyDone($post_id,$from_url)) {
385                    $this->delBacklink($post_id,$from_url);
386               }
387
388               # Create a comment for received webmention
389               // maybe better to try to fetch a title from the source ?...
390               $title = __('A website mention this entry.');
391               $comment = '';
392               $excerpt = sprintf('<a href="%s" rel="nofollow">%s</a>',$from_url,$from_url);
393               $this->addBacklink($post_id,$from_url,'',$title,$excerpt,$comment);
394
395               # All done, thanks
396               $code = $this->core->blog->settings->system->trackbacks_pub ? 200 : 202;
397               http::head($code);
398               return;
399          }
400          catch (Exception $e) {
401               $err = $e->getMessage();
402          }
403
404          http::head(400);
405          echo $err ?: 'Something went wrong.';
406          return;
407     }
408
409     /**
410     Check if a post previously received a ping a from an URL.
411
412     @param    post_id   <b>integer</b>      Post ID
413     @param    from_url  <b>string</b>       Source URL
414     @return   <b>boolean</b>
415     */
416     private function pingAlreadyDone($post_id,$from_url)
417     {
418          $params = array(
419               'post_id' => $post_id,
420               'comment_site' => $from_url,
421               'comment_trackback' => 1,
422          );
423
424          $rs = $this->core->blog->getComments($params,true);
425          if ($rs && !$rs->isEmpty()) {
426               return ($rs->f(0));
427          }
428
429          return false;
430     }
431
432     /**
433     Create a comment marked as trackback for a given post.
434
435     @param    post_id   <b>integer</b>      Post ID
436     @param    url       <b>string</b>       Discovered URL
437     @param    blog name <b>string</b>       Source blog name
438     @param    title     <b>string</b>       Comment title
439     @param    excerpt   <b>string</b>       Source excerpt
440     @param    comment   <b>string</b>       Comment content
441     */
442     private function addBacklink($post_id,$url,$blog_name,$title,$excerpt,&$comment)
443     {
444          if (empty($blog_name)) {
445               $blog_name = 'Anonymous blog';
446          }
447
448          $comment =
449          "<!-- TB -->\n".
450          '<p><strong>'.($title ?: $blog_name)."</strong></p>\n".
451          '<p>'.$excerpt.'</p>';
452
453          $cur = $this->core->con->openCursor($this->core->prefix.'comment');
454          $cur->comment_author = (string) $blog_name;
455          $cur->comment_site = (string) $url;
456          $cur->comment_content = (string) $comment;
457          $cur->post_id = $post_id;
458          $cur->comment_trackback = 1;
459          $cur->comment_status = $this->core->blog->settings->system->trackbacks_pub ? 1 : -1;
460          $cur->comment_ip = http::realIP();
461
462          # --BEHAVIOR-- publicBeforeTrackbackCreate
463          $this->core->callBehavior('publicBeforeTrackbackCreate',$cur);
464          if ($cur->post_id) {
465               $comment_id = $this->core->blog->addComment($cur);
466
467               # --BEHAVIOR-- publicAfterTrackbackCreate
468               $this->core->callBehavior('publicAfterTrackbackCreate',$cur,$comment_id);
469          }
470     }
471
472     /**
473     Delete previously received comment made from an URL for a given post.
474
475     @param    post_id   <b>integer</b>      Post ID
476     @param    url       <b>string</b>       Source URL
477     */
478     private function delBacklink($post_id,$url)
479     {
480          $this->con->execute(
481               'DELETE FROM '.$this->core->prefix.'comment '.
482               'WHERE post_id = '.((integer) $post_id).' '.
483               "AND comment_site = '".$this->core->con->escape((string) $url)."' ".
484               'AND comment_trackback = 1 '
485          );
486     }
487
488     /**
489     Find Charset from HTTP headers.
490
491     @param    header    <b>string</b>       Source header
492     @return   <b>string</b>
493     */
494     private static function getCharsetFromRequest($header = '')
495     {
496          if (!$header && isset($_SERVER['CONTENT_TYPE'])) {
497               $header = $_SERVER['CONTENT_TYPE'];
498          }
499
500          if ($header) {
501               if (preg_match('|charset=([a-zA-Z0-9-]+)|',$header,$m)) {
502                    return $m[1];
503               }
504          }
505
506          return null;
507     }
508
509     /**
510     Detect encoding.
511
512     @param    content        <b>string</b>       Source URL
513     @return   <b>string</b>
514     */
515     private static function detectCharset($content)
516     {
517          return mb_detect_encoding($content,
518                    'UTF-8,ISO-8859-1,ISO-8859-2,ISO-8859-3,'.
519                    'ISO-8859-4,ISO-8859-5,ISO-8859-6,ISO-8859-7,ISO-8859-8,'.
520                    'ISO-8859-9,ISO-8859-10,ISO-8859-13,ISO-8859-14,ISO-8859-15');
521     }
522
523     /**
524     Retreive local post from a given IRL
525
526     @param    to_url         <b>string</b>       Target URL
527     @return   <b>string</b>
528     */
529     private function getTargetPost($to_url)
530     {
531          $reg = '!^'.preg_quote($this->core->blog->url).'(.*)!';
532          $type = $args = $next = '';
533
534          # Are you dumb?
535          if (!preg_match($reg,$to_url,$m)) {
536               throw new Exception(__('Any chance you ping one of my contents? No? Really?'),0);
537          }
538
539          # Does the targeted URL look like a registered post type?
540          $url_part = $m[1];
541          $p_type = '';
542          $post_types = $this->core->getPostTypes();
543          foreach ($post_types as $k => $v) {
544               $reg = '!^'.preg_quote(str_replace('%s','',$v['public_url'])).'(.*)!';
545               if (preg_match($reg,$url_part,$n)) {
546                    $p_type = $k;
547                    $post_url = $n[1];
548                    break;
549               }
550          }
551
552          if (empty($p_type)) {
553               throw new Exception(__('Sorry but you can not ping this type of content.'),33);
554          }
555
556          # Time to see if we've got a winner...
557          $params = array(
558               'post_type' => $p_type,
559               'post_url' => $post_url,
560          );
561          $posts = $this->core->blog->getPosts($params);
562
563          # Missed!
564          if ($posts->isEmpty()) {
565               throw new Exception(__('Oops. Kinda "not found" stuff. Please check the target URL twice.'),33);
566          }
567
568          # Nice try. But, sorry, no.
569          if (!$posts->trackbacksActive()) {
570               throw new Exception(__('Sorry, dude. This entry does not accept pingback at the moment.'),33);
571          }
572
573          return $posts;
574     }
575
576     /**
577     Returns content of a distant page
578
579     @param    from_url       <b>string</b>       Target URL
580     @return   <b>string</b>
581     */
582     private function getRemoteContent($from_url)
583     {
584          $http = self::initHttp($from_url,$from_path);
585
586          # First round : just to be sure the ping comes from an acceptable resource type.
587          $http->setHeadersOnly(true);
588          $http->get($from_path);
589          $c_type = explode(';',$http->getHeader('content-type'));
590
591          # Bad luck. Bye, bye...
592          if (!in_array($c_type[0],array('text/html','application/xhtml+xml'))) {
593               throw new Exception(__('Your source URL does not look like a supported content type. Sorry. Bye, bye!'),0);
594          }
595
596          # Second round : let's go fetch and parse the remote content
597          $http->setHeadersOnly(false);
598          $http->get($from_path);
599          $remote_content = $http->getContent();
600
601          # Convert content charset
602          $charset = self::getCharsetFromRequest($http->getHeader('content-type'));
603          if (!$charset) {
604               $charset = self::detectCharset($remote_content);
605          }
606          if (strtolower($charset) != 'utf-8') {
607               $remote_content = iconv($charset,'UTF-8',$remote_content);
608          }
609
610          return $remote_content;
611     }
612     //@}
613
614     /// @name Discover
615     //@{
616     /**
617     Returns an array containing all discovered trackbacks URLs in
618     <var>$text</var>.
619
620     @param    text      <b>string</b>       Input text
621     @return   <b>array</b>
622     */
623     public function discover($text)
624     {
625          $res = array();
626
627          foreach ($this->getTextLinks($text) as $link)
628          {
629               if (($url = $this->getPingURL($link)) !== null) {
630                    $res[] = $url;
631               }
632          }
633
634          return $res;
635     }
636
637     /**
638     Find links into a text.
639
640     @param    text      <b>string</b>       Text to scan
641     @return   <b>array</b>
642     */
643     private function getTextLinks($text)
644     {
645          $res = array();
646
647          # href attribute on "a" tags
648          if (preg_match_all('/<a ([^>]+)>/ms',$text,$match,PREG_SET_ORDER)) {
649               for ($i = 0; $i<count($match); $i++)
650               {
651                    if (preg_match('/href="((https?:\/)?\/[^"]+)"/ms',$match[$i][1],$matches)) {
652                         $res[$matches[1]] = 1;
653                    }
654               }
655          }
656          unset($match);
657
658          # cite attributes on "blockquote" and "q" tags
659          if (preg_match_all('/<(blockquote|q) ([^>]+)>/ms',$text,$match,PREG_SET_ORDER)) {
660               for ($i = 0; $i<count($match); $i++)
661               {
662                    if (preg_match('/cite="((https?:\/)?\/[^"]+)"/ms',$match[$i][2],$matches)) {
663                         $res[$matches[1]] = 1;
664                    }
665               }
666          }
667
668          return array_keys($res);
669     }
670
671     /**
672     Check remote header/content to find api trace.
673
674     @param    url       <b>string</b>       URL to scan
675     @return   <b>string</b>
676     */
677     private function getPingURL($url)
678     {
679          if (strpos($url,'/') === 0) {
680               $url = http::getHost().$url;
681          }
682
683          try {
684               $http = self::initHttp($url,$path);
685               $http->get($path);
686               $page_content = $http->getContent();
687               $pb_url = $http->getHeader('x-pingback');
688               $wm_url = $http->getHeader('link');
689          }
690          catch (Exception $e) {
691               return false;
692          }
693
694          # If we've got a X-Pingback header and it's a valid URL, it will be enough
695          if ($pb_url && filter_var($pb_url,FILTER_VALIDATE_URL) && preg_match('!^https?:!',$pb_url)) {
696               return $pb_url.'|'.$url;
697          }
698
699          # No X-Pingback header. A link rel=pingback, maybe ?
700          $pattern_pingback = '!<link rel="pingback" href="(.*?)"( /)?>!msi';
701
702          if (preg_match($pattern_pingback,$page_content,$m)) {
703               $pb_url = $m[1];
704               if (filter_var($pb_url,FILTER_VALIDATE_URL) && preg_match('!^https?:!',$pb_url)) {
705                    return $pb_url.'|'.$url;
706               }
707          }
708
709          # No pingback ? OK, let's check for a trackback data chunk...
710          $pattern_rdf =
711          '/<rdf:RDF.*?>.*?'.
712          '<rdf:Description\s+(.*?)\/>'.
713          '.*?<\/rdf:RDF>'.
714          '/msi';
715
716          preg_match_all($pattern_rdf,$page_content,$rdf_all,PREG_SET_ORDER);
717
718          $url_path = parse_url($url, PHP_URL_PATH);
719          $sanitized_url = str_replace($url_path, html::sanitizeURL($url_path),$url);
720
721          for ($i=0; $i<count($rdf_all); $i++)
722          {
723               $rdf = $rdf_all[$i][1];
724               if (preg_match('/dc:identifier="'.preg_quote($url,'/').'"/msi',$rdf) ||
725                    preg_match('/dc:identifier="'.preg_quote($sanitized_url,'/').'"/msi',$rdf)) {
726                    if (preg_match('/trackback:ping="(.*?)"/msi',$rdf,$tb_link)) {
727                         return $tb_link[1];
728                    }
729               }
730          }
731
732          # Nothing, let's try webmention. Only support x/html content
733          if ($wm_url) {
734               $type = explode(';',$http->getHeader('content-type'));
735               if (!in_array($type[0],array('text/html','application/xhtml+xml'))) {
736                    $wm_url = false;
737               }
738          }
739
740          # Check HTTP headers for a Link: <ENDPOINT_URL>; rel="webmention"
741          $wm_api = false;
742          if ($wm_url) {
743               if(preg_match('~<((?:https?://)?[^>]+)>; rel="?(?:https?://webmention.org/?|webmention)"?~',$wm_url,$match)) {
744                    if (filter_var($match[1],FILTER_VALIDATE_URL) && preg_match('!^https?:!',$match[1])) {
745                         $wm_api = $match[1];
746                    }
747               }
748          }
749
750          # Else check content for <link href="ENDPOINT_URL" rel="webmention" />
751          if ($wm_url && !$wm_api) {
752               $content = preg_replace('/<!--(.*)-->/Us','',$page_content);
753               if (preg_match('/<(?:link|a)[ ]+href="([^"]*)"[ ]+rel="[^" ]* ?webmention ?[^" ]*"[ ]*\/?>/i',$content,$match)
754                || preg_match('/<(?:link|a)[ ]+rel="[^" ]* ?webmention ?[^" ]*"[ ]+href="([^"]*)"[ ]*\/?>/i',$content,$match)) {
755                    $wm_api = $match[1];
756               }
757          }
758
759          # We have a winner, let's add some tricks to make diference
760          if ($wm_api) {
761               return $wm_api.'|'.$url.'|webmention';
762          }
763
764          return null;
765     }
766     //@}
767
768     /**
769     HTTP helper.
770
771     @param    url       <b>string</b>       URL
772     @param    path      <b>string</b>       Path
773     @return   <b>object</b>
774     */
775     private static function initHttp($url,&$path)
776     {
777          $client = netHttp::initClient($url,$path);
778          $client->setTimeout(5);
779          $client->setUserAgent('Dotclear - http://www.dotclear.org/');
780          $client->useGzip(false);
781          $client->setPersistReferers(false);
782
783          return $client;
784     }
785
786     /**
787     URL helper.
788
789     @param    from_url       <b>string</b>       URL a
790     @param    to_url         <b>string</b>       URL b
791     */
792     public static function checkURLs($from_url,$to_url)
793     {
794          if (!(filter_var($from_url, FILTER_VALIDATE_URL) && preg_match('!^https?://!',$from_url))) {
795               throw new Exception(__('No valid source URL provided? Try again!'), 0);
796          }
797
798          if (!(filter_var($to_url, FILTER_VALIDATE_URL) && preg_match('!^https?://!',$to_url))) {
799               throw new Exception(__('No valid target URL provided? Try again!'), 0);
800          }
801
802          if (html::sanitizeURL(urldecode($from_url)) == html::sanitizeURL(urldecode($to_url))) {
803               throw new Exception(__('LOL!'), 0);
804          }
805     }
806}
Note: See TracBrowser for help on using the repository browser.

Sites map