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 ----------------------------------------- |
---|
12 | if (!defined('DC_RC_PATH')) { return; } |
---|
13 | |
---|
14 | class pingsAPI extends xmlrpcClient |
---|
15 | { |
---|
16 | public static function doPings($srv_uri,$site_name,$site_url) |
---|
17 | { |
---|
18 | $o = new self($srv_uri); |
---|
19 | $o->timeout = 3; |
---|
20 | |
---|
21 | $rsp = $o->query('weblogUpdates.ping',$site_name,$site_url); |
---|
22 | |
---|
23 | if (isset($rsp['flerror']) && $rsp['flerror']) { |
---|
24 | throw new Exception($rsp['message']); |
---|
25 | } |
---|
26 | |
---|
27 | return true; |
---|
28 | } |
---|
29 | } |
---|
30 | |
---|
31 | class pingsAdminBehaviors |
---|
32 | { |
---|
33 | public static function pingJS() |
---|
34 | { |
---|
35 | global $core; |
---|
36 | |
---|
37 | $res = |
---|
38 | "<script type=\"text/javascript\">\n". |
---|
39 | dcPage::jsVar('dotclear.msg.check_all',__('Check all'))."\n". |
---|
40 | "</script>\n". |
---|
41 | dcPage::jsLoad(dcPage::getPF('pings/post.js')); |
---|
42 | |
---|
43 | return $res; |
---|
44 | } |
---|
45 | |
---|
46 | public static function pingsFormItems($main,$sidebar,$post) |
---|
47 | { |
---|
48 | $core =& $GLOBALS['core']; |
---|
49 | if (!$core->blog->settings->pings->pings_active) { |
---|
50 | return; |
---|
51 | } |
---|
52 | |
---|
53 | $pings_uris = $core->blog->settings->pings->pings_uris; |
---|
54 | if (empty($pings_uris) || !is_array($pings_uris)) { |
---|
55 | return; |
---|
56 | } |
---|
57 | |
---|
58 | if (!empty($_POST['pings_do']) && is_array($_POST['pings_do'])) { |
---|
59 | $pings_do = $_POST['pings_do']; |
---|
60 | } else { |
---|
61 | $pings_do = array(); |
---|
62 | } |
---|
63 | |
---|
64 | $item = '<h5 class="ping-services">'.__('Pings').'</h5>'; |
---|
65 | $i = 0; |
---|
66 | foreach ($pings_uris as $k => $v) |
---|
67 | { |
---|
68 | $item .= |
---|
69 | '<p class="ping-services"><label for="pings_do-'.$i.'" class="classic">'. |
---|
70 | form::checkbox(array('pings_do[]','pings_do-'.$i),html::escapeHTML($v),in_array($v,$pings_do), 'check-ping-services').' '. |
---|
71 | html::escapeHTML($k).'</label></p>'; |
---|
72 | $i++; |
---|
73 | } |
---|
74 | $sidebar['options-box']['items']['pings']=$item; |
---|
75 | |
---|
76 | } |
---|
77 | |
---|
78 | public static function doPings($cur,$post_id) |
---|
79 | { |
---|
80 | if (empty($_POST['pings_do']) || !is_array($_POST['pings_do'])) { |
---|
81 | return; |
---|
82 | } |
---|
83 | |
---|
84 | $core =& $GLOBALS['core']; |
---|
85 | if (!$core->blog->settings->pings->pings_active) { |
---|
86 | return; |
---|
87 | } |
---|
88 | |
---|
89 | $pings_uris = $core->blog->settings->pings->pings_uris; |
---|
90 | if (empty($pings_uris) || !is_array($pings_uris)) { |
---|
91 | return; |
---|
92 | } |
---|
93 | |
---|
94 | foreach ($_POST['pings_do'] as $uri) |
---|
95 | { |
---|
96 | if (in_array($uri,$pings_uris)) { |
---|
97 | try { |
---|
98 | pingsAPI::doPings($uri,$core->blog->name,$core->blog->url); |
---|
99 | } catch (Exception $e) {} |
---|
100 | } |
---|
101 | } |
---|
102 | } |
---|
103 | } |
---|
104 | |
---|
105 | class pingsCoreBehaviour |
---|
106 | { |
---|
107 | public static function doPings($blog,$ids) |
---|
108 | { |
---|
109 | if (!$blog->settings->pings->pings_active) { |
---|
110 | return; |
---|
111 | } |
---|
112 | if (!$blog->settings->pings->pings_auto) { |
---|
113 | return; |
---|
114 | } |
---|
115 | |
---|
116 | $pings_uris = $blog->settings->pings->pings_uris; |
---|
117 | if (empty($pings_uris) || !is_array($pings_uris)) { |
---|
118 | return; |
---|
119 | } |
---|
120 | |
---|
121 | foreach ($pings_uris as $uri) |
---|
122 | { |
---|
123 | try { |
---|
124 | pingsAPI::doPings($uri,$blog->name,$blog->url); |
---|
125 | } catch (Exception $e) {} |
---|
126 | } |
---|
127 | } |
---|
128 | } |
---|