#define _UNIVENTION_LDAP_MACHINE_SECRET_LEN_MAX 60

int univention_ldap_set_machine_connection( univention_ldap_parameters_t *lp )

{

	FILE *secret;

	size_t len;

	asprintf(&lp->binddn, univention_config_get_string("ldap/hostdn"));

	if (!lp->binddn) {

		goto err;

	}

	secret = fopen("/etc/machine.secret", "r" );

	if (!secret)

		goto err1;

	lp->bindpw = calloc(_UNIVENTION_LDAP_MACHINE_SECRET_LEN_MAX, sizeof(char));

	if (!lp->bindpw) {

		fclose(secret);

		goto err1;

	}

	len = fread(lp->bindpw, _UNIVENTION_LDAP_MACHINE_SECRET_LEN_MAX, sizeof(char), secret);

	if (ferror(secret))

		len = -1;

	fclose(secret);

	for (; len >= 0; len--) {

		switch (lp->bindpw[len]) {

			case '\r':

			case '\n':

				lp->bindpw[len] = '\0';

			case '\0':

				continue;

			default:

				return 0;

		}

	}

	/* password already cleared memory. */

	if (lp->bindpw != NULL) {

		free(lp->bindpw);

		lp->bindpw = NULL;

	}

err1:

	if (lp->binddn != NULL) {

		free(lp->binddn);

		lp->binddn = NULL;

	}

err:

	return 1;

}