testdrive/testdrive.php

   1 <?php
   2
   3 /**
   4  * Name: testdrive
   5  * Description: Sample Friendica plugin/addon for creating a test drive Friendica site with automatic account expiration.
   6  * Version: 1.0
   7  * Author: Mike Macgirvin <http://macgirvin.com/profile/mike>
   8  */
   9
  10 use Friendica\Core\Config;
  11
  12
  13 function testdrive_install() {
  14
  15         register_hook('register_account', 'addon/testdrive/testdrive.php', 'testdrive_register_account');
  16         register_hook('cron', 'addon/testdrive/testdrive.php', 'testdrive_cron');
  17         register_hook('enotify','addon/testdrive/testdrive.php', 'testdrive_enotify');
  18         register_hook('globaldir_update','addon/testdrive/testdrive.php', 'testdrive_globaldir_update');
  19
  20 }
  21
  22
  23 function testdrive_uninstall() {
  24
  25         unregister_hook('register_account', 'addon/testdrive/testdrive.php', 'testdrive_register_account');
  26         unregister_hook('cron', 'addon/testdrive/testdrive.php', 'testdrive_cron');
  27         unregister_hook('enotify','addon/testdrive/testdrive.php', 'testdrive_enotify');
  28         unregister_hook('globaldir_update','addon/testdrive/testdrive.php', 'testdrive_globaldir_update');
  29
  30 }
  31
  32 function testdrive_globaldir_update($a,&$b) {
  33         $b['url'] = '';
  34 }
  35
  36 function testdrive_register_account($a,$b) {
  37
  38         $uid = $b;
  39
  40         $days = Config::get('testdrive','expiredays');
  41         if(! $days)
  42                 return;
  43
  44         $r = q("UPDATE user set account_expires_on = '%s' where uid = %d",
  45                 dbesc(datetime_convert('UTC','UTC','now +' . $days . ' days')),
  46                 intval($uid)
  47         );
  48
  49 };
  50
  51
  52 function testdrive_cron($a,$b) {
  53         require_once('include/enotify.php');
  54
  55         $r = q("select * from user where account_expires_on < UTC_TIMESTAMP() + INTERVAL 5 DAY and
  56                 expire_notification_sent = '0000-00-00 00:00:00' ");
  57
  58         if(count($r)) {
  59                 foreach($r as $rr) {
  60                         notification(array(
  61                                 'uid' => $rr['uid'],
  62                                 'type' => NOTIFY_SYSTEM,
  63                                 'system_type' => 'testdrive_expire',
  64                                 'language'     => $rr['language'],
  65                                 'to_name'      => $rr['username'],
  66                                 'to_email'     => $rr['email'],
  67                                 'source_name'  => t('Administrator'),
  68                                 'source_link'  => $a->get_baseurl(),
  69                                 'source_photo' => $a->get_baseurl() . '/images/person-80.jpg',
  70                         ));
  71
  72                         q("update user set expire_notification_sent = '%s' where uid = %d",
  73                                 dbesc(datetime_convert()),
  74                                 intval($rr['uid'])
  75                         );
  76
  77                 }
  78         }
  79
  80         $r = q("select * from user where account_expired = 1 and account_expires_on < UTC_TIMESTAMP() - INTERVAL 5 DAY ");
  81         if(count($r)) {
  82                 require_once('include/Contact.php');
  83                 foreach($r as $rr)
  84                         user_remove($rr['uid']);
  85
  86         }
  87
  88 }
  89
  90 function testdrive_enotify(&$a, &$b) {
  91     if (x($b, 'params') && $b['params']['type'] == NOTIFY_SYSTEM
  92                 && x($b['params'], 'system_type') && $b['params']['system_type'] === 'testdrive_expire') {
  93         $b['itemlink'] = $a->get_baseurl();
  94         $b['epreamble'] = $b['preamble'] = sprintf( t('Your account on %s will expire in a few days.'), Config::get('system','sitename'));
  95         $b['subject'] = t('Your Friendica test account is about to expire.');
  96         $b['body'] = sprintf( t("Hi %1\$s,\n\nYour test account on %2\$s will expire in less than five days. We hope you enjoyed this test drive and use this opportunity to find a permanent Friendica website for your integrated social communications. A list of public sites is available at %s/siteinfo - and for more information on setting up your own Friendica server please see the Friendica project website at http://friendica.com."), $b['params']['to_name'], "[url=".$app->config["system"]["url"]."]".$app->config["sitename"]."[/url]", get_server());
  97     }
  98 }