[mirror_ubuntu-artful-kernel.git] / include / linux / genl_magic_func.h

#ifndef GENL_MAGIC_FUNC_H
#define GENL_MAGIC_FUNC_H

#include <linux/genl_magic_struct.h>

/*
 * Magic: declare tla policy						{{{1
 * Magic: declare nested policies
 *									{{{2
 */
#undef GENL_mc_group
#define GENL_mc_group(group)

#undef GENL_notification
#define GENL_notification(op_name, op_num, mcast_group, tla_list)

#undef GENL_op
#define GENL_op(op_name, op_num, handler, tla_list)

#undef GENL_struct
#define GENL_struct(tag_name, tag_number, s_name, s_fields)		\
	[tag_name] = { .type = NLA_NESTED },

static struct nla_policy CONCAT_(GENL_MAGIC_FAMILY, _tla_nl_policy)[] = {
#include GENL_MAGIC_INCLUDE_FILE
};

#undef GENL_struct
#define GENL_struct(tag_name, tag_number, s_name, s_fields)		\
static struct nla_policy s_name ## _nl_policy[] __read_mostly =		\
{ s_fields };

#undef __field
#define __field(attr_nr, attr_flag, name, nla_type, _type, __get,	\
		 __put, __is_signed)					\
	[attr_nr] = { .type = nla_type },

#undef __array
#define __array(attr_nr, attr_flag, name, nla_type, _type, maxlen,	\
		__get, __put, __is_signed)				\
	[attr_nr] = { .type = nla_type,					\
		      .len = maxlen - (nla_type == NLA_NUL_STRING) },

#include GENL_MAGIC_INCLUDE_FILE

#ifndef __KERNEL__
#ifndef pr_info
#define pr_info(args...)	fprintf(stderr, args);
#endif
#endif

#ifdef GENL_MAGIC_DEBUG
static void dprint_field(const char *dir, int nla_type,
		const char *name, void *valp)
{
	__u64 val = valp ? *(__u32 *)valp : 1;
	switch (nla_type) {
	case NLA_U8:  val = (__u8)val;
	case NLA_U16: val = (__u16)val;
	case NLA_U32: val = (__u32)val;
		pr_info("%s attr %s: %d 0x%08x\n", dir,
			name, (int)val, (unsigned)val);
		break;
	case NLA_U64:
		val = *(__u64*)valp;
		pr_info("%s attr %s: %lld 0x%08llx\n", dir,
			name, (long long)val, (unsigned long long)val);
		break;
	case NLA_FLAG:
		if (val)
			pr_info("%s attr %s: set\n", dir, name);
		break;
	}
}

static void dprint_array(const char *dir, int nla_type,
		const char *name, const char *val, unsigned len)
{
	switch (nla_type) {
	case NLA_NUL_STRING:
		if (len && val[len-1] == '\0')
			len--;
		pr_info("%s attr %s: [len:%u] '%s'\n", dir, name, len, val);
		break;
	default:
		/* we can always show 4 byte,
		 * thats what nlattr are aligned to. */
		pr_info("%s attr %s: [len:%u] %02x%02x%02x%02x ...\n",
			dir, name, len, val[0], val[1], val[2], val[3]);
	}
}

#define DPRINT_TLA(a, op, b) pr_info("%s %s %s\n", a, op, b);

/* Name is a member field name of the struct s.
 * If s is NULL (only parsing, no copy requested in *_from_attrs()),
 * nla is supposed to point to the attribute containing the information
 * corresponding to that struct member. */
