Convert image to png

[alexfish]

Hi All

I needed to convert images from one format to png format for direct use in cairo.

Think there used to be an image converter or scale image on the web site;
could not find it, hence the below ' BaCon convert2png 'image2png' depends lib-gdk-pixbuf-2.0

Have Fun
+
BR
Alex


'BaCon convert2png 'image2png' depends lib-gdk-pixbuf-2.0
'
' Synop cairo can only import png as a surface
' cairo_surface_t * pixy =cairo_image_surface_create_from_png(myimage.png);
' cairo_set_source_surface (cr2,pixy,xpos,ypos);
' cairo_paint(cr2);
'   cairo_surface_destroy (pixy);
'
' but also a handy little tool;
' licence any *nix **** , if it breaks you keep both bits 'FREE';
' [e-mail]

OPTION PARSE FALSE

'Compiler Flags
PRAGMA LDFLAGS `pkg-config --libs gdk-pixbuf-2.0`
PRAGMA OPTIONS `pkg-config --cflags gdk-pixbuf-2.0`
PRAGMA INCLUDE <gdk-pixbuf/gdk-pixbuf.h>

' IO VARS
DECLARE INFILE$ TYPE STRING
DECLARE OUTFILE$ TYPE STRING
DECLARE NB$ TYPE STRING
DECLARE RES$ TYPE STRING
DECLARE pixbuf TYPE GdkPixbuf *

IF argc == 3 THEN

INFILE$= CHOP$(argv[1])
OUTFILE$=CHOP$(argv[2])

IF FILEEXISTS(INFILE$) THEN
PRINT " FILE OK"
RES$ = EXEC$ ("file " & INFILE$)
ck = INSTR(RES$,"image")
IF (ck > 1) THEN
PRINT "File is image"
ELSE
PRINT "Not Image"

IF (INSTR(INFILE$,".svg")) THEN

PRINT "Trying to convert svg file"
ELSE
PRINT "File wrong type"
END
END IF
END IF
ELSE
PRINT " File NOT EXIST"
END
END IF

PRINT INFILE$
PRINT OUTFILE$

NB$ = RIGHT$(OUTFILE$,4)

IF NB$ = ".png" THEN

PRINT "Converting " , INFILE$ , " 2 " ,OUTFILE$
ELSE
PRINT "out file must be <file>.png"
END
END IF
pixbuf = gdk_pixbuf_new_from_file (INFILE$,0)
g_object_ref(pixbuf)

gdk_pixbuf_save (pixbuf, OUTFILE$, "png", 0,NULL, NULL, NULL)

g_object_unref(pixbuf)
END
END IF

PRINT " convert2png image-file.* outfile.png\n convert2png img.jpg img.png\n convert2png tiger.svg tiger.png"

[vovchik]

Dear Alex,

Thanks. I also think I found what you were looking for - something I did about 10 years ago and then revised 6 years ago to include svgs. Here is the source...

With kind regards,
vovchik

Attachments:

picscale.bac.tar.gz (2.75 KB)

[alexfish]

Hi Vovchik

Thanks for the posting of picscale.

still can't find it on BaCon web site ?

will see if can make = to in gdk to avoid binding to gtk x11.so

BR
Alex

[alexfish]

Ok

Found it under Picture scaling, was looking for the actual name picscale

HERE

BR
Alex

[alexfish]

Hi Vovchik

can Clobber the Gtk bits and works with the gdk only api
'CONST Gtk$ = "libgtk-x11-2.0.so.0"
'IMPORT "gtk_init(int*,void*)" FROM Gtk$ TYPE void
'IMPORT "gtk_exit(int)" FROM Gtk$ TYPE void

only problem I see is the svg file

If svg is problematic
can get the width and height read asserts:

can suggest passing the svg straight to a png format as per

gdk_pixbuf_save (pixbuf, OUTFILE$, "png", 0,NULL, NULL, NULL)

IE do not query the svg , read the png back
then perform the actions. and save again;

End the If

there again think the user should dump a bad svg


BR
Alex

[vovchik]

Dear Alex,

