- cl-gd-devel@lists.common-lisp.net - mailman3.common-lisp.net

[cl-gd-devel] Help with the multline text
by Andrei Stebakov 19 Mar '07

19 Mar '07

I am trying to use draw-freetype-string to output the multiline text. Here I go: (defun get-bounding-rect (text font font-size) (with-image* (0 0) (let ((rect (draw-freetype-string 0 0 text :do-not-draw t :font-name font :angle 0 :line-spacing 1.05d0 :color (find-color 0 0 255 :resolve t) :point-size font-size))) (values (- (aref rect 2) (aref rect 0)) (- (aref rect 3) (aref rect 5)) (aref rect 0) (aref rect 1) rect)))) When I call it (get-bounding-rect "Some #\Newline text" "arial" 50) I get an error: Type-error in KERNEL::OBJECT-NOT-TYPE-ERROR-HANDLER: #S(CL-GD::IMAGE :IMG #<Alien (* #) at #x00000000>) is not of type (OR NULL SYSTEM:SYSTEM-AREA-POINTER (ALIEN:ALIEN (* #))) [Condition of type TYPE-ERROR] Restarts: 0: [ABORT] Return to SLIME's top level. 1: [ABORT] Return to Top-Level. Backtrace: 0: (CL-GD::GD-IMAGE-STRING-FT-EX #S(CL-GD::IMAGE :IMG #<Alien # at #x00000000>) #<Alien (* #) at #x0808DF88> 0 "arial" ...) 1: (DRAW-FREETYPE-STRING 0 0 "Some #Newline text" :ANTI-ALIASED ...) 2: (GET-BOUNDING-RECT "Some #Newline text" "arial" 50) 3: (GET-BOUNDING-RECT "Some #Newline text" "arial" 50) I think it doesn't like my :line-spacing 1.05d0 parameter. Also I am not sure that I can provide a string with #Newline. What's the proper way to do it? Thank you, Andrew

2 1

[cl-gd-devel] Drawing anti-aliased text with transparent background
by Andrei Stebakov 18 Mar '07

18 Mar '07

Here is what I've got: http://www.greenpixeldesign.com/cphandler/tmp-img/test.png I'd like to remove the black outline from the anti-aliased text (I need RGB true color image). I know I am missing some stupid thing, but I experimented with different backgrounds, just doesn't make it right. My current setup is gdlib 2.0.33 on debian, and here is the code; (defun create-text-image (text font font-size file-name) (multiple-value-bind (width height horizont-shift vertical-shift) (get-bounding-rect text font font-size) (with-image* (width height t) (let* ((white (allocate-color 255 255 255)) (black (allocate-color 0 0 0)) (red (allocate-color 255 0 0)) (green (allocate-color 0 255 0)) (blue (allocate-color 0 0 255))) (setf (transparent-color) black) (draw-freetype-string (- 0 horizont-shift) (- height vertical-shift) text :anti-aliased t :font-name font :angle 0 :point-size font-size :color (allocate-color 0 0 255)) ;;(true-color-to-palette) (write-image-to-file file-name :if-exists :supersede)))))

1 3

[cl-gd-devel] Error in function CREATE-IMAGE-FROM-FILE:
by Andrei Stebakov 15 Mar '07

15 Mar '07

I got the following error trying to draw text on an image. The test.png is a valid file, I can view it in browser. Here is the debug dump (I use CMUCL 19b, latest libgd and cl-gd, with-image macro works fine): Error in function CREATE-IMAGE-FROM-FILE: Could not create image from PNG file "/tmp/dir1/test.png" [Condition of type SIMPLE-ERROR] Restarts: 0: [ABORT] Return to SLIME's top level. 1: [ABORT] Return to Top-Level. Backtrace: 0: (CREATE-IMAGE-FROM-FILE "/tmp/dir1/test.png" NIL) 1: (CREATE-TEXT-IMAGE-ON-IMAGE #P"/tmp/dir1/test.png" "Hello!" "arial" 100 ...) 2: ("DEFSLIMEFUN INTERACTIVE-EVAL") Thank you, Andrew

2 4

[cl-gd-devel] Problems with (cl-gd-test:test)
by Andrei Stebakov 13 Mar '07

13 Mar '07

