<?php

namespace Zotlabs\Module;

use App;
use Zotlabs\Web\Controller;
use Zotlabs\Lib\PermissionDescription;
use Zotlabs\Lib\Channel;

require_once("include/bbcode.php");
require_once('include/security.php');
require_once('include/conversation.php');
require_once('include/acl_selectors.php');


class Hq extends Controller
{


    // State passed in from the Update module.

    public $profile_uid = 0;
    public $loading = 0;
    public $updating = 0;


    public function init()
    {
        if (!local_channel()) {
            return;
        }

        App::$profile_uid = local_channel();
    }

    public function post()
    {

        if (!local_channel()) {
            return;
        }

        if ($_REQUEST['notify_id']) {
            q(
                "update notify set seen = 1 where id = %d and uid = %d",
                intval($_REQUEST['notify_id']),
                intval(local_channel())
            );
        }

        killme();
    }

    public function get()
    {

        if (!local_channel()) {
            return;
        }

        if ($this->loading) {
            $_SESSION['loadtime_hq'] = datetime_convert();
        }

        if (argc() > 1 && argv(1) !== 'load') {
            $item_hash = argv(1);
        }

        if ($_REQUEST['mid']) {
            $item_hash = $_REQUEST['mid'];
        }

        $item_normal = item_normal();
        $item_normal_update = item_normal_update();

        if (!$item_hash) {
            $r = q(
                "SELECT mid FROM item 
				WHERE uid = %d $item_normal
				AND mid = parent_mid 
				ORDER BY created DESC LIMIT 1",
                intval(local_channel())
            );

            if ($r[0]['mid']) {
                $item_hash = gen_link_id($r[0]['mid']);
            }
        }

        if ($item_hash) {
            $item_hash = unpack_link_id($item_hash);

            $target_item = null;

            $r = q(
                "select id, uid, mid, parent_mid, thr_parent, verb, item_type, item_deleted, item_blocked from item where mid like '%s' limit 1",
                dbesc($item_hash . '%')
            );

            if ($r) {
                $target_item = $r[0];
            }

            //if the item is to be moderated redirect to /moderate
            if ($target_item['item_blocked'] == ITEM_MODERATED) {
                goaway(z_root() . '/moderate/' . $target_item['id']);
            }

            $static = ((array_key_exists('static', $_REQUEST)) ? intval($_REQUEST['static']) : 0);

            $simple_update = (($this->updating) ? " AND item_unseen = 1 " : '');

            if ($this->updating && $_SESSION['loadtime_hq']) {
                $simple_update = " AND item.changed > '" . datetime_convert('UTC', 'UTC', $_SESSION['loadtime_hq']) . "' ";
            }

            if ($static && $simple_update) {
                $simple_update .= " and item_thread_top = 0 and author_xchan = '" . protect_sprintf(get_observer_hash()) . "' ";
            }

            $sys = Channel::get_system();
            $sql_extra = item_permissions_sql($sys['channel_id']);

            $sys_item = false;
        }

        if (!$this->updating) {
            $channel = App::get_channel();

            $channel_acl = [
                'allow_cid' => $channel['channel_allow_cid'],
                'allow_gid' => $channel['channel_allow_gid'],
                'deny_cid' => $channel['channel_deny_cid'],
                'deny_gid' => $channel['channel_deny_gid']
            ];

            $x = [
                'is_owner' => true,
                'allow_location' => ((intval(get_pconfig($channel['channel_id'], 'system', 'use_browser_location'))) ? '1' : ''),
                'default_location' => $channel['channel_location'],
                'nickname' => $channel['channel_address'],
                'lockstate' => (($group || $cid || $channel['channel_allow_cid'] || $channel['channel_allow_gid'] || $channel['channel_deny_cid'] || $channel['channel_deny_gid']) ? 'lock' : 'unlock'),
                'acl' => populate_acl($channel_acl, true, PermissionDescription::fromGlobalPermission('view_stream'), get_post_aclDialogDescription(), 'acl_dialog_post'),
                'permissions' => $channel_acl,
                'bang' => '',
                'visitor' => true,
                'profile_uid' => local_channel(),
                'return_path' => 'hq',
                'expanded' => true,
                'editor_autocomplete' => true,
                'bbco_autocomplete' => 'bbcode',
                'bbcode' => true,
                'jotnets' => true,
                'reset' => t('Reset form')
            ];

            $o = replace_macros(
                get_markup_template("hq.tpl"),
                [
                    '$no_messages' => (($target_item) ? false : true),
                    '$no_messages_label' => [t('Welcome to $Projectname!'), t('You have got no unseen posts...')],
                    '$editor' => status_editor($x)
                ]
            );
        }

        if (!$this->updating && !$this->loading) {
            Navbar::set_selected('HQ');

            $static = ((local_channel()) ? Channel::manual_conv_update(local_channel()) : 1);

            if ($target_item) {
                // if the target item is not a post (eg a like) we want to address its thread parent
                $mid = ((($target_item['verb'] == ACTIVITY_LIKE) || ($target_item['verb'] == ACTIVITY_DISLIKE)) ? $target_item['thr_parent'] : $target_item['mid']);

                // if we got a decoded hash we must encode it again before handing to javascript
                $mid = gen_link_id($mid);
            } else {
                $mid = '';
            }

            $o .= '<div id="live-hq"></div>' . "\r\n";
            $o .= "<script> var profile_uid = " . local_channel()
                . "; var netargs = '?f='; var profile_page = " . App::$pager['page'] . ";</script>\r\n";

            App::$page['htmlhead'] .= replace_macros(get_markup_template("build_query.tpl"), [
                '$baseurl' => z_root(),
                '$pgtype' => 'hq',
                '$uid' => local_channel(),
                '$gid' => '0',
                '$cid' => '0',
                '$cmin' => '0',
                '$cmax' => '99',
                '$star' => '0',
                '$liked' => '0',
                '$conv' => '0',
                '$spam' => '0',
                '$fh' => '0',
                '$dm' => '0',
                '$nouveau' => '0',
                '$wall' => '0',
                '$draft' => '0',
                '$static' => $static,
                '$page' => 1,
                '$list' => ((x($_REQUEST, 'list')) ? intval($_REQUEST['list']) : 0),
                '$search' => '',
                '$xchan' => '',
                '$order' => '',
                '$file' => '',
                '$cats' => '',
                '$tags' => '',
                '$dend' => '',
                '$dbegin' => '',
                '$verb' => '',
                '$net' => '',
                '$mid' => (($mid) ? urlencode($mid) : '')
            ]);
        }

        $updateable = false;

        if ($this->loading && $target_item) {
            $r = null;

            $r = q(
                "SELECT item.id AS item_id FROM item
				WHERE uid = %d
				AND mid = '%s'
				$item_normal
				LIMIT 1",
                intval(local_channel()),
                dbesc($target_item['parent_mid'])
            );

            if ($r) {
                $updateable = true;
            }

            if (!$r) {
                $sys_item = true;

                $r = q(
                    "SELECT item.id AS item_id FROM item
					LEFT JOIN abook ON item.author_xchan = abook.abook_xchan
					WHERE mid = '%s' AND item.uid = %d $item_normal
					AND (abook.abook_blocked = 0 or abook.abook_flags is null)
					$sql_extra LIMIT 1",
                    dbesc($target_item['parent_mid']),
                    intval($sys['channel_id'])
                );
            }
        } elseif ($this->updating && $target_item) {
            $r = null;

            $r = q(
                "SELECT item.parent AS item_id FROM item
				WHERE uid = %d
				AND parent_mid = '%s'
				$item_normal_update
				$simple_update
				LIMIT 1",
                intval(local_channel()),
                dbesc($target_item['parent_mid'])
            );

            if ($r) {
                $updateable = true;
            }

            if (!$r) {
                $sys_item = true;

                $r = q(
                    "SELECT item.parent AS item_id FROM item
					LEFT JOIN abook ON item.author_xchan = abook.abook_xchan
					WHERE mid = '%s' AND item.uid = %d $item_normal_update $simple_update
					AND (abook.abook_blocked = 0 or abook.abook_flags is null)
					$sql_extra LIMIT 1",
                    dbesc($target_item['parent_mid']),
                    intval($sys['channel_id'])
                );
            }

            $_SESSION['loadtime_hq'] = datetime_convert();
        } else {
            $r = [];
        }

        if ($r) {
            $items = q(
                "SELECT item.*, item.id AS item_id 
				FROM item
				WHERE parent = '%s' $item_normal ",
                dbesc($r[0]['item_id'])
            );

            xchan_query($items, true, (($sys_item) ? local_channel() : 0));
            $items = fetch_post_tags($items, true);
            $items = conv_sort($items, 'created');
        } else {
            $items = [];
        }

        $o .= conversation($items, 'hq', $this->updating, 'client');

        if ($updateable) {
            $x = q(
                "UPDATE item SET item_unseen = 0 WHERE item_unseen = 1 AND uid = %d AND parent = %d ",
                intval(local_channel()),
                intval($r[0]['item_id'])
            );
        }

        $o .= '<div id="content-complete"></div>';

        return $o;
    }
}