first cut of andrew.config

code default {set r [Http NotFound $r]; <p> "[dict get $r -uri] Not Found"}

# The following nubs are redirects, they generate a redirect from the first to the second URL
/favico.ico {
    redirect /images/favico.ico	;# find the icon in /images
}

//mail.beldisplaytech.com/* {
    code {
        set r [Http Moved $r https://[dict get $r -host][dict get $r -path]]; dict get $r -content
    }
}

//beldisplaytech.com/* {
    code {
        set r [Http Moved $r [dict get $r -scheme]://www.[dict get $r -host][dict get $r -path]]; dict get $r -content
    }
}

//www.shadoura.com/* {
    code {
        set r [Http Moved $r [dict get $r -scheme]://shadoura.com[dict get $r -path]]; dict get $r -content
    }
}

//BELDISPLAYTECH.com/* {
    code {
        set r [Http Moved $r [dict get $r -scheme]://www.beldisplaytech.com[dict get $r -path]]; dict get $r -content
    }
}

//wms.shadoura.com/* {
    code {
        if {[string match 192.168.11.* [dict get? $r x-forwarded-for]] || [string match *bsuir.by* [dict get? $r via]]} {
            set w 192.168.11.29
        } else {
            set w [dict get $r -host]
        }
        set r [Http Moved $r "[dict get $r -scheme]://$w:8040[dict get $r -path]?ref=http://wms.shadoura.com/&[dict get? $r -query]"]
        dict get $r -content
    }
}

//go.latlon.org/tc/* {
    code {
        set r [Http Moved $r [dict get $r -scheme]://latlon.org/tc/]; dict get $r -content
    }
}

//go.latlon.org/tt/index.html {
    code {
        set r [Http Moved $r [dict get $r -scheme]://go.latlon.org/tt/index-beta.html]; dict get $r -content
    }
}

//go.latlon.org/ {
    domain {File latlon}
    root /home/www/latlon/public_html
    stream 1024
}

//go.latlon.org/logs/ {
    domain {Mason logs2}
    root /home/andrew/logs
    stream 1024
    sortparam {sortList [[2,1]]}
    dateformat %Y-%m-%d
}

#package require OSMAPI
#package require OAuth
#package require OSBTiny
//go.latlon.org/api/ {
    domain {OSMAPI ::osmapi}
    apiurl http://api.openstreetmap.org/api/
}

//go.latlon.org/wms/ {
    domain {OSMAPI ::wms}
    apiurl http://192.168.11.29:8040/
}

//go.latlon.org/xapi/ {
    domain {OSMAPI ::osmxapi}
    apiurl http://xapi.openstreetmap.org/api/
}

//go.latlon.org/bugs/ {
    domain {OSBTiny ::osb}
}

//www.osmbugs.org/* {
    code {
        set q ?[dict get? $r -query]
        if {$q eq "?"} {set q {}}
        set r [Http Moved $r [dict get $r -scheme]://osmbugs.org[dict get $r -path]$q]
        dict get $r -content
    }
}

//osmbugs.org/* {
    code {
        if {[dict get $r -path] eq "/robots.txt"} {
            dict set r content-type text/plain
            set r [Http Ok $r {User-agent: *
                Disallow: /go/}]
        } else {
            set q ?[dict get? $r -query]
            if {$q eq "?"} {set q {}}
            set r [Http Moved $r [dict get $r -scheme]://openstreetbugs.schokokeks.org[dict get $r -path]$q]
        }
        dict get $r -content
    }
}

//osmbugs.org/go/ {
    domain {OSBTiny ::osb2}
}

