module external_handling
implicit none


contains

    function external_request_gemini(request) result(renderunit)
    use page_template
    implicit none
    
        character(*), intent(in)::request
        integer::renderunit
        character(1024)::template_file
        type(template)::page
    
        ! Open the base template
        call template_filepath("index.gmi", template_file)
        call page%init(template_file)
    
        if(trim(request) == "/" .or. trim(request) == "/index.gmi") then
        
            call page%assign('title', 'Home')
            
        else if(trim(request) == "/releases.gmi") then
        
            call page%assign('title', 'Releases')
        
        else if(trim(request) == "/jobs.gmi") then
        
            call page%assign('title', 'Jobs')
        
        else if(trim(request) == "/players.gmi") then
        
            call page%assign('title', 'Players')
        
        else if(trim(request) == "/about.gmi") then
        
            call page%assign('title', 'About')
            
        else
        
            call page%assign('title', 'Not Found')
   
        end if
        
        open(newunit=renderunit, form="formatted", status="scratch", access='stream')
        
        call page%render(renderunit)
   
    end function external_request_gemini

end module external_handling