/* * cat.c: implementation of the 'cat' command * * ==================================================================== * Copyright (c) 2000-2004 CollabNet. All rights reserved. * * This software is licensed as described in the file COPYING, which * you should have received as part of this distribution. The terms * are also available at http://subversion.tigris.org/license-1.html. * If newer versions of this license are posted there, you may use a * newer version instead, at your option. * * This software consists of voluntary contributions made by many * individuals. For exact contribution history, see the revision * history and logs, available at http://subversion.tigris.org/. * ==================================================================== */ /* ==================================================================== */ /*** Includes. ***/ #include #include "svn_client.h" #include "svn_string.h" #include "svn_error.h" #include "svn_subst.h" #include "svn_io.h" #include "svn_time.h" #include "svn_path.h" #include "svn_props.h" #include "client.h" #include "svn_private_config.h" /*** Code. ***/ /* Helper function to handle copying a potentially translated version of local file PATH to OUTPUT. REVISION must be one of the following: BASE, COMMITTED, WORKING, or UNSPECIFIED. If the revision is UNSPECIFIED, it will default to BASE. Uses POOL for temporary allocations. */ static svn_error_t * cat_local_file(const char *path, svn_stream_t *output, svn_wc_adm_access_t *adm_access, const svn_opt_revision_t *revision, apr_pool_t *pool) { const svn_wc_entry_t *entry; apr_hash_t *kw = NULL; svn_subst_eol_style_t style; apr_hash_t *props; const char *base; svn_string_t *eol_style, *keywords, *special; const char *eol = NULL; svn_boolean_t local_mod = FALSE; apr_time_t tm; apr_file_t *input_file; svn_stream_t *input; assert(revision->kind == svn_opt_revision_working || revision->kind == svn_opt_revision_base || revision->kind == svn_opt_revision_committed || revision->kind == svn_opt_revision_unspecified); SVN_ERR(svn_wc_entry(&entry, path, adm_access, FALSE, pool)); if (! entry) return svn_error_createf(SVN_ERR_UNVERSIONED_RESOURCE, NULL, _("'%s' is not under version control " "or doesn't exist"), svn_path_local_style(path, pool)); if (entry->kind != svn_node_file) return svn_error_createf(SVN_ERR_CLIENT_IS_DIRECTORY, NULL, _("'%s' refers to a directory"), svn_path_local_style(path, pool)); if (revision->kind != svn_opt_revision_working) { SVN_ERR(svn_wc_get_pristine_copy_path(path, &base, pool)); SVN_ERR(svn_wc_get_prop_diffs(NULL, &props, path, adm_access, pool)); } else { svn_wc_status2_t *status; base = path; SVN_ERR(svn_wc_prop_list(&props, path, adm_access, pool)); SVN_ERR(svn_wc_status2(&status, path, adm_access, pool)); if (status->text_status != svn_wc_status_normal) local_mod = TRUE; } eol_style = apr_hash_get(props, SVN_PROP_EOL_STYLE, APR_HASH_KEY_STRING); keywords = apr_hash_get(props, SVN_PROP_KEYWORDS, APR_HASH_KEY_STRING); special = apr_hash_get(props, SVN_PROP_SPECIAL, APR_HASH_KEY_STRING); if (eol_style) svn_subst_eol_style_from_value(&style, &eol, eol_style->data); if (local_mod && (! special)) { /* Use the modified time from the working copy if the file */ SVN_ERR(svn_io_file_affected_time(&tm, path, pool)); } else { tm = entry->cmt_date; } if (keywords) { const char *fmt; const char *author; if (local_mod) { /* For locally modified files, we'll append an 'M' to the revision number, and set the author to "(local)" since we can't always determine the current user's username */ fmt = "%ldM"; author = _("(local)"); } else { fmt = "%ld"; author = entry->cmt_author; } SVN_ERR(svn_subst_build_keywords2 (&kw, keywords->data, apr_psprintf(pool, fmt, entry->cmt_rev), entry->url, tm, author, pool)); } SVN_ERR(svn_io_file_open(&input_file, base, APR_READ, APR_OS_DEFAULT, pool)); input = svn_stream_from_aprfile2(input_file, FALSE, pool); if ( eol || kw ) SVN_ERR(svn_subst_translate_stream3(input, output, eol, FALSE, kw, TRUE, pool)); else SVN_ERR(svn_stream_copy(input, output, pool)); SVN_ERR(svn_stream_close(input)); return SVN_NO_ERROR; } svn_error_t * svn_client_cat2(svn_stream_t *out, const char *path_or_url, const svn_opt_revision_t *peg_revision, const svn_opt_revision_t *revision, svn_client_ctx_t *ctx, apr_pool_t *pool) { svn_ra_session_t *ra_session; svn_revnum_t rev; svn_node_kind_t url_kind; svn_string_t *eol_style; svn_string_t *keywords; apr_hash_t *props; const char *url; svn_stream_t *output = out; if (! svn_path_is_url(path_or_url) && (peg_revision->kind == svn_opt_revision_base || peg_revision->kind == svn_opt_revision_working || peg_revision->kind == svn_opt_revision_committed || peg_revision->kind == svn_opt_revision_unspecified) && (revision->kind == svn_opt_revision_base || revision->kind == svn_opt_revision_working || revision->kind == svn_opt_revision_committed || revision->kind == svn_opt_revision_unspecified)) { svn_wc_adm_access_t *adm_access; SVN_ERR(svn_wc_adm_open3(&adm_access, NULL, svn_path_dirname(path_or_url, pool), FALSE, 0, ctx->cancel_func, ctx->cancel_baton, pool)); SVN_ERR(cat_local_file(path_or_url, out, adm_access, revision, pool)); SVN_ERR(svn_wc_adm_close(adm_access)); return SVN_NO_ERROR; } /* Get an RA plugin for this filesystem object. */ SVN_ERR(svn_client__ra_session_from_path(&ra_session, &rev, &url, path_or_url, peg_revision, revision, ctx, pool)); /* Make sure the object isn't a directory. */ SVN_ERR(svn_ra_check_path(ra_session, "", rev, &url_kind, pool)); if (url_kind == svn_node_dir) return svn_error_createf(SVN_ERR_CLIENT_IS_DIRECTORY, NULL, _("URL '%s' refers to a directory"), url); /* Grab some properties we need to know in order to figure out if anything special needs to be done with this file. */ SVN_ERR(svn_ra_get_file(ra_session, "", rev, NULL, NULL, &props, pool)); eol_style = apr_hash_get(props, SVN_PROP_EOL_STYLE, APR_HASH_KEY_STRING); keywords = apr_hash_get(props, SVN_PROP_KEYWORDS, APR_HASH_KEY_STRING); if (eol_style || keywords) { /* It's a file with no special eol style or keywords. */ svn_subst_eol_style_t eol; const char *eol_str; apr_hash_t *kw; if (eol_style) svn_subst_eol_style_from_value(&eol, &eol_str, eol_style->data); else { eol = svn_subst_eol_style_none; eol_str = NULL; } if (keywords) { svn_string_t *cmt_rev, *cmt_date, *cmt_author; apr_time_t when = 0; cmt_rev = apr_hash_get(props, SVN_PROP_ENTRY_COMMITTED_REV, APR_HASH_KEY_STRING); cmt_date = apr_hash_get(props, SVN_PROP_ENTRY_COMMITTED_DATE, APR_HASH_KEY_STRING); cmt_author = apr_hash_get(props, SVN_PROP_ENTRY_LAST_AUTHOR, APR_HASH_KEY_STRING); if (cmt_date) SVN_ERR(svn_time_from_cstring(&when, cmt_date->data, pool)); SVN_ERR(svn_subst_build_keywords2 (&kw, keywords->data, cmt_rev->data, url, when, cmt_author ? cmt_author->data : NULL, pool)); } else kw = NULL; /* Interject a translating stream */ output = svn_subst_stream_translated(svn_stream_disown(out, pool), eol_str, FALSE, kw, TRUE, pool); } SVN_ERR(svn_ra_get_file(ra_session, "", rev, output, NULL, NULL, pool)); if (out != output) /* Close the interjected stream */ SVN_ERR(svn_stream_close(output)); return SVN_NO_ERROR; } svn_error_t * svn_client_cat(svn_stream_t *out, const char *path_or_url, const svn_opt_revision_t *revision, svn_client_ctx_t *ctx, apr_pool_t *pool) { return svn_client_cat2(out, path_or_url, revision, revision, ctx, pool); }