#!/usr/bin/env php
<?php
# This file is highly based cron-script.php
# From Dotclear extension called planet
# By Olivier Meunier and contributors
# Licensed under the GPL version 2.0 license

use Dotclear\App;

$opts = getopt('d:c:b:u:h');

function zchelp(string|int $status = 0): void
{
    echo
    "Options: \n" .
    " -h shows this help\n" .
    " -d DotClear root path\n" .
    " -c DotClear conf path\n" .
    " -b Blog ID\n" .
    " -u User ID\n\n";
    exit($status);
}

if (isset($opts['h'])) {
    zchelp();
}

$dc_root = null;
$dc_conf = null;
$blog_id = null;

if (isset($opts['d'])) {
    $dc_root = $opts['d'];
} elseif (isset($_SERVER['DC_ROOT'])) {
    $dc_root = $_SERVER['DC_ROOT'];
}

if (isset($opts['c']) && is_string($opts['c'])) {
    $dc_conf = realpath($opts['c']);
} elseif (isset($_SERVER['DC_RC_PATH'])) {
    $dc_conf = realpath($_SERVER['DC_RC_PATH']);
}

if (isset($opts['b'])) {
    $blog_id = $opts['b'];
} elseif (isset($_SERVER['DC_BLOG_ID'])) {
    $blog_id = $opts['DC_BLOG_ID'];
}

if (!$dc_root || !is_dir($dc_root)) {
    fwrite(STDERR, "DotClear root path is not defined\n\n");
    zchelp(1);
}

if (!$dc_conf || !is_readable($dc_conf)) {
    fwrite(STDERR, "DotClear configuration not found\n\n");
    zchelp(1);
}

if (!$blog_id || !is_string($blog_id)) {
    fwrite(STDERR, "Blog ID is not defined\n\n");
    zchelp(1);
}

$_SERVER['DC_RC_PATH'] = $dc_conf;
unset($dc_conf);

define('DC_BLOG_ID', $blog_id);
unset($blog_id);

require $dc_root . '/inc/prepend.php';
unset($dc_root);

App::blog()->loadFromBlog(is_string(DC_BLOG_ID) ? DC_BLOG_ID : '');
if (!App::blog()->isDefined() || '' == App::blog()->id()) {
    fwrite(STDERR, "Blog is not defined\n");
    exit(1);
}

if (!isset($opts['u']) || !App::auth()->checkUser(is_string($opts['u']) ? $opts['u'] : '')) {
    fwrite(STDERR, "Unable to set user\n");
    exit(1);
}

App::plugins()->loadModules(DC_PLUGINS_ROOT);

try {
    $zc = Dotclear\Plugin\zoneclearFeedServer\ZoneclearFeedServer::instance();
    $zc->checkFeedsUpdate();
} catch (Exception $e) {
    fwrite(STDERR, $e->getMessage() . "\n");
    exit(1);
}