Dotclear

source: plugins/pings/lib.pings.php @ 3428:fccd82354a90

Revision 3428:fccd82354a90, 2.8 KB checked in by franck <carnet.franck.paul@…>, 9 years ago (diff)

Add an option to auto ping on 1st publication, closes #871 and #548, addresses #970 and #784

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
14class 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
31class 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
105class 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}
Note: See TracBrowser for help on using the repository browser.

Sites map