<?php
include("config.php");
include("ppub.php");
include("theme.php");

define("INDEX_TYPE_MAIN", 0);
define("INDEX_TYPE_TAG", 1);
define("INDEX_TYPE_SEARCH", 2);

function get_ppub_file_list() {
    if(USE_PPIX) {
        include_once("ppix.php");
        $ppix = new Ppix(fopen(PUBLICATION_DIR . "/lib.ppix", 'rb'));
        if(isset($_GET["q"])) {
            $ids = $ppix->do_search(strtolower(str_replace("/", "", $_GET["q"])));
            $list = array();
            for ($i=0; $i < count($ids); $i++) { 
                $list[$i] = $ppix->get_publication_by_id($ids[$i]);
            }
            return $list;

        } else if(isset($_GET["tag"])) {
            $tag = str_replace("/", "", $_GET["tag"]);
            $tags = $ppix->get_tags();
            $col = $tags[$tag];
            if($col === null) {
                return array();
            }
            $ids = $ppix->get_collection_by_id($col);
            $list = array();
            for ($i=0; $i < count($ids); $i++) { 
                $list[$i] = $ppix->get_publication_by_id($ids[$i]);
            }
            return $list;

        } else {
            $count = $ppix->get_publication_count();
            $list = array();
            for ($i=0; $i < $count; $i++) { 
                $list[$i] = $ppix->get_publication_by_id($i);
            }
            return $list;
        }
    }
    else if(USE_PPCL) {
        include_once("ppcl.php");
        $ppcl = new Ppcl();
        $ppcl->from_string(file_get_contents(PUBLICATION_DIR . "/collection.ppcl"));
        $list = array();
        foreach($ppcl->publications as $pub) {
            array_push($list, $pub->name);
        }
        return array_reverse($list);
    }
    else {
        $dir = opendir(PUBLICATION_DIR . "/");
        $list = array();
        while($file = readdir($dir)){
            if ($file != '.' and $file != '..' and $file != "lib.ppix"){
                $ctime = filemtime(PUBLICATION_DIR . "/" . $file) . ',' . $file;
                $list[$ctime] = $file;
            }
        }
        closedir($dir);
        krsort($list);
        return $list;
    }
}

function get_tag_list() {
    if(USE_PPIX) {
        include_once("ppix.php");
        $ppix = new Ppix(fopen(PUBLICATION_DIR . "/lib.ppix", 'rb'));
        return array_keys($ppix->get_tags());
    }
    else {
        return array();
    }
}

$file = $_GET["ppub"];
$asset = urldecode($_GET["asset"]);

error_log($_SERVER['REQUEST_URI']);
if($asset == '' and $_SERVER['REQUEST_URI'][-1] != '/') {
    header("location: " . $_SERVER['REQUEST_URI'] . "/");
}


if($file == "" or $file == "/" or $file == "feed.rss") {
    $start = "index_start";
    $no_content = "index_no_content";
    $listing = "index_listing";
    $end = "index_end";

    if($file == "feed.rss") {
        header("content-type: application/rss+xml");
        $start = "rss_start";
        $listing = "rss_listing";
        $no_content = "rss_no_content";
        $end = "rss_end";
    }
    else {
        header("content-type: text/html");
    }

    $index_type = INDEX_TYPE_MAIN;
    $index_arg = null;

    if(isset($_GET["q"])) {
        $index_type = INDEX_TYPE_SEARCH;
        $index_arg = str_replace("/", "", $_GET["q"]);
    }

    if(isset($_GET["tag"])) {
        $index_type = INDEX_TYPE_TAG;
        $index_arg = str_replace("/", "", $_GET["tag"]);
    }

    if($index_type == INDEX_TYPE_MAIN) {
        $index_arg = get_tag_list();
    }
    
    $start($index_type, $index_arg);
    $list = get_ppub_file_list();
    
    foreach ($list as $file) {
        error_log("File: " . $file);
        $ppub = new Ppub();
        $ppub->read_file(PUBLICATION_DIR . "/".$file);
        $listing($ppub, $file);
    }

    if(count($list) == 0) {
        $no_content($index_type, $index_arg);
    }

    $end();
    exit();
}

