<?php /** @file */

use OAuth2\Request;
use Zotlabs\Identity\OAuth2Server;
use Zotlabs\Identity\OAuth2Storage;
use Zotlabs\Web\HTTPSig;
use Zotlabs\Lib\Libzot;
use Zotlabs\Lib\System;

/**
 * API Login via basic-auth or OAuth
 */

function api_login(&$a) {

	$record   = null;
	$sigblock = null;

	require_once('include/oauth.php');

	if (array_key_exists('REDIRECT_REMOTE_USER', $_SERVER) && (!array_key_exists('HTTP_AUTHORIZATION', $_SERVER))) {
		$_SERVER['HTTP_AUTHORIZATION'] = $_SERVER['REDIRECT_REMOTE_USER'];
	}

	// login with oauth

	try {
		// OAuth 2.0
		$storage = new OAuth2Storage(DBA::$dba->db);
		$server  = new OAuth2Server($storage);
		$request = Request::createFromGlobals();
		if ($server->verifyResourceRequest($request)) {
			$token = $server->getAccessTokenData($request);
			$uid   = $token['user_id'];
			$r     = q("SELECT * FROM channel WHERE channel_id = %d LIMIT 1",
				intval($uid)
			);
			if (count($r)) {
				$record = $r[0];
			}
			else {
				header('HTTP/1.0 401 Unauthorized');
				echo('This api requires login');
				killme();
			}

			$_SESSION['uid']  = $record['channel_id'];
			$_SESSION['addr'] = $_SERVER['REMOTE_ADDR'];

			$x = q("select * from account where account_id = %d LIMIT 1",
				intval($record['channel_account_id'])
			);
			if ($x) {
				require_once('include/security.php');
				authenticate_success($x[0], null, true, false, true, true);
				$_SESSION['allow_api'] = true;
				call_hooks('logged_in', App::$user);
				return;
			}
		}
		else {
			// OAuth 1.0
			$oauth = new ZotOAuth1();
			$req   = OAuth1Request::from_request();

			[$consumer, $token] = $oauth->verify_request($req);

			if (!is_null($token)) {
				$oauth->loginUser($token->uid);

				App::set_oauth_key($consumer->key);

				call_hooks('logged_in', App::$user);
				return;
			}
			killme();
		}
	} catch (Exception $e) {
		logger($e->getMessage());
	}

	if (array_key_exists('HTTP_AUTHORIZATION', $_SERVER)) {

		/* Basic authentication */

		if (substr(trim($_SERVER['HTTP_AUTHORIZATION']), 0, 5) === 'Basic') {
			$userpass = @base64_decode(substr(trim($_SERVER['HTTP_AUTHORIZATION']), 6));
			if (strlen($userpass)) {
				[$name, $password] = explode(':', $userpass);
				$_SERVER['PHP_AUTH_USER'] = $name;
				$_SERVER['PHP_AUTH_PW']   = $password;
			}
		}

		/* OpenWebAuth */

		if (substr(trim($_SERVER['HTTP_AUTHORIZATION']), 0, 9) === 'Signature') {

			$record = null;

			$sigblock = HTTPSig::parse_sigheader($_SERVER['HTTP_AUTHORIZATION']);
			if ($sigblock) {
				$keyId = str_replace('acct:', '', $sigblock['keyId']);
				if ($keyId) {
					$r = q("select * from hubloc where hubloc_addr = '%s' or hubloc_id_url = '%s' order by hubloc_id desc",
						dbesc($keyId),
						dbesc($keyId)
					);
					if (!$r) {
						HTTPSig::get_zotfinger_key($keyId);
						$r = q("select * from hubloc where hubloc_addr = '%s' or hubloc_id_url = '%s' order by hubloc_id desc",
							dbesc($keyId),
							dbesc($keyId)
						);
					}
					if ($r) {
						$r = Libzot::zot_record_preferred($r);
						$c = channelx_by_hash($r['hubloc_hash']);
						if ($c) {
							$a = q("select * from account where account_id = %d limit 1",
								intval($c['channel_account_id'])
							);
							if ($a) {
								$record        = ['channel' => $c, 'account' => $a[0]];
								$channel_login = $c['channel_id'];
							}
						}
					}

					if ($record) {
						$verified = HTTPSig::verify('', $record['channel']['channel_pubkey']);
						if (!($verified && $verified['header_signed'] && $verified['header_valid'])) {
							$record = null;
						}
					}
				}
			}
		}
	}

	require_once('include/auth.php');
	require_once('include/security.php');

	// process normal login request

	if (isset($_SERVER['PHP_AUTH_USER']) && (!$record)) {
		$channel_login = 0;
		$record        = account_verify_password($_SERVER['PHP_AUTH_USER'], $_SERVER['PHP_AUTH_PW']);
		if ($record && $record['channel']) {
			$channel_login = $record['channel']['channel_id'];
		}
	}

	if ($record['account']) {
		authenticate_success($record['account']);

		if ($channel_login)
			change_channel($channel_login);

		$_SESSION['allow_api'] = true;
		return true;
	}
	else {
		$_SERVER['PHP_AUTH_PW'] = '*****';
		logger('API_login failure: ' . print_r($_SERVER, true), LOGGER_DEBUG);
		log_failed_login('API login failure');
		retry_basic_auth();
	}

}

function retry_basic_auth($method = 'Basic') {
	header('WWW-Authenticate: ' . $method . ' realm="' . System::get_platform_name() . '"');
	header('HTTP/1.0 401 Unauthorized');
	echo('This api requires login');
	killme();
}