2 * cleanup-cmd.c -- Subversion cleanup command
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
13 * http://www.apache.org/licenses/LICENSE-2.0
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
21 * ====================================================================
24 /* ==================================================================== */
30 #include "svn_client.h"
32 #include "svn_pools.h"
33 #include "svn_error.h"
36 #include "svn_private_config.h"
41 /* This implements the `svn_opt_subcommand_t' interface. */
43 svn_cl__cleanup(apr_getopt_t *os,
47 svn_cl__opt_state_t *opt_state = ((svn_cl__cmd_baton_t *) baton)->opt_state;
48 svn_client_ctx_t *ctx = ((svn_cl__cmd_baton_t *) baton)->ctx;
49 apr_array_header_t *targets;
53 SVN_ERR(svn_cl__args_to_target_array_print_reserved(&targets, os,
57 /* Add "." if user passed 0 arguments */
58 svn_opt_push_implicit_dot_target(targets, pool);
60 SVN_ERR(svn_cl__check_targets_are_local_paths(targets));
62 SVN_ERR(svn_cl__eat_peg_revisions(&targets, targets, pool));
64 subpool = svn_pool_create(pool);
65 for (i = 0; i < targets->nelts; i++)
67 const char *target = APR_ARRAY_IDX(targets, i, const char *);
70 svn_pool_clear(subpool);
71 SVN_ERR(svn_cl__check_cancel(ctx->cancel_baton));
72 err = svn_client_cleanup(target, ctx, subpool);
73 if (err && err->apr_err == SVN_ERR_WC_LOCKED)
75 const char *target_abspath;
76 svn_error_t *err2 = svn_dirent_get_absolute(&target_abspath,
80 err = svn_error_compose_create(err, err2);
84 const char *wcroot_abspath;
86 err2 = svn_client_get_wc_root(&wcroot_abspath, target_abspath,
87 ctx, subpool, subpool);
89 err = svn_error_compose_create(err, err2);
91 err = svn_error_createf(SVN_ERR_WC_LOCKED, err,
92 _("Working copy locked; try running "
93 "'svn cleanup' on the root of the "
94 "working copy ('%s') instead."),
95 svn_dirent_local_style(wcroot_abspath,
102 svn_pool_destroy(subpool);