Thanks for the mods. I got rid of the unneeded imports and am now looking at the SVG suggestion. It should work - and it is safer. I'll post an update soon, I hope. And I think I can improve the arg check bit, too. When I first wrote that prog, TOKEN$ did not exist.

With kind regards,
vovchik

[vovchik]

Dear Alex,

Here is the modded picscale. I think I did the right thing for svgs...

With kind regards,
vovchik

Attachments:

picscale-src.tar.gz (2.53 KB)

[bigbass]

Hello vovchik
I remember when you were making the first version
thanks I will be needing this too

I hope you backed up
all your code somewhere
and if not set up a safe place to upload it all


Joe

=================================
I am trying to organize my post too
and back up things for safety and make it seachable quickly

also I have an Idea using javascript some type of search
and you have a lot of posts and if they were offline the search would be faster
for some reason the recent post only go upto page 67 even though you have much more
Attachment Deleted
VOVCHIKS-THREADS.tar.gz (238.2 KB)

if we could do that in the mini browser it would be fast
and useful

[vovchik]

Dear Joe,

I have some things backed up, but in various places/countries, and finding things can be a problem. I think we should think of some way to archive these things, also in the cloud, just as insurance. The Puppy forum went down after John Murga, the maintainer over so many years, died suddenly. What a loss and a pity. And the site went down. There is another Puppy site now, and people are scrambling to restore what they can. It pays to have backups.

And the bassix browser could have a "scavenge forum posts" option that would run some javascript based on some search criteria and download a backup. I am just thinking out loud.

Is the modded picscale working OK? It seems to be running fine on my two platforms (Pi4 and Mint).

With kind regards,
vovchik

[alexfish]

Hi Vovchik

working fine, as does the terminal command 'gdk-pixbuf-query-loaders'

BR
Alex

Attachments:

[vovchik]

Dear Alex,

Thanks. I think your suggestion first to convert an svg to png and then to scale the pic is very sensible and correct. I know that the argument check can be made more efficient, but I think it works as it is. Also thanks for pointing out those unnecessary gtk bits. I like gdk_pixbuf_loader - it is very handy and does a good job. Rsvg is fussier, and it has changed verions - requiring a rewrite of some code, so for quick and dirty svg conversions, gdk is nice (plus it handles many other formats).

With kind regards,
vovchik

[alexfish]

Hi Vovchik.

Just a thought that was niggling in the background: there again just regard it as an 'Alex niggle.'

say for instance the original or image produced is an odd number of pixels in the height & width
this can be problematic. with other converters , esp if the converter will look at a number dividable by 2
could the app issue a warning of not dividable by 2 , hence suppose have standard ico's , of 8 16 32 128

Just a thought

yet again as many say the app is fine as it its

BR
Alex

PS : of passed history of rsvg, it is in 'Dusty bin', yet not sure how pixbuf converts svg
main point here is that , as you say pixbuf can avoid the gtk binding , hence can be used with other apps & libs

[vovchik]

Dear Alex,

Picscale, when doing a resizing, now preserves the aspect ratio, defaulting to the new given width, as I recall, and modifying the height accordingly. I wonder whether there should be a flag to scale to absolute dimensions. And I will think about the "multiples of 2" bit. Esy enough to implement.

With kind regards,
vovchik

[alexfish]

Hi vovchik

after a bit of testing , results are good , putting extra code in , not sure if it be useful'
since think 1st enth would be enough for passing on, recursive not.

if the user puts the request then think best option is to warn , and them to think , if users think, then
possible they will research the why !

in simple terms something like below will suffice


'ensure double value
LOCAL ckw , ckh TYPE double

   ckw = gdk_pixbuf_get_width(im)/2
ckh = gdk_pixbuf_get_height(im)/2

   IF (ckw*2 != w) THEN
PRINT " width result not divisible by 2 " ,
END IF
   IF (ckh*2 != h) THEN
PRINT " height result not divisible by 2"
END IF


BR
Alex

[vovchik]

Dear Alex,

Thanks for the little enhancement. Here is a version with your mod included.

With kind regards,
vovchik

Attachments:

picscale-src.tar.gz (2.65 KB)