3 * Nucleus: PHP/MySQL Weblog CMS (http://nucleuscms.org/)
4 * Copyright (C) 2002-2007 The Nucleus Group
6 * This program is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU General Public License
8 * as published by the Free Software Foundation; either version 2
9 * of the License, or (at your option) any later version.
10 * (see nucleus/documentation/index.html#license for more info)
14 * This script is provides an XML-RPC [1] interface to Nucleus [2].
16 * At this time, the Blogger API [3], the metaWeblog API [4] and
17 * parts of the Movable Type API [5] are implemented
19 * This script uses the the 'XML-RPC for PHP v1.02' implementation [6]
20 * All other code was written by Wouter Demuynck [7]
22 * [1] http://www.xmlrpc.com/
23 * [2] http://nucleuscms.org/
24 * [3] http://plant.blogger.com/api/
25 * [4] http://www.xmlrpc.com/metaWeblogApi
26 * [5] http://www.movabletype.org/docs/mtmanual_programmatic.html
27 * [6] http://phpxmlrpc.sourceforge.net/
28 * [7] http://demuynck.org/
31 * The Blogger API: (more info in the documentation)
35 * blogger.getUsersBlogs
37 * blogger.getRecentPosts
43 * Note: The getUserInfo response contains an empty 'lastname' and the full name as
45 * Note: Blogger API methods only affect the body field of items
47 * The metaWeblog API (more info in documentation)
52 * metaWeblog.getCategories
53 * metaWeblog.newMediaObject
54 * metaWeblog.getRecentPosts
56 * Note: metaWeblog API methods only affect the body and title fields of items.
57 * the extended part is left untouched (and empty for new posts)
59 * The Movable Type API
63 * @license http://nucleuscms.org/license.txt GNU General Public License
64 * @copyright Copyright (C) 2002-2007 The Nucleus Group
65 * @version $Id: server.php,v 1.8 2007-03-27 12:14:05 kimitake Exp $
66 * @version $NucleusJP: server.php,v 1.8 2007/03/20 19:33:25 kmorimatsu Exp $
69 require("../../config.php"); // include Nucleus libs and code
70 include($DIR_LIBS . "xmlrpc.inc.php");
71 include($DIR_LIBS . "xmlrpcs.inc.php");
73 /* define xmlrpc settings */
74 $xmlrpc_internalencoding = 'UTF-8';
75 $xmlrpc_defencoding = 'UTF-8';
77 /* definition of available methods */
79 $functionDefs = array();
81 // load server functions
82 include('api_blogger.inc.php');
83 include('api_metaweblog.inc.php');
84 // include('api_nucleus.inc.php'); // uncomment if you still want to use the nucleus.* methods
85 include('api_mt.inc.php');
89 $s = new xmlrpc_server( $functionDefs );
92 /* ------------------------------ private functions ---------------------------------- */
95 * Adds an item to the given blog. Username and password are required to login
97 function _addItem($blogid, $username, $password, $title, $body, $more, $publish, $closed, $catname = "") {
98 $blog = new BLOG($blogid);
99 $timestamp = $blog->getCorrectTime();
100 return _addDatedItem($blogid, $username, $password, $title, $body, $more, $publish, $closed, $timestamp, 0, $catname);
104 * Adds item to blog, with time of item given
106 function _addDatedItem($blogid, $username, $password, $title, $body, $more, $publish, $closed, $timestamp, $future, $catname = "") {
110 if (!$mem->login($username, $password))
111 return _error(1,"Could not log in");
113 // 2. check if allowed to add to blog
114 if (!BLOG::existsID($blogid))
115 return _error(2,"No such blog ($blogid)");
116 if (!$mem->teamRights($blogid))
117 return _error(3,"Not a team member");
119 return _error(4,"Cannot add empty items!");
121 // 3. calculate missing vars
122 $blog = new BLOG($blogid);
124 // get category id (or id for default category when false category)
125 $catid = $blog->getCategoryIdFromName($catname);
134 $title = mb_convert_encoding($title, _CHARSET, "UTF-8");
135 $body = mb_convert_encoding($body, _CHARSET, "UTF-8");
136 $more = mb_convert_encoding($more, _CHARSET, "UTF-8");
139 $itemid = $blog->additem($catid, $title, $body, $more, $blogid, $mem->getID(), $timestamp, $closed, $draft);
141 // [TODO] ping weblogs.com ?
143 return new xmlrpcresp(new xmlrpcval($itemid,"string"));
147 * Updates an item. Username and password are required to login
149 function _edititem($itemid, $username, $password, $catid, $title, $body, $more, $wasdraft, $publish, $closed) {
154 if (!$mem->login($username, $password))
155 return _error(1,"Could not log in");
157 // 2. check if allowed to add to blog
158 if (!$manager->existsItem($itemid,1,1))
159 return _error(6,"No such item ($itemid)");
160 if (!$mem->canAlterItem($itemid))
161 return _error(7,"Not allowed to alter item");
163 $title = mb_convert_encoding($title, _CHARSET, "EUC-JP,UTF-8");
164 $body = mb_convert_encoding($body, _CHARSET, "EUC-JP,UTF-8");
165 $more = mb_convert_encoding($more, _CHARSET, "EUC-JP,UTF-8");
168 ITEM::update($itemid, $catid, $title, $body, $more, $closed, $wasdraft, $publish, 0);
170 return new xmlrpcresp(new xmlrpcval(1,"boolean"));
174 * Gives the list of blogs to which the user with given name and password has access
176 function _getUsersBlogs($username, $password) {
179 if (!$mem->login($username, $password))
180 return _error(1,"Could not log in");
182 // 2. Get list of blogs
184 $structarray = array();
185 $query = "SELECT bnumber, bname, burl"
186 . ' FROM '.sql_table('blog').', '.sql_table('team')
187 . " WHERE tblog=bnumber and tmember=" . $mem->getID()
189 $r = sql_query($query);
191 while ($obj = mysql_fetch_object($r)) {
193 $blogurl = $obj->burl;
195 $blogurl = 'http://';
197 $newstruct = new xmlrpcval(array(
198 "url" => new xmlrpcval($blogurl,"string"),
199 "blogid" => new xmlrpcval($obj->bnumber,"string"),
200 "blogName" => new xmlrpcval($obj->bname,"string")
202 array_push($structarray, $newstruct);
205 return new xmlrpcresp(new xmlrpcval( $structarray , "array"));
209 function _getUserInfo($username, $password) {
212 if (!$mem->login($username, $password))
213 return _error(1,"Could not log in");
215 // 3. return the info
216 // Structure returned has nickname, userid, url, email, lastname, firstname
218 $newstruct = new xmlrpcval(array(
219 "nickname" => new xmlrpcval($mem->getDisplayName(),"string"),
220 "userid" => new xmlrpcval($mem->getID(),"string"),
221 "url" => new xmlrpcval($mem->getURL(),"string"),
222 "email" => new xmlrpcval($mem->getEmail(),"string"),
223 "lastname" => new xmlrpcval("","string"),
224 "firstname" => new xmlrpcval($mem->getRealName(),"string")
227 return new xmlrpcresp($newstruct);
235 function _deleteItem($itemid, $username, $password) {
240 if (!$mem->login($username, $password))
241 return _error(1,"Could not log in");
243 // 2. check if allowed
244 if (!$manager->existsItem($itemid,1,1))
245 return _error(6,"No such item ($itemid)");
246 $blogid = getBlogIDFromItemID($itemid);
247 if (!$mem->teamRights($blogid))
248 return _error(3,"Not a team member");
251 ITEM::delete($itemid);
253 return new xmlrpcresp(new xmlrpcval(1,"boolean"));
259 function _getSkinPart($blogid, $username, $password, $type) {
262 if (!$mem->login($username, $password))
263 return _error(1,"Could not log in");
265 // 2. check if allowed
266 if (!BLOG::existsID($blogid))
267 return _error(2,"No such blog ($blogid)");
268 if (!$mem->teamRights($blogid))
269 return _error(3,"Not a team member");
271 // 3. return skin part
272 $blog = new BLOG($blogid);
273 $skin = new SKIN($blog->getDefaultSkin());
274 return new xmlrpcresp(new xmlrpcval($skin->getContent($type),"string"));
278 function _setSkinPart($blogid, $username, $password, $content, $type) {
281 if (!$mem->login($username, $password))
282 return _error(1,"Could not log in");
284 // 2. check if allowed
285 if (!BLOG::existsID($blogid))
286 return _error(2,"No such blog ($blogid)");
287 if (!$mem->teamRights($blogid))
288 return _error(3,"Not a team member");
290 // 3. update skin part
291 $blog = new BLOG($blogid);
292 $skin = new SKIN($blog->getDefaultSkin());
293 $skin->update($type, $content);
295 return new xmlrpcresp(new xmlrpcval(1,'boolean'));
299 * Some convenience methods
302 function _getScalar($m, $idx) {
303 $v = $m->getParam($idx);
304 return $v->scalarval();
307 function _getStructVal($struct, $key) {
308 $t = $struct->structmem($key);
310 return ''; // no such struct value
312 return $t->scalarval();
315 function _getArrayVal($a, $idx) {
316 $t = $a->arraymem($idx);
317 return $t->scalarval();
321 * Returns an XML-RPC error response
322 * $err is the error number (>0, will be added to $xmlrpcerruser)
324 function _error($err, $msg) {
325 global $xmlrpcerruser;
326 return new xmlrpcresp(0, $xmlrpcerruser + $err, $msg);