/* Make a copy of the filesystem node (or tree if RECURSIVE) at SRC_ABSPATH under a temporary name in the directory TMPDIR_ABSPATH and return the absolute path of the copy in *DST_ABSPATH. Return the node kind of SRC_ABSPATH in *KIND. If SRC_ABSPATH doesn't exist then set *DST_ABSPATH to NULL to indicate that no copy was made. */ static svn_error_t * copy_to_tmpdir(svn_skel_t **work_item, svn_node_kind_t *kind, svn_wc__db_t *db, const char *src_abspath, const char *dst_abspath, const char *tmpdir_abspath, svn_boolean_t file_copy, svn_boolean_t unversioned, svn_cancel_func_t cancel_func, void *cancel_baton, apr_pool_t *result_pool, apr_pool_t *scratch_pool) { svn_boolean_t is_special; svn_io_file_del_t delete_when; const char *dst_tmp_abspath; svn_node_kind_t dsk_kind; if (!kind) kind = &dsk_kind; *work_item = NULL; SVN_ERR(svn_io_check_special_path(src_abspath, kind, &is_special, scratch_pool)); if (*kind == svn_node_none) { return SVN_NO_ERROR; } else if (*kind == svn_node_unknown) { return svn_error_createf(SVN_ERR_NODE_UNEXPECTED_KIND, NULL, _("Source '%s' is unexpected kind"), svn_dirent_local_style(src_abspath, scratch_pool)); } else if (*kind == svn_node_dir || is_special) delete_when = svn_io_file_del_on_close; else /* the default case: (*kind == svn_node_file) */ delete_when = svn_io_file_del_none; /* ### Do we need a pool cleanup to remove the copy? We can't use ### svn_io_file_del_on_pool_cleanup above because a) it won't ### handle the directory case and b) we need to be able to remove ### the cleanup before queueing the move work item. */ if (file_copy && !unversioned) { svn_boolean_t modified; /* It's faster to look for mods on the source now, as the timestamp might match, than to examine the destination later as the destination timestamp will never match. */ SVN_ERR(svn_wc__internal_file_modified_p(&modified, db, src_abspath, FALSE, scratch_pool)); if (!modified) { /* Why create a temp copy if we can just reinstall from pristine? */ SVN_ERR(svn_wc__wq_build_file_install(work_item, db, dst_abspath, NULL, FALSE, TRUE, result_pool, scratch_pool)); return SVN_NO_ERROR; } } /* Set DST_TMP_ABSPATH to a temporary unique path. If *KIND is file, leave a file there and then overwrite it; otherwise leave no node on disk at that path. In the latter case, something else might use that path before we get around to using it a moment later, but never mind. */ SVN_ERR(svn_io_open_unique_file3(NULL, &dst_tmp_abspath, tmpdir_abspath, delete_when, scratch_pool, scratch_pool)); if (*kind == svn_node_dir) { if (file_copy) SVN_ERR(svn_io_copy_dir_recursively( src_abspath, tmpdir_abspath, svn_dirent_basename(dst_tmp_abspath, scratch_pool), TRUE, /* copy_perms */ cancel_func, cancel_baton, scratch_pool)); else SVN_ERR(svn_io_dir_make(dst_tmp_abspath, APR_OS_DEFAULT, scratch_pool)); } else if (!is_special) SVN_ERR(svn_io_copy_file(src_abspath, dst_tmp_abspath, TRUE /* copy_perms */, scratch_pool)); else SVN_ERR(svn_io_copy_link(src_abspath, dst_tmp_abspath, scratch_pool)); if (file_copy) { /* Remove 'read-only' from the destination file; it's a local add now. */ SVN_ERR(svn_io_set_file_read_write(dst_tmp_abspath, FALSE, scratch_pool)); } SVN_ERR(svn_wc__wq_build_file_move(work_item, db, dst_abspath, dst_tmp_abspath, dst_abspath, result_pool, scratch_pool)); return SVN_NO_ERROR; }
/* Internal version of svn_wc_merge, also used to (loggily) merge updates from the repository. In the case of updating, the update can have sent new properties, which could affect the way the wc target is detranslated and compared with LEFT and RIGHT for merging. Property changes sent by the update are provided in PROP_DIFF. If COPYFROM_TEXT is non-null, the working text is taken from this file instead of from the actual version in the working copy (and the merge_target is allowed to not be under version control in this case). */ svn_error_t * svn_wc__merge_internal(svn_stringbuf_t **log_accum, enum svn_wc_merge_outcome_t *merge_outcome, const char *left, const char *right, const char *merge_target, const char *copyfrom_text, svn_wc_adm_access_t *adm_access, const char *left_label, const char *right_label, const char *target_label, svn_boolean_t dry_run, const char *diff3_cmd, const apr_array_header_t *merge_options, const apr_array_header_t *prop_diff, svn_wc_conflict_resolver_func_t conflict_func, void *conflict_baton, apr_pool_t *pool) { const char *tmp_target, *result_target, *working_text; const char *adm_path = svn_wc_adm_access_path(adm_access); apr_file_t *result_f; svn_boolean_t is_binary = FALSE; const svn_wc_entry_t *entry; svn_boolean_t contains_conflicts; const svn_prop_t *mimeprop; /* Sanity check: the merge target must be under revision control (unless this is an add-with-history). */ SVN_ERR(svn_wc_entry(&entry, merge_target, adm_access, FALSE, pool)); if (! entry && ! copyfrom_text) { *merge_outcome = svn_wc_merge_no_merge; return SVN_NO_ERROR; } /* Decide if the merge target is a text or binary file. */ if ((mimeprop = get_prop(prop_diff, SVN_PROP_MIME_TYPE)) && mimeprop->value) is_binary = svn_mime_type_is_binary(mimeprop->value->data); else if (! copyfrom_text) SVN_ERR(svn_wc_has_binary_prop(&is_binary, merge_target, adm_access, pool)); working_text = copyfrom_text ? copyfrom_text : merge_target; SVN_ERR(detranslate_wc_file(&tmp_target, working_text, adm_access, (! is_binary) && diff3_cmd != NULL, prop_diff, pool)); /* We cannot depend on the left file to contain the same eols as the right file. If the merge target has mods, this will mark the entire file as conflicted, so we need to compensate. */ SVN_ERR(maybe_update_target_eols(&left, left, adm_access, prop_diff, pool)); if (! is_binary) /* this is a text file */ { /* Open a second temporary file for writing; this is where diff3 will write the merged results. */ SVN_ERR(svn_wc_create_tmp_file2(&result_f, &result_target, adm_path, svn_io_file_del_none, pool)); /* Run an external merge if requested. */ if (diff3_cmd) { int exit_code; SVN_ERR(svn_io_run_diff3_2(&exit_code, ".", tmp_target, left, right, target_label, left_label, right_label, result_f, diff3_cmd, merge_options, pool)); contains_conflicts = exit_code == 1; } else { svn_diff_t *diff; const char *target_marker; const char *left_marker; const char *right_marker; svn_stream_t *ostream; svn_diff_file_options_t *options; ostream = svn_stream_from_aprfile(result_f, pool); options = svn_diff_file_options_create(pool); if (merge_options) SVN_ERR(svn_diff_file_options_parse(options, merge_options, pool)); SVN_ERR(svn_diff_file_diff3_2(&diff, left, tmp_target, right, options, pool)); /* Labels fall back to sensible defaults if not specified. */ if (target_label) target_marker = apr_psprintf(pool, "<<<<<<< %s", target_label); else target_marker = "<<<<<<< .working"; if (left_label) left_marker = apr_psprintf(pool, "||||||| %s", left_label); else left_marker = "||||||| .old"; if (right_label) right_marker = apr_psprintf(pool, ">>>>>>> %s", right_label); else right_marker = ">>>>>>> .new"; SVN_ERR(svn_diff_file_output_merge(ostream, diff, left, tmp_target, right, left_marker, target_marker, right_marker, "=======", /* seperator */ FALSE, /* display original */ FALSE, /* resolve conflicts */ pool)); SVN_ERR(svn_stream_close(ostream)); contains_conflicts = svn_diff_contains_conflicts(diff); } /* Close the output file */ SVN_ERR(svn_io_file_close(result_f, pool)); if (contains_conflicts && ! dry_run) /* got a conflict */ { const char *left_copy, *right_copy, *target_copy; const char *tmp_left, *tmp_right, *tmp_target_copy; const char *parentt, *target_base; svn_wc_adm_access_t *parent_access; svn_wc_entry_t tmp_entry; /* Give the conflict resolution callback a chance to clean up the conflict before we mark the file 'conflicted' */ if (conflict_func) { svn_wc_conflict_result_t *result = NULL; svn_wc_conflict_description_t cdesc; cdesc.path = merge_target; cdesc.node_kind = svn_node_file; cdesc.kind = svn_wc_conflict_kind_text; cdesc.is_binary = FALSE; cdesc.mime_type = (mimeprop && mimeprop->value) ? mimeprop->value->data : NULL; cdesc.access = adm_access; cdesc.action = svn_wc_conflict_action_edit; cdesc.reason = svn_wc_conflict_reason_edited; cdesc.base_file = left; cdesc.their_file = right; cdesc.my_file = tmp_target; cdesc.merged_file = result_target; cdesc.property_name = NULL; SVN_ERR(conflict_func(&result, &cdesc, conflict_baton, pool)); if (result == NULL) return svn_error_create(SVN_ERR_WC_CONFLICT_RESOLVER_FAILURE, NULL, _("Conflict callback violated API:" " returned no results")); switch (result->choice) { /* If the callback wants to use one of the fulltexts to resolve the conflict, so be it.*/ case svn_wc_conflict_choose_base: { SVN_ERR(svn_wc__loggy_copy (log_accum, NULL, adm_access, svn_wc__copy_translate, left, merge_target, FALSE, pool)); *merge_outcome = svn_wc_merge_merged; contains_conflicts = FALSE; goto merge_complete; } case svn_wc_conflict_choose_theirs_full: { SVN_ERR(svn_wc__loggy_copy (log_accum, NULL, adm_access, svn_wc__copy_translate, right, merge_target, FALSE, pool)); *merge_outcome = svn_wc_merge_merged; contains_conflicts = FALSE; goto merge_complete; } case svn_wc_conflict_choose_mine_full: { /* Do nothing to merge_target, let it live untouched! */ *merge_outcome = svn_wc_merge_merged; contains_conflicts = FALSE; goto merge_complete; } /* For the case of 3-way file merging, we don't really distinguish between these return values; if the callback claims to have "generally resolved" the situation, we still interpret that as "OK, we'll assume the merged version is good to use". */ case svn_wc_conflict_choose_merged: { SVN_ERR(svn_wc__loggy_copy (log_accum, NULL, adm_access, svn_wc__copy_translate, /* Look for callback's own merged-file first: */ result->merged_file ? result->merged_file : result_target, merge_target, FALSE, pool)); *merge_outcome = svn_wc_merge_merged; contains_conflicts = FALSE; goto merge_complete; } case svn_wc_conflict_choose_postpone: default: { /* Assume conflict remains, fall through to code below. */ } } } /* Preserve the three pre-merge files, and modify the entry (mark as conflicted, track the preserved files). */ /* I miss Lisp. */ SVN_ERR(svn_io_open_unique_file2(NULL, &left_copy, merge_target, left_label, svn_io_file_del_none, pool)); /* Have I mentioned how much I miss Lisp? */ SVN_ERR(svn_io_open_unique_file2(NULL, &right_copy, merge_target, right_label, svn_io_file_del_none, pool)); /* Why, how much more pleasant to be forced to unroll my loops. If I'd been writing in Lisp, I might have mapped an inline lambda form over a list, or something equally disgusting. Thank goodness C was here to protect me! */ SVN_ERR(svn_io_open_unique_file2(NULL, &target_copy, merge_target, target_label, svn_io_file_del_none, pool)); /* We preserve all the files with keywords expanded and line endings in local (working) form. */ svn_path_split(target_copy, &parentt, &target_base, pool); SVN_ERR(svn_wc_adm_retrieve(&parent_access, adm_access, parentt, pool)); /* Log files require their paths to be in the subtree relative to the adm_access path they are executed in. Make our LEFT and RIGHT files 'local' if they aren't... */ if (! svn_path_is_child(adm_path, left, pool)) { SVN_ERR(svn_wc_create_tmp_file2 (NULL, &tmp_left, adm_path, svn_io_file_del_none, pool)); SVN_ERR(svn_io_copy_file(left, tmp_left, TRUE, pool)); } else tmp_left = left; if (! svn_path_is_child(adm_path, right, pool)) { SVN_ERR(svn_wc_create_tmp_file2 (NULL, &tmp_right, adm_path, svn_io_file_del_none, pool)); SVN_ERR(svn_io_copy_file(right, tmp_right, TRUE, pool)); } else tmp_right = right; /* NOTE: Callers must ensure that the svn:eol-style and svn:keywords property values are correct in the currently installed props. With 'svn merge', it's no big deal. But when 'svn up' calls this routine, it needs to make sure that this routine is using the newest property values that may have been received *during* the update. Since this routine will be run from within a log-command, merge_file() needs to make sure that a previous log-command to 'install latest props' has already executed first. Ben and I just checked, and that is indeed the order in which the log items are written, so everything should be fine. Really. */ /* Create LEFT and RIGHT backup files, in expanded form. We use merge_target's current properties to do the translation. */ /* Derive the basenames of the 3 backup files. */ SVN_ERR(svn_wc__loggy_translated_file(log_accum, adm_access, left_copy, tmp_left, merge_target, pool)); SVN_ERR(svn_wc__loggy_translated_file(log_accum, adm_access, right_copy, tmp_right, merge_target, pool)); /* Back up MERGE_TARGET through detranslation/retranslation: the new translation properties may not match the current ones */ SVN_ERR(svn_wc_translated_file2(&tmp_target_copy, merge_target, merge_target, adm_access, SVN_WC_TRANSLATE_TO_NF | SVN_WC_TRANSLATE_NO_OUTPUT_CLEANUP, pool)); SVN_ERR(svn_wc__loggy_translated_file (log_accum, adm_access, target_copy, tmp_target_copy, merge_target, pool)); tmp_entry.conflict_old = svn_path_is_child(adm_path, left_copy, pool); tmp_entry.conflict_new = svn_path_is_child(adm_path, right_copy, pool); tmp_entry.conflict_wrk = target_base; /* Mark merge_target's entry as "Conflicted", and start tracking the backup files in the entry as well. */ SVN_ERR(svn_wc__loggy_entry_modify (log_accum, adm_access, merge_target, &tmp_entry, SVN_WC__ENTRY_MODIFY_CONFLICT_OLD | SVN_WC__ENTRY_MODIFY_CONFLICT_NEW | SVN_WC__ENTRY_MODIFY_CONFLICT_WRK, pool)); *merge_outcome = svn_wc_merge_conflict; } else if (contains_conflicts && dry_run) { *merge_outcome = svn_wc_merge_conflict; } /* end of conflict handling */ else if (copyfrom_text) { *merge_outcome = svn_wc_merge_merged; } else { svn_boolean_t same, special; /* If 'special', then use the detranslated form of the target file. This is so we don't try to follow symlinks, but the same treatment is probably also appropriate for whatever special file types we may invent in the future. */ SVN_ERR(svn_wc__get_special(&special, merge_target, adm_access, pool)); SVN_ERR(svn_io_files_contents_same_p(&same, result_target, (special ? tmp_target : merge_target), pool)); *merge_outcome = same ? svn_wc_merge_unchanged : svn_wc_merge_merged; } if (*merge_outcome != svn_wc_merge_unchanged && ! dry_run) /* replace MERGE_TARGET with the new merged file, expanding. */ SVN_ERR(svn_wc__loggy_copy(log_accum, NULL, adm_access, svn_wc__copy_translate, result_target, merge_target, FALSE, pool)); } /* end of merging for text files */ else if (! dry_run) /* merging procedure for binary files */ { /* ### when making the binary-file backups, should we be honoring keywords and eol stuff? */ const char *left_copy, *right_copy; const char *parentt, *left_base, *right_base; svn_wc_entry_t tmp_entry; /* Give the conflict resolution callback a chance to clean up the conflict before we mark the file 'conflicted' */ if (conflict_func) { svn_wc_conflict_result_t *result = NULL; svn_wc_conflict_description_t cdesc; cdesc.path = merge_target; cdesc.node_kind = svn_node_file; cdesc.kind = svn_wc_conflict_kind_text; cdesc.is_binary = TRUE; cdesc.mime_type = (mimeprop && mimeprop->value) ? mimeprop->value->data : NULL; cdesc.access = adm_access; cdesc.action = svn_wc_conflict_action_edit; cdesc.reason = svn_wc_conflict_reason_edited; cdesc.base_file = left; cdesc.their_file = right; cdesc.my_file = tmp_target; cdesc.merged_file = NULL; /* notice there is NO merged file! */ cdesc.property_name = NULL; SVN_ERR(conflict_func(&result, &cdesc, conflict_baton, pool)); if (result == NULL) return svn_error_create(SVN_ERR_WC_CONFLICT_RESOLVER_FAILURE, NULL, _("Conflict callback violated API:" " returned no results")); switch (result->choice) { /* For a binary file, there's no merged file to look at, unless the conflict-callback did the merging itself. */ case svn_wc_conflict_choose_base: { SVN_ERR(svn_wc__loggy_copy (log_accum, NULL, adm_access, svn_wc__copy_translate, left, merge_target, FALSE, pool)); *merge_outcome = svn_wc_merge_merged; contains_conflicts = FALSE; goto merge_complete; } case svn_wc_conflict_choose_theirs_full: { SVN_ERR(svn_wc__loggy_copy (log_accum, NULL, adm_access, svn_wc__copy_translate, right, merge_target, FALSE, pool)); *merge_outcome = svn_wc_merge_merged; contains_conflicts = FALSE; goto merge_complete; } /* For a binary file, if the response is to use the user's file, we do nothing. We also do nothing if the response claims to have already resolved the problem.*/ case svn_wc_conflict_choose_mine_full: { *merge_outcome = svn_wc_merge_merged; contains_conflicts = FALSE; goto merge_complete; } case svn_wc_conflict_choose_merged: { if (! result->merged_file) { /* Callback asked us to choose its own merged file, but didn't provide one! */ return svn_error_create (SVN_ERR_WC_CONFLICT_RESOLVER_FAILURE, NULL, _("Conflict callback violated API:" " returned no merged file")); } else { SVN_ERR(svn_wc__loggy_copy (log_accum, NULL, adm_access, svn_wc__copy_translate, result->merged_file, merge_target, FALSE, pool)); *merge_outcome = svn_wc_merge_merged; contains_conflicts = FALSE; goto merge_complete; } } case svn_wc_conflict_choose_postpone: default: { /* Assume conflict remains, fall through to code below. */ } } } /* reserve names for backups of left and right fulltexts */ SVN_ERR(svn_io_open_unique_file2(NULL, &left_copy, merge_target, left_label, svn_io_file_del_none, pool)); SVN_ERR(svn_io_open_unique_file2(NULL, &right_copy, merge_target, right_label, svn_io_file_del_none, pool)); /* create the backup files */ SVN_ERR(svn_io_copy_file(left, left_copy, TRUE, pool)); SVN_ERR(svn_io_copy_file(right, right_copy, TRUE, pool)); /* Was the merge target detranslated? */ if (merge_target != tmp_target) { /* Create a .mine file too */ const char *mine_copy; SVN_ERR(svn_io_open_unique_file2(NULL, &mine_copy, merge_target, target_label, svn_io_file_del_none, pool)); SVN_ERR(svn_wc__loggy_move(log_accum, NULL, adm_access, tmp_target, mine_copy, FALSE, pool)); mine_copy = svn_path_is_child(adm_path, mine_copy, pool); tmp_entry.conflict_wrk = mine_copy; } else tmp_entry.conflict_wrk = NULL; /* Derive the basenames of the backup files. */ svn_path_split(left_copy, &parentt, &left_base, pool); svn_path_split(right_copy, &parentt, &right_base, pool); /* Mark merge_target's entry as "Conflicted", and start tracking the backup files in the entry as well. */ tmp_entry.conflict_old = left_base; tmp_entry.conflict_new = right_base; SVN_ERR(svn_wc__loggy_entry_modify (log_accum, adm_access, merge_target, &tmp_entry, SVN_WC__ENTRY_MODIFY_CONFLICT_OLD | SVN_WC__ENTRY_MODIFY_CONFLICT_NEW | SVN_WC__ENTRY_MODIFY_CONFLICT_WRK, pool)); *merge_outcome = svn_wc_merge_conflict; /* a conflict happened */ } /* end of binary conflict handling */ else *merge_outcome = svn_wc_merge_conflict; /* dry_run for binary files. */ merge_complete: /* Merging is complete. Regardless of text or binariness, we might need to tweak the executable bit on the new working file. */ if (! dry_run) { SVN_ERR(svn_wc__loggy_maybe_set_executable(log_accum, adm_access, merge_target, pool)); SVN_ERR(svn_wc__loggy_maybe_set_readonly(log_accum, adm_access, merge_target, pool)); } return SVN_NO_ERROR; }