const char *
svn_log__get_mergeinfo(const apr_array_header_t *paths,
svn_mergeinfo_inheritance_t inherit,
svn_boolean_t include_descendants,
apr_pool_t *pool)
{
int i;
apr_pool_t *iterpool = svn_pool_create(pool);
svn_stringbuf_t *space_separated_paths = svn_stringbuf_create_empty(pool);
for (i = 0; i < paths->nelts; i++)
{
const char *path = APR_ARRAY_IDX(paths, i, const char *);
svn_pool_clear(iterpool);
if (i != 0)
svn_stringbuf_appendcstr(space_separated_paths, " ");
svn_stringbuf_appendcstr(space_separated_paths,
svn_path_uri_encode(path, iterpool));
}
svn_pool_destroy(iterpool);
return apr_psprintf(pool, "get-mergeinfo (%s) %s%s",
space_separated_paths->data,
svn_inheritance_to_word(inherit),
include_descendants ? " include-descendants" : "");
}
/* Implements svn_ra_serf__request_body_delegate_t */
static svn_error_t *
create_mergeinfo_body(serf_bucket_t **bkt,
void *baton,
serf_bucket_alloc_t *alloc,
apr_pool_t *pool /* request pool */,
apr_pool_t *scratch_pool)
{
mergeinfo_context_t *mergeinfo_ctx = baton;
serf_bucket_t *body_bkt;
body_bkt = serf_bucket_aggregate_create(alloc);
svn_ra_serf__add_open_tag_buckets(body_bkt, alloc,
"S:" SVN_DAV__MERGEINFO_REPORT,
"xmlns:S", SVN_XML_NAMESPACE,
SVN_VA_NULL);
svn_ra_serf__add_tag_buckets(body_bkt,
"S:" SVN_DAV__REVISION,
apr_ltoa(pool, mergeinfo_ctx->revision),
alloc);
svn_ra_serf__add_tag_buckets(body_bkt, "S:" SVN_DAV__INHERIT,
svn_inheritance_to_word(mergeinfo_ctx->inherit),
alloc);
if (mergeinfo_ctx->include_descendants)
{
svn_ra_serf__add_tag_buckets(body_bkt, "S:"
SVN_DAV__INCLUDE_DESCENDANTS,
"yes", alloc);
}
if (mergeinfo_ctx->paths)
{
int i;
for (i = 0; i < mergeinfo_ctx->paths->nelts; i++)
{
const char *this_path = APR_ARRAY_IDX(mergeinfo_ctx->paths,
i, const char *);
svn_ra_serf__add_tag_buckets(body_bkt, "S:" SVN_DAV__PATH,
this_path, alloc);
}
}
/* Request a mergeinfo-report from the URL attached to SESSION,
and fill in the CATALOG with the results. */
svn_error_t *
svn_ra_neon__get_mergeinfo(svn_ra_session_t *session,
svn_mergeinfo_catalog_t *catalog,
const apr_array_header_t *paths,
svn_revnum_t revision,
svn_mergeinfo_inheritance_t inherit,
svn_boolean_t include_descendants,
apr_pool_t *pool)
{
svn_ra_neon__session_t *ras = session->priv;
svn_stringbuf_t *request_body = svn_stringbuf_create("", pool);
struct mergeinfo_baton mb;
const char *bc_url;
const char *bc_relative;
const char *final_bc_url;
static const char minfo_report_head[] =
"<S:" SVN_DAV__MERGEINFO_REPORT " xmlns:S=\"" SVN_XML_NAMESPACE "\">"
DEBUG_CR;
static const char minfo_report_tail[] =
"</S:" SVN_DAV__MERGEINFO_REPORT ">" DEBUG_CR;
*catalog = NULL;
/* Construct the request body. */
svn_stringbuf_appendcstr(request_body, minfo_report_head);
svn_stringbuf_appendcstr(request_body,
apr_psprintf(pool,
"<S:revision>%ld"
"</S:revision>", revision));
svn_stringbuf_appendcstr(request_body,
apr_psprintf(pool,
"<S:inherit>%s"
"</S:inherit>",
svn_inheritance_to_word(inherit)));
if (include_descendants)
{
/* Send it only if true; server will default to "no". */
svn_stringbuf_appendcstr(request_body,
"<S:include-descendants>yes"
"</S:include-descendants>");
}
if (paths)
{
int i;
for (i = 0; i < paths->nelts; i++)
{
const char *this_path =
apr_xml_quote_string(pool,
((const char **)paths->elts)[i],
0);
svn_stringbuf_appendcstr(request_body, "<S:path>");
svn_stringbuf_appendcstr(request_body, this_path);
svn_stringbuf_appendcstr(request_body, "</S:path>");
}
}
svn_stringbuf_appendcstr(request_body, minfo_report_tail);
mb.pool = pool;
mb.curr_path = svn_stringbuf_create("", pool);
mb.curr_info = svn_stringbuf_create("", pool);
mb.catalog = apr_hash_make(pool);
mb.err = SVN_NO_ERROR;
/* ras's URL may not exist in HEAD, and thus it's not safe to send
it as the main argument to the REPORT request; it might cause
dav_get_resource() to choke on the server. So instead, we pass a
baseline-collection URL, which we get from END. */
SVN_ERR(svn_ra_neon__get_baseline_info(&bc_url, &bc_relative, NULL, ras,
ras->url->data, revision, pool));
final_bc_url = svn_path_url_add_component2(bc_url, bc_relative, pool);
SVN_ERR(svn_ra_neon__parsed_request(ras,
"REPORT",
final_bc_url,
request_body->data,
NULL, NULL,
start_element,
cdata_handler,
end_element,
&mb,
NULL,
NULL,
FALSE,
pool));
if (mb.err == SVN_NO_ERROR && apr_hash_count(mb.catalog))
*catalog = mb.catalog;
return mb.err;
}
