loudmouth: bindings/ruby/rblm-message.c@95287bd6f233 (annotated)

364 71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	1	#include "rblm.h"
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	2	#include "rblm-private.h"
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	3
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	4	/* How to handle type, sub_type and root node*/
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	5
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	6	VALUE lm_cMessage;
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	7
386 d4549fc19801 Added LmConnection::send to ruby bindings Mikael Hallendal <micke@imendio.com> parents: 385 diff changeset	8	LmMessage *
364 71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	9	rb_lm_message_from_ruby_object (VALUE obj)
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	10	{
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	11	LmMessage *m;
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	12
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	13	if (!rb_lm__is_kind_of (obj, lm_cMessage)) {
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	14	rb_raise (rb_eTypeError, "not a LmMessage");
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	15	}
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	16
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	17	Data_Get_Struct (obj, LmMessage, m);
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	18
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	19	return m;
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	20	}
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	21
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	22	void
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	23	msg_free (LmMessage *m)
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	24	{
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	25	lm_message_unref (m);
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	26	}
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	27
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	28	VALUE
389 95287bd6f233 Added support for add_message_handler to ruby bindings Mikael Hallendal <micke@imendio.com> parents: 386 diff changeset	29	rb_lm_message_to_ruby_object (LmMessage *m)
95287bd6f233 Added support for add_message_handler to ruby bindings Mikael Hallendal <micke@imendio.com> parents: 386 diff changeset	30	{
95287bd6f233 Added support for add_message_handler to ruby bindings Mikael Hallendal <micke@imendio.com> parents: 386 diff changeset	31	if (m) {
95287bd6f233 Added support for add_message_handler to ruby bindings Mikael Hallendal <micke@imendio.com> parents: 386 diff changeset	32	lm_message_ref (m);
95287bd6f233 Added support for add_message_handler to ruby bindings Mikael Hallendal <micke@imendio.com> parents: 386 diff changeset	33	return Data_Wrap_Struct (lm_cMessage, NULL,
95287bd6f233 Added support for add_message_handler to ruby bindings Mikael Hallendal <micke@imendio.com> parents: 386 diff changeset	34	msg_free, m);
95287bd6f233 Added support for add_message_handler to ruby bindings Mikael Hallendal <micke@imendio.com> parents: 386 diff changeset	35	} else {
95287bd6f233 Added support for add_message_handler to ruby bindings Mikael Hallendal <micke@imendio.com> parents: 386 diff changeset	36	return Qnil;
95287bd6f233 Added support for add_message_handler to ruby bindings Mikael Hallendal <micke@imendio.com> parents: 386 diff changeset	37	}
95287bd6f233 Added support for add_message_handler to ruby bindings Mikael Hallendal <micke@imendio.com> parents: 386 diff changeset	38	}
95287bd6f233 Added support for add_message_handler to ruby bindings Mikael Hallendal <micke@imendio.com> parents: 386 diff changeset	39
95287bd6f233 Added support for add_message_handler to ruby bindings Mikael Hallendal <micke@imendio.com> parents: 386 diff changeset	40	VALUE
364 71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	41	msg_allocate (VALUE klass)
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	42	{
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	43	return Data_Wrap_Struct (klass, NULL, msg_free, NULL);
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	44	}
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	45
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	46	VALUE
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	47	msg_initialize (int argc, VALUE *argv, VALUE self)
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	48	{
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	49	LmMessage *m;
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	50	VALUE to, type, sub_type;
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	51	char *to_str = NULL;
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	52
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	53	rb_scan_args (argc, argv, "21", &to, &type, &sub_type);
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	54
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	55	/* To can be nil */
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	56	if (!NIL_P (to)) {
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	57	if (!rb_respond_to (to, rb_intern ("to_s"))) {
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	58	rb_raise (rb_eArgError, "to should respond to to_s");
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	59	} else {
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	60	VALUE str_val = rb_funcall (to, rb_intern ("to_s"), 0);
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	61	to_str = StringValuePtr (str_val);
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	62	}
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	63	}
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	64
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	65	if (NIL_P (sub_type)) {
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	66	/* Without sub_type */
369 a416922c533d Implemented conn_get_state Mikael Hallendal <micke@imendio.com> parents: 364 diff changeset	67	m = lm_message_new (to_str, FIX2INT (type));
364 71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	68	} else {
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	69	m = lm_message_new_with_sub_type (to_str,
369 a416922c533d Implemented conn_get_state Mikael Hallendal <micke@imendio.com> parents: 364 diff changeset	70	FIX2INT (type),
a416922c533d Implemented conn_get_state Mikael Hallendal <micke@imendio.com> parents: 364 diff changeset	71	FIX2INT (sub_type));
364 71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	72	}
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	73
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	74	DATA_PTR (self) = m;
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	75
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	76	return self;
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	77	}
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	78
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	79	VALUE
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	80	msg_get_type (VALUE self)
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	81	{
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	82	LmMessage *m = rb_lm_message_from_ruby_object (self);
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	83
369 a416922c533d Implemented conn_get_state Mikael Hallendal <micke@imendio.com> parents: 364 diff changeset	84	return INT2FIX (lm_message_get_type (m));
364 71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	85	}
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	86
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	87	VALUE
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	88	msg_get_sub_type (VALUE self)
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	89	{
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	90	LmMessage *m = rb_lm_message_from_ruby_object (self);
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	91
369 a416922c533d Implemented conn_get_state Mikael Hallendal <micke@imendio.com> parents: 364 diff changeset	92	return INT2FIX (lm_message_get_sub_type (m));
364 71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	93	}
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	94
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	95	VALUE
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	96	msg_get_root_node (VALUE self)
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	97	{
385 b27d2a2b37a1 Finished off the LmMessage ruby bindings Mikael Hallendal <micke@imendio.com> parents: 369 diff changeset	98	LmMessage *m = rb_lm_message_from_ruby_object (self);
b27d2a2b37a1 Finished off the LmMessage ruby bindings Mikael Hallendal <micke@imendio.com> parents: 369 diff changeset	99
b27d2a2b37a1 Finished off the LmMessage ruby bindings Mikael Hallendal <micke@imendio.com> parents: 369 diff changeset	100	return LMMESSAGENODE2RVAL (m->node);
364 71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	101	}
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	102
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	103	extern void
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	104	Init_lm_message (VALUE lm_mLM)
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	105	{
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	106	lm_cMessage = rb_define_class_under (lm_mLM, "Message", rb_cObject);
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	107
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	108	rb_define_alloc_func (lm_cMessage, msg_allocate);
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	109
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	110	rb_define_method (lm_cMessage, "initialize", msg_initialize, -1);
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	111	rb_define_method (lm_cMessage, "type", msg_get_type, 0);
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	112	rb_define_method (lm_cMessage, "sub_type", msg_get_sub_type, 0);
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	113	rb_define_method (lm_cMessage, "root_node", msg_get_root_node, 0);
386 d4549fc19801 Added LmConnection::send to ruby bindings Mikael Hallendal <micke@imendio.com> parents: 385 diff changeset	114
d4549fc19801 Added LmConnection::send to ruby bindings Mikael Hallendal <micke@imendio.com> parents: 385 diff changeset	115	rb_define_alias (lm_cMessage, "node", "root_node");
364 71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	116	}
71e6639a924d Renamed to the rblm namespace Mikael Hallendal <micke@imendio.com> parents: diff changeset	117

author	Mikael Hallendal <micke@imendio.com>
	Thu, 10 Apr 2008 21:14:27 +0200
changeset 389	95287bd6f233
parent 386	d4549fc19801
permissions	-rw-r--r--