$file = str_replace("/", "", $file);
$file_name = $file;
$file = PUBLICATION_DIR . "/" . $file;
$ppcl_pub = null;
if(USE_PPCL) {
    include_once("ppcl.php");
    $ppcl = new Ppcl();
    $ppcl->from_string(file_get_contents(PUBLICATION_DIR . "/collection.ppcl"));
    $ppcl_pub = $ppcl->get_publication($file_name);
}

// Don't serve non-published files if using PPCL
if(!file_exists($file) || (USE_PPCL && $ppcl_pub == null)){
    header('HTTP/1.1 404 Not Found');
    include("404.php");
    exit();
}

$accepts = $_SERVER["HTTP_ACCEPT"];
if(($asset == "" or $asset == "/") and strpos($accepts, "application/x-ppub") !== false or isset($_GET["download"])) {
    header("content-type: application/x-ppub");
    if(isset($_GET["download"])) {
        header("Content-Disposition: attachment; filename=\"".$file_name."\"");
    }
    echo(readfile($file));
    exit();
}

$ppub = new Ppub();
$ppub->read_file($file);

if($asset == "" or $asset == "/") {
    $asset = $ppub->asset_list[1];
}
else {
    $asset = $ppub->asset_index[$asset];
}

if(isset($_SERVER['HTTP_IF_MODIFIED_SINCE'])) {
    if(strtotime($_SERVER['HTTP_IF_MODIFIED_SINCE']) < filectime(PUBLICATION_DIR . "/" . $file)) {
        header('HTTP/1.1 304 Not Modified');
        exit;
    }
}

header("Cache-Control: public, max-age=604800");

if(strpos($accepts, "text/html") !== false && $asset->mimetype == "text/markdown" && !isset($_GET["raw"])) {
    header("content-type: text/html");
    include("Parsedown.php");
    $pd = new Parsedown();
    content_start($ppub, $file_name);
    content_html($pd->text($ppub->read_asset($asset)));
    content_end($ppub);
}
else if(strpos($accepts, "text/html") !== false && $asset->mimetype == "application/x-ppvm" && !isset($_GET["raw"])) {
    header("content-type: text/html");
    include("ppvm.php");
    include("Parsedown.php");
    $pd = new Parsedown();
    $video = new Ppvm();
    $video->from_string($ppub->read_asset($asset));
    
    include("video_player.php");
    if(isset($_GET["embed"])) {
        ppvm_player($ppub, $file_name, $video);
    }
    else {
        video_start($ppub, $file_name, $video);
        $description = $ppub->asset_index[$video->metadata["description"]];
        video_html($pd->text($ppub->read_asset($description)));
        video_end($ppub);
    }
}
else {
    header("content-type: " . $asset->mimetype);

    if($ppub->can_stream_asset($asset)) {
        $file_size = $ppub->get_asset_size($asset);
        $start = 0;
        $end = $file_size;
    
        header('Accept-Ranges: bytes', true);
    
        ### Parse Content-Range header for byte offsets, looks like "bytes=11525-" OR "bytes=11525-12451"
        if( isset($_SERVER['HTTP_RANGE']) && preg_match('%bytes=(\d+)-(\d+)?%i', $_SERVER['HTTP_RANGE'], $match) )
        {
            $start = (int)$match[1];
            $finish_bytes = 0;
    
            if( isset($match[2]) ){
                $finish_bytes = (int)$match[2];
                $end = $finish_bytes + 1;
            } else {
                $finish_bytes = $file_size - 1;
            }
        
            $cr_header = sprintf('Content-Range: bytes %d-%d/%d', $start, $finish_bytes, $file_size);

            if($start > $file_size || $end > $file_size) {
                header("HTTP/1.1 416 Range Not Satisfiable");
                header($cr_header);
                exit;
            }
        
            header("HTTP/1.1 206 Partial content");
            header($cr_header);
        }

        header(sprintf('Content-Length: %d', $end - $start));

        $ppub->stream_asset($asset, $start, $end);
    
    }
    else {
        echo($ppub->read_asset($asset));
    }

}

?>