]> dev.renevier.net Git - syp.git/blob - api.php
small code cleanup (indentation, missing copyrights, etc)
[syp.git] / api.php
1 <?php
2 /* Copyright (c) 2009 Arnaud Renevier, Inc, published under the modified BSD
3    license. */
4
5 require_once ("./inc/settings.php");
6 require_once ("./inc/db/mysql.php");
7 require_once ("./inc/utils.php");
8
9 function exit_document ($body) {
10     exit ("<html><head></head><body>$body</body></html>");
11 }
12
13 function success_auth () {
14     success ("auth");
15 }
16
17 function success_feature ($feature, $request) {
18     $res = "<success request=\"$request\"><feature>";
19     $res .= "<id>" .  $feature->id .  "</id>";
20
21     $res .= "<imgurl>" .
22              ($feature->imgpath ? 
23                     full_url_from_imgpath ($feature->imgpath)
24                     : "") .
25              "</imgurl>";
26
27     $res .= "<description>" .
28                  htmlspecialchars ($feature->description) .
29                  "</description>";
30
31     // XXX: we do not use <title> because that would be interpreted and
32     // altered by browers html parser
33     $res .= "<heading>" . 
34             htmlspecialchars ($feature->title) .
35             "</heading>";
36
37     $res .= "<lon>" . $feature->lon . "</lon>";
38     $res .= "<lat>" . $feature->lat . "</lat>";
39     $res .= "</feature></success>";
40     exit_document ($res);
41 }
42
43 function success_delete_feature ($feature) {
44     $res = "<success request=\"del\"><feature>";
45     $res .= "<id>" .  $feature->id .  "</id>";
46     $res .= "</feature></success>";
47     exit_document ($res);
48 }
49
50 function success ($reason) {
51     exit_document ("<success request=\"$reason\"></success>");
52 }
53
54 function error ($reason) {
55     exit_document ("<error reason=\"$reason\"></error>");
56 }
57
58 function error_feature ($id, $reason) {
59     $res = "<error reason=\"$reason\"><feature>";
60     $res .= "<id>" .  $id .  "</id>";
61     $res .= "</feature></error>";
62     exit_document ($res);
63 }
64
65 function nochange_error ($id) {
66     error_feature ($id, "nochange");
67 }
68 function unreferenced_error ($id) {
69     error_feature ($id, "unreferenced");
70 }
71
72 function server_error () {
73     error ("server");
74 }
75
76 function unauthorized_error () {
77     error ("unauthorized");
78 }
79
80 function request_error () {
81     error ("request");
82 }
83
84 function file_too_big_error () {
85     error ("toobig");
86 }
87
88 function notanimage_error () {
89     error ("notimage");
90 }
91
92 function save_uploaded_file ($file, $con) {
93     $dest = "";
94     if (isset ($file) && ($file ["error"] != UPLOAD_ERR_NO_FILE)) {
95         img_check_upload ($file);
96         $dest = unique_file (UPLOADDIR, $file ["name"], $con);
97         if (!isset ($dest) || 
98                 (!move_uploaded_file ($file ["tmp_name"], $dest))) {
99             server_error ();
100         }
101     }
102     return basename($dest);
103 }
104
105 function img_check_upload ($file) {
106     if (!is_uploaded_file ($file ["tmp_name"])) {
107         if ($file ["error"] ==  UPLOAD_ERR_INI_SIZE) {
108             file_too_big_error ();
109         } else {
110             server_error ();
111         }
112     }
113     if (!getimagesize ($file ["tmp_name"])) {
114         notanimage_error ();
115     }
116 }
117
118 function delete_image_if_unused ($imgpath, $con) {
119     if (!isset ($imgpath) || (strlen ($imgpath) == 0)) {
120         return;
121     }
122     if ($con->imgpath_exists ($imgpath)) {
123         return false;
124     }
125     $path = UPLOADDIR . "/" . $imgpath;
126     if (file_exists($path)) {
127         unlink ($path);
128         return true;
129     } else {
130         return false;
131     }
132 }
133
134 function unique_file ($dirname, $relpath, $con) {
135    $relpath = str_replace ('/', '', $relpath); // strip slashes from path
136    $relpath = str_replace ('\\', '', $relpath); // strip antislashes from path
137    $filename = $dirname . '/' . $relpath;
138    $counter = 1;
139
140    $dotpos = strrpos ($relpath, '.');
141    if ($dotpos) {
142        $base = substr ($relpath, 0, $dotpos);
143        $ext = substr ($relpath, $dotpos + 1);
144    } else {
145        $base = $relpath;
146        $ext = "";
147    }
148
149    while ($counter < 1000) {
150        if (!file_exists ($filename) && 
151            !($con->imgpath_exists (basename ($filename)))) {
152            return $filename;
153        } else {
154             $counter++;
155             $filename = $dirname . '/' . $base . '_' . $counter . '.' . $ext;
156        }
157    }
158    // we tried to find an unused filename 1000 times. Give up now.
159    return null;
160 }
161
162 function main ($con) {
163     if (!isset ($_POST ["request"])) {
164         request_error ();
165     }
166     if ($_POST ["request"] == "auth") {
167         $pwd = unquote ($_POST["password"]);
168         $user = "admin";
169         if ($con->checkpwdmd5 ($user, md5 ($pwd))) {
170             // cookie will be valid for 2 weeks. I've chosen that value
171             // arbitrarily, and it may change in the future.
172             $time = time () + 14 * 60 * 24 * 60;
173             $cookie_name = sprintf ("%sauth", DBPREFIX);
174             setcookie ($cookie_name, md5 ($pwd), $time, "" , "", false, true);
175             success_auth ();
176         } else {
177             unauthorized_error ();
178         }
179     }
180     if (!($con->checkpwdmd5 ("admin",
181                              $_COOKIE [sprintf ("%sauth", DBPREFIX)]))) {
182         unauthorized_error ();
183     }
184
185     switch ($_POST ["request"]) {
186         case "update":
187             $id = $_POST ["fid"];
188             $feature = $con->getfeature ($id);
189             if (!isset ($feature)) {
190                 unreferenced_error ($id);
191             }
192
193             // no file uploaded, but editor currently has an image: it means
194             // image was not changed
195             if ($_POST ["keep_img"] == "yes") {
196                 $imgpath = $feature->imgpath;
197             } else {
198                 $imgpath = save_uploaded_file ($_FILES ["image_file"], $con);
199             }
200
201             $lon = $_POST ["lon"];
202             $lat = $_POST ["lat"];
203             $title = unquote ($_POST ["title"]);
204             $description = unquote ($_POST ["description"]);
205
206             try {
207                 $new_feature = new feature ($id, $lon, $lat, $imgpath, $title, $description, 0);
208             } catch (Exception $e) {
209                 request_error ();
210             }
211
212             if (($new_feature->lon == $feature->lon) &&
213                 ($new_feature->lat == $feature->lat) &&
214                 ($new_feature->title == $feature->title) &&
215                 ($new_feature->imgpath == $feature->imgpath) &&
216                 ($new_feature->description == $feature->description)) {
217                 nochange_error ($feature->id);
218             }
219
220             $old_imgpath = "";
221             if ($feature->imgpath && ($feature->imgpath != $new_feature->imgpath)) {
222                 $old_imgpath = $feature->imgpath;
223             }
224
225             try {
226                 $con->save_feature ($new_feature);
227             } catch (Exception $e) {
228                 server_error ();
229             }
230             if ($old_imgpath) {
231                 try {
232                     delete_image_if_unused ($old_imgpath, $con); 
233                 } catch (Exception $e) {}
234             }
235             success_feature ($new_feature, "update");
236         break;
237         case "add":
238             $imgpath = save_uploaded_file ($_FILES ["image_file"], $con);
239
240             $lon = $_POST ["lon"];
241             $lat = $_POST ["lat"];
242             $title = unquote ($_POST ["title"]);
243             $description = unquote ($_POST ["description"]);
244             try {
245                 $feature = new feature (null, $lon, $lat, $imgpath, $title, $description, 0);
246             } catch (Exception $e) {
247                 request_error ();
248             }
249             try {
250                 $feature = $con->save_feature ($feature);
251             } catch (Exception $e) {
252                 server_error ();
253             }
254             success_feature ($feature, "add");
255         break;
256         case "del":
257             $id = $_POST ["fid"];
258             $feature = $con->getfeature ($id);
259             if (!isset ($feature)) {
260                 unreferenced_error ($id);
261             }
262             $imgpath = $feature->imgpath;
263
264             try {
265                 $con->delete_feature ($feature);
266             } catch (Exception $e) {
267                 server_error ();
268             }
269
270             try {
271                 delete_image_if_unused ($imgpath, $con);
272             } catch (Exception $e) {}
273
274             success_delete_feature ($feature);
275         default:
276             request_error();
277         break;
278     }
279
280     server_error ();
281 }
282
283 try {
284     $connection->connect (DBHOST, DBUSER, DBPWD, DBNAME, DBPREFIX);
285 } catch (Exception $e) {
286     server_error ();
287 }
288
289 main ($connection);
290 ?>