cleanupchannels.php 2.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172
  1. #!/usr/bin/env php
  2. <?php
  3. /*
  4. * StatusNet - a distributed open-source microblogging tool
  5. * Copyright (C) 2011, StatusNet, Inc.
  6. *
  7. * Script to print out current version of the software
  8. *
  9. * This program is free software: you can redistribute it and/or modify
  10. * it under the terms of the GNU Affero General Public License as published by
  11. * the Free Software Foundation, either version 3 of the License, or
  12. * (at your option) any later version.
  13. *
  14. * This program is distributed in the hope that it will be useful,
  15. * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16. * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  17. * GNU Affero General Public License for more details.
  18. *
  19. * You should have received a copy of the GNU Affero General Public License
  20. * along with this program. If not, see <http://www.gnu.org/licenses/>.
  21. */
  22. define('INSTALLDIR', realpath(__DIR__ . '/../../..'));
  23. $shortoptions = 'u';
  24. $longoptions = array('universe');
  25. $helptext = <<<END_OF_CLEANUPCHANNELS_HELP
  26. cleanupchannels.php [options]
  27. Garbage-collects old realtime channels
  28. -u --universe Do all sites
  29. END_OF_CLEANUPCHANNELS_HELP;
  30. require_once INSTALLDIR.'/scripts/commandline.inc';
  31. function cleanupChannels()
  32. {
  33. $rc = new Realtime_channel();
  34. $rc->selectAdd();
  35. $rc->selectAdd('channel_key');
  36. $rc->whereAdd('modified < "' . common_sql_date(time() - Realtime_channel::TIMEOUT) . '"');
  37. if ($rc->find()) {
  38. $keys = $rc->fetchAll();
  39. foreach ($keys as $key) {
  40. $rc = Realtime_channel::getKV('channel_key', $key);
  41. if (!empty($rc)) {
  42. printfv("Deleting realtime channel '$key'\n");
  43. $rc->delete();
  44. }
  45. }
  46. }
  47. }
  48. if (have_option('u', 'universe')) {
  49. $sn = new Status_network();
  50. if ($sn->find()) {
  51. while ($sn->fetch()) {
  52. $server = $sn->getServerName();
  53. GNUsocial::init($server);
  54. cleanupChannels();
  55. }
  56. }
  57. } else {
  58. cleanupChannels();
  59. }