streams/Zotlabs/Daemon/Cron_daily.php

<?php

namespace Zotlabs\Daemon;

use Zotlabs\Lib\ServiceClass;    
use Zotlabs\Lib\Libzotdir;
use Zotlabs\Lib\Libzot;

class Cron_daily
{

    public static function run($argc, $argv)
    {

        logger('cron_daily: start');

        /**
         * Cron Daily
         *
         */


        // make sure our own site record is up to date
        Libzot::import_site(Libzot::site_info(true));


        // Fire off the Cron_weekly process if it's the correct day.

        $d3 = intval(datetime_convert('UTC', 'UTC', 'now', 'N'));
        if ($d3 == 7) {
            Run::Summon([ 'Cron_weekly' ]);
        }

        // once daily run birthday_updates and then expire in background

        // FIXME: add birthday updates, both locally and for xprof for use
        // by directory servers

        update_birthdays();

        // expire any read notifications over a month old

        q(
            "delete from notify where seen = 1 and created < %s - INTERVAL %s",
            db_utcnow(),
            db_quoteinterval('60 DAY')
        );

        // expire any unread notifications over a year old

        q(
            "delete from notify where seen = 0 and created < %s - INTERVAL %s",
            db_utcnow(),
            db_quoteinterval('1 YEAR')
        );


        //update statistics in config
        require_once('include/statistics_fns.php');
        update_channels_total_stat();
        update_channels_active_halfyear_stat();
        update_channels_active_monthly_stat();
        update_local_posts_stat();
        update_local_comments_stat();


        // expire old delivery reports

        $keep_reports = intval(get_config('system', 'expire_delivery_reports'));
        if ($keep_reports === 0) {
            $keep_reports = 10;
        }

        q(
            "delete from dreport where dreport_time < %s - INTERVAL %s",
            db_utcnow(),
            db_quoteinterval($keep_reports . ' DAY')
        );

        // delete accounts that did not submit email verification within 3 days

        $r = q(
            "select * from register where password = 'verify' and created < %s - INTERVAL %s",
            db_utcnow(),
            db_quoteinterval('3 DAY')
        );
        if ($r) {
            foreach ($r as $rv) {
                q(
                    "DELETE FROM account WHERE account_id = %d",
                    intval($rv['uid'])
                );

                q(
                    "DELETE FROM register WHERE id = %d",
                    intval($rv['id'])
                );
            }
        }

        // expire any expired accounts
        ServiceClass::downgrade_accounts();

        Run::Summon([ 'Expire' ]);


        // remove xchan photos that were stored in the DB ine earlier versions
        // and were migrated to filesystem storage.
        // eventually this will do nothing but waste cpu cycles checking to see if anything remains.

        cleanup_xchan_photos();

        remove_obsolete_hublocs();

        call_hooks('cron_daily', datetime_convert());

        set_config('system', 'last_expire_day', intval(datetime_convert('UTC', 'UTC', 'now', 'd')));

        /**
         * End Cron Daily
         */
    }
}