cffi-devel April 2009

cffi-devel@common-lisp.net

10 participants
13 discussions

[cffi-devel] Foreign structures by value
by Liam Healy 26 Aug '10

26 Aug '10

I have written Foreign Structures By Value (FSBV) to allow calling foreign functions while passing or returning structures by value. It uses CFFI and libffi. It currently provides two macros for users, fsbv:defcstruct and fsbv:foreign-funcall, which are used exactly like their CFFI counterparts. It works for small test cases I've tried, but probably could use some improvement. If the keepers of CFFI are interested, I would be happy for it to be included in CFFI. In the meantime, it can be found here: http://repo.or.cz/w/fsbv.git Thank you. Liam

2 3

[cffi-devel] [PATCH] 64-bit support for Allegro, and allocate stack objects in the static area
by John Fremlin 17 Jul '09

17 Jul '09

Happy new year! On 64-bit Allegro, run (cffi:defcfun strerror :string (errnum :int)) (strerror 1) and you will probably get Received signal number 4 (Illegal instruction) [Condition of type EXCL:SYNCHRONOUS-OPERATING-SYSTEM-SIGNAL] at least if the returned pointer is more than 32-bits. The problem is that without this patch, cffi-allegro.lisp does not support 64-bit pointers. Does the patch address the problem properly? It seems to work for us. The use of :unsigned-nat instead of :unsigned-long is recommended by Franz because on Windows 64-bit :unsigned-long is still 32-bits. --- a/addons/cffi_0.10.3/src/cffi-allegro.lisp +++ b/addons/cffi_0.10.3/src/cffi-allegro.lisp @@ -135,7 +135,7 @@ SIZE-VAR is supplied, it will be bound to SIZE during BODY." ;; stack allocation pattern `(let ((,size-var ,size)) (declare (ignorable ,size-var)) - (ff:with-stack-fobject (,var '(:array :char ,size)) + (ff:with-stack-fobject (,var '(:array :char ,size) :allocation :foreign-static-gc) (let ((,var (ff:fslot-address ,var))) ;; (excl::stack-allocated-p var) => T ,@body)))) @@ -263,12 +263,12 @@ SIZE-VAR is supplied, it will be bound to SIZE during BODY." :unsigned-long) 'integer) (:float 'single-float) (:double 'double-float) - (:foreign-address :foreign-address) + (:foreign-address 'integer) (:void 'null)))) (defun foreign-allegro-type (type) (if (eq type :foreign-address) - nil + :unsigned-nat type)) (defun allegro-type-pair (type)

4 17

[cffi-devel] New patches: 29-Apr-2009
by Luis Oliveira 30 Apr '09

30 Apr '09

Wed Apr 29 16:25:05 EDT 2009 Stelian Ionescu <sionescu(a)common-lisp.net> * Bind *PACKAGE* in PROCESS-GROVEL-FILE. Reported by Zach Smith, patch by Nikodemus Siivola. M ./grovel/grovel.lisp -1 +2 An updated tarball of CFFI's source can be downloaded here: http://common-lisp.net/project/cffi/tarballs/cffi-090429.tar.gz Darcsweb URL: http://common-lisp.net/cgi-bin/darcsweb/darcsweb.cgi?r=cffi-cffi;a=summary

1 0

[cffi-devel] :long-long on AllegroCL on Mac OS X ???
by Frank Goenninger 29 Apr '09

29 Apr '09

Hi you CFFI gurus out there ! I am having a hard time to understand why CFFI won't accept the following definition on AllegroCL 8.1 on Mac OS X (10.5.6): (defctype magick_int64_t :long-long) ;; This goes ok (defctype MagickSizeType magick_int64_t) ;; This goes ok (defcfun "MagickGetImageSize" MagickSizeType (wand :pointer)) This last definition produces the error :LONG-LONG fell through a ECASE form. The valid cases were :CHAR, :UNSIGNED-CHAR, :SHORT, :UNSIGNED-SHORT, :INT, :UNSIGNED-INT, :LONG, :UNSIGNED-LONG, :FLOAT, :DOUBLE, :POINTER, and :VOID. [Condition of type EXCL:CASE-FAILURE] Looking into cffi/src/types.h I find that even on systems where :no- long-long is given an emulation should kick in... ... Any hints/pointers really appreciated ... Thanks!!! Best, Frank -- Frank Goenninger Cell: +49 175 4321058 E-Mail: frgo(a)me.com

3 2

[cffi-devel] ecl cffi compilation and callbacks
by Naveen Garg 19 Apr '09

19 Apr '09

I am not sure if this change has been accepted into cffi: diff -rN -u old-*cffi*/src/*cffi*-*ecl*.lisp new-*cffi*/src/*cffi*-*ecl*.lisp --- old-*cffi*/src/*cffi*-*ecl*.lisp 2008-02-02 23:17:14.000000000 +0100 +++ new-*cffi*/src/*cffi*-*ecl*.lisp 2008-02-02 23:17:14.000000000 +0100 @@ -54,6 +54,7 @@ #:with-*pointer*-to-vector-data #:%defcallback #:%callback + #:*foreign*-*symbol*-*pointer* #:%*foreign*-*symbol*-*pointer*)) http://article.gmane.org/gmane.lisp.ecl.general/3342/match=foreign+symbol+p… With this change cffi compiles on ecl, but I am having problem accessing callbacks in ecl from c. foreign-funcall works fine from within ecl... http://github.com/tinku99/ahklisp/blob?path[]=ecl&path[]=clinit.lisp&raw=tr… anyone else have this issue?

2 2

[cffi-devel] ECL 9.4.X now has support for "long long" on x86.
by Jean-Claude Beaudoin 15 Apr '09

15 Apr '09

Hello Luis, One of the main new features of ECL 9.4 is its support for C type "long long" on Intel x86. Here is a patch against CFFI 0.10.4 that gives access to this long awaited foreign type. Cheers, Jean-Claude Beaudoin

2 2

[cffi-devel] ELS 2009 in Milan, Italy: Call for Participation
by Marco Antoniotti 15 Apr '09

15 Apr '09

Apologies for multiple postings.... ************************************************************************ 2nd European Lisp Symposium (ELS 2009) Milan, Italy, May 27-29, 2009 Universita` degli Studi di Milano-Bicocca www.european-lisp-symposium.org ************************************************************************ CALL FOR PARTECIPATION ********************** REGISTRATION IS NOW OPEN AT www.european-lisp-symposium.org. Take advantage of the early bird registration fee. Scope and Program Highlights: ***************************** The purpose of the European Lisp Symposium is to provide a forum for the discussion of all aspects of the design, implementation and application of any of the Lisp dialects. We encourage everyone interested in Lisp to participate. The European Lisp Symposium 2009 program includes presentations of high quality papers about novel research results, insights and lessons learned from practical applications, and educational perspectives, all involving Lisp dialects, including Common Lisp, Scheme, Emacs Lisp, AutoLisp, ISLISP, Dylan, Clojure, and so on. Kent Pitman will give the keynote address on Thursday, May 28. The presentations will be divided into two categories. * Original contributions. * Work in progress describing ongoing work that will be discussed in the form of a "writers' workshop". The writers' workshops will take place at the symposium in Milan on May 28, 2008. Social Events: ************** Friday 29th evening, Conference Banquet Saturday 30th morning, Guided tour to the "Futurismo" Exhibit in the center of Milan; 2009 marks the 100th anniversary of the Futurism Manifesto; stretching it, the harbinger of Lisp 50 years later. Program Chair: ************** * Antonio Leitao, Technical University of Lisbon, Portugal Local Chair: ************ * Marco Antoniotti, DISCo, Universita`† Milano Bicocca, Italy Program committee: ****************** * Giuseppe Attardi, Universita`† di Pisa , Italy * Pascal Costanza, Vrije Universiteit Brussel, Belgium * Irene Durand, Universite` Bordeaux 1, France * Marc Feeley, Universit` de Montreal, Canada * Ron Garret, Amalgamated Widgets Unlimited, USA * Gregor Kiczales, University of British Columbia, Canada * Scott McKay, ITA Software, Inc., USA * Peter Norvig, Google Inc., USA * Julian Padget, University of Bath, UK * Kent Pitman, PTC, USA * Christian Queinnec, Universite` Pierre et Marie Curie, France * Christophe Rhodes, Goldsmiths College, University of London, UK * Robert Strandh, Universite` Bordeaux 1, France * Mark Tarver, Lambda Associates, UK * Didier Verna, EPITA Research and Development Laboratory, France * JonL White, TheGingerIceCreamFactory of Palo Alto, USA * Taiichi Yuasa, Kyoto University, Japan Registration Fees: ****************** * Early registration before April 25, 2008: Students EU60, regular EU120. * Late registration before May 16, 2008: Students EU80, regular EU160. * Onsite registration: Students EU100, regular EU220. Registration will include the proceedings, coffee breaks, the symposium dinner and other amenities. Accommodation is not included.

1 0

[cffi-devel] Fwd: CFFI should defend itself against fragile handling of narrow return types in SBCL on x86!
by Jean-Claude Beaudoin 12 Apr '09

12 Apr '09

The mailer of common-lisp.net dropped to the floor the previous transmission of the following message, so here it is again. Cheers, Jean-Claude Beaudoin ---------- Forwarded message ---------- From: Jean-Claude Beaudoin <jean.claude.beaudoin(a)gmail.com> Date: Wed, Mar 25, 2009 at 1:13 AM Subject: CFFI should defend itself against fragile handling of narrow return types in SBCL on x86! To: cffi-devel(a)common-lisp.net Recent versions of GCC appear to be leaving spurious bits in the %eax register used to return the value of a C function on x86 based platforms when the return type is narrower than 32 bits (ie: short or char). SBCL does not defend itself against such register pollution and will return an incorrect value made up of those spurious bits in addition to the intended value. A partial fix for "signed" short and char has appeared in SBCL 1.0.25 but the "unsigned" cases are still vulnerable. I suggest that CFFI should defend itself against that dangerously permissive handling of narrow return types in SBCL through the use of a few filtering functions to be applied in those relevant cases, at least until SBCL fixes the issue for good. Here is attached a patch against CFFI 0.10.4 with a version of the required code. I also attach a set of test files that can be used to illustrate the problem. Cheers, Jean-Claude Beaudoin

2 2

[cffi-devel] ahklisp: lisp on win32 with cffi, sbcl, autohotkey
by Naveen Garg 10 Apr '09

10 Apr '09

http://www.ahklisp.com to try it out, just download ahklisp.exe, autohotkey.dll, clinit.lisp, and run.lisp and do > ahklisp.exe --userinit clinit.lisp Programming is telling the computer to do what you would do. However, most programming languages don't treat the mouse, keyboard, gui widgets, other applications as first class citizens like structs and classes. And you cant do much without them. Ahklisp tries to make programming more fun and practical on windows. Would have been much harder with cffi. Thank you, Naveen Garg

2 1

Re: [cffi-devel] ahklisp
by Naveen Garg 10 Apr '09

10 Apr '09

oops, a little change to the instructions for trying it out: you need some more files, so just get the repository, its pretty small. > git clone git://github.com/tinku99/ahklisp.git and put ahklisp.exe and autohotkey.dll into the ahklisp directory and then from the shell do > ahklisp.exe --userinit clinit.lisp Naveen http://www.ahklisp.com

1 0

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

cffi-devel April 2009