X-Git-Url: https://git.mxchange.org/?a=blobdiff_plain;ds=sidebyside;f=scripts%2Fallsites.php;h=59c4be2b912b93d82a87c53893f09f22946f24de;hb=d6b28c64830f632bb2f4b6f3c9369b9e56ad217a;hp=d6768c27853b4da12716cf6243a62467aa23e58f;hpb=bfae5489cb629331f2936b2bf1066adb3976bce1;p=quix0rs-gnu-social.git

diff --git a/scripts/allsites.php b/scripts/allsites.php
index d6768c2785..59c4be2b91 100755
--- a/scripts/allsites.php
+++ b/scripts/allsites.php
@@ -1,8 +1,8 @@
 #!/usr/bin/env php
 <?php
 /*
- * Laconica - a distributed open-source microblogging tool
- * Copyright (C) 2009, Control Yourself, Inc.
+ * StatusNet - the distributed open-source microblogging tool
+ * Copyright (C) 2009, StatusNet, Inc.
  *
  * This program is free software: you can redistribute it and/or modify
  * it under the terms of the GNU Affero General Public License as published by
@@ -18,23 +18,76 @@
  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  */
 
-# Abort if called from a web server
+// Abort if called from a web server
 
 define('INSTALLDIR', realpath(dirname(__FILE__) . '/..'));
 
+$shortoptions = 't:w:';
+$longoptions = array('tagged=', 'not-tagged=');
+
 $helptext = <<<ENDOFHELP
 allsites.php - list all sites configured for multi-site use
+USAGE: allsites.php [OPTIONS]
 
-returns the nickname of each site configured for multi-site use
+-t --tagged=tagname  List only sites with this tag
+-w --not-tagged=tagname List only sites without this tag
 
 ENDOFHELP;
 
-require_once INSTALLDIR.'/scripts/commandline.inc';
+require_once INSTALLDIR.'/scripts/commandline.inc.php';
+
+function print_all_sites() {
+
+    $sn = new Status_network();
+
+    if ($sn->find()) {
+        while ($sn->fetch()) {
+            print "$sn->nickname\n";
+        }
+    }
+    return;
+}
 
-$sn = new Status_network();
+function print_tagged_sites($tag) {
+
+    $sn = new Status_network();
+
+    $sn->query('select status_network.nickname '.
+               'from status_network join status_network_tag '.
+               'on status_network.site_id = status_network_tag.site_id '.
+               'where status_network_tag.tag = "' . $tag . '"');
 
-if ($sn->find()) {
     while ($sn->fetch()) {
         print "$sn->nickname\n";
     }
-}
\ No newline at end of file
+
+    return;
+}
+
+function print_untagged_sites($tag) {
+
+    $sn = new Status_network();
+
+    $sn->query('select status_network.nickname '.
+               'from status_network '.
+               'where not exists '.
+               '(select tag from status_network_tag '.
+               'where site_id = status_network.site_id '.
+               'and tag = "'.$tag.'")');
+
+    while ($sn->fetch()) {
+        print "$sn->nickname\n";
+    }
+
+    return;
+}
+
+if (have_option('t', 'tagged')) {
+    $tag = get_option_value('t', 'tagged');
+    print_tagged_sites($tag);
+} else if (have_option('w', 'not-tagged')) {
+    $tag = get_option_value('w', 'not-tagged');
+    print_untagged_sites($tag);
+} else {
+    print_all_sites();
+}