index.tcl

Accept XML-RPC POST requests and processes them. GET requests are shown links to the admin pages or docs.

Location:
/packages/xml-rpc/www/index.tcl
Author:
Vinod Kurup [vinod@kurup.com]
Created:
Mon Sep 29 23:35:14 2003
CVS ID:
$Id: index.tcl,v 1.3 2018/02/16 13:23:18 gernst Exp $

Related Files

[ hide source ] | [ make this the default ]

File Contents

# /packages/xml-rpc/www/index.tcl
ad_page_contract {
    Accept XML-RPC POST requests and processes them. GET requests are shown
    links to the admin pages or docs.

    @author Vinod Kurup [vinod@kurup.com]
    @creation-date Mon Sep 29 23:35:14 2003
    @cvs-id $Id: index.tcl,v 1.3 2018/02/16 13:23:18 gernst Exp $
} {
}

if {[ns_conn method] eq "POST"} {
    set content [xmlrpc::get_content]
    ns_return 200 text/xml [xmlrpc::invoke $content]
    ad_script_abort
}

# GET requests fall through to index.adp