<?php

error_reporting( E_ALL );
ini_set( 'display_errors', 1 );
$Timestamp = time();
$startTime = microtime( TRUE );
$BaseDir = __DIR__;
$MessageHandlers = [];
$AuthCheckers = [];
$IdProviders = [];
$Counter = NULL;
$Crypto = NULL;
$FsWriter = NULL;

require_once 'lib/incoming_message.class.php';
require_once 'lib/outgoing_message.class.php';
require_once 'config.php';
$DataDir = $Config['Data-Directory'] ?? "{$BaseDir}/data";
$TempDir = $Config['Temp-Directory'] ?? "{$BaseDir}/tmp";
header('Content-Type: text/plain');

$ServerData = $Config['Server-Data'];
if ( empty( $ServerData['name'] ) ){
	$ServerData['name'] = $_SERVER['SERVER_NAME'];
}


// If there is nothing to process, show contents of this script file

if ( empty( $_POST['message'] ) ){
	$_POST['message'] = file_get_contents('php://input');
	if ( empty( $_POST['message'] ) ){
		readfile( __FILE__ );
		exit;
	}
}


// Load modules

if ( ! empty( $ServerData['modules'] ) ){
	foreach ( $ServerData['modules'] as $module ){
		$path = "{$BaseDir}/modules/{$module}/init.php";
		if ( file_exists( $path ) ){
			include $path;
		}
		else {
			ptcp_error( '500 Internal Server Error', "Module {$module} could not be initialized" );
		}
	}
}


// Prepare processing

$Message = new ParTCP_Incoming_Message( $_POST['message'], $Crypto, 'ptcp_get_pubkey' );
if ( ! $Message->get('Message-Type') ){
	ptcp_error( '400 Bad Request', 'Message-Type header is missing' );
}

$Receipt = new ParTCP_Outgoing_Message( $Crypto, 'ptcp_get_pubkey' );
$Receipt->set( 'From', $ServerData['name'] );
if ( $id = $Message->get('From') ){
	$pubKey = ptcp_get_pubkey( $id, $Message, TRUE );
	$Receipt->set_recipient( $Message->get('From'), $pubKey );
}
if ( empty( $pubKey ) && ( $pubKey = $Message->get('Public-Key') ) ){
	$Receipt->recipientPubKey = $pubKey;
}
$Receipt->set_date();
$Receipt->set( 'Message-Type', 'receipt' );
$Receipt->set( 'Original-Message', $_POST['message'] );


// Process message and deliver receipt

$result = ptcp_handle_message( $Message, $Receipt );

if ( $result === FALSE ){
	ptcp_error( '501 Not Implemented', "Unknown message type '{$Message->get('Message-Type')}'" );
}
if ( is_array( $result ) ){
	ptcp_error( $result['status'], $result['body'] );
}

header( 'X-Elapsed-Time: ' . sprintf( '%.3f ms', 1000 * ( microtime( TRUE ) - $startTime ) ) );
echo $result;


// end of file process.php