bindings/ruby/rlm-connection.c
author Mikael Hallendal <micke@imendio.com>
Tue, 08 Apr 2008 18:07:06 +0200
changeset 350 de2e3f3631c9
child 352 5e3371477a70
permissions -rw-r--r--
initial code for ruby bindings
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
350
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
     1
#include "rloudmouth.h"
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
     2
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
     3
void
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
     4
conn_mark (LmConnection *self)
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
     5
{
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
     6
}
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
     7
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
     8
void
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
     9
conn_free (LmConnection *self)
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    10
{
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    11
	lm_connection_unref (self);
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    12
}
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    13
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    14
VALUE
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    15
conn_allocate(VALUE klass)
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    16
{
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    17
	LmConnection *conn = lm_connection_new (NULL);
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    18
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    19
	return Data_Wrap_Struct (klass, conn_mark, conn_free, conn);
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    20
}
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    21
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    22
VALUE
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    23
conn_initialize(VALUE self, VALUE server)
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    24
{
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    25
	LmConnection *conn;
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    26
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    27
	Data_Get_Struct (self, LmConnection, conn);
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    28
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    29
	if (!rb_respond_to (server, rb_intern ("to_s"))) {
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    30
		rb_raise (rb_eArgError, "server should respond to to_s");
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    31
	} else {
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    32
		VALUE str_val = rb_funcall (server, rb_intern ("to_s"), 0);
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    33
		lm_connection_set_server (conn, StringValuePtr (str_val));
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    34
	}
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    35
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    36
	return self;
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    37
}
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    38
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    39
VALUE
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    40
conn_open (VALUE block)
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    41
{
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    42
	return Qtrue;
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    43
}
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    44
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    45
void
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    46
Init_lm_connection (VALUE lm_mLM)
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    47
{
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    48
	VALUE lm_mConnection;
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    49
	
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    50
	lm_mConnection = rb_define_class_under (lm_mLM, "Connection", 
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    51
						rb_cObject);
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    52
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    53
	rb_define_alloc_func (lm_mConnection, conn_allocate);
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    54
	rb_define_method (lm_mConnection, "initialize", conn_initialize, 1);
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    55
	rb_define_method (lm_mConnection, "open", conn_open, 1);
de2e3f3631c9 initial code for ruby bindings
Mikael Hallendal <micke@imendio.com>
parents:
diff changeset
    56
}