Hi, I've installed the libgd on my linux box (it's in /usr/local/lib/libgd.so). I've installed the bindings and now when I compile it it complained about not being able to find gdImageCreate and gdSmallFont. When I try to (cl-gd-test:test) (after (asdf:oos 'asdf:load-op :cl-gd-test)) it give me following output: Test 1 failed with the following error: Error in KERNEL::UNDEFINED-SYMBOL-ERROR-HANDLER: the function CL-GD::GD-IMAGE-CREATE is undefined. Test 2 failed with the following error: Error in KERNEL::UNDEFINED-SYMBOL-ERROR-HANDLER: the function CL-GD::GD-IMAGE-CREATE is undefined. Test 3 failed with the following error: Error in KERNEL::UNDEFINED-SYMBOL-ERROR-HANDLER: the function CL-GD::GD-IMAGE-CREATE is undefined. Test 4 failed with the following error: Error in KERNEL::UNDEFINED-SYMBOL-ERROR-HANDLER: the function CL-GD::GD-IMAGE-CREATE is undefined. Test 5 failed with the following error: Error in function CL-GD:CREATE-IMAGE-FROM-FILE: File #P"/home/andrews/systems/cl-gd-0.5.2/test/one-pixel.png" could not be found Test 6 failed with the following error: Error in function CL-GD:CREATE-IMAGE-FROM-FILE: File #P"/home/andrews/systems/cl-gd-0.5.2/test/one-pixel.png" could not be found Test 7 failed with the following error: Error in KERNEL::UNDEFINED-SYMBOL-ERROR-HANDLER: the function CL-GD::GD-IMAGE-CREATE is undefined. Test 8 failed with the following error: Error in KERNEL::UNDEFINED-SYMBOL-ERROR-HANDLER: the function CL-GD::GD-IMAGE-CREATE is undefined. Test 9 failed with the following error: Error in KERNEL::UNDEFINED-SYMBOL-ERROR-HANDLER: the function CL-GD::GD-IMAGE-CREATE is undefined. Test 10 failed with the following error: Error in KERNEL::UNDEFINED-SYMBOL-ERROR-HANDLER: the function CL-GD::GD-IMAGE-CREATE-FROM-JPEG-FILE is undefined. Test 11 failed with the following error: Error in KERNEL::UNDEFINED-SYMBOL-ERROR-HANDLER: the function CL-GD::GD-IMAGE-CREATE is undefined. Test 12 failed with the following error: Error in KERNEL::UNDEFINED-SYMBOL-ERROR-HANDLER: the function CL-GD::GD-IMAGE-CREATE is undefined. Test 13 failed with the following error: Error in KERNEL::UNDEFINED-SYMBOL-ERROR-HANDLER: the function CL-GD::GD-IMAGE-CREATE is undefined. Test 14 failed with the following error: Error in KERNEL::UNDEFINED-SYMBOL-ERROR-HANDLER: the function CL-GD::GD-IMAGE-CREATE is undefined. Test 15 failed with the following error: Error in KERNEL::UNDEFINED-SYMBOL-ERROR-HANDLER: the function CL-GD::GD-IMAGE-CREATE is undefined. Test 16 failed with the following error: Error in KERNEL::UNDEFINED-SYMBOL-ERROR-HANDLER: the function CL-GD::GD-IMAGE-CREATE-TRUE-COLOR is undefined. Test 17 failed with the following error: Error in KERNEL::UNDEFINED-SYMBOL-ERROR-HANDLER: the function CL-GD::GD-IMAGE-CREATE is undefined. Test 18 failed with the following error: Error in KERNEL::UNDEFINED-SYMBOL-ERROR-HANDLER: the function CL-GD::GD-IMAGE-CREATE is undefined. Test 19 failed with the following error: Error in KERNEL::UNDEFINED-SYMBOL-ERROR-HANDLER: the function CL-GD::GD-IMAGE-CREATE-TRUE-COLOR is undefined. Done. I checked the libgd.so, looks like the gdImageCreate and the rest of the functions are there. What could be causing the problem? Thank you, Andrew

2 3

[cl-gd-devel] Re: CL-GD on OS X
by Edi Weitz 11 Mar '07

11 Mar '07

