contrib/subversion/subversion/svn/unlock-cmd.c

   1 /*
   2  * unlock-cmd.c -- Unlock a working copy path.
   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 \f
  28 /*** Includes. ***/
  29
  30 #include "svn_path.h"
  31 #include "svn_pools.h"
  32 #include "svn_client.h"
  33 #include "svn_error_codes.h"
  34 #include "svn_error.h"
  35 #include "svn_cmdline.h"
  36 #include "cl.h"
  37 #include "svn_private_config.h"
  38
  39 \f
  40 /*** Code. ***/
  41
  42
  43 /* This implements the `svn_opt_subcommand_t' interface. */
  44 svn_error_t *
  45 svn_cl__unlock(apr_getopt_t *os,
  46                void *baton,
  47                apr_pool_t *scratch_pool)
  48 {
  49   svn_cl__opt_state_t *opt_state = ((svn_cl__cmd_baton_t *) baton)->opt_state;
  50   svn_client_ctx_t *ctx = ((svn_cl__cmd_baton_t *) baton)->ctx;
  51   apr_array_header_t *targets;
  52
  53   SVN_ERR(svn_cl__args_to_target_array_print_reserved(&targets, os,
  54                                                       opt_state->targets,
  55                                                       ctx, FALSE,
  56                                                       scratch_pool));
  57
  58   /* We don't support unlock on directories, so "." is not relevant. */
  59   if (! targets->nelts)
  60     return svn_error_create(SVN_ERR_CL_INSUFFICIENT_ARGS, 0, NULL);
  61
  62   SVN_ERR(svn_cl__eat_peg_revisions(&targets, targets, scratch_pool));
  63
  64   SVN_ERR(svn_cl__assert_homogeneous_target_type(targets));
  65
  66   return svn_error_trace(
  67     svn_client_unlock(targets, opt_state->force, ctx, scratch_pool));
  68 }