/** Various helper functions
 *
 * @author Steffen Vogel <stvogel@eonerc.rwth-aachen.de>
 * @copyright 2014, Institute for Automation of Complex Power Systems, EONERC
 * @file utils.h
 */

#ifndef _UTILS_H_
#define _UTILS_H_

#include <stdlib.h>
#include <stdarg.h>
#include <errno.h>
#include <string.h>

#include <sched.h>

/* Some color escape codes for pretty log messages */
#define RED(str)	"\x1B[31m" str "\x1B[0m"
#define GRN(str)	"\x1B[32m" str "\x1B[0m"
#define YEL(str)	"\x1B[33m" str "\x1B[0m"
#define BLU(str)	"\x1B[34m" str "\x1B[0m"
#define MAG(str)	"\x1B[35m" str "\x1B[0m"
#define CYN(str)	"\x1B[36m" str "\x1B[0m"
#define WHT(str)	"\x1B[37m" str "\x1B[0m"

/** The log level which is passed as first argument to print() */
enum log_level { DEBUG, INFO, WARN, ERROR };

/* Forward declarations */
struct settings;
struct sockaddr_in;
struct sockaddr;

/** Logs variadic messages to stdout.
 *
 * @param lvl The log level
 * @param fmt The format string (printf alike)
 */
void print(enum log_level lvl, const char *fmt, ...);

/** Resolve host/service name by local databases and/or nameservers.
 *
 * @param addr A string containing the hostname/ip and port seperated by a colon
 * @param sa A pointer to the resolved address
 * @param flags Flags for gai
 * @return
 * - 0 on success
 * - otherwise an error occured
 */
int resolve_addr(const char *addr, struct sockaddr_in *sa, int flags);

/** Compare two socket addresses based on their family and address.
 *
 * Only the family and the address is compared.
 * Port numbers etc are ignored.
 *
 * @param a First address
 * @param b Second address
 * @return
 *  - 0 if the addresses are equal
 *  - otherwise they are not equal
 */
int sockaddr_cmp(struct sockaddr *a, struct sockaddr *b);

/** Convert integer into cpu_set_t
 *
 * @param set A cpu bitmask
 * @return The opaque cpu_set_t datatype
 */
cpu_set_t to_cpu_set(int set);

/** Append an element to a single linked list */
#define list_add(list, elm) do { \
		elm->next = list; \
		list = elm; \
	} while (0)

/** Check assertion and exit if failed. */
#define assert(exp) do { \
	if (!(exp)) { \
		print(ERROR, "Assertion failed: '%s' in %s, %s:%d", \
			#exp, __FUNCTION__, __BASE_FILE__, __LINE__); \
		exit(EXIT_FAILURE); \
	} } while (0)

/** Printf alike debug message with level. */
#define debug(lvl, msg, ...) do { \
	if (lvl <= V) \
		print(DEBUG, msg, ##__VA_ARGS__); \
	} while (0)

/** Printf alike info message. */
#define info(msg, ...) do { \
		print(INFO, msg, ##__VA_ARGS__); \
	} while (0)

/** Printf alike warning message. */
#define warn(msg, ...) do { \
		print(WARN, msg, ##__VA_ARGS__); \
	} while (0)

/** Print error and exit. */
#define error(msg, ...) do { \
		print(ERROR, msg, ##__VA_ARGS__); \
		exit(EXIT_FAILURE); \
	} while (0)

/** Print error and strerror(errno). */
#define perror(msg, ...) do { \
		print(ERROR, msg ": %s", ##__VA_ARGS__, \
			strerror(errno)); \
		exit(EXIT_FAILURE); \
	} while (0)

/** Print configuration error and exit. */
#define cerror(c, msg, ...) do { \
		print(ERROR, msg " in %s:%u", ##__VA_ARGS__, \
			config_setting_source_file(c), \
			config_setting_source_line(c)); \
		exit(EXIT_FAILURE); \
	} while (0)

#endif /* _UTILS_H_ */