diff options
author | Jeffrey Armstrong <jeff@approximatrix.com> | 2021-03-27 18:12:44 -0400 |
---|---|---|
committer | Jeffrey Armstrong <jeff@approximatrix.com> | 2021-03-27 18:12:44 -0400 |
commit | c7bf38f440c3e1cafd2ddb35d4505e936d4e3e86 (patch) | |
tree | fadb6178fb5be6316c6e71774d3fb6f7f425bf70 /captain/external.f90 | |
parent | fd9077056f7f33c60b218636ead0644d42e75a09 (diff) | |
download | levitating-c7bf38f440c3e1cafd2ddb35d4505e936d4e3e86.tar.gz levitating-c7bf38f440c3e1cafd2ddb35d4505e936d4e3e86.zip |
Starting work towards processing external gemini requests.
Diffstat (limited to 'captain/external.f90')
-rw-r--r-- | captain/external.f90 | 29 |
1 files changed, 28 insertions, 1 deletions
diff --git a/captain/external.f90 b/captain/external.f90 index 56a7317..d33e13d 100644 --- a/captain/external.f90 +++ b/captain/external.f90 @@ -5,12 +5,39 @@ implicit none contains subroutine external_request_gemini(request) + use page_template implicit none character(*), intent(in)::request + + 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 - + + else if(trim(request) == "/releases.gmi") then + + + + else if(trim(request) == "/jobs.gmi") then + + + + else if(trim(request) == "/players.gmi") then + + + + else if(trim(request) == "/about.gmi") then + + + end if + end subroutine external_request_gemini end module external_handling
\ No newline at end of file |