#define DPRINT_FIELD(dir, nla_type, name, s, nla)			\
	do {								\
		if (s)							\
			dprint_field(dir, nla_type, #name, &s->name);	\
		else if (nla)						\
			dprint_field(dir, nla_type, #name,		\
				(nla_type == NLA_FLAG) ? NULL		\
						: nla_data(nla));	\
	} while (0)

#define	DPRINT_ARRAY(dir, nla_type, name, s, nla)			\
	do {								\
		if (s)							\
			dprint_array(dir, nla_type, #name,		\
					s->name, s->name ## _len);	\
		else if (nla)						\
			dprint_array(dir, nla_type, #name,		\
					nla_data(nla), nla_len(nla));	\
	} while (0)
#else
#define DPRINT_TLA(a, op, b) do {} while (0)
#define DPRINT_FIELD(dir, nla_type, name, s, nla) do {} while (0)
#define	DPRINT_ARRAY(dir, nla_type, name, s, nla) do {} while (0)
#endif

/*
 * Magic: provide conversion functions					{{{1
 * populate struct from attribute table:
 *									{{{2
 */

/* processing of generic netlink messages is serialized.
 * use one static buffer for parsing of nested attributes */
static struct nlattr *nested_attr_tb[128];

#ifndef BUILD_BUG_ON
/* Force a compilation error if condition is true */
#define BUILD_BUG_ON(condition) ((void)BUILD_BUG_ON_ZERO(condition))
/* Force a compilation error if condition is true, but also produce a
   result (of value 0 and type size_t), so the expression can be used
   e.g. in a structure initializer (or where-ever else comma expressions
   aren't permitted). */
#define BUILD_BUG_ON_ZERO(e) (sizeof(struct { int:-!!(e); }))
#define BUILD_BUG_ON_NULL(e) ((void *)sizeof(struct { int:-!!(e); }))
#endif

#undef GENL_struct
#define GENL_struct(tag_name, tag_number, s_name, s_fields)		\
/* *_from_attrs functions are static, but potentially unused */		\
static int __ ## s_name ## _from_attrs(struct s_name *s,		\
		struct genl_info *info, bool exclude_invariants)	\
{									\
	const int maxtype = ARRAY_SIZE(s_name ## _nl_policy)-1;		\
	struct nlattr *tla = info->attrs[tag_number];			\
	struct nlattr **ntb = nested_attr_tb;				\
	struct nlattr *nla;						\
	int err;							\
	BUILD_BUG_ON(ARRAY_SIZE(s_name ## _nl_policy) > ARRAY_SIZE(nested_attr_tb));	\
	if (!tla)							\
		return -ENOMSG;						\
	DPRINT_TLA(#s_name, "<=-", #tag_name);				\
	err = drbd_nla_parse_nested(ntb, maxtype, tla, s_name ## _nl_policy);	\
	if (err)							\
		return err;						\
									\
	s_fields							\
	return 0;							\
}					__attribute__((unused))		\
static int s_name ## _from_attrs(struct s_name *s,			\
						struct genl_info *info)	\
{									\
	return __ ## s_name ## _from_attrs(s, info, false);		\
}					__attribute__((unused))		\
static int s_name ## _from_attrs_for_change(struct s_name *s,		\
						struct genl_info *info)	\
{									\
	return __ ## s_name ## _from_attrs(s, info, true);		\
}					__attribute__((unused))		\

#define __assign(attr_nr, attr_flag, name, nla_type, type, assignment...)	\
		nla = ntb[attr_nr];						\
		if (nla) {						\
			if (exclude_invariants && !!((attr_flag) & DRBD_F_INVARIANT)) {		\
				pr_info("<< must not change invariant attr: %s\n", #name);	\
				return -EEXIST;				\
			}						\
			assignment;					\
		} else if (exclude_invariants && !!((attr_flag) & DRBD_F_INVARIANT)) {		\
			/* attribute missing from payload, */		\
			/* which was expected */			\
		} else if ((attr_flag) & DRBD_F_REQUIRED) {		\
			pr_info("<< missing attr: %s\n", #name);	\
			return -ENOMSG;					\
		}

#undef __field
#define __field(attr_nr, attr_flag, name, nla_type, type, __get, __put,	\
		__is_signed)						\
	__assign(attr_nr, attr_flag, name, nla_type, type,		\
			if (s)						\
				s->name = __get(nla);			\
			DPRINT_FIELD("<<", nla_type, name, s, nla))

/* validate_nla() already checked nla_len <= maxlen appropriately. */
#undef __array
#define __array(attr_nr, attr_flag, name, nla_type, type, maxlen,	\
		__get, __put, __is_signed)				\
	__assign(attr_nr, attr_flag, name, nla_type, type,		\
			if (s)						\
				s->name ## _len =			\
					__get(s->name, nla, maxlen);	\
			DPRINT_ARRAY("<<", nla_type, name, s, nla))

#include GENL_MAGIC_INCLUDE_FILE

#undef GENL_struct
#define GENL_struct(tag_name, tag_number, s_name, s_fields)

/*
 * Magic: define op number to op name mapping				{{{1
 *									{{{2
 */
const char *CONCAT_(GENL_MAGIC_FAMILY, _genl_cmd_to_str)(__u8 cmd)
{
	switch (cmd) {
#undef GENL_op
#define GENL_op(op_name, op_num, handler, tla_list)		\
	case op_num: return #op_name;
#include GENL_MAGIC_INCLUDE_FILE
	default:
		     return "unknown";
	}
}

#ifdef __KERNEL__
#include <linux/stringify.h>
/*
 * Magic: define genl_ops						{{{1
 *									{{{2
 */

#undef GENL_op
#define GENL_op(op_name, op_num, handler, tla_list)		\
{								\
	handler							\
	.cmd = op_name,						\
	.policy	= CONCAT_(GENL_MAGIC_FAMILY, _tla_nl_policy),	\
},

#define ZZZ_genl_ops		CONCAT_(GENL_MAGIC_FAMILY, _genl_ops)
static struct genl_ops ZZZ_genl_ops[] __read_mostly = {
#include GENL_MAGIC_INCLUDE_FILE
};

#undef GENL_op
#define GENL_op(op_name, op_num, handler, tla_list)

/*
 * Define the genl_family, multicast groups,				{{{1
 * and provide register/unregister functions.
 *									{{{2
 */
#define ZZZ_genl_family		CONCAT_(GENL_MAGIC_FAMILY, _genl_family)
static struct genl_family ZZZ_genl_family;
/*
 * Magic: define multicast groups
 * Magic: define multicast group registration helper
 */
#define ZZZ_genl_mcgrps		CONCAT_(GENL_MAGIC_FAMILY, _genl_mcgrps)
static const struct genl_multicast_group ZZZ_genl_mcgrps[] = {
#undef GENL_mc_group
#define GENL_mc_group(group) { .name = #group, },
#include GENL_MAGIC_INCLUDE_FILE
};

enum CONCAT_(GENL_MAGIC_FAMILY, group_ids) {
#undef GENL_mc_group
#define GENL_mc_group(group) CONCAT_(GENL_MAGIC_FAMILY, _group_ ## group),
#include GENL_MAGIC_INCLUDE_FILE
};

#undef GENL_mc_group
#define GENL_mc_group(group)						\
static int CONCAT_(GENL_MAGIC_FAMILY, _genl_multicast_ ## group)(	\
	struct sk_buff *skb, gfp_t flags)				\
{									\
	unsigned int group_id =						\
		CONCAT_(GENL_MAGIC_FAMILY, _group_ ## group);		\
	return genlmsg_multicast(&ZZZ_genl_family, skb, 0,		\
				 group_id, flags);			\
}

#include GENL_MAGIC_INCLUDE_FILE

#undef GENL_mc_group
#define GENL_mc_group(group)

static struct genl_family ZZZ_genl_family __ro_after_init = {
	.name = __stringify(GENL_MAGIC_FAMILY),
	.version = GENL_MAGIC_VERSION,
#ifdef GENL_MAGIC_FAMILY_HDRSZ
	.hdrsize = NLA_ALIGN(GENL_MAGIC_FAMILY_HDRSZ),
#endif
	.maxattr = ARRAY_SIZE(drbd_tla_nl_policy)-1,
	.ops = ZZZ_genl_ops,
	.n_ops = ARRAY_SIZE(ZZZ_genl_ops),
	.mcgrps = ZZZ_genl_mcgrps,
	.n_mcgrps = ARRAY_SIZE(ZZZ_genl_mcgrps),
	.module = THIS_MODULE,
};

int CONCAT_(GENL_MAGIC_FAMILY, _genl_register)(void)
{
	return genl_register_family(&ZZZ_genl_family);
}

void CONCAT_(GENL_MAGIC_FAMILY, _genl_unregister)(void)
{
	genl_unregister_family(&ZZZ_genl_family);
}

/*
 * Magic: provide conversion functions					{{{1
 * populate skb from struct.
 *									{{{2
 */

#undef GENL_op
#define GENL_op(op_name, op_num, handler, tla_list)

#undef GENL_struct
#define GENL_struct(tag_name, tag_number, s_name, s_fields)		\
static int s_name ## _to_skb(struct sk_buff *skb, struct s_name *s,	\
		const bool exclude_sensitive)				\
{									\
	struct nlattr *tla = nla_nest_start(skb, tag_number);		\
	if (!tla)							\
		goto nla_put_failure;					\
	DPRINT_TLA(#s_name, "-=>", #tag_name);				\
	s_fields							\
	nla_nest_end(skb, tla);						\
	return 0;							\
									\
nla_put_failure:							\
	if (tla)							\
		nla_nest_cancel(skb, tla);				\
        return -EMSGSIZE;						\
}									\
static inline int s_name ## _to_priv_skb(struct sk_buff *skb,		\
		struct s_name *s)					\
{									\
	return s_name ## _to_skb(skb, s, 0);				\
}									\
static inline int s_name ## _to_unpriv_skb(struct sk_buff *skb,		\
		struct s_name *s)					\
{									\
	return s_name ## _to_skb(skb, s, 1);				\
}


#undef __field
#define __field(attr_nr, attr_flag, name, nla_type, type, __get, __put,	\
		__is_signed)						\
	if (!exclude_sensitive || !((attr_flag) & DRBD_F_SENSITIVE)) {	\
		DPRINT_FIELD(">>", nla_type, name, s, NULL);		\
		if (__put(skb, attr_nr, s->name))			\
			goto nla_put_failure;				\
	}

#undef __array
#define __array(attr_nr, attr_flag, name, nla_type, type, maxlen,	\
		__get, __put, __is_signed)				\
	if (!exclude_sensitive || !((attr_flag) & DRBD_F_SENSITIVE)) {	\
		DPRINT_ARRAY(">>",nla_type, name, s, NULL);		\
		if (__put(skb, attr_nr, min_t(int, maxlen,		\
			s->name ## _len + (nla_type == NLA_NUL_STRING)),\
						s->name))		\
			goto nla_put_failure;				\
	}

#include GENL_MAGIC_INCLUDE_FILE


/* Functions for initializing structs to default values.  */

#undef __field
#define __field(attr_nr, attr_flag, name, nla_type, type, __get, __put,	\
		__is_signed)
#undef __array
#define __array(attr_nr, attr_flag, name, nla_type, type, maxlen,	\
		__get, __put, __is_signed)
