personal/werc-1.5.0-tweaks
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

tweak: move variable definitions before headers

Browse Source 
so that headers can have access to the relative request
path
This commit is contained in:
Nuno Sempere 2022-11-05 18:45:20 +00:00
parent 35eda0ff53
commit 02a3930d9d
1 changed files with 7 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
bin/werc.rc
View File

@ -40,6 +40,12 @@ fn werc_exec_request {
# could be useful for debugging, but # could be useful for debugging, but
# otherwise not worth it # otherwise not worth it
sitedir=$sitesdir/$site sitedir=$sitesdir/$site
req_path=`{echo -n $REQUEST_URI | sed 's/\?.*//; s!//+!/!g; s/%5[Ff]/_/g; s/'^$forbidden_uri_chars^'//g; s/\.\.*/./g; 1q'}
req_url=$base_url^$req_path
local_path=$sitedir$req_path
local_file=''
ifs='/' { args=`{echo -n $req_path} }
headers=`{get_lib_file headers.tpl} headers=`{get_lib_file headers.tpl}
master_template=`{get_lib_file default_master.tpl} master_template=`{get_lib_file default_master.tpl}
current_date_time=`{date} current_date_time=`{date}
@ -47,11 +53,6 @@ fn werc_exec_request {
# Note: $REQUEST_URI is not officially in CGI 1.1, but seems to be de-facto # Note: $REQUEST_URI is not officially in CGI 1.1, but seems to be de-facto
# Note: We only urldecode %5F->'_' because some sites (stackoverflow.com?) urlencode it in their links, # Note: We only urldecode %5F->'_' because some sites (stackoverflow.com?) urlencode it in their links,
# perhaps we should completel urldecode the whole url. # perhaps we should completel urldecode the whole url.
req_path=`{echo -n $REQUEST_URI | sed 's/\?.*//; s!//+!/!g; s/%5[Ff]/_/g; s/'^$forbidden_uri_chars^'//g; s/\.\.*/./g; 1q'}
req_url=$base_url^$req_path
local_path=$sitedir$req_path
local_file=''
ifs='/' { args=`{echo -n $req_path} }
# Preload post args for templates where cgi's stdin is not accessible # Preload post args for templates where cgi's stdin is not accessible
if(~ $REQUEST_METHOD POST) { if(~ $REQUEST_METHOD POST) {