switch-cmd.c revision 362181 
1/*
2 * switch-cmd.c -- Bring work tree in sync with a different URL
3 *
4 * ====================================================================
5 *    Licensed to the Apache Software Foundation (ASF) under one
6 *    or more contributor license agreements.  See the NOTICE file
7 *    distributed with this work for additional information
8 *    regarding copyright ownership.  The ASF licenses this file
9 *    to you under the Apache License, Version 2.0 (the
10 *    "License"); you may not use this file except in compliance
11 *    with the License.  You may obtain a copy of the License at
12 *
13 *      http://www.apache.org/licenses/LICENSE-2.0
14 *
15 *    Unless required by applicable law or agreed to in writing,
16 *    software distributed under the License is distributed on an
17 *    "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
18 *    KIND, either express or implied.  See the License for the
19 *    specific language governing permissions and limitations
20 *    under the License.
21 * ====================================================================
22 */
23
24/* ==================================================================== */
25
26
27
28/*** Includes. ***/
29
30#include "svn_wc.h"
31#include "svn_client.h"
32#include "svn_dirent_uri.h"
33#include "svn_path.h"
34#include "svn_error.h"
35#include "svn_pools.h"
36#include "cl.h"
37
38#include "svn_private_config.h"
39
40/*** Code. ***/
41
42static svn_error_t *
43rewrite_urls(const apr_array_header_t *targets,
44             svn_boolean_t ignore_externals,
45             svn_client_ctx_t *ctx,
46             apr_pool_t *pool)
47{
48  apr_pool_t *subpool;
49  const char *from;
50  const char *to;
51
52  if (targets->nelts < 2)
53    return svn_error_create(SVN_ERR_CL_INSUFFICIENT_ARGS, 0, NULL);
54
55  from = APR_ARRAY_IDX(targets, 0, const char *);
56  to = APR_ARRAY_IDX(targets, 1, const char *);
57
58  /* "--relocate http https" and "--relocate http://foo svn://bar" are OK,
59     but things like "--relocate http://foo svn" are not */
60  if (svn_path_is_url(from) != svn_path_is_url(to))
61    return svn_error_createf
62      (SVN_ERR_INCORRECT_PARAMS, NULL,
63       _("'%s' to '%s' is not a valid relocation"), from, to);
64
65  subpool = svn_pool_create(pool);
66
67  if (targets->nelts == 2)
68    {
69      SVN_ERR(svn_client_relocate2("", from, to, ignore_externals,
70                                   ctx, pool));
71    }
72  else
73    {
74      int i;
75
76      for (i = 2; i < targets->nelts; i++)
77        {
78          const char *target = APR_ARRAY_IDX(targets, i, const char *);
79          svn_pool_clear(subpool);
80          SVN_ERR(svn_client_relocate2(target, from, to,
81                                       ignore_externals, ctx, subpool));
82        }
83    }
84
85  svn_pool_destroy(subpool);
86  return SVN_NO_ERROR;
87}
88
89
90/* This implements the `svn_opt_subcommand_t' interface. */
91svn_error_t *
92svn_cl__switch(apr_getopt_t *os,
93               void *baton,
94               apr_pool_t *scratch_pool)
95{
96  svn_error_t *err = SVN_NO_ERROR;
97  svn_error_t *externals_err = SVN_NO_ERROR;
98  svn_cl__opt_state_t *opt_state = ((svn_cl__cmd_baton_t *) baton)->opt_state;
99  svn_cl__conflict_stats_t *conflict_stats =
100    ((svn_cl__cmd_baton_t *) baton)->conflict_stats;
101  svn_client_ctx_t *ctx = ((svn_cl__cmd_baton_t *) baton)->ctx;
102  apr_array_header_t *targets;
103  apr_array_header_t *conflicted_paths;
104  const char *target, *switch_url;
105  svn_opt_revision_t peg_revision;
106  svn_depth_t depth;
107  svn_boolean_t depth_is_sticky;
108  struct svn_cl__check_externals_failed_notify_baton nwb;
109
110  /* This command should discover (or derive) exactly two cmdline
111     arguments: a local path to update ("target"), and a new url to
112     switch to ("switch_url"). */
113  SVN_ERR(svn_cl__args_to_target_array_print_reserved(&targets, os,
114                                                      opt_state->targets,
115                                                      ctx, FALSE,
116                                                      scratch_pool));
117
118  /* handle only-rewrite case specially */
119  if (opt_state->relocate)
120    return rewrite_urls(targets, opt_state->ignore_externals,
121                        ctx, scratch_pool);
122
123  if (targets->nelts < 1)
124    return svn_error_create(SVN_ERR_CL_INSUFFICIENT_ARGS, 0, NULL);
125  if (targets->nelts > 2)
126    return svn_error_create(SVN_ERR_CL_ARG_PARSING_ERROR, 0, NULL);
127
128  /* Get the required SWITCH_URL and its optional PEG_REVISION, and the
129   * optional TARGET argument. */
130  SVN_ERR(svn_opt_parse_path(&peg_revision, &switch_url,
131                             APR_ARRAY_IDX(targets, 0, const char *),
132                             scratch_pool));
133  if (targets->nelts == 1)
134    target = "";
135  else
136    target = APR_ARRAY_IDX(targets, 1, const char *);
137
138  /* Validate the switch_url */
139  if (! svn_path_is_url(switch_url))
140    return svn_error_createf(SVN_ERR_BAD_URL, NULL,
141                             _("'%s' does not appear to be a URL"), switch_url);
142
143  SVN_ERR(svn_cl__check_target_is_local_path(target));
144
145  /* Deal with depthstuffs. */
146  if (opt_state->set_depth != svn_depth_unknown)
147    {
148      depth = opt_state->set_depth;
149      depth_is_sticky = TRUE;
150    }
151  else
152    {
153      depth = opt_state->depth;
154      depth_is_sticky = FALSE;
155    }
156
157  nwb.wrapped_func = ctx->notify_func2;
158  nwb.wrapped_baton = ctx->notify_baton2;
159  nwb.had_externals_error = FALSE;
160  ctx->notify_func2 = svn_cl__check_externals_failed_notify_wrapper;
161  ctx->notify_baton2 = &nwb;
162
163  /* Do the 'switch' update. */
164  err = svn_client_switch3(NULL, target, switch_url, &peg_revision,
165                           &(opt_state->start_revision), depth,
166                           depth_is_sticky, opt_state->ignore_externals,
167                           opt_state->force, opt_state->ignore_ancestry,
168                           ctx, scratch_pool);
169  if (err)
170    {
171      if (err->apr_err == SVN_ERR_CLIENT_UNRELATED_RESOURCES)
172        return svn_error_createf(SVN_ERR_CLIENT_UNRELATED_RESOURCES, err,
173                                 _("Path '%s' does not share common version "
174                                   "control ancestry with the requested switch "
175                                   "location.  Use --ignore-ancestry to "
176                                   "disable this check."),
177                                   svn_dirent_local_style(target,
178                                                          scratch_pool));
179      if (err->apr_err == SVN_ERR_RA_UUID_MISMATCH
180          || err->apr_err == SVN_ERR_WC_INVALID_SWITCH)
181        return svn_error_quick_wrap(
182                 err,
183                 _("'svn switch' does not support switching a working copy to "
184                   "a different repository"));
185      return err;
186    }
187
188  if (nwb.had_externals_error)
189    externals_err = svn_error_create(SVN_ERR_CL_ERROR_PROCESSING_EXTERNALS,
190                                     NULL,
191                                     _("Failure occurred processing one or "
192                                       "more externals definitions"));
193
194  /* Run the interactive resolver if conflicts were raised. */
195  SVN_ERR(svn_cl__conflict_stats_get_paths(&conflicted_paths, conflict_stats,
196                                           scratch_pool, scratch_pool));
197  if (conflicted_paths)
198    SVN_ERR(svn_cl__walk_conflicts(conflicted_paths, conflict_stats,
199                                   opt_state, ctx, scratch_pool));
200
201  if (! opt_state->quiet)
202    {
203      err = svn_cl__notifier_print_conflict_stats(nwb.wrapped_baton, scratch_pool);
204      if (err)
205        return svn_error_compose_create(externals_err, err);
206    }
207
208  return svn_error_compose_create(externals_err, err);
209}
210