#undef __u32_field_def
#define __u32_field_def(attr_nr, attr_flag, name, default)		\
	x->name = default;
#undef __s32_field_def
#define __s32_field_def(attr_nr, attr_flag, name, default)		\
	x->name = default;
#undef __flg_field_def
#define __flg_field_def(attr_nr, attr_flag, name, default)		\
	x->name = default;
#undef __str_field_def
#define __str_field_def(attr_nr, attr_flag, name, maxlen)		\
	memset(x->name, 0, sizeof(x->name));				\
	x->name ## _len = 0;
#undef GENL_struct
#define GENL_struct(tag_name, tag_number, s_name, s_fields)		\
static void set_ ## s_name ## _defaults(struct s_name *x) __attribute__((unused)); \
static void set_ ## s_name ## _defaults(struct s_name *x) {	\
s_fields								\
}

#include GENL_MAGIC_INCLUDE_FILE

#endif /* __KERNEL__ */

/* }}}1 */
#endif /* GENL_MAGIC_FUNC_H */
/* vim: set foldmethod=marker foldlevel=1 nofoldenable : */
Commit	Line	Data
ec2c35ac LE	1	#ifndef GENL_MAGIC_FUNC_H
	2	#define GENL_MAGIC_FUNC_H
	3
	4	#include <linux/genl_magic_struct.h>
	5
