#include <httpd.h>
#include <http_config.h>
#include <http_request.h>
#include <http_log.h>
#include <mod_dav.h>
#include <ap_provider.h>
#include <apr_strings.h>
#include "svn_version.h"
#include "svn_fs.h"
#include "svn_utf.h"
#include "svn_dso.h"
#include "mod_dav_svn.h"
#include "dav_svn.h"
#include "mod_dav_svn.h"
#define SVN_DEFAULT_SPECIAL_URI "!svn"
typedef struct {
const char *special_uri;
} dav_svn_server_conf;
enum dav_svn_flag {
DAV_SVN_FLAG_DEFAULT,
DAV_SVN_FLAG_ON,
DAV_SVN_FLAG_OFF
};
typedef struct {
const char *fs_path;
const char *repo_name;
const char *xslt_uri;
const char *fs_parent_path;
enum dav_svn_flag autoversioning;
enum dav_svn_flag do_path_authz;
enum dav_svn_flag list_parentpath;
} dav_svn_dir_conf;
#define INHERIT_VALUE(parent, child, field) \
((child)->field ? (child)->field : (parent)->field)
extern module AP_MODULE_DECLARE_DATA dav_svn_module;
static int dav_svn_init(apr_pool_t *p, apr_pool_t *plog, apr_pool_t *ptemp,
server_rec *s)
{
svn_error_t *serr;
ap_add_version_component(p, "SVN/" SVN_VER_NUMBER);
serr = svn_fs_initialize(p);
if (serr)
{
ap_log_perror(APLOG_MARK, APLOG_ERR, serr->apr_err, p,
"dav_svn_init: error calling svn_fs_initialize: '%s'",
serr->message ? serr->message : "(no more info)");
return HTTP_INTERNAL_SERVER_ERROR;
}
svn_utf_initialize(p);
return OK;
}
static int
init_dso(apr_pool_t *pconf, apr_pool_t *plog, apr_pool_t *ptemp)
{
svn_dso_initialize();
return OK;
}
static void *dav_svn_create_server_config(apr_pool_t *p, server_rec *s)
{
return apr_pcalloc(p, sizeof(dav_svn_server_conf));
}
static void *dav_svn_merge_server_config(apr_pool_t *p,
void *base, void *overrides)
{
dav_svn_server_conf *parent = base;
dav_svn_server_conf *child = overrides;
dav_svn_server_conf *newconf;
newconf = apr_pcalloc(p, sizeof(*newconf));
newconf->special_uri = INHERIT_VALUE(parent, child, special_uri);
return newconf;
}
static void *dav_svn_create_dir_config(apr_pool_t *p, char *dir)
{
dav_svn_dir_conf *conf = apr_pcalloc(p, sizeof(*conf));
return conf;
}
static void *dav_svn_merge_dir_config(apr_pool_t *p,
void *base, void *overrides)
{
dav_svn_dir_conf *parent = base;
dav_svn_dir_conf *child = overrides;
dav_svn_dir_conf *newconf;
newconf = apr_pcalloc(p, sizeof(*newconf));
newconf->fs_path = INHERIT_VALUE(parent, child, fs_path);
newconf->repo_name = INHERIT_VALUE(parent, child, repo_name);
newconf->xslt_uri = INHERIT_VALUE(parent, child, xslt_uri);
newconf->fs_parent_path = INHERIT_VALUE(parent, child, fs_parent_path);
newconf->autoversioning = INHERIT_VALUE(parent, child, autoversioning);
newconf->do_path_authz = INHERIT_VALUE(parent, child, do_path_authz);
newconf->list_parentpath = INHERIT_VALUE(parent, child, list_parentpath);
return newconf;
}
static const char *dav_svn_repo_name(cmd_parms *cmd, void *config,
const char *arg1)
{
dav_svn_dir_conf *conf = config;
conf->repo_name = apr_pstrdup(cmd->pool, arg1);
return NULL;
}
static const char *dav_svn_xslt_uri(cmd_parms *cmd, void *config,
const char *arg1)
{
dav_svn_dir_conf *conf = config;
conf->xslt_uri = apr_pstrdup(cmd->pool, arg1);
return NULL;
}
static const char *dav_svn_autoversioning_cmd(cmd_parms *cmd, void *config,
int arg)
{
dav_svn_dir_conf *conf = config;
if (arg)
conf->autoversioning = DAV_SVN_FLAG_ON;
else
conf->autoversioning = DAV_SVN_FLAG_OFF;
return NULL;
}
static const char *dav_svn_pathauthz_cmd(cmd_parms *cmd, void *config,
int arg)
{
dav_svn_dir_conf *conf = config;
if (arg)
conf->do_path_authz = DAV_SVN_FLAG_ON;
else
conf->do_path_authz = DAV_SVN_FLAG_OFF;
return NULL;
}
static const char *dav_svn_list_parentpath_cmd(cmd_parms *cmd, void *config,
int arg)
{
dav_svn_dir_conf *conf = config;
if (arg)
conf->list_parentpath = DAV_SVN_FLAG_ON;
else
conf->list_parentpath = DAV_SVN_FLAG_OFF;
return NULL;
}
static const char *dav_svn_path_cmd(cmd_parms *cmd, void *config,
const char *arg1)
{
dav_svn_dir_conf *conf = config;
if (conf->fs_parent_path != NULL)
return "SVNPath cannot be defined at same time as SVNParentPath.";
conf->fs_path
= svn_path_canonicalize(apr_pstrdup(cmd->pool, arg1), cmd->pool);
return NULL;
}
static const char *dav_svn_parent_path_cmd(cmd_parms *cmd, void *config,
const char *arg1)
{
dav_svn_dir_conf *conf = config;
if (conf->fs_path != NULL)
return "SVNParentPath cannot be defined at same time as SVNPath.";
conf->fs_parent_path
= svn_path_canonicalize(apr_pstrdup(cmd->pool, arg1), cmd->pool);
return NULL;
}
static const char *dav_svn_special_uri_cmd(cmd_parms *cmd, void *config,
const char *arg1)
{
dav_svn_server_conf *conf;
char *uri;
apr_size_t len;
uri = apr_pstrdup(cmd->pool, arg1);
ap_getparents(uri);
ap_no2slash(uri);
if (*uri == '/')
++uri;
len = strlen(uri);
if (len > 0 && uri[len - 1] == '/')
uri[--len] = '\0';
if (len == 0)
return "The special URI path must have at least one component.";
conf = ap_get_module_config(cmd->server->module_config,
&dav_svn_module);
conf->special_uri = uri;
return NULL;
}
const char *dav_svn_get_fs_path(request_rec *r)
{
dav_svn_dir_conf *conf;
conf = ap_get_module_config(r->per_dir_config, &dav_svn_module);
return conf->fs_path;
}
const char *dav_svn_get_fs_parent_path(request_rec *r)
{
dav_svn_dir_conf *conf;
conf = ap_get_module_config(r->per_dir_config, &dav_svn_module);
return conf->fs_parent_path;
}
AP_MODULE_DECLARE(dav_error *) dav_svn_get_repos_path(request_rec *r,
const char *root_path,
const char **repos_path)
{
const char *fs_path;
const char *fs_parent_path;
const char *repos_name;
const char *ignored_path_in_repos;
const char *ignored_cleaned_uri;
const char *ignored_relative;
int ignored_had_slash;
dav_error *derr;
fs_path = dav_svn_get_fs_path(r);
if (fs_path != NULL)
{
*repos_path = fs_path;
return NULL;
}
fs_parent_path = dav_svn_get_fs_parent_path(r);
derr = dav_svn_split_uri(r, r->uri, root_path,
&ignored_cleaned_uri, &ignored_had_slash,
&repos_name,
&ignored_relative, &ignored_path_in_repos);
if (derr)
return derr;
*repos_path = svn_path_join(fs_parent_path, repos_name, r->pool);
return NULL;
}
const char *dav_svn_get_repo_name(request_rec *r)
{
dav_svn_dir_conf *conf;
conf = ap_get_module_config(r->per_dir_config, &dav_svn_module);
return conf->repo_name;
}
const char *dav_svn_get_xslt_uri(request_rec *r)
{
dav_svn_dir_conf *conf;
conf = ap_get_module_config(r->per_dir_config, &dav_svn_module);
return conf->xslt_uri;
}
const char *dav_svn_get_special_uri(request_rec *r)
{
dav_svn_server_conf *conf;
conf = ap_get_module_config(r->server->module_config,
&dav_svn_module);
return conf->special_uri ? conf->special_uri : SVN_DEFAULT_SPECIAL_URI;
}
svn_boolean_t dav_svn_get_autoversioning_flag(request_rec *r)
{
dav_svn_dir_conf *conf;
conf = ap_get_module_config(r->per_dir_config, &dav_svn_module);
return conf->autoversioning == DAV_SVN_FLAG_ON;
}
svn_boolean_t dav_svn_get_pathauthz_flag(request_rec *r)
{
dav_svn_dir_conf *conf;
conf = ap_get_module_config(r->per_dir_config, &dav_svn_module);
return conf->do_path_authz != DAV_SVN_FLAG_OFF;
}
svn_boolean_t dav_svn_get_list_parentpath_flag(request_rec *r)
{
dav_svn_dir_conf *conf;
conf = ap_get_module_config(r->per_dir_config, &dav_svn_module);
return conf->list_parentpath == DAV_SVN_FLAG_ON;
}
static void merge_xml_filter_insert(request_rec *r)
{
if ((r->method_number == M_MERGE)
|| (r->method_number == M_DELETE)) {
dav_svn_dir_conf *conf;
conf = ap_get_module_config(r->per_dir_config, &dav_svn_module);
if (conf->fs_path || conf->fs_parent_path) {
ap_add_input_filter("SVN-MERGE", NULL, r, r->connection);
}
}
}
typedef struct {
apr_bucket_brigade *bb;
apr_xml_parser *parser;
apr_pool_t *pool;
} merge_ctx_t;
static apr_status_t merge_xml_in_filter(ap_filter_t *f,
apr_bucket_brigade *bb,
ap_input_mode_t mode,
apr_read_type_e block,
apr_off_t readbytes)
{
apr_status_t rv;
request_rec *r = f->r;
merge_ctx_t *ctx = f->ctx;
apr_bucket *bucket;
int seen_eos = 0;
if ((r->method_number != M_MERGE)
&& (r->method_number != M_DELETE)) {
ap_remove_input_filter(f);
return ap_get_brigade(f->next, bb, mode, block, readbytes);
}
if (!ctx) {
f->ctx = ctx = apr_palloc(r->pool, sizeof(*ctx));
ctx->parser = apr_xml_parser_create(r->pool);
ctx->bb = apr_brigade_create(r->pool, r->connection->bucket_alloc);
apr_pool_create(&ctx->pool, r->pool);
}
rv = ap_get_brigade(f->next, ctx->bb, mode, block, readbytes);
if (rv != APR_SUCCESS) {
return rv;
}
for (bucket = APR_BRIGADE_FIRST(ctx->bb);
bucket != APR_BRIGADE_SENTINEL(ctx->bb);
bucket = APR_BUCKET_NEXT(bucket))
{
const char *data;
apr_size_t len;
if (APR_BUCKET_IS_EOS(bucket)) {
seen_eos = 1;
break;
}
if (APR_BUCKET_IS_METADATA(bucket)) {
continue;
}
rv = apr_bucket_read(bucket, &data, &len, APR_BLOCK_READ);
if (rv != APR_SUCCESS) {
return rv;
}
rv = apr_xml_parser_feed(ctx->parser, data, len);
if (rv != APR_SUCCESS) {
(void) apr_xml_parser_done(ctx->parser, NULL);
break;
}
}
APR_BRIGADE_CONCAT(bb, ctx->bb);
if (seen_eos) {
apr_xml_doc *pdoc;
ap_remove_input_filter(f);
rv = apr_xml_parser_done(ctx->parser, &pdoc);
if (rv == APR_SUCCESS) {
#if APR_CHARSET_EBCDIC
apr_xml_parser_convert_doc(r->pool, pdoc, ap_hdrs_from_ascii);
#endif
rv = apr_pool_userdata_set(pdoc, "svn-request-body",
NULL, r->pool);
if (rv != APR_SUCCESS) {
return rv;
}
}
}
return APR_SUCCESS;
}
static const command_rec dav_svn_cmds[] =
{
AP_INIT_TAKE1("SVNPath", dav_svn_path_cmd, NULL, ACCESS_CONF,
"specifies the location in the filesystem for a Subversion "
"repository's files."),
AP_INIT_TAKE1("SVNSpecialURI", dav_svn_special_uri_cmd, NULL, RSRC_CONF,
"specify the URI component for special Subversion "
"resources"),
AP_INIT_TAKE1("SVNReposName", dav_svn_repo_name, NULL, ACCESS_CONF,
"specify the name of a Subversion repository"),
AP_INIT_TAKE1("SVNIndexXSLT", dav_svn_xslt_uri, NULL, ACCESS_CONF,
"specify the URI of an XSL transformation for "
"directory indexes"),
AP_INIT_TAKE1("SVNParentPath", dav_svn_parent_path_cmd, NULL, ACCESS_CONF,
"specifies the location in the filesystem whose "
"subdirectories are assumed to be Subversion repositories."),
AP_INIT_FLAG("SVNAutoversioning", dav_svn_autoversioning_cmd, NULL,
ACCESS_CONF|RSRC_CONF, "turn on deltaV autoversioning."),
AP_INIT_FLAG("SVNPathAuthz", dav_svn_pathauthz_cmd, NULL,
ACCESS_CONF|RSRC_CONF,
"control path-based authz by enabling/disabling subrequests"),
AP_INIT_FLAG("SVNListParentPath", dav_svn_list_parentpath_cmd, NULL,
ACCESS_CONF|RSRC_CONF, "allow GET of SVNParentPath."),
{ NULL }
};
static dav_provider dav_svn_provider =
{
&dav_svn_hooks_repos,
&dav_svn_hooks_propdb,
&dav_svn_hooks_locks,
&dav_svn_hooks_vsn,
NULL,
NULL
};
static void register_hooks(apr_pool_t *pconf)
{
ap_hook_pre_config(init_dso, NULL, NULL, APR_HOOK_REALLY_FIRST);
ap_hook_post_config(dav_svn_init, NULL, NULL, APR_HOOK_MIDDLE);
dav_register_provider(pconf, "svn", &dav_svn_provider);
ap_register_input_filter("SVN-MERGE", merge_xml_in_filter, NULL,
AP_FTYPE_RESOURCE);
ap_hook_insert_filter(merge_xml_filter_insert, NULL, NULL,
APR_HOOK_MIDDLE);
dav_hook_gather_propsets(dav_svn_gather_propsets, NULL, NULL,
APR_HOOK_MIDDLE);
dav_hook_find_liveprop(dav_svn_find_liveprop, NULL, NULL, APR_HOOK_MIDDLE);
dav_hook_insert_all_liveprops(dav_svn_insert_all_liveprops, NULL, NULL,
APR_HOOK_MIDDLE);
dav_svn_register_uris(pconf);
}
module AP_MODULE_DECLARE_DATA dav_svn_module =
{
STANDARD20_MODULE_STUFF,
dav_svn_create_dir_config,
dav_svn_merge_dir_config,
dav_svn_create_server_config,
dav_svn_merge_server_config,
dav_svn_cmds,
register_hooks,
};