2 #include "../gfxdevice.h"
3 #include "../gfxsource.h"
4 #include "../gfxtools.h"
5 #include "../gfximage.h"
6 #include "../gfxfont.h"
7 #include "../devices/pdf.h"
8 #include "../readers/swf.h"
9 #include "../readers/image.h"
10 #include "../pdf/pdf.h"
15 #define RUBY_GFX_VERSION "0.9.0"
18 static VALUE Font, Glyph, Bitmap, Document, DocumentPage, PDFClass, SWFClass, ImageClass, Device;
21 typedef struct doc_internal {
23 gfxsource_t*driver; // filled by alloc
25 gfxfontlist_t*fontlist;
28 typedef struct page_internal {
33 typedef struct image_internal {
38 typedef struct font_internal {
44 typedef struct glyph_internal {
49 static gfxsource_t* pdfdriver = 0;
50 static gfxsource_t* imagedriver = 0;
51 static gfxsource_t* swfdriver = 0;
53 #define Get_Doc(doc,cls) doc_internal_t*doc=0;Data_Get_Struct(cls, doc_internal_t, doc);
54 #define Get_Page(page,cls) page_internal_t*page=0;Data_Get_Struct(cls, page_internal_t, page);
56 static VALUE doc_allocate(VALUE cls, gfxsource_t*driver);
57 static VALUE page_allocate(VALUE cls);
59 // ------------------------ documents ---------------------------------------
61 static VALUE doc_initialize(VALUE cls, VALUE _filename)
63 Check_Type(_filename, T_STRING);
65 const char*filename = StringValuePtr(_filename);
66 doc->fontlist = gfxfontlist_create();
67 doc->doc = pdfdriver->open(pdfdriver, filename);
69 rb_raise(rb_eIOError, "couldn't open %s", filename);
74 static VALUE doc_num_pages(VALUE cls)
77 return INT2FIX(doc->doc->num_pages);
80 static VALUE doc_get_page(VALUE cls, VALUE _nr)
82 Check_Type(_nr, T_FIXNUM);
83 int nr = FIX2INT(_nr);
86 VALUE v = page_allocate(DocumentPage);
88 page->page = doc->doc->getpage(doc->doc, nr);
91 rb_raise(rb_eArgError, "No page %d in document", nr);
97 static VALUE doc_each_page(VALUE cls)
101 for(t=1;t<=doc->doc->num_pages;t++) {
102 VALUE v = page_allocate(DocumentPage);
104 page->page = doc->doc->getpage(doc->doc, t);
111 static void doc_mark(doc_internal_t*doc)
113 gfxfontlist_t*l = doc->fontlist;
116 rb_gc_mark((VALUE)l->user);
121 static void doc_free(doc_internal_t*doc)
123 gfxfontlist_free(doc->fontlist, 0);
124 doc->doc->destroy(doc->doc);
128 static VALUE doc_allocate(VALUE cls, gfxsource_t*driver)
130 doc_internal_t*doc = 0;
131 VALUE v = Data_Make_Struct(cls, doc_internal_t, doc_mark, doc_free, doc);
133 memset(doc, 0, sizeof(doc_internal_t));
134 doc->driver = driver;
138 static VALUE pdf_allocate(VALUE cls) {return doc_allocate(cls, pdfdriver);}
139 static VALUE swf_allocate(VALUE cls) {return doc_allocate(cls, swfdriver);}
140 static VALUE imgdrv_allocate(VALUE cls) {return doc_allocate(cls, imagedriver);}
142 // ------------------------ doc pages ---------------------------------------
144 static void page_free(page_internal_t*page)
148 page->page->destroy(page->page);
153 static void page_mark(page_internal_t*page)
155 rb_gc_mark(page->doc->self);
157 static VALUE page_allocate(VALUE cls)
159 page_internal_t*page = 0;
160 VALUE v = Data_Make_Struct(cls, page_internal_t, page_mark, page_free, page);
161 memset(page, 0, sizeof(page_internal_t));
164 static VALUE page_nr(VALUE cls)
167 return INT2FIX(page->page->nr);
169 static VALUE page_width(VALUE cls)
172 return INT2FIX(page->page->width);
174 static VALUE page_height(VALUE cls)
177 return INT2FIX(page->page->height);
180 // ------------------------ image -------------------------------------------
182 #define Get_Image(image,cls) image_internal_t*image=0;Data_Get_Struct(cls, image_internal_t, image);
184 static void image_free(image_internal_t*image)
188 static void image_mark(image_internal_t*image)
190 rb_gc_mark(image->doc->self);
192 static VALUE image_allocate(VALUE cls)
194 image_internal_t*image = 0;
195 VALUE v = Data_Make_Struct(cls, image_internal_t, image_mark, image_free, image);
196 memset(image, 0, sizeof(image_internal_t));
199 static VALUE image_width(VALUE cls)
202 return INT2FIX(image->image->width);
204 static VALUE image_height(VALUE cls)
207 return INT2FIX(image->image->height);
209 static VALUE image_rescale(VALUE cls, VALUE _width, VALUE _height)
212 Check_Type(_width, T_FIXNUM);
213 Check_Type(_height, T_FIXNUM);
214 int width = FIX2INT(_width);
215 int height = FIX2INT(_height);
216 volatile VALUE v_image2 = image_allocate(Bitmap);
217 Get_Image(image2,v_image2)
218 image2->doc = image->doc;
219 image2->image = gfximage_rescale(image->image, width, height);
221 rb_raise(rb_eArgError, "Can't rescale to size %dx%d", width, height);
225 static VALUE image_has_alpha(VALUE cls)
228 int size = image->image->width * image->image->height;
229 gfxcolor_t*data = image->image->data;
231 for(t=0;t<size;t++) {
237 static VALUE image_save_jpeg(VALUE cls, VALUE _filename, VALUE quality)
240 Check_Type(_filename, T_STRING);
241 Check_Type(quality, T_FIXNUM);
242 const char*filename = StringValuePtr(_filename);
243 gfximage_save_jpeg(image->image, filename, FIX2INT(quality));
246 static VALUE image_save_png(VALUE cls, VALUE _filename)
249 Check_Type(_filename, T_STRING);
250 const char*filename = StringValuePtr(_filename);
251 gfximage_save_png(image->image, filename);
254 VALUE convert_image(doc_internal_t*doc,gfximage_t*_image)
256 VALUE v = image_allocate(Bitmap);
258 image->image = _image;
262 void invalidate_image(VALUE v)
268 // ------------------------ glyphs ------------------------------------------
270 static VALUE convert_line(gfxline_t*line);
272 #define Get_Glyph(glyph,cls) glyph_internal_t*glyph=0;Data_Get_Struct(cls, glyph_internal_t, glyph);
274 static void glyph_free(glyph_internal_t*glyph)
279 static void glyph_mark(glyph_internal_t*glyph)
281 rb_gc_mark(glyph->font->self);
284 static VALUE glyph_allocate(VALUE cls)
286 glyph_internal_t*glyph = 0;
287 VALUE v = Data_Make_Struct(cls, glyph_internal_t, glyph_mark, glyph_free, glyph);
288 memset(glyph, 0, sizeof(glyph_internal_t));
292 static VALUE glyph_polygon(VALUE cls)
294 Get_Glyph(glyph,cls);
295 return convert_line(glyph->font->font->glyphs[glyph->nr].line);
298 static VALUE glyph_advance(VALUE cls)
300 Get_Glyph(glyph,cls);
301 return rb_float_new(glyph->font->font->glyphs[glyph->nr].advance);
304 static VALUE glyph_bbox(VALUE cls)
306 Get_Glyph(glyph,cls);
307 gfxbbox_t bbox = gfxline_getbbox(glyph->font->font->glyphs[glyph->nr].line);
308 return rb_ary_new3(4, rb_float_new(bbox.xmin),
309 rb_float_new(bbox.ymin),
310 rb_float_new(bbox.xmax),
311 rb_float_new(bbox.ymax));
314 static VALUE glyph_unicode(VALUE cls)
316 Get_Glyph(glyph,cls);
317 return INT2FIX(glyph->font->font->glyphs[glyph->nr].unicode);
320 // ------------------------ font --------------------------------------------
322 #define Get_Font(font,cls) font_internal_t*font=0;Data_Get_Struct(cls, font_internal_t, font);
324 static void font_mark(font_internal_t*font)
326 rb_gc_mark(font->glyph_array);
329 static void font_free(font_internal_t*font)
334 static VALUE font_allocate(VALUE cls)
336 font_internal_t*font = 0;
337 VALUE v = Data_Make_Struct(cls, font_internal_t, font_mark, font_free, font);
338 memset(font, 0, sizeof(font_internal_t));
343 static VALUE font_ascent(VALUE cls)
346 return rb_float_new(font->font->ascent);
349 static VALUE font_descent(VALUE cls)
352 return rb_float_new(font->font->descent);
355 static VALUE font_name(VALUE cls)
358 return rb_tainted_str_new2(font->font->id);
361 static VALUE font_glyphs(VALUE cls)
364 return font->glyph_array;
367 static VALUE font_save_ttf(VALUE cls, VALUE _filename)
370 Check_Type(_filename, T_STRING);
371 const char*filename = StringValuePtr(_filename);
372 gfxfont_save(font->font, filename);
376 static VALUE font_kerning(VALUE cls)
379 gfxkerning_t*kerning = font->font->kerning;
380 int kerning_size = font->font->kerning_size;
381 volatile VALUE a = rb_ary_new2(kerning_size);
383 for(t=0;t<kerning_size;t++) {
384 volatile VALUE tuple = rb_ary_new2(3);
385 rb_ary_store(tuple, 0, INT2FIX(kerning[t].c1));
386 rb_ary_store(tuple, 1, INT2FIX(kerning[t].c2));
387 rb_ary_store(tuple, 2, INT2FIX(kerning[t].advance));
388 rb_ary_store(a, t, tuple);
393 // ------------------------ gfx device --------------------------------------
395 typedef struct device_internal {
400 static ID id_setparameter = 0;
401 static ID id_startpage = 0;
402 static ID id_startclip = 0;
403 static ID id_endclip = 0;
404 static ID id_stroke = 0;
405 static ID id_fill = 0;
406 static ID id_fillbitmap = 0;
407 static ID id_fillgradient = 0;
408 static ID id_addfont = 0;
409 static ID id_drawchar = 0;
410 static ID id_drawlink = 0;
411 static ID id_endpage = 0;
412 static ID id_geterror = 0;
413 static ID id_finish = 0;
414 static ID id_butt = 0;
415 static ID id_round = 0;
416 static ID id_square = 0;
417 static ID id_bevel = 0;
418 static ID id_miter = 0;
419 static ID id_move = 0;
420 static ID id_line = 0;
421 static ID id_spline = 0;
422 static ID id_radial = 0;
423 static ID id_linear = 0;
425 static VALUE noop(int argc, VALUE *argv, VALUE obj) {return obj;}
427 #define forward(v,id,args...) rb_respond_to((v), (id))?rb_funcall((v), (id), args):0
429 VALUE convert_line(gfxline_t*line)
433 while(l) {l=l->next;len++;}
435 volatile VALUE array = rb_ary_new2(len);
441 if(l->type == gfx_moveTo) {
442 e = rb_ary_new3(3, ID2SYM(id_move), Qfalse, Qfalse);
443 rb_ary_store(array, pos, e);
444 rb_ary_store(e, 1, rb_float_new(l->x));
445 rb_ary_store(e, 2, rb_float_new(l->y));
446 } else if(l->type == gfx_lineTo) {
447 e = rb_ary_new3(3, ID2SYM(id_line), Qfalse, Qfalse);
448 rb_ary_store(array, pos, e);
449 rb_ary_store(e, 1, rb_float_new(l->x));
450 rb_ary_store(e, 2, rb_float_new(l->y));
452 e = rb_ary_new3(5, ID2SYM(id_spline), Qfalse, Qfalse, Qfalse, Qfalse);
453 rb_ary_store(array, pos, e);
454 rb_ary_store(e, 1, rb_float_new(l->x));
455 rb_ary_store(e, 2, rb_float_new(l->y));
456 rb_ary_store(e, 3, rb_float_new(l->sx));
457 rb_ary_store(e, 4, rb_float_new(l->sy));
464 VALUE convert_color(gfxcolor_t*color)
466 return rb_ary_new3(4, INT2FIX(color->a), INT2FIX(color->r), INT2FIX(color->g), INT2FIX(color->b));
468 VALUE convert_matrix(gfxmatrix_t*matrix)
470 volatile VALUE array = rb_ary_new2(3);
471 volatile VALUE a = rb_ary_new2(2);
472 rb_ary_store(array, 0, a);
473 rb_ary_store(a, 0, rb_float_new(matrix->m00));
474 rb_ary_store(a, 1, rb_float_new(matrix->m01));
476 rb_ary_store(array, 1, a);
477 rb_ary_store(a, 0, rb_float_new(matrix->m10));
478 rb_ary_store(a, 1, rb_float_new(matrix->m11));
480 rb_ary_store(array, 2, a);
481 rb_ary_store(a, 0, rb_float_new(matrix->tx));
482 rb_ary_store(a, 1, rb_float_new(matrix->ty));
485 static VALUE font_is_cached(device_internal_t*i, gfxfont_t*font)
487 return (VALUE)gfxfontlist_getuserdata(i->doc->fontlist, font->id);
489 static void cache_font(device_internal_t*i, gfxfont_t*font, VALUE v)
491 i->doc->fontlist = gfxfontlist_addfont2(i->doc->fontlist, font, (void*)v);
493 static VALUE convert_font(gfxfont_t*font)
495 volatile VALUE v2 = font_allocate(Font);
498 f->glyph_array = rb_ary_new2(font->num_glyphs);
501 for(t=0;t<font->num_glyphs;t++) {
502 volatile VALUE a = glyph_allocate(Glyph);
503 rb_ary_store(f->glyph_array, t, a);
510 static VALUE convert_gradient(gfxgradient_t*gradient)
515 device_internal_t*i = (device_internal_t*)dev->internal; \
517 int rb_setparameter(gfxdevice_t*dev, const char*key, const char*value)
520 volatile VALUE v_key = rb_tainted_str_new2(key);
521 volatile VALUE v_value = rb_tainted_str_new2(value);
522 VALUE ret = forward(v,id_setparameter,2,v_key,v_value);
525 void rb_startpage(gfxdevice_t*dev, int width, int height)
528 VALUE ret = forward(v,id_startpage,2,INT2FIX(width),INT2FIX(height));
530 void rb_startclip(gfxdevice_t*dev, gfxline_t*line)
533 volatile VALUE v_line = convert_line(line);
534 VALUE ret = forward(v,id_startclip,1,v_line);
536 void rb_endclip(gfxdevice_t*dev)
539 VALUE ret = forward(v,id_endclip,0);
541 void rb_stroke(gfxdevice_t*dev, gfxline_t*line, gfxcoord_t width, gfxcolor_t*color, gfx_capType cap_style, gfx_joinType joint_style, gfxcoord_t miterLimit)
546 if(cap_style == gfx_capButt) cap = id_butt;
547 else if(cap_style == gfx_capRound) cap = id_round;
548 else if(cap_style == gfx_capSquare) cap = id_square;
551 if(joint_style == gfx_joinRound) joint = id_round;
552 else if(joint_style == gfx_joinMiter) joint = id_miter;
553 else if(joint_style == gfx_joinBevel) joint = id_bevel;
555 volatile VALUE v_line = convert_line(line);
556 volatile VALUE v_width = rb_float_new(width);
557 volatile VALUE v_color = convert_color(color);
558 volatile VALUE v_miter = rb_float_new(miterLimit);
559 forward(v, id_stroke, 6, v_line, v_width, v_color, ID2SYM(cap), ID2SYM(joint), v_miter);
561 void rb_fill(gfxdevice_t*dev, gfxline_t*line, gfxcolor_t*color)
565 volatile VALUE v_line = convert_line(line);
566 volatile VALUE v_color = convert_color(color);
567 forward(v, id_fill, 2, v_line, v_color);
569 void rb_fillbitmap(gfxdevice_t*dev, gfxline_t*line, gfximage_t*img, gfxmatrix_t*matrix, gfxcxform_t*cxform)
572 volatile VALUE v_image = convert_image(i->doc, img);
573 volatile VALUE v_line = convert_line(line);
574 volatile VALUE v_matrix = convert_matrix(matrix);
575 forward(v, id_fillbitmap, 4, v_line, v_image, v_matrix, Qnil);
576 invalidate_image(v_image);
578 void rb_fillgradient(gfxdevice_t*dev, gfxline_t*line, gfxgradient_t*gradient, gfxgradienttype_t type, gfxmatrix_t*matrix)
581 ID typeid = (type == gfxgradient_linear)? id_linear : id_radial;
583 volatile VALUE v_line = convert_line(line);
584 volatile VALUE v_matrix = convert_matrix(matrix);
585 volatile VALUE v_gradient = convert_gradient(gradient);
586 forward(v, id_fillgradient, 4, v_line, v_gradient, ID2SYM(typeid), v_matrix);
588 void rb_addfont(gfxdevice_t*dev, gfxfont_t*font)
592 volatile VALUE f = font_is_cached(i, font);
593 if(!f) {f=convert_font(font);cache_font(i,font,f);}
595 forward(v, id_addfont, 1, f);
597 void rb_drawchar(gfxdevice_t*dev, gfxfont_t*font, int glyphnr, gfxcolor_t*color, gfxmatrix_t*matrix)
600 volatile VALUE f = font_is_cached(i, font);
601 if(!f) {f=convert_font(font);cache_font(i,font,f);}
603 volatile VALUE v_color = convert_color(color);
604 volatile VALUE v_matrix = convert_matrix(matrix);
605 forward(v, id_drawchar, 4, f, INT2FIX(glyphnr), v_color, v_matrix);
607 void rb_drawlink(gfxdevice_t*dev, gfxline_t*line, const char*action)
610 volatile VALUE v_line = convert_line(line);
611 volatile VALUE v_action = rb_tainted_str_new2(action);
612 forward(v, id_drawlink, v_line, v_action);
614 void rb_endpage(gfxdevice_t*dev)
617 forward(v, id_endpage, 0);
619 gfxresult_t* rb_finish(gfxdevice_t*dev)
622 VALUE ret = forward(v, id_endpage, 0);
623 gfxresult_t*r = (gfxresult_t*)rfx_calloc(sizeof(gfxresult_t));
624 r->internal = (void*)(ptroff_t)ret;
628 static VALUE page_render(VALUE cls, VALUE device)
630 Check_Type(device, T_OBJECT);
639 dev.setparameter = rb_setparameter;
640 dev.startpage = rb_startpage;
641 dev.startclip = rb_startclip;
642 dev.endclip = rb_endclip;
643 dev.stroke = rb_stroke;
645 dev.fillbitmap = rb_fillbitmap;
646 dev.fillgradient = rb_fillgradient;
647 dev.addfont = rb_addfont;
648 dev.drawchar = rb_drawchar;
649 dev.drawlink = rb_drawlink;
650 dev.endpage = rb_endpage;
651 dev.finish = rb_finish;
653 dev.startpage(&dev, page->page->width, page->page->height);
654 page->page->render(page->page, &dev);
660 static VALUE doc_prepare(VALUE cls, VALUE device)
670 dev.setparameter = rb_setparameter;
671 dev.startpage = rb_startpage;
672 dev.startclip = rb_startclip;
673 dev.endclip = rb_endclip;
674 dev.stroke = rb_stroke;
676 dev.fillbitmap = rb_fillbitmap;
677 dev.fillgradient = rb_fillgradient;
678 dev.addfont = rb_addfont;
679 dev.drawchar = rb_drawchar;
680 dev.drawlink = rb_drawlink;
681 dev.endpage = rb_endpage;
682 dev.finish = rb_finish;
684 doc->doc->prepare(doc->doc, &dev);
689 // ---------------------- global functions ----------------------------------
691 VALUE gfx_setparameter(VALUE module, VALUE _key, VALUE _value)
693 Check_Type(_key, T_STRING);
694 Check_Type(_value, T_STRING);
695 const char*key = StringValuePtr(_key);
696 const char*value = StringValuePtr(_value);
697 pdfdriver->setparameter(pdfdriver, key, value);
698 swfdriver->setparameter(swfdriver, key, value);
699 imagedriver->setparameter(imagedriver, key, value);
703 // --------------------------------------------------------------------------
707 initLog(0,0,0,0,0,2);
708 pdfdriver = gfxsource_pdf_create();
709 swfdriver = gfxsource_swf_create();
710 imagedriver = gfxsource_image_create();
712 GFX = rb_define_module("GFX");
714 rb_define_module_function(GFX, "setparameter", gfx_setparameter, 2);
716 DocumentPage = rb_define_class_under(GFX, "DocumentPage", rb_cObject);
717 rb_define_method(DocumentPage, "width", page_width, 0);
718 rb_define_method(DocumentPage, "height", page_height, 0);
719 rb_define_method(DocumentPage, "nr", page_nr, 0);
720 rb_define_method(DocumentPage, "render", page_render, 1);
722 Document = rb_define_class_under(GFX, "Document", rb_cObject);
723 rb_define_method(Document, "initialize", doc_initialize, 1);
724 rb_define_method(Document, "page", doc_get_page, 1);
725 rb_define_method(Document, "each_page", doc_each_page, 0);
726 rb_define_method(Document, "prepare", doc_prepare, 1);
728 Bitmap = rb_define_class_under(GFX, "Bitmap", rb_cObject);
729 rb_define_method(Bitmap, "save_jpeg", image_save_jpeg, 2);
730 rb_define_method(Bitmap, "save_png", image_save_png, 1);
731 rb_define_method(Bitmap, "width", image_width, 0);
732 rb_define_method(Bitmap, "height", image_height, 0);
733 rb_define_method(Bitmap, "rescale", image_rescale, 2);
734 rb_define_method(Bitmap, "has_alpha", image_has_alpha, 0);
736 Glyph = rb_define_class_under(GFX, "Glyph", rb_cObject);
737 rb_define_method(Glyph, "polygon", glyph_polygon, 0);
738 rb_define_method(Glyph, "unicode", glyph_unicode, 0);
739 rb_define_method(Glyph, "advance", glyph_advance, 0);
740 rb_define_method(Glyph, "bbox", glyph_bbox, 0);
742 Font = rb_define_class_under(GFX, "Font", rb_cObject);
743 rb_define_method(Font, "name", font_name, 0);
744 rb_define_method(Font, "ascent", font_ascent, 0);
745 rb_define_method(Font, "descent", font_descent, 0);
746 rb_define_method(Font, "glyphs", font_glyphs, 0);
747 rb_define_method(Font, "kerning", font_kerning, 0);
748 rb_define_method(Font, "get_kerning_table", font_kerning, 0);
749 rb_define_method(Font, "save_ttf", font_save_ttf, 1);
751 Device = rb_define_class_under(GFX, "Device", rb_cObject);
752 rb_define_method(Device, "startpage", noop, -1);
753 rb_define_method(Device, "endpage", noop, -1);
754 rb_define_method(Device, "startclip", noop, -1);
755 rb_define_method(Device, "endclip", noop, -1);
756 rb_define_method(Device, "stroke", noop, -1);
757 rb_define_method(Device, "fill", noop, -1);
758 rb_define_method(Device, "fillbitmap", noop, -1);
759 rb_define_method(Device, "fillgradient", noop, -1);
760 rb_define_method(Device, "addfont", noop, -1);
761 rb_define_method(Device, "drawchar", noop, -1);
762 rb_define_method(Device, "drawlink", noop, -1);
763 rb_define_method(Device, "endpage", noop, -1);
765 PDFClass = rb_define_class_under(GFX, "PDF", Document);
766 rb_define_alloc_func(PDFClass, pdf_allocate);
768 SWFClass = rb_define_class_under(GFX, "SWF", Document);
769 rb_define_alloc_func(SWFClass, swf_allocate);
771 ImageClass = rb_define_class_under(GFX, "ImageRead", Document);
772 rb_define_alloc_func(ImageClass, imgdrv_allocate);
774 id_setparameter = rb_intern("setparameter");
775 id_startpage = rb_intern("startpage") ;
776 id_startclip = rb_intern("startclip") ;
777 id_endclip = rb_intern("endclip") ;
778 id_stroke = rb_intern("stroke") ;
779 id_fill = rb_intern("fill") ;
780 id_fillbitmap = rb_intern("fillbitmap") ;
781 id_fillgradient = rb_intern("fillgradient") ;
782 id_addfont = rb_intern("addfont") ;
783 id_drawchar = rb_intern("drawchar") ;
784 id_drawlink = rb_intern("drawlink") ;
785 id_endpage = rb_intern("endpage") ;
786 id_geterror = rb_intern("geterror") ;
787 id_finish = rb_intern("finish") ;
788 id_butt = rb_intern("butt");
789 id_round = rb_intern("round");
790 id_square = rb_intern("square");
791 id_miter = rb_intern("miter");
792 id_bevel = rb_intern("bevel");
793 id_move = rb_intern("move");
794 id_line = rb_intern("line");
795 id_spline = rb_intern("spline");
796 id_radial = rb_intern("radial");
797 id_linear = rb_intern("linear");