ec2c35ac LE	6	/*
	7	* Magic: declare tla policy {{{1
	8	* Magic: declare nested policies
	9	* {{{2
	10	*/
	11	#undef GENL_mc_group
	12	#define GENL_mc_group(group)
	13
	14	#undef GENL_notification
	15	#define GENL_notification(op_name, op_num, mcast_group, tla_list)
	16
	17	#undef GENL_op
	18	#define GENL_op(op_name, op_num, handler, tla_list)
	19
	20	#undef GENL_struct
	21	#define GENL_struct(tag_name, tag_number, s_name, s_fields) \
	22	[tag_name] = { .type = NLA_NESTED },
	23
	24	static struct nla_policy CONCAT_(GENL_MAGIC_FAMILY, _tla_nl_policy)[] = {
	25	#include GENL_MAGIC_INCLUDE_FILE
	26	};
	27
	28	#undef GENL_struct
	29	#define GENL_struct(tag_name, tag_number, s_name, s_fields) \
	30	static struct nla_policy s_name ## _nl_policy[] __read_mostly = \
	31	{ s_fields };
	32
	33	#undef __field
509100e6 AG	34	#define __field(attr_nr, attr_flag, name, nla_type, _type, __get, \
509100e6 AG	35	__put, __is_signed) \
5f935920	36	[attr_nr] = { .type = nla_type },
ec2c35ac LE	37
	38	#undef __array
	39	#define __array(attr_nr, attr_flag, name, nla_type, _type, maxlen, \
