shithub: barf

ref: bd5bce727abff8a02a61685f6ee2a199f875557e
dir: /app.rc/

View raw version
fn conf_enable_barf{
	barf_base_uri=$conf_wd
	barf_root=`{pwd}
	conf_enable_app barf
}

fn barf_init{
	p=`{echo $req_path | sed 's!^'^$barf_base_uri^'!!'}
	barf_dir=`{basename -d $"p | sed 's!^\.$!!'}
	barf_items=`{cat $barf_root/_werc/barf/items}
	. ./apps/barf/lib/core
	. ./apps/barf/barf/config
	. $barf_root/_werc/barf/config
	. ./apps/barf/lib/$barf_type
	if(test -f $barf_root/_werc/barf/lib/$barf_type)
		. $barf_root/_werc/barf/lib/$barf_type
	if(~ $require_login 1 && ! ~ $req_path $barf_base_uri^login){
		check_user
		if(~ $#logged_user 0)
			post_redirect /login
	}
	if(~ $REQUEST_METHOD GET && ~ $REQUEST_URI *'='*){
		load_get_args
		parse_get_args
	}
	if(~ $REQUEST_METHOD POST)
		parse_post_args
	if(~ $a_func add_post){
		if(~ $allow_anon 1 || {check_user && ! ~ $#logged_user 0})
			add_post
			post_redirect /
	}
	if(~ $a_func edit_post delete_post dsrc){
		if(check_user && ! ~ $#logged_user 0){
			switch($a_func){
			case edit_post
				edit_post
			case delete_post
				delete_post
			case dsrc
				dsrc
			}
		}
	}
	get_start
	get_stop
	get_tags
	if(~ $req_path $barf_base_uri){
		extraHeaders=$"extraHeaders ^ \
'<link rel="alternate" type="application/rss+xml" title="RSS" href="'$base_url^$barf_base_uri'index.rss" />'
		handler_body_main=(tpl_handler `{barf_template barf})
	}
	if not if(~ $req_path $barf_base_uri^index.rss){
		obarf_type=$barf_type	# disgusting hack. fix!
		barf_type=rss
		. ./apps/barf/lib/rss
		barf_setup_feed_handlers barf.tpl 'text/xml; charset=utf-8'
	}
	if not if(~ $req_path $barf_base_uri^login){
		barf_type=login
		handler_body_main=(tpl_handler `{barf_template barf})
	}
}

fn barf_setup_feed_handlers{
	handler_body_main=NOT_USED_by_barf_feeds
	res_tail=()
	http_content_type=$2
	headers=()
	master_template=apps/barf/lib/$1
}

fn barf_template{
	if(test -f $barf_root/$"barf_dir/_werc/barf/lib/$1.tpl)
		echo -n $barf_root/$"barf_dir/_werc/barf/lib/$1.tpl
	if not if(test -f $barf_root/_werc/barf/lib/$1.tpl)
		echo -n $barf_root/_werc/barf/lib/$1.tpl
	if not
		get_lib_file barf/$1.tpl apps/barf/lib/$1.tpl
}