1 files changed, 87 insertions, 0 deletions
diff --git a/BSF/include/ws_protocols/json_encoder.php b/BSF/include/ws_protocols/json_encoder.php
new file mode 100644
index 000000000..8c2d7b0a0
--- /dev/null
+++ b/BSF/include/ws_protocols/json_encoder.php
@@ -0,0 +1,87 @@
+<?php
+// +-----------------------------------------------------------------------+
+// | Piwigo - a PHP based picture gallery                                  |
+// +-----------------------------------------------------------------------+
+// | Copyright(C) 2008      Piwigo Team                  http://piwigo.org |
+// | Copyright(C) 2003-2008 PhpWebGallery Team    http://phpwebgallery.net |
+// | Copyright(C) 2002-2003 Pierrick LE GALL   http://le-gall.net/pierrick |
+// +-----------------------------------------------------------------------+
+// | This program is free software; you can redistribute it and/or modify  |
+// | it under the terms of the GNU General Public License as published by  |
+// | the Free Software Foundation                                          |
+// |                                                                       |
+// | This program is distributed in the hope that it will be useful, but   |
+// | WITHOUT ANY WARRANTY; without even the implied warranty of            |
+// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU      |
+// | General Public License for more details.                              |
+// |                                                                       |
+// | You should have received a copy of the GNU General Public License     |
+// | along with this program; if not, write to the Free Software           |
+// | Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, |
+// | USA.                                                                  |
+// +-----------------------------------------------------------------------+
+
+
+#_____________________  PHP 5.2
+if (! function_exists('json_encode')) {
+  function json_encode($data) {
+    switch (gettype($data)) {
+      case 'boolean':
+        return ($data ? 'true' : 'false');
+      case 'null':
+      case 'NULL':
+        return 'null';
+      case 'integer':
+      case 'double':
+        return $data;
+      case 'string':
+        return '"'. str_replace(array("\\",'"',"/","\n","\r","\t"), array("\\\\",'\"',"\\/","\\n","\\r","\\t"), $data) .'"';
+      case 'object':
+      case 'array':
+        if ($data === array()) return '[]'; # empty array
+        if (range(0, count($data) - 1) !== array_keys($data) ) { # string keys, unordered, non-incremental keys, .. - whatever, make object
+          $out = "\n".'{';
+          foreach($data as $key => $value) {
+            $out .= json_encode((string) $key) . ':' . json_encode($value) . ',';
+          }
+          $out = substr($out, 0, -1) . "\n". '}';
+        }else{
+          # regular array
+          $out = "\n".'[' . join("\n".',', array_map('json_encode', $data)) ."\n".']';
+        }
+        return $out;
+    }
+  }
+}
+
+class PwgJsonEncoder extends PwgResponseEncoder
+{
+  function encodeResponse($response)
+  {
+    $respClass = strtolower( get_class($response) );
+    if ($respClass=='pwgerror')
+    {
+      return json_encode(
+        array(
+          'stat' => 'fail',
+          'err' => $response->code(),
+          'message' => $response->message(),
+          )
+      );
+    }
+    parent::flattenResponse($response);
+    return json_encode(
+        array(
+          'stat' => 'ok',
+          'result' => $response,
+      )
+    );
+  }
+
+  function getContentType()
+  {
+    return 'text/plain';
+  }
+}
+
+?>