]> git.mxchange.org Git - quix0rs-gnu-social.git/blob - scripts/settag.php
Made it so that settag would list tags.
[quix0rs-gnu-social.git] / scripts / settag.php
1 #!/usr/bin/env php
2 <?php
3 /*
4  * StatusNet - a distributed open-source microblogging tool
5  * Copyright (C) 2008, 2009, StatusNet, Inc.
6  *
7  * This program is free software: you can redistribute it and/or modify
8  * it under the terms of the GNU Affero General Public License as published by
9  * the Free Software Foundation, either version 3 of the License, or
10  * (at your option) any later version.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU Affero General Public License for more details.
16  *
17  * You should have received a copy of the GNU Affero General Public License
18  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
19  */
20
21 define('INSTALLDIR', realpath(dirname(__FILE__) . '/..'));
22
23 $shortoptions = 'd';
24 $longoptions = array('delete');
25
26 $helptext = <<<END_OF_SETTAG_HELP
27 settag.php [options] <site> <tag>
28 Set the tag <tag> for site <site>.
29
30 With -d, delete the tag.
31
32 END_OF_SETTAG_HELP;
33
34 require_once INSTALLDIR.'/scripts/commandline.inc';
35
36 if (count($args) < 1) {
37     show_help();
38     exit(1);
39 }
40
41 $nickname = $args[0];
42
43 $sn = Status_network::memGet('nickname', $nickname);
44
45 if (empty($sn)) {
46     print "No such site.\n";
47     exit(-1);
48 }
49
50 $tags = $sn->getTags();
51
52 if (count($args) == 1) {
53         print(implode(', ', $tags) . "\n");
54         exit(0);
55 }
56 $tag = $args[1];
57
58 $i = array_search($tag, $tags);
59
60 if ($i !== false) {
61     if (have_option('d', 'delete')) { // Delete
62         unset($tags[$i]);
63
64         $orig = clone($sn);
65         $sn->tags = implode('|', $tags);
66         $result = $sn->update($orig);
67         if (!$result) {
68             print "Couldn't update.\n";
69             exit(-1);
70         }
71     } else {
72         print "Already set.\n";
73         exit(-1);
74     }
75 } else {
76     if (have_option('d', 'delete')) { // Delete
77         print "No such tag.\n";
78         exit(-1);
79     } else {
80         $tags[] = $tag;
81         $orig = clone($sn);
82         $sn->tags = implode('|', $tags);
83         $result = $sn->update($orig);
84         if (!$result) {
85             print "Couldn't update.\n";
86             exit(-1);
87         }
88     }
89 }