Print Page - Using C-structs

Title: Using C-structs
Post by: pjot on June 25, 2005, 04:59:28 PM

Hi,

I browsed through old forum entries but I am unable to find the info back. Actually I'ld like to send a struct from newLisp to a C-library. E.g. this is the code:

Code Select Expand

typedef struct {
int i;
double d;
} MYSTRUCT;

void set_struct(MYSTRUCT n)
{
printf("number: %dn", n.i);
printf("string: %fn", n.d);
}

------------- newLisp code:

(import "./struct.so" "set_struct")
(set_struct (pack "ld lf" 1432 1.234))
(exit)

But this does not seem to work. How can I pass a reference to a complete structure to a C library?

Peter

Title:
Post by: pjot on June 25, 2005, 05:12:23 PM

Never mind, I found the solution:

Code Select Expand

(import "./struct.so" "set_struct")
(set_struct 1432 1.234)
(exit)

It's too easy, really :-)

I was confused by this "Struct" - thing. Open mouth. Insert foot.

Title:
Post by: pjot on June 25, 2005, 05:27:37 PM

Now I want to pass these 2 values at once:

Code Select Expand

(import "./struct.so" "set_struct")
(set 'VAR ....?.....)
(set_struct VAR)
(exit)

The VAR variable must contain an integer and a double value at te same time.

How can I define VAR in a way, that it contains 2 values each of which has a different type?

Peter

Title:
Post by: pjot on June 26, 2005, 07:30:21 AM

Never mind again, I found it. Now I even can send information to an array of pointers of a struct type:

Code Select Expand

typedef struct {
char * ptr;
int i;
double d;
} MYSTRUC;

void set_struct(MYSTRUC *n[])
{
printf("string: %sn", n[0]->ptr);
printf("number: %dn", n[0]->i);
printf("float: %fn", n[0]->d);
printf("string: %sn", n[1]->ptr);
printf("number: %dn", n[1]->i);
printf("float: %fn", n[1]->d);
}

-----------------newLisp

(import "./struct.so" "set_struct")

(set 'txt1 "text")
(set 'var1 (pack "ld ld lf" (address txt1) 1234 4.321))

(set 'txt2 "letters")
(set 'var2 (pack "ld ld lf" (address txt2) 4567 7.654))

(set_struct (pack "ld ld" var1 var2))
(exit)

Quite complicated now but it works.

Peter

Title:
Post by: Lutz on June 26, 2005, 11:22:30 AM

Just remember that sometimes fields inside a structure are not aligned the way you think. In your case you don't have a problem because all your fields have a size of 32bit or multiple of it (double float = 64 bits).

There is a chapter about all this in http://newlisp.org/DesignPatterns.html#libraries

Lutz

Title:
Post by: pjot on June 27, 2005, 01:06:34 PM

Thanks Lutz! I needed this stuff to create Drag and Drop with GTK. I posted the code here:

http://www.gtk-server.org/drag.lsp

With the next release of the GTK-server (2.0.3) it is possible to implement Drag and Drop with GTK widgets as well.

For now, I will put the beta version of the GTK-server on the site.

Peter

newLISP Fan Club

Forum => newLISP in the real world => Topic started by: pjot on June 25, 2005, 04:59:28 PM