BPc0dZddlZddlmZddlZddlmZddlmZm Z ddl m Z Gddeej Zed kredSdS) z> Export to Gimp's XCF file format including Grids and Guides. N) OrderedDict) TempDirMixin) take_snapshotcall) inkex_gettextcDeZdZdZdZdZdZdZedZ dZ dS) GimpXcfz Provide a quick and dirty way of using gimp to output an xcf from Inkscape. Both Inkscape and Gimp must be installed for this extension to work. z gimp-out-cD|dd|ddtjd|dd tjd |d d tjd |ddtdddS)Nz--tabtab)destz-dz--guideszSave the Guides in the XCF)typehelpz-rz--gridzSave the Grid with the .XCF-bz --backgroundzAdd background colorz-iz--dpiX@zFile resolution)r defaultr) add_argumentinkexBooleanfloat)selfparss */usr/share/inkscape/extensions/gimp_xcf.py add_argumentszGimpXcf.add_arguments,s '...  *5=7S      (5R      .u};Q      't:K      cg}g}|jjD]}|jrQd|jjcxkr|jjkr/n-|t|jjZ|j rPd|jj cxkr|jj kr/n|t|jj dd |fdd |ffS)z5Generate a list of horzontal and vertical only guidesrh v) svg namedview get_guides is_horizontalpointyviewbox_heightappendstr is_verticalx viewbox_widthjoin)r horz_guides vert_guidesguides rr!zGimpXcf.get_guides;s  X'2244 ; ;E" ;u{}>>>>tx'>>>>>>&&s5;='9'9:::" ;u{}====tx'======&&s5;='9'9:::SXXk**+c388K3H3H-IIIrc #K|jj|jjdz z}d}|j|r|j|}dD]\}}}d|i}dD]r}t |||z|} |j| d|z} ttt | ||<sdj d i|VdSdS) z5Get the grid if asked for and return as gimpfu scriptrzQsodipodi:namedview/inkscape:grid[@type='xygrid' and (not(@units) or @units='px')]))spacingr0)originroffsettargetxypxz*(gimp-image-grid-set-{target} img {x} {y})N) rscaleoptionsdpixpath getElementrgetuutounitintroundformat) rr8r;nodeattrrr4fmtdimunits rget_gridzGimpXcf.get_gridMsDL$4t$;<c 8>>% Q8&&u--D* Q Q%gv (77C $*g!>!>??D8,,T4885@D"5t#5#566CHHIBIPPCPPPPPP Q Q Q Qrc:|jdpdS)z)Get the document name suitable for exportzsodipodi:docnamedocument)rr=)rs rdocnamezGimpXcf.docname`sx||.//=:=rct}d}|jdD]}t|sd}|d}|d|}t |j|j|t|j j |ddtt|j j ||<|s#tjtddSt j|jd|j}d |j j d |d t-| }|j jr4|D]\} } |d | | z } |j jr"|D] } |d| zdzz }|d|z }t7ddddd|t9|d5} || ddddS#1swxYwYdS)NFz%/svg:svg/*[name()='g' or @style][@id]Tidzinkscape:label)dirnamenamer: export_idexport_id_onlyexport_area_pageexport_background_opacityz5This extension requires at least one non empty layer.z{}.xcfa (tracing 1) (define (png-to-layer img png_filename layer_name) (let* ( (png (car (file-png-load RUN-NONINTERACTIVE png_filename png_filename))) (png_layer (car (gimp-image-get-active-layer png))) (xcf_layer (car (gimp-layer-new-from-drawable png_layer img))) ) (gimp-image-add-layer img xcf_layer -1) (gimp-drawable-set-name xcf_layer layer_name) ) ) (let* ( (img (car (gimp-image-new 200 200 RGB))) ) (gimp-image-set-resolution img {dpi} {dpi}) (gimp-image-undo-disable img) (for-each (lambda (names) (png-to-layer img (car names) (cdr names)) ) (map cons '("{files}") '("{names}")) ) (gimp-image-resize-to-layers img) z" ")r:filesnamesze (for-each (lambda ({d}Guide) (gimp-image-add-{d}guide img {d}Guide) ) '({g}) ))dg z (gimp-image-undo-enable img) (gimp-file-save RUN-NONINTERACTIVE img (car (gimp-image-get-active-layer img)) "{xcf}" "{xcf}")) (gimp-quit 0) )xcfgimpr-zplug-in-script-fu-eval)ibatch_interpreterstdinrb)rrr;lenr=rrItempdirr?r9r:bool backgroundrerrormsg_ospathr+rArJvalueslistguidesr!gridrGropenwriteread) rstreampngsvalidrBnode_idrNrX script_furErifu_letfhls rsavez GimpXcf.savees}}HNN#JKK  Dt99 EhhtnnG88,g66D&   ())!#!%*-d4<3J.K.K*L*L   DJJ  N1TUU V V V Fgll4<)F)FGG8 F  **T[[]]++**T$ZZ((   9 D <  #00   V vV   <  2--// 2 2TF]T11       6     #t__ % LL $ $ $ % % % % % % % % % % % % % % % % % %s?(I44I8;I8N) __name__ __module__ __qualname____doc__ dir_prefixrr!rGpropertyrJrur7rrr r #s J    JJJ$QQQ&>>X>c%c%c%c%c%rr __main__)ryre collectionsrr inkex.baser inkex.commandrrinkex.localizationrrdOutputExtensionr rvrunr7rrrs, ###### ######--------111111e%e%e%e%e%lE1e%e%e%P z GIIMMOOOOOr