Nobody ? Really nobody ? Well, please !!
Am 18.01.2010 um 00:40 schrieb Frank Goenninger:
Hi again -
I have the following C function definition (from RabbitMQ C client):
typedef enum amqp_response_type_enum_ { AMQP_RESPONSE_NONE = 0, AMQP_RESPONSE_NORMAL, AMQP_RESPONSE_LIBRARY_EXCEPTION, AMQP_RESPONSE_SERVER_EXCEPTION } amqp_response_type_enum;
typedef struct amqp_rpc_reply_t_ { amqp_response_type_enum reply_type; amqp_method_t reply; int library_errno; } amqp_rpc_reply_t;
/* Opaque struct. */ typedef struct amqp_connection_state_t_ *amqp_connection_state_t;
typedef enum amqp_sasl_method_enum_ { AMQP_SASL_METHOD_PLAIN = 0 } amqp_sasl_method_enum;
extern amqp_rpc_reply_t amqp_login(amqp_connection_state_t state, char const *vhost, int channel_max, int frame_max, int heartbeat, amqp_sasl_method_enum sasl_method, ...);
which I hand-translated to the following CFFI statements:
(defcenum amqp-sasl-method-enum (:AMQP-SASL-METHOD-PLAIN 0))
(defcenum amqp-response-type-enum (:AMQP-RESPONSE-NONE 0) :AMQP-RESPONSE-NORMAL :AMQP-RESPONSE-LIBRARY-EXCEPTION :AMQP-RESPONSE-SERVER-EXCEPTION)
(defcstruct amqp-rpc-reply-struct (reply-type amqp-response-type-enum) (reply amqp-method-t) (library-errno :int))
(defctype amqp-rpc-reply-t amqp-rpc-reply-struct)
(defctype amqp-connection-state-t :pointer)
(defcfun ("amqp_login" %amqp-login) amqp-rpc-reply-t (state amqp-connection-state-t) (vhost :string) (channel-max :int) (frame-max :int) (heartbeat :int) (sasl-method amqp-sasl-method-enum) &rest) ;; varargs !
You still there ? ;-) Good. Now for my "issue":
Calling the C function amqp_login function as follows:
(defparameter *hostname* "192.168.2.121") (defparameter *port* 5672) (defparameter *user* "ccag.pib") (defparameter *password* "ccag.pib") (defparameter *vhost* "/ccag/pib")
(let* ((conn (%amqp-new-connection)) (sockfd (%amqp-open-socket *hostname* *port*)))
(%amqp-login conn *vhost* 0 131072 0 :AMQP-SASL-METHOD-PLAIN :string *user* :string *password*)...
results in the following output from the C function amqp_login (which I instrumented):
*** AMQP_LOGIN sees: -> state = 0x64034010 -> vhost = (null) -> channel_max = 131072 -> frame_max = 0 -> heartbeat = 0 -> sasl_method = 1677934672
Hmmmmmm - let's see:
vhost .........: Not good. Should be "/ccag/pib". channel_max ...: Not good. Should be 0. frame_max .....: Not good. Should be 131072. sasl_method ...: Not good. Should be 0.
What am I doing wrong here? By now I'm trying to figure this out for more than 10 hours and I am at a loss here.... Any help/ ideas really appreciated!
TIA!!! Frank
cffi-devel mailing list cffi-devel@common-lisp.net http://common-lisp.net/cgi-bin/mailman/listinfo/cffi-devel