|
|
| version 1.33, 2001/08/28 14:39:50 | version 1.39, 2001/09/04 19:44:32 |
|---|---|
| Line 131 void measure_gif(Pool& pool, const Strin | Line 131 void measure_gif(Pool& pool, const Strin |
| if(reader.read(buf, head_size)<head_size) | if(reader.read(buf, head_size)<head_size) |
| PTHROW(0, 0, | PTHROW(0, 0, |
| origin_string, | origin_string, |
| "broken GIF header - file size is less then %d bytes", head_size); | "not GIF file - too small"); |
| GIF_Header *head=(GIF_Header *)buf; | GIF_Header *head=(GIF_Header *)buf; |
| if(strncmp(head->type, "GIF", 3)!=0) | if(strncmp(head->type, "GIF", 3)!=0) |
| PTHROW(0, 0, | PTHROW(0, 0, |
| origin_string, | origin_string, |
| "bad image file - GIF signature not found"); | "not GIF file - signature not found"); |
| width=little_endian_to_int(head->width); | width=little_endian_to_int(head->width); |
| height=little_endian_to_int(head->height); | height=little_endian_to_int(head->height); |
| Line 147 void measure_jpeg(Pool& pool, const Stri | Line 147 void measure_jpeg(Pool& pool, const Stri |
| Measure_reader& reader, int& width, int& height) { | Measure_reader& reader, int& width, int& height) { |
| // JFIF format markers | // JFIF format markers |
| const unsigned char MARKER=0xFF; | const unsigned char MARKER=0xFF; |
| const unsigned char SIZE_FIRST=0xC0; | const unsigned char CODE_SIZE_FIRST=0xC0; |
| const unsigned char SIZE_LAST=0xC3; | const unsigned char CODE_SIZE_LAST=0xC3; |
| void *buf; | void *buf; |
| const size_t prefix_size=2; | const size_t prefix_size=2; |
| if(reader.read(buf, prefix_size)<prefix_size) | if(reader.read(buf, prefix_size)<prefix_size) |
| PTHROW(0, 0, | PTHROW(0, 0, |
| origin_string, | origin_string, |
| "broken JPEG file - size is less then %d bytes", prefix_size); | "not JPEG file - too small"); |
| unsigned char *signature=(unsigned char *)buf; | unsigned char *signature=(unsigned char *)buf; |
| if(!(signature[0]==0xFF && signature[1]==0xD8)) | if(!(signature[0]==0xFF && signature[1]==0xD8)) |
| PTHROW(0, 0, | PTHROW(0, 0, |
| origin_string, | origin_string, |
| "broken JPEG file - signature not found"); | "not JPEG file - signature not found"); |
| bool found=false; | bool found=false; |
| while(true) { | while(true) { |
| Line 175 void measure_jpeg(Pool& pool, const Stri | Line 175 void measure_jpeg(Pool& pool, const Stri |
| if(head->marker!=MARKER) | if(head->marker!=MARKER) |
| break; | break; |
| if(head->code >= SIZE_FIRST && head->code <= SIZE_LAST) { | if(head->code >= CODE_SIZE_FIRST && head->code <= CODE_SIZE_LAST) { |
| // Segments that contain size info | // Segments that contain size info |
| if(reader.read(buf, sizeof(JPG_Size_segment_body))<sizeof(JPG_Size_segment_body)) | if(reader.read(buf, sizeof(JPG_Size_segment_body))<sizeof(JPG_Size_segment_body)) |
| break; | break; |
| Line 309 static void _html(Request& r, const Stri | Line 309 static void _html(Request& r, const Stri |
| const Hash& fields=static_cast<VImage *>(r.self)->fields(); | const Hash& fields=static_cast<VImage *>(r.self)->fields(); |
| Hash *attribs=0; | Hash *attribs=0; |
| if(params->size()) | if(params->size()) { |
| if(attribs=params->get(0).get_hash()) { | Value &vattribs=params->get(0); |
| Attrib_info attrib_info={&tag, 0}; | if(vattribs.is_defined()) // allow 'void' |
| attribs->for_each(append_attrib_pair, &attrib_info); | if(Hash *attribs=vattribs.get_hash()) { |
| } else | Attrib_info attrib_info={&tag, 0}; |
| PTHROW(0, 0, | attribs->for_each(append_attrib_pair, &attrib_info); |
| &method_name, | } else |
| "attributes must be must be hash"); | PTHROW(0, 0, |
| &method_name, | |
| "attributes must be hash"); | |
| } | |
| Attrib_info attrib_info={&tag, attribs}; | Attrib_info attrib_info={&tag, attribs}; |
| fields.for_each(append_attrib_pair, &attrib_info); | fields.for_each(append_attrib_pair, &attrib_info); |
| Line 362 static void _load(Request& r, const Stri | Line 365 static void _load(Request& r, const Stri |
| static void _create(Request& r, const String& method_name, MethodParams *params) { | static void _create(Request& r, const String& method_name, MethodParams *params) { |
| Pool& pool=r.pool(); | Pool& pool=r.pool(); |
| int width=r.process(params->get(0)).as_int(); | int width=params->as_int(0, r); |
| int height=r.process(params->get(1)).as_int(); | int height=params->as_int(1, r); |
| int bgcolor_value=0xffFFff; | int bgcolor_value=0xffFFff; |
| if(params->size()>2) | if(params->size()>2) |
| bgcolor_value=r.process(params->get(2)).as_int(); | bgcolor_value=params->as_int(2, r); |
| gdImage& image=*new(pool) gdImage(pool); | gdImage& image=*new(pool) gdImage(pool); |
| image.Create(width, height); | image.Create(width, height); |
| image.FilledRectangle(0, 0, width-1, height-1, image.Color(bgcolor_value)); | image.FilledRectangle(0, 0, width-1, height-1, image.Color(bgcolor_value)); |
| Line 404 static void _line(Request& r, const Stri | Line 407 static void _line(Request& r, const Stri |
| "does not contain an image"); | "does not contain an image"); |
| image->Line( | image->Line( |
| r.process(params->get(0)).as_int(), | params->as_int(0, r), |
| r.process(params->get(1)).as_int(), | params->as_int(1, r), |
| r.process(params->get(2)).as_int(), | params->as_int(2, r), |
| r.process(params->get(3)).as_int(), | params->as_int(3, r), |
| image->Color(r.process(params->get(4)).as_int())); | image->Color(params->as_int(4, r))); |
| } | } |
| static void _fill(Request& r, const String& method_name, MethodParams *params) { | static void _fill(Request& r, const String& method_name, MethodParams *params) { |
| Line 421 static void _fill(Request& r, const Stri | Line 424 static void _fill(Request& r, const Stri |
| "does not contain an image"); | "does not contain an image"); |
| image->Fill( | image->Fill( |
| r.process(params->get(0)).as_int(), | params->as_int(0, r), |
| r.process(params->get(1)).as_int(), | params->as_int(1, r), |
| image->Color(r.process(params->get(2)).as_int())); | image->Color(params->as_int(2, r))); |
| } | } |
| static void _rectangle(Request& r, const String& method_name, MethodParams *params) { | static void _rectangle(Request& r, const String& method_name, MethodParams *params) { |
| Line 436 static void _rectangle(Request& r, const | Line 439 static void _rectangle(Request& r, const |
| "does not contain an image"); | "does not contain an image"); |
| image->Rectangle( | image->Rectangle( |
| r.process(params->get(0)).as_int(), | params->as_int(0, r), |
| r.process(params->get(1)).as_int(), | params->as_int(1, r), |
| r.process(params->get(2)).as_int(), | params->as_int(2, r), |
| r.process(params->get(3)).as_int(), | params->as_int(3, r), |
| image->Color(r.process(params->get(4)).as_int())); | image->Color(params->as_int(4, r))); |
| } | } |
| static void _bar(Request& r, const String& method_name, MethodParams *params) { | static void _bar(Request& r, const String& method_name, MethodParams *params) { |
| Line 453 static void _bar(Request& r, const Strin | Line 456 static void _bar(Request& r, const Strin |
| "does not contain an image"); | "does not contain an image"); |
| image->FilledRectangle( | image->FilledRectangle( |
| r.process(params->get(0)).as_int(), | params->as_int(0, r), |
| r.process(params->get(1)).as_int(), | params->as_int(1, r), |
| r.process(params->get(2)).as_int(), | params->as_int(2, r), |
| r.process(params->get(3)).as_int(), | params->as_int(3, r), |
| image->Color(r.process(params->get(4)).as_int())); | image->Color(params->as_int(4, r))); |
| } | } |
| static void _replace(Request& r, const String& method_name, MethodParams *params) { | static void _replace(Request& r, const String& method_name, MethodParams *params) { |
| Line 478 static void _replace(Request& r, const S | Line 481 static void _replace(Request& r, const S |
| gdImage::Point *p=(gdImage::Point *)pool.malloc(sizeof(gdImage::Point)*n); | gdImage::Point *p=(gdImage::Point *)pool.malloc(sizeof(gdImage::Point)*n); |
| for(int i=0; i<n; i++) { | for(int i=0; i<n; i++) { |
| p[i].x=r.process(params->get(2+i*2+0)).as_int(); | p[i].x=params->as_int(2+i*2+0, r); |
| p[i].y=r.process(params->get(2+i*2+1)).as_int(); | p[i].y=params->as_int(2+i*2+1, r); |
| } | } |
| image->FilledPolygonReplaceColor(p, n, | image->FilledPolygonReplaceColor(p, n, |
| image->Color(r.process(params->get(0)).as_int()), // src color | image->Color(params->as_int(0, r)), // src color |
| image->Color(r.process(params->get(1)).as_int()));// dest color | image->Color(params->as_int(1, r)));// dest color |
| } | } |
| static void _polygon(Request& r, const String& method_name, MethodParams *params) { | static void _polygon(Request& r, const String& method_name, MethodParams *params) { |
| Line 504 static void _polygon(Request& r, const S | Line 507 static void _polygon(Request& r, const S |
| gdImage::Point *p=(gdImage::Point *)pool.malloc(sizeof(gdImage::Point)*n); | gdImage::Point *p=(gdImage::Point *)pool.malloc(sizeof(gdImage::Point)*n); |
| for(int i=0; i<n; i++) { | for(int i=0; i<n; i++) { |
| p[i].x=r.process(params->get(1+i*2+0)).as_int(); | p[i].x=params->as_int(2+i*2+0, r); |
| p[i].y=r.process(params->get(1+i*2+1)).as_int(); | p[i].y=params->as_int(2+i*2+1, r); |
| } | } |
| image->Polygon(p, n, | image->Polygon(p, n, |
| image->Color(r.process(params->get(0)).as_int())); | image->Color(params->as_int(0, r))); |
| } | } |
| static void _polybar(Request& r, const String& method_name, MethodParams *params) { | static void _polybar(Request& r, const String& method_name, MethodParams *params) { |
| Line 529 static void _polybar(Request& r, const S | Line 532 static void _polybar(Request& r, const S |
| gdImage::Point *p=(gdImage::Point *)pool.malloc(sizeof(gdImage::Point)*n); | gdImage::Point *p=(gdImage::Point *)pool.malloc(sizeof(gdImage::Point)*n); |
| for(int i=0; i<n; i++) { | for(int i=0; i<n; i++) { |
| p[i].x=r.process(params->get(1+i*2+0)).as_int(); | p[i].x=params->as_int(2+i*2+0, r); |
| p[i].y=r.process(params->get(1+i*2+1)).as_int(); | p[i].y=params->as_int(2+i*2+1, r); |
| } | } |
| image->FilledPolygon(p, n, | image->FilledPolygon(p, n, |
| image->Color(r.process(params->get(0)).as_int())); | image->Color(params->as_int(0, r))); |
| } | } |
| // font | // font |
| Line 544 static void _polybar(Request& r, const S | Line 547 static void _polybar(Request& r, const S |
| class Font : public Pooled { | class Font : public Pooled { |
| public: | public: |
| int height; //< Font heigth | const static int letter_spacing; |
| int space; //< Default char width | int height; ///< Font heigth |
| int monospace; ///< Default char width | |
| int spacebarspace; ///< spacebar width | |
| gdImage& ifont; | gdImage& ifont; |
| const String& alphabet; | const String& alphabet; |
| Font(Pool& pool, | Font(Pool& pool, |
| const String& aalphabet, | const String& aalphabet, |
| gdImage& aifont, int aheight, int aspace) : Pooled(pool), | gdImage& aifont, int aheight, int amonospace, int aspacebarspace) : Pooled(pool), |
| alphabet(aalphabet), | alphabet(aalphabet), |
| height(aheight), space(aspace), | height(aheight), monospace(amonospace), spacebarspace(aspacebarspace), |
| ifont(aifont) { | ifont(aifont) { |
| } | } |
| Line 566 public: | Line 571 public: |
| int index_width(int index) { | int index_width(int index) { |
| if(index<0) | if(index<0) |
| index=index_of('.'); | return spacebarspace; |
| if(index<0) | |
| return 0; | |
| int tr=ifont.GetTransparent(); | int tr=ifont.GetTransparent(); |
| for(int x=ifont.SX()-1; x>0; x--) { | for(int x=ifont.SX()-1; x>=0; x--) { |
| for(int y=0; y<height-1; y++) | for(int y=0; y<height-1; y++) |
| if(ifont.GetPixel(x, Y(y))!=tr) | if(ifont.GetPixel(x, Y(y))!=tr) |
| return x+2; | return x+1; |
| } | } |
| return 0; | return 0; |
| } | } |
| Line 598 public: | Line 601 public: |
| if(cstr) for(; *cstr; cstr++) { | if(cstr) for(; *cstr; cstr++) { |
| int index=index_of(*cstr); | int index=index_of(*cstr); |
| index_display(image, x, y, index); | index_display(image, x, y, index); |
| x+=space ? space : index_width(index); | x+=letter_spacing + (monospace ? monospace : index_width(index)); |
| } | } |
| } | } |
| }; | }; |
| const int Font::letter_spacing=1; | |
| static void _font(Request& r, const String& method_name, MethodParams *params) { | static void _font(Request& r, const String& method_name, MethodParams *params) { |
| Pool& pool=r.pool(); | Pool& pool=r.pool(); |
| Value& valphabet=params->as_no_junction(0, "alphabet must not be code"); | const String& alphabet=params->as_string(0, "alphabet must not be code"); |
| Value& file_name=params->as_no_junction(1, "file_name must not be code"); | gdImage& image=*load(r, method_name, params->as_string(1, "file_name must not be code")); |
| int height=r.process(params->get(2)).as_int(); | int spacebar_width=params->as_int(2, r); |
| int monospace_width; | |
| int width=params->size()>3?r.process(params->get(3)).as_int():0; | if(params->size()>3) { |
| monospace_width=params->as_int(3, r); | |
| if(!monospace_width) | |
| monospace_width=image.SX(); | |
| } else | |
| monospace_width=0; | |
| if(!alphabet.size()) | |
| PTHROW(0, 0, | |
| &method_name, | |
| "alphabet must not be empty"); | |
| static_cast<VImage *>(r.self)->font=new(pool) Font(pool, | static_cast<VImage *>(r.self)->font=new(pool) Font(pool, |
| valphabet.as_string(), | alphabet, |
| *load(r, method_name, file_name.as_string()), | image, |
| height, width); | image.SY() / alphabet.size(), monospace_width, spacebar_width); |
| } | } |
| static void _text(Request& r, const String& method_name, MethodParams *params) { | static void _text(Request& r, const String& method_name, MethodParams *params) { |
| Pool& pool=r.pool(); | Pool& pool=r.pool(); |
| int x=r.process(params->get(0)).as_int(); | int x=params->as_int(0, r); |
| int y=r.process(params->get(1)).as_int(); | int y=params->as_int(1, r); |
| const String& s=r.process(params->get(2)).as_string(); | const String& s=params->as_string(2, "text must not be code"); |
| VImage& vimage=*static_cast<VImage *>(r.self); | VImage& vimage=*static_cast<VImage *>(r.self); |
| if(vimage.image) | if(vimage.image) |
| Line 683 MImage::MImage(Pool& apool) : Methoded(a | Line 698 MImage::MImage(Pool& apool) : Methoded(a |
| // ^image.polybar(color)(x;y)... point coord pairs | // ^image.polybar(color)(x;y)... point coord pairs |
| add_native_method("polybar", Method::CT_DYNAMIC, _polybar, 1+3*2, 1+100*2); | add_native_method("polybar", Method::CT_DYNAMIC, _polybar, 1+3*2, 1+100*2); |
| // ^image.font[alPHAbet;font-file-name.gif](height) | // ^image.font[alPHAbet;font-file-name.gif](spacebar_width) |
| // ^image.font[alPHAbet;font-file-name.gif](height;width) | // ^image.font[alPHAbet;font-file-name.gif](spacebar_width;width) |
| add_native_method("font", Method::CT_DYNAMIC, _font, 3, 4); | add_native_method("font", Method::CT_DYNAMIC, _font, 3, 4); |
| // ^image.text(x;y)[text] | // ^image.text(x;y)[text] |