| /* |
| * import-cmd.c -- Import a file or tree into the repository. |
| * |
| * ==================================================================== |
| * 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 "svn_client.h" |
| #include "svn_path.h" |
| #include "svn_error.h" |
| #include "cl.h" |
| |
| #include "svn_private_config.h" |
| |
| |
| /*** Code. ***/ |
| |
| /* This implements the `svn_opt_subcommand_t' interface. */ |
| svn_error_t * |
| svn_cl__import(apr_getopt_t *os, |
| void *baton, |
| apr_pool_t *pool) |
| { |
| svn_cl__opt_state_t *opt_state = ((svn_cl__cmd_baton_t *) baton)->opt_state; |
| svn_client_ctx_t *ctx = ((svn_cl__cmd_baton_t *) baton)->ctx; |
| apr_array_header_t *targets; |
| const char *path; |
| const char *url; |
| svn_commit_info_t *commit_info = NULL; |
| |
| /* Import takes two arguments, for example |
| * |
| * $ svn import projects/test file:///home/jrandom/repos/trunk |
| * ^^^^^^^^^^^^^ ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ |
| * (source) (repository) |
| * |
| * or |
| * |
| * $ svn import file:///home/jrandom/repos/some/subdir |
| * |
| * What is the nicest behavior for import, from the user's point of |
| * view? This is a subtle question. Seemingly intuitive answers |
| * can lead to weird situations, such never being able to create |
| * non-directories in the top-level of the repository. |
| * |
| * If 'source' is a file then the basename of 'url' is used as the |
| * filename in the repository. If 'source' is a directory then the |
| * import happens directly in the repository target dir, creating |
| * however many new entries are necessary. If some part of 'url' |
| * does not exist in the repository then parent directories are created |
| * as necessary. |
| * |
| * In the case where no 'source' is given '.' (the current directory) |
| * is implied. |
| * |
| * ### kff todo: review above behaviors. |
| */ |
| |
| SVN_ERR(svn_opt_args_to_target_array2(&targets, os, |
| opt_state->targets, pool)); |
| |
| if (targets->nelts < 1) |
| return svn_error_create |
| (SVN_ERR_CL_INSUFFICIENT_ARGS, NULL, |
| _("Repository URL required when importing")); |
| else if (targets->nelts > 2) |
| return svn_error_create |
| (SVN_ERR_CL_ARG_PARSING_ERROR, NULL, |
| _("Too many arguments to import command")); |
| else if (targets->nelts == 1) |
| { |
| url = APR_ARRAY_IDX(targets, 0, const char *); |
| path = ""; |
| } |
| else |
| { |
| path = APR_ARRAY_IDX(targets, 0, const char *); |
| url = APR_ARRAY_IDX(targets, 1, const char *); |
| } |
| |
| if (! svn_path_is_url(url)) |
| return svn_error_createf |
| (SVN_ERR_CL_ARG_PARSING_ERROR, NULL, |
| _("Invalid URL '%s'"), url); |
| |
| if (! opt_state->quiet) |
| svn_cl__get_notifier(&ctx->notify_func2, &ctx->notify_baton2, |
| FALSE, FALSE, FALSE, pool); |
| |
| if (opt_state->depth == svn_depth_unknown) |
| opt_state->depth = svn_depth_infinity; |
| |
| SVN_ERR(svn_cl__make_log_msg_baton(&(ctx->log_msg_baton3), opt_state, |
| NULL, ctx->config, pool)); |
| SVN_ERR(svn_cl__cleanup_log_msg |
| (ctx->log_msg_baton3, |
| /* ### TODO: take a real depth? But I'm not sure how |
| ### useful that would be for an import. I could see |
| ### svn_depth_files being useful for import, but we |
| ### don't have that (yet). */ |
| svn_client_import2(&commit_info, |
| path, |
| url, |
| (! SVN_DEPTH_TO_RECURSE(opt_state->depth)), |
| opt_state->no_ignore, |
| ctx, |
| pool))); |
| |
| if (commit_info && ! opt_state->quiet) |
| SVN_ERR(svn_cl__print_commit_info(commit_info, pool)); |
| |
| return SVN_NO_ERROR; |
| } |