509100e6	40	__get, __put, __is_signed) \
5f935920 AG	41	[attr_nr] = { .type = nla_type, \
5f935920 AG	42	.len = maxlen - (nla_type == NLA_NUL_STRING) },
ec2c35ac LE	43
	44	#include GENL_MAGIC_INCLUDE_FILE
	45
	46	#ifndef __KERNEL__
	47	#ifndef pr_info
	48	#define pr_info(args...) fprintf(stderr, args);
	49	#endif
	50	#endif
	51
3b98c0c2	52	#ifdef GENL_MAGIC_DEBUG
ec2c35ac LE	53	static void dprint_field(const char *dir, int nla_type,
	54	const char name, void valp)
	55	{
	56	__u64 val = valp ? (__u32 )valp : 1;
	57	switch (nla_type) {
	58	case NLA_U8: val = (__u8)val;
	59	case NLA_U16: val = (__u16)val;
	60	case NLA_U32: val = (__u32)val;
	61	pr_info("%s attr %s: %d 0x%08x\n", dir,
	62	name, (int)val, (unsigned)val);
	63	break;
	64	case NLA_U64:
	65	val = (__u64)valp;
	66	pr_info("%s attr %s: %lld 0x%08llx\n", dir,
	67	name, (long long)val, (unsigned long long)val);
	68	break;
	69	case NLA_FLAG:
	70	if (val)
	71	pr_info("%s attr %s: set\n", dir, name);
	72	break;
	73	}
	74	}
	75
	76	static void dprint_array(const char *dir, int nla_type,
	77	const char name, const char val, unsigned len)
	78	{
	79	switch (nla_type) {
	80	case NLA_NUL_STRING:
	81	if (len && val[len-1] == '\0')
	82	len--;
	83	pr_info("%s attr %s: [len:%u] '%s'\n", dir, name, len, val);
	84	break;
	85	default:
	86	/* we can always show 4 byte,
	87	* thats what nlattr are aligned to. */
	88	pr_info("%s attr %s: [len:%u] %02x%02x%02x%02x ...\n",
	89	dir, name, len, val[0], val[1], val[2], val[3]);
	90	}
	91	}
	92
	93	#define DPRINT_TLA(a, op, b) pr_info("%s %s %s\n", a, op, b);
	94
	95	/* Name is a member field name of the struct s.
	96	* If s is NULL (only parsing, no copy requested in *_from_attrs()),
	97	* nla is supposed to point to the attribute containing the information
	98	* corresponding to that struct member. */
	99	#define DPRINT_FIELD(dir, nla_type, name, s, nla) \
	100	do { \
	101	if (s) \
	102	dprint_field(dir, nla_type, #name, &s->name); \
	103	else if (nla) \
	104	dprint_field(dir, nla_type, #name, \
	105	(nla_type == NLA_FLAG) ? NULL \
	106	: nla_data(nla)); \
	107	} while (0)
	108
	109	#define DPRINT_ARRAY(dir, nla_type, name, s, nla) \
	110	do { \
	111	if (s) \
	112	dprint_array(dir, nla_type, #name, \
	113	s->name, s->name ## _len); \
	114	else if (nla) \
	115	dprint_array(dir, nla_type, #name, \
	116	nla_data(nla), nla_len(nla)); \
117	} while (0)
118	#else
119	#define DPRINT_TLA(a, op, b) do {} while (0)
120	#define DPRINT_FIELD(dir, nla_type, name, s, nla) do {} while (0)
121	#define DPRINT_ARRAY(dir, nla_type, name, s, nla) do {} while (0)
122	#endif
123
124	/*
125	* Magic: provide conversion functions {{{1
126	* populate struct from attribute table:
127	* {{{2
128	*/
129
130	/* processing of generic netlink messages is serialized.
131	* use one static buffer for parsing of nested attributes */
132	static struct nlattr *nested_attr_tb[128];
133
134	#ifndef BUILD_BUG_ON
135	/* Force a compilation error if condition is true */
136	#define BUILD_BUG_ON(condition) ((void)BUILD_BUG_ON_ZERO(condition))
137	/* Force a compilation error if condition is true, but also produce a
138	result (of value 0 and type size_t), so the expression can be used
139	e.g. in a structure initializer (or where-ever else comma expressions
140	aren't permitted). */
141	#define BUILD_BUG_ON_ZERO(e) (sizeof(struct { int:-!!(e); }))
142	#define BUILD_BUG_ON_NULL(e) ((void *)sizeof(struct { int:-!!(e); }))
143	#endif
144
145	#undef GENL_struct
146	#define GENL_struct(tag_name, tag_number, s_name, s_fields) \
f399002e LE	147	/* _from_attrs functions are static, but potentially unused / \
	148	static int __ ## s_name ## _from_attrs(struct s_name *s, \
	149	struct genl_info *info, bool exclude_invariants) \
ec2c35ac LE	150	{ \
ec2c35ac LE	151	const int maxtype = ARRAY_SIZE(s_name ## _nl_policy)-1; \
f399002e	152	struct nlattr *tla = info->attrs[tag_number]; \
ec2c35ac LE	153	struct nlattr **ntb = nested_attr_tb; \
	154	struct nlattr *nla; \
	155	int err; \
	156	BUILD_BUG_ON(ARRAY_SIZE(s_name ## _nl_policy) > ARRAY_SIZE(nested_attr_tb)); \
	157	if (!tla) \
	158	return -ENOMSG; \
	159	DPRINT_TLA(#s_name, "<=-", #tag_name); \
5f935920	160	err = drbd_nla_parse_nested(ntb, maxtype, tla, s_name ## _nl_policy); \
ec2c35ac LE	161	if (err) \
ec2c35ac LE	162	return err; \
ec2c35ac LE	163	\
	164	s_fields \
	165	return 0; \
f399002e LE	166	} __attribute__((unused)) \
	167	static int s_name ## _from_attrs(struct s_name *s, \
	168	struct genl_info *info) \
	169	{ \
	170	return __ ## s_name ## _from_attrs(s, info, false); \
	171	} __attribute__((unused)) \
	172	static int s_name ## _from_attrs_for_change(struct s_name *s, \
	173	struct genl_info *info) \
	174	{ \
	175	return __ ## s_name ## _from_attrs(s, info, true); \
	176	} __attribute__((unused)) \
ec2c35ac	177
f399002e	178	#define __assign(attr_nr, attr_flag, name, nla_type, type, assignment...) \
5f935920	179	nla = ntb[attr_nr]; \
ec2c35ac	180	if (nla) { \
db404b13	181	if (exclude_invariants && !!((attr_flag) & DRBD_F_INVARIANT)) { \
f399002e LE	182	pr_info("<< must not change invariant attr: %s\n", #name); \
	183	return -EEXIST; \
	184	} \
	185	assignment; \
db404b13	186	} else if (exclude_invariants && !!((attr_flag) & DRBD_F_INVARIANT)) { \
f399002e LE	187	/* attribute missing from payload, */ \
f399002e LE	188	/* which was expected */ \
5f935920	189	} else if ((attr_flag) & DRBD_F_REQUIRED) { \
ec2c35ac LE	190	pr_info("<< missing attr: %s\n", #name); \
	191	return -ENOMSG; \
	192	}
	193
f399002e	194	#undef __field
509100e6 AG	195	#define __field(attr_nr, attr_flag, name, nla_type, type, __get, __put, \
509100e6 AG	196	__is_signed) \
f399002e LE	197	__assign(attr_nr, attr_flag, name, nla_type, type, \
	198	if (s) \
	199	s->name = __get(nla); \
	200	DPRINT_FIELD("<<", nla_type, name, s, nla))
	201
ec2c35ac LE	202	/* validate_nla() already checked nla_len <= maxlen appropriately. */
ec2c35ac LE	203	#undef __array
509100e6 AG	204	#define __array(attr_nr, attr_flag, name, nla_type, type, maxlen, \
509100e6 AG	205	__get, __put, __is_signed) \
f399002e	206	__assign(attr_nr, attr_flag, name, nla_type, type, \
ec2c35ac LE	207	if (s) \
	208	s->name ## _len = \
	209	__get(s->name, nla, maxlen); \
f399002e	210	DPRINT_ARRAY("<<", nla_type, name, s, nla))
ec2c35ac LE	211
	212	#include GENL_MAGIC_INCLUDE_FILE
	213
	214	#undef GENL_struct
	215	#define GENL_struct(tag_name, tag_number, s_name, s_fields)
	216
	217	/*
	218	* Magic: define op number to op name mapping {{{1
	219	* {{{2
	220	*/
	221	const char *CONCAT_(GENL_MAGIC_FAMILY, _genl_cmd_to_str)(__u8 cmd)
	222	{
	223	switch (cmd) {
	224	#undef GENL_op
	225	#define GENL_op(op_name, op_num, handler, tla_list) \
	226	case op_num: return #op_name;
	227	#include GENL_MAGIC_INCLUDE_FILE
	228	default:
	229	return "unknown";
	230	}
	231	}
	232
	233	#ifdef __KERNEL__
	234	#include <linux/stringify.h>
	235	/*
	236	* Magic: define genl_ops {{{1
	237	* {{{2
	238	*/
	239
	240	#undef GENL_op
	241	#define GENL_op(op_name, op_num, handler, tla_list) \
	242	{ \
	243	handler \
	244	.cmd = op_name, \
	245	.policy = CONCAT_(GENL_MAGIC_FAMILY, _tla_nl_policy), \
	246	},
	247
	248	#define ZZZ_genl_ops CONCAT_(GENL_MAGIC_FAMILY, _genl_ops)
	249	static struct genl_ops ZZZ_genl_ops[] __read_mostly = {
	250	#include GENL_MAGIC_INCLUDE_FILE
	251	};
	252
	253	#undef GENL_op
	254	#define GENL_op(op_name, op_num, handler, tla_list)
	255
	256	/*
	257	* Define the genl_family, multicast groups, {{{1
	258	* and provide register/unregister functions.
	259	* {{{2
	260	*/
	261	#define ZZZ_genl_family CONCAT_(GENL_MAGIC_FAMILY, _genl_family)
