--- parser3/src/classes/image.C 2005/07/28 11:23:01 1.112 +++ parser3/src/classes/image.C 2010/10/21 15:06:27 1.136 @@ -1,11 +1,11 @@ /** @file Parser: @b image parser class. - Copyright(c) 2001-2004 ArtLebedev Group (http://www.artlebedev.com) + Copyright(c) 2001-2009 ArtLebedev Group (http://www.artlebedev.com) Author: Alexandr Petrosian (http://paf.design.ru) */ -static const char * const IDENT_IMAGE_C="$Date: 2005/07/28 11:23:01 $"; +static const char * const IDENT_IMAGE_C="$Date: 2010/10/21 15:06:27 $"; /* jpegsize: gets the width and height (in pixels) of a jpeg file @@ -29,18 +29,20 @@ static const char * const IDENT_IMAGE_C= #include "pa_vdate.h" #include "pa_table.h" +// defines + +static const String spacebar_width_name("space"); +static const String monospace_width_name("width"); +static const String letter_spacing_name("spacing"); + // class class MImage: public Methoded { public: // VStateless_class - Value* create_new_value(Pool&, HashStringValue&) { return new VImage(); } + Value* create_new_value(Pool&) { return new VImage(); } public: MImage(); - -public: // Methoded - bool used_directly() { return true; } - }; // globals @@ -49,13 +51,13 @@ DECLARE_CLASS_VAR(image, new MImage, 0); // helpers +#define EXIF_TAG(tag, name) put(tag, #name); + /// value of exif tag -> it's value class EXIF_tag_value2name: public Hash { public: EXIF_tag_value2name() { // image JPEG Exif - #define EXIF_TAG(tag, name) \ - put(tag, #name); // Tags used by IFD0 (main image) EXIF_TAG(0x010e, ImageDescription); EXIF_TAG(0x010f, Make); @@ -130,7 +132,7 @@ public: EXIF_TAG(0x83bb, IPTC/NAA); EXIF_TAG(0x8773, InterColorProfile); EXIF_TAG(0x8824, SpectralSensitivity); - EXIF_TAG(0x8825, GPSInfo); + //EXIF_TAG(0x8825, GPSInfo); EXIF_TAG(0x8828, OECF); EXIF_TAG(0x8829, Interlace); EXIF_TAG(0x882a, TimeZoneOffset); @@ -147,10 +149,79 @@ public: EXIF_TAG(0xa20b, FlashEnergy); EXIF_TAG(0xa20c, SpatialFrequencyResponse); EXIF_TAG(0xa214, SubjectLocation); - #undef EXIF_TAG + + // additional things added by misha@ + EXIF_TAG(0x0100, ImageWidth); + EXIF_TAG(0x0101, ImageLength); + EXIF_TAG(0x0102, BitsPerSample); + EXIF_TAG(0x0103, Compression); + EXIF_TAG(0x0106, PhotometricInterpretation); + EXIF_TAG(0x010a, FillOrder); + EXIF_TAG(0x010d, DocumentName); + EXIF_TAG(0x0111, StripOffsets); + EXIF_TAG(0x0115, SamplesPerPixel); + EXIF_TAG(0x0116, RowsPerStrip); + EXIF_TAG(0x0117, StripByteCounts); + EXIF_TAG(0x011c, PlanarConfiguration); + EXIF_TAG(0x0156, TransferRange); + EXIF_TAG(0x0200, JPEGProc); + EXIF_TAG(0x0201, JPEGInterchangeFormat); + EXIF_TAG(0x0202, JPEGInterchangeFormatLength); + EXIF_TAG(0x0212, YCbCrSubSampling); + EXIF_TAG(0xa401, CustomRendered); + EXIF_TAG(0xa402, ExposureMode); + EXIF_TAG(0xa403, WhiteBalance); + EXIF_TAG(0xa404, DigitalZoomRatio); + EXIF_TAG(0xa405, FocalLengthIn35mmFilm); + EXIF_TAG(0xa406, SceneCaptureType); + EXIF_TAG(0xa407, GainControl); + EXIF_TAG(0xa408, Contrast); + EXIF_TAG(0xa409, Saturation); + EXIF_TAG(0xa40a, Sharpness); + EXIF_TAG(0xa40b, DeviceSettingDescription); + EXIF_TAG(0xa40c, SubjectDistanceRange); + EXIF_TAG(0xa420, ImageUniqueID); } } exif_tag_value2name; +class EXIF_gps_tag_value2name: public Hash { +public: + EXIF_gps_tag_value2name() { + EXIF_TAG(0x0, GPSVersionID); + EXIF_TAG(0x1, GPSLatitudeRef); + EXIF_TAG(0x2, GPSLatitude); + EXIF_TAG(0x3, GPSLongitudeRef); + EXIF_TAG(0x4, GPSLongitude); + EXIF_TAG(0x5, GPSAltitudeRef); + EXIF_TAG(0x6, GPSAltitude); + EXIF_TAG(0x7, GPSTimeStamp); + EXIF_TAG(0x8, GPSSatellites); + EXIF_TAG(0x9, GPSStatus); + EXIF_TAG(0xA, GPSMeasureMode); + EXIF_TAG(0xB, GPSDOP); + EXIF_TAG(0xC, GPSSpeedRef); + EXIF_TAG(0xD, GPSSpeed); + EXIF_TAG(0xE, GPSTrackRef); + EXIF_TAG(0xF, GPSTrack); + EXIF_TAG(0x10, GPSImgDirectionRef); + EXIF_TAG(0x11, GPSImgDirection); + EXIF_TAG(0x12, GPSMapDatum); + EXIF_TAG(0x13, GPSDestLatitudeRef); + EXIF_TAG(0x14, GPSDestLatitude); + EXIF_TAG(0x15, GPSDestLongitudeRef); + EXIF_TAG(0x16, GPSDestLongitude); + EXIF_TAG(0x17, GPSDestBearingRef); + EXIF_TAG(0x18, GPSDestBearing); + EXIF_TAG(0x19, GPSDestDistanceRef); + EXIF_TAG(0x1A, GPSDestDistance); + EXIF_TAG(0x1B, GPSProcessingMethod); + EXIF_TAG(0x1C, GPSAreaInformation); + EXIF_TAG(0x1D, GPSDateStamp); + EXIF_TAG(0x1E, GPSDifferential); + } +} exif_gps_tag_value2name; + +#undef EXIF_TAG #ifndef DOXYGEN class Measure_reader { @@ -186,7 +257,7 @@ public: override void seek(long value, int whence) { if(lseek(f, value, whence)<0) - throw Exception("image.format", + throw Exception(IMAGE_FORMAT, &file_name, "seek(value=%ld, whence=%d) failed: %s (%d), actual filename '%s'", value, whence, strerror(errno), errno, fname); @@ -228,7 +299,7 @@ public: } if((ssize_t)new_offset<0 || new_offset>size) - throw Exception("image.format", + throw Exception(IMAGE_FORMAT, &file_name, "seek(value=%l, whence=%d) failed: out of buffer, new_offset>size (%l>%l) or new_offset<0", value, whence, new_offset, size); @@ -303,6 +374,8 @@ struct JPG_Exif_IFD_entry { #define JPG_IFD_TAG_EXIF_OFFSET 0x8769 +#define JPG_IFD_TAG_EXIF_GPS_OFFSET 0x8825 + #define JPEG_EXIF_DATE_CHARS 20 // @@ -331,13 +404,13 @@ static void measure_gif(const String& or const char* buf; const size_t head_size=sizeof(GIF_Header); if(reader.read(buf, head_size)signature, "GIF", 3)!=0) - throw Exception("image.format", + throw Exception(IMAGE_FORMAT, &origin_string, "not GIF file - wrong signature"); @@ -382,9 +455,9 @@ static Value* parse_IFD_entry_formatted_ } /* case 11: // single float - todo + @todo case 12: // double float - todo + @todo */ }; @@ -413,9 +486,7 @@ static Value* parse_IFD_entry_formatted_ catch(...) { /*ignore bad date times*/ } } - if(const char* premature_zero_pos=(const char* )memchr(cstr, 0, length)) - length=premature_zero_pos-cstr; - return new VString(*new String(cstr, length, true/*tainted*/)); + return new VString(*new String(cstr, String::L_TAINTED)); } if(components_count==1) @@ -464,7 +535,7 @@ static Value* parse_IFD_entry_value( // You can get the total data byte length by multiplies // a 'bytes/components' value (see above chart) by number of components stored 'NNNNNNNN' area uint components_count=endian_to_uint(is_big, entry.components_count); - size_t value_size=component_size*components_count; + uint value_size=component_size*components_count; // If its size is over 4bytes, 'DDDDDDDD' contains the offset to data stored address Value* result; @@ -492,24 +563,25 @@ static Value* parse_IFD_entry_value( } static void parse_IFD(HashStringValue& hash, - bool is_big, Measure_reader& reader, long tiff_base); + bool is_big, Measure_reader& reader, long tiff_base, bool gps=false); static void parse_IFD_entry(HashStringValue& hash, bool is_big, Measure_reader& reader, long tiff_base, - JPG_Exif_IFD_entry& entry) { + JPG_Exif_IFD_entry& entry, bool gps=false) { ushort tag=endian_to_ushort(is_big, entry.tag); - if(tag==JPG_IFD_TAG_EXIF_OFFSET) { + + if(tag==JPG_IFD_TAG_EXIF_OFFSET || tag==JPG_IFD_TAG_EXIF_GPS_OFFSET){ long remembered=reader.tell(); { reader.seek(tiff_base+endian_to_uint(is_big, entry.value_or_offset_to_it), SEEK_SET); - parse_IFD(hash, is_big, reader, tiff_base); + parse_IFD(hash, is_big, reader, tiff_base, (tag==JPG_IFD_TAG_EXIF_GPS_OFFSET)?true:gps); } reader.seek(remembered, SEEK_SET); return; } - + if(Value* value=parse_IFD_entry_value(is_big, reader, tiff_base, entry)) { - if(const char* name=exif_tag_value2name.get(tag)) + if(const char* name=(gps)?exif_gps_tag_value2name.get(tag):exif_tag_value2name.get(tag)) hash.put(String::Body(name), value); else hash.put(String::Body::Format(tag), value); @@ -518,7 +590,7 @@ static void parse_IFD_entry(HashStringVa static void parse_IFD( HashStringValue& hash, - bool is_big, Measure_reader& reader, long tiff_base) { + bool is_big, Measure_reader& reader, long tiff_base, bool gps) { const char* buf; if(reader.read(buf, sizeof(JPG_Exif_IFD_begin))marker!=MARKER) - throw Exception("image.format", + throw Exception(IMAGE_FORMAT, &origin_string, "not JPEG file - marker not found"); switch(head->code) { - // http://www.ba.wakwak.com/~tsuruzoh/Computer/Digicams/exif-e.html + // http://park2.wakwak.com/~tsuruzoh/Computer/Digicams/exif-e.html case CODE_EXIF: if(exif && !*exif) // seen .jpg with some xml under EXIF tag, after real exif block :) *exif=parse_exif(reader, origin_string); @@ -612,7 +684,7 @@ static void measure_jpeg(const String& o { // Segments that contain size info if(reader.read(buf, sizeof(JPG_Size_segment_body))length), SEEK_SET); } - throw Exception("image.format", + throw Exception(IMAGE_FORMAT, &origin_string, "broken JPEG file - size frame not found"); } @@ -637,13 +709,13 @@ static void measure_png(const String& or const char* buf; const size_t head_size=sizeof(PNG_Header); if(reader.read(buf, head_size)signature, "IHDR", 4)!=0) - throw Exception("image.format", + throw Exception(IMAGE_FORMAT, &origin_string, "not PNG file - wrong signature"); @@ -655,7 +727,7 @@ static void measure_png(const String& or static void measure(const String& file_name, Measure_reader& reader, ushort& width, ushort& height, Value** exif) { - const char* file_name_cstr=file_name.cstr(String::L_FILE_SPEC); + const char* file_name_cstr=file_name.taint_cstr(String::L_FILE_SPEC); if(const char* cext=strrchr(file_name_cstr, '.')) { cext++; if(strcasecmp(cext, "GIF")==0) @@ -665,11 +737,11 @@ static void measure(const String& file_n else if(strcasecmp(cext, "PNG")==0) measure_png(file_name, reader, width, height); else - throw Exception("image.format", + throw Exception(IMAGE_FORMAT, &file_name, "unhandled image file name extension '%s'", cext); } else - throw Exception("image.format", + throw Exception(IMAGE_FORMAT, &file_name, "can not determine image type - no file name extension"); } @@ -710,7 +782,7 @@ static void _measure(Request& r, MethodP file_read_action_under_lock(r.absolute(*file_name), "measure", file_measure_action, &info); } else { - VFile* vfile=data.as_vfile(); + VFile* vfile=data.as_vfile(String::L_AS_IS); file_name=&vfile->fields().get(name_name)->as_string(); Measure_buf_reader reader( vfile->value_ptr(), @@ -730,14 +802,18 @@ struct Attrib_info { }; #endif static void append_attrib_pair( - HashStringValue::key_type key, - HashStringValue::value_type value, - Attrib_info* info) { - // skip user-specified and internal(starting with "line-") attributes - if(info->skip && info->skip->get(key) || key.pos("line-")==0) + HashStringValue::key_type key, + HashStringValue::value_type value, + Attrib_info* info) { + // skip user-specified, internal(starting with "line-") attributes and border attribute with empty value + if( + (info->skip && info->skip->get(key)) + || key.pos("line-")==0 + || (key=="border" && !value->is_defined()) + ) return; - // src="a.gif" width=123 ismap[=-1] + // src="a.gif" width="123" ismap[=-1] *info->tag << " " << key; if(value->is_string() || value->as_int()>=0) *info->tag << "=\"" << value->as_string() << "\""; @@ -752,21 +828,20 @@ static void _html(Request& r, MethodPara if(params.count()) { // for backward compatibility: someday was ^html{} - Value& vattribs=r.process_to_value(params[0], - false/*don't intercept string*/); + Value& vattribs=r.process_to_value(params[0], false/*don't intercept string*/); if(!vattribs.is_string()) // allow empty if((attribs=vattribs.get_hash())) { Attrib_info info={&tag, 0}; - attribs->for_each(append_attrib_pair, &info); + attribs->for_each(append_attrib_pair, &info); } else - throw Exception("parser.runtime", + throw Exception(PARSER_RUNTIME, 0, "attributes must be hash"); } { Attrib_info info={&tag, attribs}; - fields.for_each(append_attrib_pair, &info); + fields.for_each(append_attrib_pair, &info); } tag << " />"; r.write_pass_lang(tag); @@ -775,13 +850,13 @@ static void _html(Request& r, MethodPara /// @test wrap FILE to auto-object static gdImage* load(Request& r, const String& file_name){ - const char* file_name_cstr=r.absolute(file_name).cstr(String::L_FILE_SPEC); + const char* file_name_cstr=r.absolute(file_name).taint_cstr(String::L_FILE_SPEC); if(FILE *f=fopen(file_name_cstr, "rb")) { gdImage* image=new gdImage; bool ok=image->CreateFromGif(f); fclose(f); if(!ok) - throw Exception("image.format", + throw Exception(IMAGE_FORMAT, &file_name, "is not in GIF format"); return image; @@ -794,7 +869,7 @@ static gdImage* load(Request& r, static void _load(Request& r, MethodParams& params) { - const String& file_name=params.as_string(0, "file name must not be code"); + const String& file_name=params.as_string(0, FILE_NAME_MUST_NOT_BE_CODE); gdImage* image=load(r, file_name); GET_SELF(r, VImage).set(&file_name, image->SX(), image->SY(), image); @@ -817,7 +892,7 @@ static void _gif(Request& r, MethodParam const String *file_name=0; if(params.count()>0) - file_name=¶ms.as_string(0, "file name must be string"); + file_name=¶ms.as_string(0, FILE_NAME_MUST_BE_STRING); gdBuf buf=image.Gif(); @@ -825,7 +900,7 @@ static void _gif(Request& r, MethodParam Value* content_type=new VString(*new String("image/gif")); vfile.set(false/*not tainted*/, (const char*)buf.ptr, buf.size, - file_name? file_name->cstr(String::L_FILE_SPEC): 0, + file_name? file_name->taint_cstr(String::L_FILE_SPEC): 0, content_type); r.write_no_lang(vfile); @@ -885,29 +960,56 @@ static void add_point(Table::element_typ (*p)++; } #endif +#ifndef DOXYGEN +static void add_point(int x, int y, + gdImage::Point **p) { + (**p).x=x; + (**p).y=y; + (*p)++; +} +#endif static void _replace(Request& r, MethodParams& params) { + int src_color=params.as_int(0, "src color must be int", r); + int dest_color=params.as_int(1, "dest color must be int", r); + gdImage& image=GET_SELF(r, VImage).image(); - Table* table=params.as_no_junction(2, "coordinates must not be code").get_table(); - if(!table) - throw Exception(0, - 0, - "coordinates must be table"); + gdImage::Point* all_p=0; + size_t count=0; + if(params.count() == 3){ + Table* table=params.as_no_junction(2, COORDINATES_MUST_NOT_BE_CODE).get_table(); + if(!table) + throw Exception(PARSER_RUNTIME, + 0, + "coordinates must be table"); + count=table->count(); + all_p=new(PointerFreeGC) gdImage::Point[count]; + gdImage::Point* add_p=all_p; + table->for_each(add_point, &add_p); + } else { + int max_x=image.SX()-1; + int max_y=image.SY()-1; + if(max_x > 0 && max_y > 0){ + count=4; + all_p=new(PointerFreeGC) gdImage::Point[count]; + gdImage::Point* add_p=all_p; + add_point(0, 0, &add_p); + add_point(max_x, 0, &add_p); + add_point(max_x, max_y, &add_p); + add_point(0, max_y, &add_p); + } + } - gdImage::Point *all_p=new(PointerFreeGC) gdImage::Point[table->count()]; - gdImage::Point *add_p=all_p; - table->for_each(add_point, &add_p); - image.FilledPolygonReplaceColor(all_p, table->count(), - image.Color(params.as_int(0, "src color must be int", r)), - image.Color(params.as_int(1, "dest color must be int", r))); + if(count) + image.FilledPolygonReplaceColor(all_p, count, image.Color(src_color), image.Color(dest_color)); } static void _polyline(Request& r, MethodParams& params) { gdImage& image=GET_SELF(r, VImage).image(); - Table* table=params.as_no_junction(1, "coordinates must not be code").get_table(); + Table* table=params.as_no_junction(1, COORDINATES_MUST_NOT_BE_CODE).get_table(); if(!table) - throw Exception(0, + throw Exception(PARSER_RUNTIME, 0, "coordinates must be table"); @@ -922,9 +1024,9 @@ static void _polyline(Request& r, Method static void _polygon(Request& r, MethodParams& params) { gdImage& image=GET_SELF(r, VImage).image(); - Table* table=params.as_no_junction(1, "coordinates must not be code").get_table(); + Table* table=params.as_no_junction(1, COORDINATES_MUST_NOT_BE_CODE).get_table(); if(!table) - throw Exception(0, + throw Exception(PARSER_RUNTIME, 0, "coordinates must be table"); @@ -938,9 +1040,9 @@ static void _polygon(Request& r, MethodP static void _polybar(Request& r, MethodParams& params) { gdImage& image=GET_SELF(r, VImage).image(); - Table* table=params.as_no_junction(1, "coordinates must not be code").get_table(); + Table* table=params.as_no_junction(1, COORDINATES_MUST_NOT_BE_CODE).get_table(); if(!table) - throw Exception("parser.runtime", + throw Exception(PARSER_RUNTIME, 0, "coordinates must be table"); @@ -957,14 +1059,23 @@ static void _polybar(Request& r, MethodP // Font class -const int Font::letter_spacing=1; - -Font::Font(//, +Font::Font( + Charset& asource_charset, const String& aalphabet, - gdImage* aifont, int aheight, int amonospace, int aspacebarspace): - height(aheight), monospace(amonospace), spacebarspace(aspacebarspace), + gdImage* aifont, int aheight, int amonospace, int aspacebarspace, int aletterspacing): + fsource_charset(asource_charset), + height(aheight), + monospace(amonospace), + spacebarspace(aspacebarspace), + letterspacing(aletterspacing), ifont(aifont), alphabet(aalphabet) { + + if(fsource_charset.isUTF8()){ + size_t index=0; + for(UTF8_string_iterator i(alphabet); i.has_next(); ) + fletter2index.put_dont_replace(i.next(), index++); + } } /* ******************************** char ********************************** */ @@ -974,6 +1085,11 @@ size_t Font::index_of(char ch) { return alphabet.pos(ch); } +size_t Font::index_of(XMLCh ch) { + if(ch==' ') return STRING_NOT_FOUND; + return fletter2index.get(ch); +} + int Font::index_width(size_t index) { if(index==STRING_NOT_FOUND) return spacebarspace; @@ -994,24 +1110,40 @@ void Font::index_display(gdImage& image, /* ******************************** string ********************************** */ int Font::step_width(int index) { - return letter_spacing + (monospace ? monospace : index_width(index)); + return letterspacing + (monospace ? monospace : index_width(index)); } // counts trailing letter_spacing, consider this OK. useful for contiuations int Font::string_width(const String& s){ const char* cstr=s.cstr(); int result=0; - for(const char* current=cstr; *current; current++) - result+=step_width(index_of(*current)); + + if(fsource_charset.isUTF8()){ + for(UTF8_string_iterator i(s); i.has_next(); ) + result+=step_width(index_of(i.next())); + } else { + for(const char* current=cstr; *current; current++) + result+=step_width(index_of(*current)); + } + return result; } void Font::string_display(gdImage& image, int x, int y, const String& s){ const char* cstr=s.cstr(); - for(const char* current=cstr; *current; current++) { - size_t index=index_of(*current); - index_display(image, x, y, index); - x+=step_width(index); + + if(fsource_charset.isUTF8()){ + for(UTF8_string_iterator i(s); i.has_next(); ){ + size_t index=index_of(i.next()); + index_display(image, x, y, index); + x+=step_width(index); + } + } else { + for(const char* current=cstr; *current; current++) { + size_t index=index_of(*current); + index_display(image, x, y, index); + x+=step_width(index); + } } } @@ -1020,31 +1152,63 @@ void Font::string_display(gdImage& image static void _font(Request& r, MethodParams& params) { const String& alphabet=params.as_string(0, "alphabet must not be code"); - gdImage* image=load(r, params.as_string(1, "file_name must not be code")); - int spacebar_width=params.as_int(2, "spacebar_width must be int", r); - int monospace_width; - if(params.count()>3) { - monospace_width=params.as_int(3, "monospace_width must be int", r); - if(!monospace_width) - monospace_width=image->SX(); - } else - monospace_width=0; - - if(!alphabet.length()) - throw Exception("parser.runtime", + size_t alphabet_length=alphabet.length(r.charsets.source()); + if(!alphabet_length) + throw Exception(PARSER_RUNTIME, 0, "alphabet must not be empty"); - if(int remainder=image->SY() % alphabet.length()) - throw Exception("parser.runtime", + gdImage* image=load(r, params.as_string(1, FILE_NAME_MUST_NOT_BE_CODE)); + + int spacebar_width=image->SX(); + int monospace_width=0; // proportional + int letter_spacing=1; + if(params.count()>2){ + if(HashStringValue* options=params.as_no_junction(2, "param must be int or hash").get_hash()){ + // third option is hash + if(params.count()>3) + throw Exception(PARSER_RUNTIME, + 0, + "too many options were specified"); + int valid_options=0; + if(Value* vspacebar_width=options->get(spacebar_width_name)){ + valid_options++; + spacebar_width=r.process_to_value(*vspacebar_width).as_int(); + } + if(Value* vmonospace_width=options->get(monospace_width_name)){ + valid_options++; + monospace_width=r.process_to_value(*vmonospace_width).as_int(); + if(!monospace_width) + monospace_width=image->SX(); + } + if(Value* vletter_spacing=options->get(letter_spacing_name)){ + valid_options++; + letter_spacing=r.process_to_value(*vletter_spacing).as_int(); + } + if(valid_options!=options->count()) + throw Exception(PARSER_RUNTIME, 0, CALLED_WITH_INVALID_OPTION); + } else { + // backward + spacebar_width=params.as_int(2, "spacebar_width must be int", r); + if(params.count()>3) { + monospace_width=params.as_int(3, "monospace_width must be int", r); + if(!monospace_width) + monospace_width=image->SX(); + } + } + } + + if(int remainder=image->SY() % alphabet_length) + throw Exception(PARSER_RUNTIME, 0, "font-file height(%d) not divisable by alphabet size(%d), remainder=%d", - image->SY(), alphabet.length(), remainder); + image->SY(), alphabet_length, remainder); GET_SELF(r, VImage).set_font(new Font( + r.charsets.source(), alphabet, image, - image->SY() / alphabet.length(), monospace_width, spacebar_width)); + image->SY() / alphabet_length, monospace_width, spacebar_width, letter_spacing)); } static void _text(Request& r, MethodParams& params) { @@ -1106,10 +1270,10 @@ static void _circle(Request& r, MethodPa gdImage& as_image(MethodParams& params, int index, const char* msg) { Value& value=params.as_no_junction(index, msg); - if(Value* vimage=value.as(VIMAGE_TYPE, false)) { + if(Value* vimage=value.as(VIMAGE_TYPE)) { return static_cast(vimage)->image(); } else - throw Exception("parser.runtime", + throw Exception(PARSER_RUNTIME, 0, msg); } @@ -1184,7 +1348,8 @@ MImage::MImage(): Methoded("image") { add_native_method("bar", Method::CT_DYNAMIC, _bar, 5, 5); // ^image.replace(color-source;color-dest)[table x:y] - add_native_method("replace", Method::CT_DYNAMIC, _replace, 3, 3); + // ^image.replace(color-source;color-dest) + add_native_method("replace", Method::CT_DYNAMIC, _replace, 2, 3); // ^image.polyline(color)[table x:y] add_native_method("polyline", Method::CT_DYNAMIC, _polyline, 2, 2); @@ -1195,14 +1360,16 @@ MImage::MImage(): Methoded("image") { // ^image.polybar(color)[table x:y] add_native_method("polybar", Method::CT_DYNAMIC, _polybar, 2, 2); - // ^image.font[alPHAbet;font-file-name.gif](spacebar_width) - // ^image.font[alPHAbet;font-file-name.gif](spacebar_width;width) - add_native_method("font", Method::CT_DYNAMIC, _font, 3, 4); + // ^image.font[alPHAbet;font-file-name.gif] + // ^image.font[alPHAbet;font-file-name.gif](spacebar_width) + // ^image.font[alPHAbet;font-file-name.gif](spacebar_width;letter_width) + // ^image.font[alPHAbet;font-file-name.gif][$.space-width(.) $.letter-width(.) $.letter-space(.)] + add_native_method("font", Method::CT_DYNAMIC, _font, 2, 4); - // ^image.text(x;y)[text] + // ^image.text(x;y)[text] add_native_method("text", Method::CT_DYNAMIC, _text, 3, 3); - // ^image.ngth[text] + // ^image.length[text] add_native_method("length", Method::CT_DYNAMIC, _length, 1, 1); // ^image.arc(center x;center y;width;height;start in degrees;end in degrees;color)