/oauth/ {
    domain {OAuth ::oa}
    providers {
        osm4namegen {
            requesturi http://www.openstreetmap.org/oauth/request_token 
            authorizeuri http://www.openstreetmap.org/oauth/authorize 
            accessuri http://www.openstreetmap.org/oauth/access_token 
            callback http://namegen.org/oauth/ 
            signmethod HMAC-SHA1 
            reqmethod POST 
            key <censored, sorry>
            secret <censored, sorry>
            authtype entity
        }
        google4namegen {
            requesturi https://www.google.com/accounts/OAuthGetRequestToken
            authorizeuri https://www.google.com/accounts/OAuthAuthorizeToken
            accessuri https://www.google.com/accounts/OAuthGetAccessToken
            key namegen.org 
            secret <censored, sorry>
        }
        osm {
            requesturi http://www.openstreetmap.org/oauth/request_token
            authorizeuri http://www.openstreetmap.org/oauth/authorize 
            accessuri http://www.openstreetmap.org/oauth/access_token 
            callback http://go.latlon.org/oauth/ 
            signmethod HMAC-SHA1 
            reqmethod POST 
            key <censored, sorry>
            secret <censored, sorry>
            authtype entity
        } 
        test {
            signmethod HMAC-SHA1 
            key <censored, sorry>
            secret <censored, sorry>
        }} lambda {
            dict set r set-cookie "token=[dict get? $result oauth_token]&secret=[dict get? $result oauth_token_secret]; domain=[dict get $r -host]; path=/"
            set r [Http Redirect $r $referer "token=[dict get? $result oauth_token], secret=[dict get? $result oauth_token_secret], <$r>"]
            puts <$r>
        }
}

//www.namegen.org/* {
    code{set r [Http Moved $r [dict get $r -scheme]://namegen.org[dict get $r -path]]; dict get $r -content}
}

//namegen.org/ {
    domain {Mason ::namegen}
    root /home/www/namegen/public_html
    stream 1024
}
//namegen.org/test/ {
    domain {Namegen namegen2}
}

//namegen.org/test2/ {
    domain {ExtLogin extlogin}
    providers {OpenStreetMap {oauth ::oa oauth_mount /oauth/ oauth_provider osm4namegen} LastFM {api_key <censored> secret <censored>}}
}

//cafemap.info/ {
    domain{File cafemap-static}
    root /home/www/cafemap/public_html
    stream 1024
}

//www.cafemap.info/* {
    code {
        set r [Http Moved $r [dict get $r -scheme]://cafemap.info[dict get $r -path]]; dict get $r -content
    }
}

//xn--cafmap-dva.info/* {
    code {
        set r [Http Moved $r [dict get $r -scheme]://cafemap.info[dict get $r -path]]; dict get $r -content
    }
}

//www.xn--cafmap-dva.info/* {
    code {
        set r [Http Moved $r [dict get $r -scheme]://cafemap.info[dict get $r -path]]; dict get $r -content
    }
}

//shadoura.com/ {
    domain {Mason sha}
    root /home/andrew/public_html
    stream 1024
    sortparam {sortList [[0,0]]}
    auth .auth
    wrapper .wrapper
}

#package require tiles

/tiles/ {
    domain Direct
    namespace tiles
    wildcard *
}

#package require bdt

//static.beldisplaytech.com/ {
    domain {File bdt}
    root /home/www/www.beldisplaytech.com/public_html/
    stream 1024
}

//statiq.beldisplaytech.com/ {
    domain {File bdtq}
    root /home/www/www.beldisplaytech.com/public_html/
    stream 1024
}

//www.beldisplaytech.com/ {
    domain Direct
    namespace bdt
    wildcard *
    ctype {text/html; charset=utf-8}
}

/ {
    domain {File varwww}
    root /var/www
    stream 1024
}

# The /jquery/ domain is handled by the jQ package
domain /jquery/ JQ

# Useful static content directories
# The following File domains, handled by the File package, are all named for their respective
# content.  So the /css/ domain is handled by an object constructed as [File create css ...] with
# constructor args as specified.
/icons/ {
    domain Icons
}

icorewrite {
    url {^/[^/]+[.](jpg|gif|png|ico)$}
    rewrite {/images/[file tail [dict get $r -path]]}
}