/*******************************************************************/

/*  slibtool: a strong libtool implementation, written in C        */

/*  Copyright (C) 2016--2024  SysDeer Technologies, LLC            */

/*  Released under the Standard MIT License; see COPYING.SLIBTOOL. */

/*******************************************************************/

#include <slibtool/slibtool.h>

#include "slibtool_driver_impl.h"

#include "slibtool_symlink_impl.h"

#include "slibtool_errinfo_impl.h"

/* legacy fallback, no longer in use */

extern int slbt_util_import_archive_mri(

	struct slbt_exec_ctx *  ectx,

	char *			dstarchive,

	char *			srcarchive);

/* use slibtool's in-memory archive merging facility */

static int slbt_util_import_archive_impl(

	const struct slbt_driver_ctx *  dctx,

	const struct slbt_exec_ctx *	ectx,

	char *				dstarchive,

	char *				srcarchive)

{

	int                             ret;

	struct slbt_archive_ctx *       arctxv[3] = {0,0,0};

	struct slbt_archive_ctx *       arctx;

	(void)ectx;

	if (slbt_ar_get_archive_ctx(dctx,dstarchive,&arctxv[0]) < 0)

		return SLBT_NESTED_ERROR(dctx);

	if (slbt_ar_get_archive_ctx(dctx,srcarchive,&arctxv[1]) < 0) {

		slbt_ar_free_archive_ctx(arctxv[0]);

		return SLBT_NESTED_ERROR(dctx);

	}

	ret = slbt_ar_merge_archives(arctxv,&arctx);

	slbt_ar_free_archive_ctx(arctxv[0]);

	slbt_ar_free_archive_ctx(arctxv[1]);

	if (ret == 0) {

		ret = slbt_ar_store_archive(arctx,dstarchive,0644);

		slbt_ar_free_archive_ctx(arctx);

	}

	return (ret < 0) ? SLBT_NESTED_ERROR(dctx) : 0;

}

int slbt_util_import_archive(

	const struct slbt_exec_ctx *    ectx,

	char *				dstarchive,

	char *				srcarchive)

{

	const struct slbt_driver_ctx *	dctx;

	dctx = (slbt_get_exec_ictx(ectx))->dctx;

	if (slbt_symlink_is_a_placeholder(

			slbt_driver_fdcwd(dctx),

			srcarchive))

		return 0;

	return slbt_util_import_archive_impl(

		dctx,ectx,

		dstarchive,

		srcarchive);

}