/* See LICENSE file for copyright and license details. */
#include "common.h"
#ifndef TEST


extern inline int libexec_putenvf_prepend(struct libexec_command *, const char *, ...);


#else


int
main(void)
{
	struct libexec_command cmd, ref;
	char **env;

	errno = 0;
	ASSERT_EQ_INT(libexec_putenvf_prepend(NULL, "X=Y"), -1);
	ASSERT_EQ_INT(errno, EINVAL);

	cmd = LIBEXEC_COMMAND_INIT;
	memcpy(&ref, &cmd, sizeof(cmd));

	ASSERT_ZERO(libexec_clear_environ(&cmd));
	ASSERT_NOT_NULL(cmd.environ);
	ASSERT_IS_NULL(cmd.environ[0]);

	ASSERT_ZERO(libexec_putenvf_prepend(&cmd, "%s", "A=B=C"));
	ASSERT_NOT_NULL(cmd.environ);
	ASSERT_NOT_NULL(cmd.environ[0]);
	ASSERT_EQ_STR(cmd.environ[0], "A=B=C");
	ASSERT_IS_NULL(cmd.environ[1]);

	ASSERT_ZERO(libexec_putenvf_prepend(&cmd, "%s%s", "A=", "D"));
	ASSERT_NOT_NULL(cmd.environ);
	ASSERT_NOT_NULL(cmd.environ[0]);
	ASSERT_EQ_STR(cmd.environ[0], "A=D");
	ASSERT_NOT_NULL(cmd.environ[1]);
	ASSERT_EQ_STR(cmd.environ[1], "A=B=C");
	ASSERT_IS_NULL(cmd.environ[2]);

	ASSERT_ZERO(libexec_putenvf_prepend(&cmd, "A=D"));
	ASSERT_NOT_NULL(cmd.environ);
	ASSERT_NOT_NULL(cmd.environ[0]);
	ASSERT_EQ_STR(cmd.environ[0], "A=D");
	ASSERT_NOT_NULL(cmd.environ[1]);
	ASSERT_EQ_STR(cmd.environ[1], "A=D");
	ASSERT_NOT_NULL(cmd.environ[2]);
	ASSERT_EQ_STR(cmd.environ[2], "A=B=C");
	ASSERT_IS_NULL(cmd.environ[3]);

	ASSERT_ZERO(libexec_putenvf_prepend(&cmd, "AA%sE", "="));
	ASSERT_NOT_NULL(cmd.environ);
	ASSERT_NOT_NULL(cmd.environ[0]);
	ASSERT_EQ_STR(cmd.environ[0], "AA=E");
	ASSERT_NOT_NULL(cmd.environ[1]);
	ASSERT_EQ_STR(cmd.environ[1], "A=D");
	ASSERT_NOT_NULL(cmd.environ[2]);
	ASSERT_EQ_STR(cmd.environ[2], "A=D");
	ASSERT_NOT_NULL(cmd.environ[3]);
	ASSERT_EQ_STR(cmd.environ[3], "A=B=C");
	ASSERT_IS_NULL(cmd.environ[4]);

	ASSERT_ZERO(libexec_putenvf_prepend(&cmd, "X"));
	ASSERT_NOT_NULL(cmd.environ);
	ASSERT_NOT_NULL(cmd.environ[0]);
	ASSERT_EQ_STR(cmd.environ[0], "X");
	ASSERT_NOT_NULL(cmd.environ[1]);
	ASSERT_EQ_STR(cmd.environ[1], "AA=E");
	ASSERT_NOT_NULL(cmd.environ[2]);
	ASSERT_EQ_STR(cmd.environ[2], "A=D");
	ASSERT_NOT_NULL(cmd.environ[3]);
	ASSERT_EQ_STR(cmd.environ[3], "A=D");
	ASSERT_NOT_NULL(cmd.environ[4]);
	ASSERT_EQ_STR(cmd.environ[4], "A=B=C");
	ASSERT_IS_NULL(cmd.environ[5]);

	ASSERT_ZERO(libexec_putenvf_prepend(&cmd, "%s%s%s%s", "B", "B", "=", "F"));
	ASSERT_NOT_NULL(cmd.environ);
	ASSERT_NOT_NULL(cmd.environ[0]);
	ASSERT_EQ_STR(cmd.environ[0], "BB=F");
	ASSERT_NOT_NULL(cmd.environ[1]);
	ASSERT_EQ_STR(cmd.environ[1], "X");
	ASSERT_NOT_NULL(cmd.environ[2]);
	ASSERT_EQ_STR(cmd.environ[2], "AA=E");
	ASSERT_NOT_NULL(cmd.environ[3]);
	ASSERT_EQ_STR(cmd.environ[3], "A=D");
	ASSERT_NOT_NULL(cmd.environ[4]);
	ASSERT_EQ_STR(cmd.environ[4], "A=D");
	ASSERT_NOT_NULL(cmd.environ[5]);
	ASSERT_EQ_STR(cmd.environ[5], "A=B=C");
	ASSERT_IS_NULL(cmd.environ[6]);

	ASSERT_ZERO(libexec_putenvf_prepend(&cmd, "B=%s", "F"));
	ASSERT_NOT_NULL(cmd.environ);
	ASSERT_NOT_NULL(cmd.environ[0]);
	ASSERT_EQ_STR(cmd.environ[0], "B=F");
	ASSERT_NOT_NULL(cmd.environ[1]);
	ASSERT_EQ_STR(cmd.environ[1], "BB=F");
	ASSERT_NOT_NULL(cmd.environ[2]);
	ASSERT_EQ_STR(cmd.environ[2], "X");
	ASSERT_NOT_NULL(cmd.environ[3]);
	ASSERT_EQ_STR(cmd.environ[3], "AA=E");
	ASSERT_NOT_NULL(cmd.environ[4]);
	ASSERT_EQ_STR(cmd.environ[4], "A=D");
	ASSERT_NOT_NULL(cmd.environ[5]);
	ASSERT_EQ_STR(cmd.environ[5], "A=D");
	ASSERT_NOT_NULL(cmd.environ[6]);
	ASSERT_EQ_STR(cmd.environ[6], "A=B=C");
	ASSERT_IS_NULL(cmd.environ[7]);

	env = cmd.environ;
	cmd.environ = NULL;
	ASSERT_IS_TRUE(!memcmp(&cmd, &ref, sizeof(cmd)));
	cmd.environ = env;

	libexec_destroy_command(&cmd);

	cmd = LIBEXEC_COMMAND_INIT;
	env = environ;
	environ = calloc(2, sizeof(*environ));
	ASSERT_NOT_NULL(environ);
	environ[0] = strdup("X=0");
	ASSERT_NOT_NULL(environ[0]);

	ASSERT_ZERO(libexec_putenvf_prepend(&cmd, "%s=%s=%s", "A", "B", "C"));
	ASSERT_NOT_NULL(cmd.environ);
	ASSERT_NOT_NULL(cmd.environ[0]);
	ASSERT_EQ_STR(cmd.environ[0], "A=B=C");
	ASSERT_NOT_NULL(cmd.environ[1]);
	ASSERT_EQ_STR(cmd.environ[1], "X=0");
	ASSERT_IS_NULL(cmd.environ[2]);

	ASSERT_ZERO(libexec_putenvf_prepend(&cmd, "A%sD", "="));
	ASSERT_NOT_NULL(cmd.environ);
	ASSERT_NOT_NULL(cmd.environ[0]);
	ASSERT_EQ_STR(cmd.environ[0], "A=D");
	ASSERT_NOT_NULL(cmd.environ[1]);
	ASSERT_EQ_STR(cmd.environ[1], "A=B=C");
	ASSERT_NOT_NULL(cmd.environ[2]);
	ASSERT_EQ_STR(cmd.environ[2], "X=0");
	ASSERT_IS_NULL(cmd.environ[3]);

	ASSERT_ZERO(libexec_putenvf_prepend(&cmd, "%s", "A=D"));
	ASSERT_NOT_NULL(cmd.environ);
	ASSERT_NOT_NULL(cmd.environ[0]);
	ASSERT_EQ_STR(cmd.environ[0], "A=D");
	ASSERT_NOT_NULL(cmd.environ[1]);
	ASSERT_EQ_STR(cmd.environ[1], "A=D");
	ASSERT_NOT_NULL(cmd.environ[2]);
	ASSERT_EQ_STR(cmd.environ[2], "A=B=C");
	ASSERT_NOT_NULL(cmd.environ[3]);
	ASSERT_EQ_STR(cmd.environ[3], "X=0");
	ASSERT_IS_NULL(cmd.environ[4]);

	ASSERT_ZERO(libexec_putenvf_prepend(&cmd, "%s%s%s", "A", "A=", "E"));
	ASSERT_NOT_NULL(cmd.environ);
	ASSERT_NOT_NULL(cmd.environ[0]);
	ASSERT_EQ_STR(cmd.environ[0], "AA=E");
	ASSERT_NOT_NULL(cmd.environ[1]);
	ASSERT_EQ_STR(cmd.environ[1], "A=D");
	ASSERT_NOT_NULL(cmd.environ[2]);
	ASSERT_EQ_STR(cmd.environ[2], "A=D");
	ASSERT_NOT_NULL(cmd.environ[3]);
	ASSERT_EQ_STR(cmd.environ[3], "A=B=C");
	ASSERT_NOT_NULL(cmd.environ[4]);
	ASSERT_EQ_STR(cmd.environ[4], "X=0");
	ASSERT_IS_NULL(cmd.environ[5]);

	ASSERT_ZERO(libexec_putenvf_prepend(&cmd, "X"));
	ASSERT_NOT_NULL(cmd.environ);
	ASSERT_NOT_NULL(cmd.environ[0]);
	ASSERT_EQ_STR(cmd.environ[0], "X");
	ASSERT_NOT_NULL(cmd.environ[1]);
	ASSERT_EQ_STR(cmd.environ[1], "AA=E");
	ASSERT_NOT_NULL(cmd.environ[2]);
	ASSERT_EQ_STR(cmd.environ[2], "A=D");
	ASSERT_NOT_NULL(cmd.environ[3]);
	ASSERT_EQ_STR(cmd.environ[3], "A=D");
	ASSERT_NOT_NULL(cmd.environ[4]);
	ASSERT_EQ_STR(cmd.environ[4], "A=B=C");
	ASSERT_NOT_NULL(cmd.environ[5]);
	ASSERT_EQ_STR(cmd.environ[5], "X=0");
	ASSERT_IS_NULL(cmd.environ[6]);

	ASSERT_ZERO(libexec_putenvf_prepend(&cmd, "BB=F"));
	ASSERT_NOT_NULL(cmd.environ);
	ASSERT_NOT_NULL(cmd.environ[0]);
	ASSERT_EQ_STR(cmd.environ[0], "BB=F");
	ASSERT_NOT_NULL(cmd.environ[1]);
	ASSERT_EQ_STR(cmd.environ[1], "X");
	ASSERT_NOT_NULL(cmd.environ[2]);
	ASSERT_EQ_STR(cmd.environ[2], "AA=E");
	ASSERT_NOT_NULL(cmd.environ[3]);
	ASSERT_EQ_STR(cmd.environ[3], "A=D");
	ASSERT_NOT_NULL(cmd.environ[4]);
	ASSERT_EQ_STR(cmd.environ[4], "A=D");
	ASSERT_NOT_NULL(cmd.environ[5]);
	ASSERT_EQ_STR(cmd.environ[5], "A=B=C");
	ASSERT_NOT_NULL(cmd.environ[6]);
	ASSERT_EQ_STR(cmd.environ[6], "X=0");
	ASSERT_IS_NULL(cmd.environ[7]);

	ASSERT_ZERO(libexec_putenvf_prepend(&cmd, "B=F"));
	ASSERT_NOT_NULL(cmd.environ);
	ASSERT_NOT_NULL(cmd.environ[0]);
	ASSERT_EQ_STR(cmd.environ[0], "B=F");
	ASSERT_NOT_NULL(cmd.environ[1]);
	ASSERT_EQ_STR(cmd.environ[1], "BB=F");
	ASSERT_NOT_NULL(cmd.environ[2]);
	ASSERT_EQ_STR(cmd.environ[2], "X");
	ASSERT_NOT_NULL(cmd.environ[3]);
	ASSERT_EQ_STR(cmd.environ[3], "AA=E");
	ASSERT_NOT_NULL(cmd.environ[4]);
	ASSERT_EQ_STR(cmd.environ[4], "A=D");
	ASSERT_NOT_NULL(cmd.environ[5]);
	ASSERT_EQ_STR(cmd.environ[5], "A=D");
	ASSERT_NOT_NULL(cmd.environ[6]);
	ASSERT_EQ_STR(cmd.environ[6], "A=B=C");
	ASSERT_NOT_NULL(cmd.environ[7]);
	ASSERT_EQ_STR(cmd.environ[7], "X=0");
	ASSERT_IS_NULL(cmd.environ[8]);

	libexec_destroy_command(&cmd);
	environ = env;
	return 0;
}


#endif