On Sat, 10 Mar 2007 10:17:19 -0700, "Chhi'med Kunzang" <clkunzang(a)gmail.com> wrote: > I just joined the list, so sorry if this has been covered. It's probably more appropriate to continue this discussion on the CL-GD mailing list. I've put the list on Cc, but you'll have to subscribe to post something there. > Has anyone installed CL-GD on on OS X. I'm using Lispworks 5. I > compiled CL-GD-GLUE fine, and it seems to load, but I get a series > of errors when I run the test. > > I'm sure it's a stupid configuration problem, but maybe someone else > has worked through it before? I don't have a Mac, so I can't confirm that CL-GD runs on OS X, but I think that there's nothing specific in the code that prevents it from running there. > "_gdImageCreate". The underline shouldn't be there. The C function is called "gdImageCreate" (unless this is some name mangling convention on OS X that I'm not aware of). Where did you get the GD library from and where is it located?

1 0

[cl-gd-devel] controling brightness, intensity, contrast of an image.
by Paul Thirumalai 02 Mar '07

02 Mar '07

Hi I just wanted to know if there is a way to control/modify the contrast, brightness, intensity of an image using CL-GD. If there is some sample code that would be awesome. Thanks Paul

2 3

[cl-gd-devel] draw-freetype-string cannot work with utf-8 encoded string
by Luo Yong 28 Feb '07

28 Feb '07

Hi all I'm under UTF-8 environment and found that UTF-8 encoded string cannot be displayed with function draw-freetype-string.I wrote a script like this ===> (asdf:oos 'asdf:load-op :cl-gd) (setq oldimage (cl-gd:create-image 300 150)) (cl-gd:allocate-color 0 0 255 :image oldimage) (cl-gd:draw-freetype-string 100 100 "汉字" :font-name "/usr/share/fonts/truetype/arphic/gbsn00lp.ttf" :color (cl-gd:find-color 255 255 255 :resolve 't :image oldimage) :image oldimage :angle 0 :anti-aliased 't) (cl-gd:write-image-to-file "~/newimage.png" :type :PNG :image oldimage :if-exists :supersede) <=== But it displays the UTF-8 string "汉字" like this: &27721;&23383 How can I make my script displays the string correctly? Thanks.

3 6

[cl-gd-devel] Darcs repositories
by Edi Weitz 22 Feb '07

22 Feb '07

[My apologies if you get this more than once.] Several people have asked for Darcs repositories of my software. These do exists now: http://common-lisp.net/~loliveira/ediware/ Special thanks to Luís Oliveira who made this possible and who maintains the repositories. Cheers, Edi.

1 0

[cl-gd-devel] Re: Bug#399526: cl-gd: Also wrap functions to create an image from in-memory data
by Edi Weitz 20 Nov '06

20 Nov '06

On Mon, 20 Nov 2006 13:24:33 +0100, Pierre THIERRY <nowhere.man(a)levallois.eu.org> wrote: > The 2.0.21 version of GD added a gdImageCreateFrom*Ptr family of > functions "which make it convenient to load an image in any > GD-supported format directly from memory". > > As I store images in variables that I would like to modify with GD, > it would be helpful if those functions were wrapped. Please feel free to send patches (including documentation) for this functionality. Furher discussion of this topic should go through the mailing list. Thanks, Edi.

1 0

[cl-gd-devel] Trouble installing
by Blaine Nelson 03 Jul '06

03 Jul '06

Hi, When I try to compile cl-gd I get the following error: Error opening shared object "/home/blaino/systems/cl-gd-0.5.1/cl-gd-glue.so": /home/blaino/systems/cl-gd-0.5.1/cl-gd-glue.so: undefined symbol: gdImageCreateFromJpeg. [Condition of type SIMPLE-ERROR] libjpeg is installed. I know this because 'make install' of libjpeg yields the following output: /usr/bin/install -c -m 644 jconfig.h /usr/local/include/jconfig.h /usr/bin/install -c -m 644 ./jpeglib.h /usr/local/include/jpeglib.h /usr/bin/install -c -m 644 ./jmorecfg.h /usr/local/include/jmorecfg.h /usr/bin/install -c -m 644 ./jerror.h /usr/local/include/jerror.h ./libtool --mode=install /usr/bin/install -c libjpeg.la /usr/local/lib/libjpeg.la /usr/bin/install -c .libs/libjpeg.so.62.0.0 /usr/local/lib/libjpeg.so.62.0.0 rm -f /usr/local/lib/libjpeg.so.62 /usr/local/lib/libjpeg.so (cd /usr/local/lib && ln -s libjpeg.so.62.0.0 libjpeg.so.62) (cd /usr/local/lib && ln -s libjpeg.so.62.0.0 libjpeg.so) /usr/bin/install -c libjpeg.la /usr/local/lib/libjpeg.la PATH="/home/blaino/bin:/usr/local/bin:/usr/bin:/sbin:/usr/X11R6/bin:/usr/sbin:/bin:/usr/games:/opt/gnome/bin:/opt/kde3/bin:/usr/lib/jvm/jre/bin:/usr/lib/mit/bin:/usr/lib/mit/sbin:/sbin" ldconfig -n /usr/local/lib ------------------------------------------------------------------------------ Libraries have been installed in: /usr/local/lib To link against installed libraries in a given directory, LIBDIR, you must use the `-LLIBDIR' flag during linking. You will also need to do one of the following: - add LIBDIR to the `LD_LIBRARY_PATH' environment variable during execution - add LIBDIR to the `LD_RUN_PATH' environment variable during linking - use the `-Wl,--rpath -Wl,LIBDIR' linker flag - have your system administrator add LIBDIR to `/etc/ld.so.conf' See any operating system documentation about shared libraries for more information, such as the ld(1) and ld.so(8) manual pages. ------------------------------------------------------------------------------ ./libtool --mode=install /usr/bin/install -c cjpeg /usr/local/bin/cjpeg /usr/bin/install -c .libs/cjpeg /usr/local/bin/cjpeg ./libtool --mode=install /usr/bin/install -c djpeg /usr/local/bin/djpeg /usr/bin/install -c .libs/djpeg /usr/local/bin/djpeg ./libtool --mode=install /usr/bin/install -c jpegtran /usr/local/bin/jpegtran /usr/bin/install -c .libs/jpegtran /usr/local/bin/jpegtran ./libtool --mode=install /usr/bin/install -c rdjpgcom /usr/local/bin/rdjpgcom /usr/bin/install -c rdjpgcom /usr/local/bin/rdjpgcom ./libtool --mode=install /usr/bin/install -c wrjpgcom /usr/local/bin/wrjpgcom /usr/bin/install -c wrjpgcom /usr/local/bin/wrjpgcom /usr/bin/install -c -m 644 ./cjpeg.1 /usr/local/man/man1/cjpeg.1 /usr/bin/install -c -m 644 ./djpeg.1 /usr/local/man/man1/djpeg.1 /usr/bin/install -c -m 644 ./jpegtran.1 /usr/local/man/man1/jpegtran.1 /usr/bin/install -c -m 644 ./rdjpgcom.1 /usr/local/man/man1/rdjpgcom.1 /usr/bin/install -c -m 644 ./wrjpgcom.1 /usr/local/man/man1/wrjpgcom.1 Following the hint provided by the make install output (and archived advice from Edi Weitz) I checked to see if ld will check this directory. I go to /etc/ld.so.conf and verify that /usr/local/lib is one of the paths. Furthermore, when linking cl-gd-glue I use: ld -shared -lgd -lz -lpng -ljpeg -lfreetype -liconv -lm -lc cl-gd-glue.o -o cl-gd-glue.so -L/usr/local/lib where the -L/usr/local/lib bit is supposed to direct to where libjpeg has been installed. (It does not balk. It used to, before I ran make install-lib during the installation of libjpeg, saying it couldn't find -ljpeg. But now it seems fine). But, when I run (asdf:oos 'asdf:compile-op :cl-gd) I just get the undefined symbol error. I ran 'find .|grep libjpeg' and get the following (subset of output): ./usr/lib/jvm/java-1.4.2-sun-1.4.2.11/jre/lib/i386/libjpeg.so ./usr/lib/libjpeg.a ./usr/lib/libjpeg.so.62 ./usr/lib/libjpeg.so.6.0.1 find: ./usr/lib/man-db: Permission denied ./usr/lib/libjpeg.so.62.0.0 ./usr/lib/libjpeg.so.6 ./usr/local/lib/libjpeg.a ./usr/local/lib/libjpeg.so.62 ./usr/local/lib/libjpeg.so.62.0.0 ./usr/local/lib/libjpeg.la ./usr/local/lib/libjpeg.so find: ./usr/share/YaST2/data/support: Permission denied ./home/blaino/systems/jpeg-6b/.libs/libjpeg.so.62 ./home/blaino/systems/jpeg-6b/.libs/libjpeg.so.62.0.0 ./home/blaino/systems/jpeg-6b/.libs/libjpeg.la ./home/blaino/systems/jpeg-6b/.libs/libjpeg.so ./home/blaino/systems/jpeg-6b/libjpeg.a ./home/blaino/systems/jpeg-6b/libjpeg.doc ./home/blaino/systems/jpeg-6b/libjpeg.la Could multiple versions of libjpeg be a problem? If so, how to fix it? (I'm a linux newbie). Other than that, I don't have any other hypotheses. Help is very, very, very much appreciated. Thanks, Blaine PS You may have seen my post on comp.lang.lisp. Since then I have (I believe) successfully installed both libjpeg and libiconv.

2 2