489111e5	262	static struct genl_family ZZZ_genl_family;
ec2c35ac LE	263	/*
	264	* Magic: define multicast groups
	265	* Magic: define multicast group registration helper
	266	*/
2a94fe48 JB	267	#define ZZZ_genl_mcgrps CONCAT_(GENL_MAGIC_FAMILY, _genl_mcgrps)
	268	static const struct genl_multicast_group ZZZ_genl_mcgrps[] = {
	269	#undef GENL_mc_group
	270	#define GENL_mc_group(group) { .name = #group, },
	271	#include GENL_MAGIC_INCLUDE_FILE
	272	};
	273
	274	enum CONCAT_(GENL_MAGIC_FAMILY, group_ids) {
	275	#undef GENL_mc_group
	276	#define GENL_mc_group(group) CONCAT_(GENL_MAGIC_FAMILY, _group_ ## group),
	277	#include GENL_MAGIC_INCLUDE_FILE
	278	};
	279
ec2c35ac LE	280	#undef GENL_mc_group
ec2c35ac LE	281	#define GENL_mc_group(group) \
ec2c35ac LE	282	static int CONCAT_(GENL_MAGIC_FAMILY, _genl_multicast_ ## group)( \
	283	struct sk_buff *skb, gfp_t flags) \
	284	{ \
	285	unsigned int group_id = \
2a94fe48	286	CONCAT_(GENL_MAGIC_FAMILY, _group_ ## group); \
68eb5503 JB	287	return genlmsg_multicast(&ZZZ_genl_family, skb, 0, \
68eb5503 JB	288	group_id, flags); \
ec2c35ac LE	289	}
	290
	291	#include GENL_MAGIC_INCLUDE_FILE
	292
ec2c35ac LE	293	#undef GENL_mc_group
ec2c35ac LE	294	#define GENL_mc_group(group)
2a94fe48	295
56989f6d	296	static struct genl_family ZZZ_genl_family __ro_after_init = {
489111e5 JB	297	.name = __stringify(GENL_MAGIC_FAMILY),
	298	.version = GENL_MAGIC_VERSION,
	299	#ifdef GENL_MAGIC_FAMILY_HDRSZ
	300	.hdrsize = NLA_ALIGN(GENL_MAGIC_FAMILY_HDRSZ),
	301	#endif
	302	.maxattr = ARRAY_SIZE(drbd_tla_nl_policy)-1,
	303	.ops = ZZZ_genl_ops,
	304	.n_ops = ARRAY_SIZE(ZZZ_genl_ops),
	305	.mcgrps = ZZZ_genl_mcgrps,
	306	.n_mcgrps = ARRAY_SIZE(ZZZ_genl_mcgrps),
	307	.module = THIS_MODULE,
	308	};
	309
2a94fe48 JB	310	int CONCAT_(GENL_MAGIC_FAMILY, _genl_register)(void)
2a94fe48 JB	311	{
489111e5	312	return genl_register_family(&ZZZ_genl_family);
ec2c35ac LE	313	}
	314
	315	void CONCAT_(GENL_MAGIC_FAMILY, _genl_unregister)(void)
	316	{
	317	genl_unregister_family(&ZZZ_genl_family);
	318	}
	319
	320	/*
	321	* Magic: provide conversion functions {{{1
	322	* populate skb from struct.
	323	* {{{2
	324	*/
	325
	326	#undef GENL_op
	327	#define GENL_op(op_name, op_num, handler, tla_list)
	328
	329	#undef GENL_struct
	330	#define GENL_struct(tag_name, tag_number, s_name, s_fields) \
	331	static int s_name ## _to_skb(struct sk_buff skb, struct s_name s, \
	332	const bool exclude_sensitive) \
	333	{ \
	334	struct nlattr *tla = nla_nest_start(skb, tag_number); \
	335	if (!tla) \
	336	goto nla_put_failure; \
	337	DPRINT_TLA(#s_name, "-=>", #tag_name); \
	338	s_fields \
	339	nla_nest_end(skb, tla); \
	340	return 0; \
	341	\
	342	nla_put_failure: \
	343	if (tla) \
	344	nla_nest_cancel(skb, tla); \
	345	return -EMSGSIZE; \
	346	} \
	347	static inline int s_name ## _to_priv_skb(struct sk_buff *skb, \
	348	struct s_name *s) \
	349	{ \
	350	return s_name ## _to_skb(skb, s, 0); \
	351	} \
	352	static inline int s_name ## _to_unpriv_skb(struct sk_buff *skb, \
	353	struct s_name *s) \
	354	{ \
	355	return s_name ## _to_skb(skb, s, 1); \
	356	}
	357
	358
	359	#undef __field
