Blame SOURCES/sasl-mechlist.c

8b8af0
#include <stdio.h>
8b8af0
#include <stdlib.h>
8b8af0
#include <string.h>
8b8af0
#include <unistd.h>
8b8af0
8b8af0
#include "sasl.h"
8b8af0
8b8af0
static int
8b8af0
my_getopt(void *context, const char *plugin_name,
8b8af0
	  const char *option, const char **result, unsigned *len)
8b8af0
{
8b8af0
	if (result) {
8b8af0
		*result = NULL;
8b8af0
#if 0
8b8af0
		fprintf(stderr, "Getopt plugin=%s%s%s/option=%s%s%s -> ",
8b8af0
			plugin_name ? "\"" : "",
8b8af0
			plugin_name ? plugin_name : "(null)",
8b8af0
			plugin_name ? "\"" : "",
8b8af0
			option ? "\"" : "",
8b8af0
			option ? option : "(null)",
8b8af0
			option ? "\"" : "");
8b8af0
		fprintf(stderr, "'%s'.\n", *result ? *result : "");
8b8af0
#endif
8b8af0
	}
8b8af0
	if (len) {
8b8af0
		*len = 0;
8b8af0
	}
8b8af0
	return 0;
8b8af0
}
8b8af0
8b8af0
int
8b8af0
main(int argc, char **argv)
8b8af0
{
8b8af0
	int ret, i;
8b8af0
	const char *mechs, **globals;
8b8af0
	sasl_callback_t callbacks[] = {
8b8af0
		{SASL_CB_GETOPT, my_getopt, NULL},
8b8af0
		{SASL_CB_LIST_END},
8b8af0
	};
8b8af0
	sasl_conn_t *connection;
8b8af0
	char hostname[512];
8b8af0
8b8af0
	if ((argc > 1) && (argv[1][0] == '-')) {
8b8af0
		fprintf(stderr, "Usage: %s [appname [hostname] ]\n", argv[0]);
8b8af0
		return 0;
8b8af0
	}
8b8af0
8b8af0
	ret = sasl_server_init(callbacks, argc > 1 ? argv[1] : "sasl-mechlist");
8b8af0
	if (ret != SASL_OK) {
8b8af0
		fprintf(stderr, "Error in sasl_server_init(): %s\n",
8b8af0
			sasl_errstring(ret, NULL, NULL));
8b8af0
	}
8b8af0
8b8af0
	connection = NULL;
8b8af0
	strcpy(hostname, "localhost");
8b8af0
	gethostname(hostname, sizeof(hostname));
8b8af0
	ret = sasl_server_new(argc > 2 ? argv[2] : "host",
8b8af0
			      hostname,
8b8af0
			      NULL,
8b8af0
			      NULL,
8b8af0
			      NULL,
8b8af0
			      callbacks,
8b8af0
			      0,
8b8af0
			      &connection);
8b8af0
	if (ret != SASL_OK) {
8b8af0
		fprintf(stderr, "Error in sasl_server_new(): %s\n",
8b8af0
			sasl_errstring(ret, NULL, NULL));
8b8af0
	}
8b8af0
8b8af0
	ret = sasl_listmech(connection,
8b8af0
			    getenv("USER") ? getenv("USER") : "root",
8b8af0
			    "Available mechanisms: ",
8b8af0
			    ",",
8b8af0
			    "\n",
8b8af0
			    &mechs,
8b8af0
			    NULL,
8b8af0
			    NULL);
8b8af0
	if (ret != SASL_OK) {
8b8af0
		fprintf(stderr, "Error in sasl_listmechs(): %s\n",
8b8af0
			sasl_errstring(ret, NULL, NULL));
8b8af0
	} else {
8b8af0
		fprintf(stdout, "%s", mechs);
8b8af0
	}
8b8af0
8b8af0
	globals = sasl_global_listmech();
8b8af0
	for (i = 0; (globals != NULL) && (globals[i] != NULL); i++) {
8b8af0
		if (i == 0) {
8b8af0
			fprintf(stdout, "Library supports: ");
8b8af0
		}
8b8af0
		fprintf(stdout, "%s", globals[i]);
8b8af0
		if (globals[i + 1] != NULL) {
8b8af0
			fprintf(stdout, ",");
8b8af0
		} else {
8b8af0
			fprintf(stdout, "\n");
8b8af0
		}
8b8af0
	}
8b8af0
8b8af0
	return 0;
8b8af0
}