1251881Speter/* 2251881Speter * copy-cmd.c -- Subversion copy command 3251881Speter * 4251881Speter * ==================================================================== 5251881Speter * Licensed to the Apache Software Foundation (ASF) under one 6251881Speter * or more contributor license agreements. See the NOTICE file 7251881Speter * distributed with this work for additional information 8251881Speter * regarding copyright ownership. The ASF licenses this file 9251881Speter * to you under the Apache License, Version 2.0 (the 10251881Speter * "License"); you may not use this file except in compliance 11251881Speter * with the License. You may obtain a copy of the License at 12251881Speter * 13251881Speter * http://www.apache.org/licenses/LICENSE-2.0 14251881Speter * 15251881Speter * Unless required by applicable law or agreed to in writing, 16251881Speter * software distributed under the License is distributed on an 17251881Speter * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY 18251881Speter * KIND, either express or implied. See the License for the 19251881Speter * specific language governing permissions and limitations 20251881Speter * under the License. 21251881Speter * ==================================================================== 22251881Speter */ 23251881Speter 24251881Speter/* ==================================================================== */ 25251881Speter 26251881Speter 27251881Speter 28251881Speter/*** Includes. ***/ 29251881Speter 30251881Speter#include "svn_client.h" 31251881Speter#include "svn_path.h" 32251881Speter#include "svn_error.h" 33251881Speter#include "cl.h" 34251881Speter 35251881Speter#include "svn_private_config.h" 36251881Speter 37251881Speter 38251881Speter/*** Code. ***/ 39251881Speter 40251881Speter/* This implements the `svn_opt_subcommand_t' interface. */ 41251881Spetersvn_error_t * 42251881Spetersvn_cl__copy(apr_getopt_t *os, 43251881Speter void *baton, 44251881Speter apr_pool_t *pool) 45251881Speter{ 46251881Speter svn_cl__opt_state_t *opt_state = ((svn_cl__cmd_baton_t *) baton)->opt_state; 47251881Speter svn_client_ctx_t *ctx = ((svn_cl__cmd_baton_t *) baton)->ctx; 48251881Speter apr_array_header_t *targets, *sources; 49251881Speter const char *src_path, *dst_path; 50251881Speter svn_boolean_t srcs_are_urls, dst_is_url; 51251881Speter svn_error_t *err; 52251881Speter int i; 53251881Speter 54251881Speter SVN_ERR(svn_cl__args_to_target_array_print_reserved(&targets, os, 55251881Speter opt_state->targets, 56251881Speter ctx, FALSE, pool)); 57251881Speter if (targets->nelts < 2) 58251881Speter return svn_error_create(SVN_ERR_CL_INSUFFICIENT_ARGS, 0, NULL); 59251881Speter 60251881Speter /* Get the src list and associated peg revs */ 61251881Speter sources = apr_array_make(pool, targets->nelts - 1, 62251881Speter sizeof(svn_client_copy_source_t *)); 63251881Speter for (i = 0; i < (targets->nelts - 1); i++) 64251881Speter { 65251881Speter const char *target = APR_ARRAY_IDX(targets, i, const char *); 66251881Speter svn_client_copy_source_t *source = apr_palloc(pool, sizeof(*source)); 67251881Speter const char *src; 68251881Speter svn_opt_revision_t *peg_revision = apr_palloc(pool, 69251881Speter sizeof(*peg_revision)); 70251881Speter 71251881Speter err = svn_opt_parse_path(peg_revision, &src, target, pool); 72251881Speter 73251881Speter if (err) 74251881Speter { 75251881Speter /* Issue #3606: 'svn cp .@HEAD target' gives 76251881Speter svn: '@HEAD' is just a peg revision. Maybe try '@HEAD@' instead? 77251881Speter 78251881Speter This is caused by a first round of canonicalization in 79251881Speter svn_cl__args_to_target_array_print_reserved(). Undo that in an 80251881Speter attempt to fix this issue without revving many apis. 81251881Speter */ 82251881Speter if (*target == '@' && err->apr_err == SVN_ERR_BAD_FILENAME) 83251881Speter { 84251881Speter svn_error_t *err2; 85251881Speter 86251881Speter err2 = svn_opt_parse_path(peg_revision, &src, 87251881Speter apr_pstrcat(pool, ".", target, 88251881Speter (const char *)NULL), pool); 89251881Speter 90251881Speter if (err2) 91251881Speter { 92251881Speter /* Fix attempt failed; return original error */ 93251881Speter svn_error_clear(err2); 94251881Speter } 95251881Speter else 96251881Speter { 97251881Speter /* Error resolved. Use path */ 98251881Speter svn_error_clear(err); 99251881Speter err = NULL; 100251881Speter } 101251881Speter } 102251881Speter 103251881Speter if (err) 104251881Speter return svn_error_trace(err); 105251881Speter } 106251881Speter 107251881Speter source->path = src; 108251881Speter source->revision = &(opt_state->start_revision); 109251881Speter source->peg_revision = peg_revision; 110251881Speter 111251881Speter APR_ARRAY_PUSH(sources, svn_client_copy_source_t *) = source; 112251881Speter } 113251881Speter 114251881Speter /* Get DST_PATH (the target path or URL) and check that no peg revision is 115251881Speter * specified for it. */ 116251881Speter { 117251881Speter const char *tgt = APR_ARRAY_IDX(targets, targets->nelts - 1, const char *); 118251881Speter svn_opt_revision_t peg; 119251881Speter 120251881Speter SVN_ERR(svn_opt_parse_path(&peg, &dst_path, tgt, pool)); 121251881Speter if (peg.kind != svn_opt_revision_unspecified) 122251881Speter return svn_error_createf(SVN_ERR_ILLEGAL_TARGET, NULL, 123251881Speter _("'%s': a peg revision is not allowed here"), 124251881Speter tgt); 125251881Speter } 126251881Speter 127251881Speter /* Figure out which type of notification to use. 128251881Speter (There is no need to check that the src paths are homogeneous; 129251881Speter svn_client_copy6() through its subroutine try_copy() will return an 130251881Speter error if they are not.) */ 131251881Speter src_path = APR_ARRAY_IDX(targets, 0, const char *); 132251881Speter srcs_are_urls = svn_path_is_url(src_path); 133251881Speter dst_is_url = svn_path_is_url(dst_path); 134251881Speter 135251881Speter if ((! srcs_are_urls) && (! dst_is_url)) 136251881Speter { 137251881Speter /* WC->WC */ 138251881Speter } 139251881Speter else if ((! srcs_are_urls) && (dst_is_url)) 140251881Speter { 141251881Speter /* WC->URL : Use notification. */ 142251881Speter if (! opt_state->quiet) 143251881Speter SVN_ERR(svn_cl__notifier_mark_wc_to_repos_copy(ctx->notify_baton2)); 144251881Speter } 145251881Speter else if ((srcs_are_urls) && (! dst_is_url)) 146251881Speter { 147251881Speter /* URL->WC : Use checkout-style notification. */ 148251881Speter if (! opt_state->quiet) 149251881Speter SVN_ERR(svn_cl__notifier_mark_checkout(ctx->notify_baton2)); 150251881Speter } 151251881Speter else 152251881Speter { 153251881Speter /* URL -> URL, meaning that no notification is needed. */ 154251881Speter ctx->notify_func2 = NULL; 155251881Speter } 156251881Speter 157251881Speter if (! dst_is_url) 158251881Speter { 159251881Speter ctx->log_msg_func3 = NULL; 160251881Speter if (opt_state->message || opt_state->filedata || opt_state->revprop_table) 161251881Speter return svn_error_create 162251881Speter (SVN_ERR_CL_UNNECESSARY_LOG_MESSAGE, NULL, 163251881Speter _("Local, non-commit operations do not take a log message " 164251881Speter "or revision properties")); 165251881Speter } 166251881Speter 167251881Speter if (ctx->log_msg_func3) 168251881Speter SVN_ERR(svn_cl__make_log_msg_baton(&(ctx->log_msg_baton3), opt_state, 169251881Speter NULL, ctx->config, pool)); 170251881Speter 171251881Speter err = svn_client_copy6(sources, dst_path, TRUE, 172251881Speter opt_state->parents, opt_state->ignore_externals, 173251881Speter opt_state->revprop_table, 174251881Speter (opt_state->quiet ? NULL : svn_cl__print_commit_info), 175251881Speter NULL, 176251881Speter ctx, pool); 177251881Speter 178251881Speter if (ctx->log_msg_func3) 179251881Speter SVN_ERR(svn_cl__cleanup_log_msg(ctx->log_msg_baton3, err, pool)); 180251881Speter else if (err) 181251881Speter return svn_error_trace(err); 182251881Speter 183251881Speter return SVN_NO_ERROR; 184251881Speter} 185