509100e6 AG	360	#define __field(attr_nr, attr_flag, name, nla_type, type, __get, __put, \
509100e6 AG	361	__is_signed) \
5f935920	362	if (!exclude_sensitive \|\| !((attr_flag) & DRBD_F_SENSITIVE)) { \
ec2c35ac	363	DPRINT_FIELD(">>", nla_type, name, s, NULL); \
26ec9287 AG	364	if (__put(skb, attr_nr, s->name)) \
26ec9287 AG	365	goto nla_put_failure; \
ec2c35ac LE	366	}
	367
	368	#undef __array
509100e6 AG	369	#define __array(attr_nr, attr_flag, name, nla_type, type, maxlen, \
509100e6 AG	370	__get, __put, __is_signed) \
5f935920	371	if (!exclude_sensitive \|\| !((attr_flag) & DRBD_F_SENSITIVE)) { \
ec2c35ac	372	DPRINT_ARRAY(">>",nla_type, name, s, NULL); \
26ec9287	373	if (__put(skb, attr_nr, min_t(int, maxlen, \
ec2c35ac	374	s->name ## _len + (nla_type == NLA_NUL_STRING)),\
26ec9287 AG	375	s->name)) \
26ec9287 AG	376	goto nla_put_failure; \
ec2c35ac LE	377	}
	378
	379	#include GENL_MAGIC_INCLUDE_FILE
	380
b966b5dd AG	381
	382	/* Functions for initializing structs to default values. */
	383
	384	#undef __field
509100e6 AG	385	#define __field(attr_nr, attr_flag, name, nla_type, type, __get, __put, \
509100e6 AG	386	__is_signed)
b966b5dd	387	#undef __array
509100e6 AG	388	#define __array(attr_nr, attr_flag, name, nla_type, type, maxlen, \
509100e6 AG	389	__get, __put, __is_signed)
b966b5dd AG	390	#undef __u32_field_def
	391	#define __u32_field_def(attr_nr, attr_flag, name, default) \
	392	x->name = default;
3a45abd5 AG	393	#undef __s32_field_def
	394	#define __s32_field_def(attr_nr, attr_flag, name, default) \
	395	x->name = default;
b966b5dd AG	396	#undef __flg_field_def
	397	#define __flg_field_def(attr_nr, attr_flag, name, default) \
	398	x->name = default;
	399	#undef __str_field_def
	400	#define __str_field_def(attr_nr, attr_flag, name, maxlen) \
	401	memset(x->name, 0, sizeof(x->name)); \
	402	x->name ## _len = 0;
	403	#undef GENL_struct
	404	#define GENL_struct(tag_name, tag_number, s_name, s_fields) \
	405	static void set_ ## s_name ## _defaults(struct s_name *x) __attribute__((unused)); \
	406	static void set_ ## s_name ## _defaults(struct s_name *x) { \
	407	s_fields \
	408	}
	409
	410	#include GENL_MAGIC_INCLUDE_FILE
	411
ec2c35ac LE	412	#endif /* __KERNEL__ */
	413
	414	/* }}}1 */
	415	#endif /* GENL_MAGIC_FUNC_H */
	416	/* vim: set foldmethod=marker foldlevel=1 nofoldenable : */