#include "svn_client.h"
#include "svn_error.h"
#include "svn_path.h"
#include "svn_pools.h"
#include "svn_cmdline.h"
#include "svn_xml.h"
#include "svn_time.h"
#include "cl.h"
#include "svn_private_config.h"
typedef struct
{
svn_cl__opt_state_t *opt_state;
svn_stream_t *out;
svn_stringbuf_t *sbuf;
} blame_baton_t;
static svn_error_t *
blame_receiver_xml(void *baton,
apr_int64_t line_no,
svn_revnum_t revision,
const char *author,
const char *date,
const char *line,
apr_pool_t *pool)
{
svn_stringbuf_t *sb = ((blame_baton_t *) baton)->sbuf;
svn_xml_make_open_tag(&sb, pool, svn_xml_normal, "entry",
"line-number",
apr_psprintf(pool, "%" APR_INT64_T_FMT,
line_no + 1),
NULL);
if (SVN_IS_VALID_REVNUM(revision))
{
svn_xml_make_open_tag(&sb, pool, svn_xml_normal, "commit",
"revision",
apr_psprintf(pool, "%ld", revision), NULL);
svn_cl__xml_tagged_cdata(&sb, pool, "author", author);
svn_cl__xml_tagged_cdata(&sb, pool, "date", date);
svn_xml_make_close_tag(&sb, pool, "commit");
}
svn_xml_make_close_tag(&sb, pool, "entry");
SVN_ERR(svn_cl__error_checked_fputs(sb->data, stdout));
svn_stringbuf_setempty(sb);
return SVN_NO_ERROR;
}
static svn_error_t *
blame_receiver(void *baton,
apr_int64_t line_no,
svn_revnum_t revision,
const char *author,
const char *date,
const char *line,
apr_pool_t *pool)
{
svn_cl__opt_state_t *opt_state =
((blame_baton_t *) baton)->opt_state;
svn_stream_t *out = ((blame_baton_t *)baton)->out;
apr_time_t atime;
const char *time_utf8;
const char *time_stdout;
const char *rev_str = SVN_IS_VALID_REVNUM(revision)
? apr_psprintf(pool, "%6ld", revision)
: " -";
if (opt_state->verbose)
{
if (date)
{
SVN_ERR(svn_time_from_cstring(&atime, date, pool));
time_utf8 = svn_time_to_human_cstring(atime, pool);
SVN_ERR(svn_cmdline_cstring_from_utf8(&time_stdout, time_utf8,
pool));
} else
time_stdout = " -";
return svn_stream_printf(out, pool, "%s %10s %s %s%s", rev_str,
author ? author : " -",
time_stdout , line, APR_EOL_STR);
}
else
{
return svn_stream_printf(out, pool, "%s %10s %s%s", rev_str,
author ? author : " -",
line, APR_EOL_STR);
}
}
static svn_error_t *
print_header_xml(apr_pool_t *pool)
{
svn_stringbuf_t *sb = svn_stringbuf_create("", pool);
svn_xml_make_header(&sb, pool);
svn_xml_make_open_tag(&sb, pool, svn_xml_normal, "blame", NULL);
return svn_cl__error_checked_fputs(sb->data, stdout);
}
static svn_error_t *
print_footer_xml(apr_pool_t *pool)
{
svn_stringbuf_t *sb = svn_stringbuf_create("", pool);
svn_xml_make_close_tag(&sb, pool, "blame");
return svn_cl__error_checked_fputs(sb->data, stdout);
}
svn_error_t *
svn_cl__blame(apr_getopt_t *os,
void *baton,
apr_pool_t *pool)
{
svn_cl__opt_state_t *opt_state = ((svn_cl__cmd_baton_t *) baton)->opt_state;
svn_client_ctx_t *ctx = ((svn_cl__cmd_baton_t *) baton)->ctx;
apr_pool_t *subpool;
apr_array_header_t *targets;
blame_baton_t bl;
int i;
svn_boolean_t end_revision_unspecified = FALSE;
svn_diff_file_options_t *diff_options = svn_diff_file_options_create(pool);
SVN_ERR(svn_opt_args_to_target_array2(&targets, os,
opt_state->targets, pool));
if (! targets->nelts)
return svn_error_create(SVN_ERR_CL_INSUFFICIENT_ARGS, 0, NULL);
if (opt_state->end_revision.kind == svn_opt_revision_unspecified)
{
if (opt_state->start_revision.kind != svn_opt_revision_unspecified)
{
opt_state->end_revision = opt_state->start_revision;
opt_state->start_revision.kind = svn_opt_revision_number;
opt_state->start_revision.value.number = 1;
}
else
end_revision_unspecified = TRUE;
}
if (opt_state->start_revision.kind == svn_opt_revision_unspecified)
{
opt_state->start_revision.kind = svn_opt_revision_number;
opt_state->start_revision.value.number = 1;
}
if (! opt_state->xml)
SVN_ERR(svn_stream_for_stdout(&bl.out, pool));
else
bl.sbuf = svn_stringbuf_create("", pool);
bl.opt_state = opt_state;
subpool = svn_pool_create(pool);
if (opt_state->extensions)
{
apr_array_header_t *opts;
opts = svn_cstring_split(opt_state->extensions, " \t\n\r", TRUE, pool);
SVN_ERR(svn_diff_file_options_parse(diff_options, opts, pool));
}
if (opt_state->xml)
{
if (opt_state->verbose)
return svn_error_create(SVN_ERR_CL_ARG_PARSING_ERROR, NULL,
_("'verbose' option invalid in XML mode"));
if (! opt_state->incremental)
SVN_ERR(print_header_xml(pool));
}
else
{
if (opt_state->incremental)
return svn_error_create(SVN_ERR_CL_ARG_PARSING_ERROR, NULL,
_("'incremental' option only valid in XML "
"mode"));
}
for (i = 0; i < targets->nelts; i++)
{
svn_error_t *err;
const char *target = ((const char **) (targets->elts))[i];
const char *truepath;
svn_opt_revision_t peg_revision;
svn_pool_clear(subpool);
SVN_ERR(svn_cl__check_cancel(ctx->cancel_baton));
SVN_ERR(svn_opt_parse_path(&peg_revision, &truepath, target,
subpool));
if (end_revision_unspecified)
{
if (peg_revision.kind != svn_opt_revision_unspecified)
opt_state->end_revision = peg_revision;
else if (svn_path_is_url(target))
opt_state->end_revision.kind = svn_opt_revision_head;
else
opt_state->end_revision.kind = svn_opt_revision_base;
}
if (opt_state->xml)
{
const char *outpath = truepath;
if (! svn_path_is_url(target))
outpath = svn_path_local_style(truepath, subpool);
svn_xml_make_open_tag(&bl.sbuf, pool, svn_xml_normal, "target",
"path", outpath, NULL);
err = svn_client_blame3(truepath,
&peg_revision,
&opt_state->start_revision,
&opt_state->end_revision,
diff_options,
opt_state->force,
blame_receiver_xml,
&bl,
ctx,
subpool);
}
else
err = svn_client_blame3(truepath,
&peg_revision,
&opt_state->start_revision,
&opt_state->end_revision,
diff_options,
opt_state->force,
blame_receiver,
&bl,
ctx,
subpool);
if (err)
{
if (err->apr_err == SVN_ERR_CLIENT_IS_BINARY_FILE)
{
svn_error_clear(err);
SVN_ERR(svn_cmdline_fprintf(stderr, subpool,
_("Skipping binary file: '%s'\n"),
target));
}
else
{
return err;
}
}
else if (opt_state->xml)
{
svn_xml_make_close_tag(&(bl.sbuf), pool, "target");
SVN_ERR(svn_cl__error_checked_fputs(bl.sbuf->data, stdout));
}
if (opt_state->xml)
svn_stringbuf_setempty(bl.sbuf);
}
svn_pool_destroy(subpool);
if (opt_state->xml && ! opt_state->incremental)
SVN_ERR(print_footer_xml(pool));
return SVN_NO_ERROR;
}