[BACK]Return to image.C CVS log [TXT] [DIR] Up to [parser3project] / parser3 / src / classes

Diff for /parser3/src/classes/image.C between versions 1.136 and 1.152

version 1.136, 2010/10/21 15:06:27 version 1.152, 2016/07/21 18:30:10
Line 1 Line 1
 /** @file  /** @file
         Parser: @b image parser class.          Parser: @b image parser class.
   
         Copyright(c) 2001-2009 ArtLebedev Group (http://www.artlebedev.com)          Copyright (c) 2001-2015 Art. Lebedev Studio (http://www.artlebedev.com)
         Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)          Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
 */  */
   
 static const char * const IDENT_IMAGE_C="$Date$";  
   
 /*  /*
         jpegsize: gets the width and height (in pixels) of a jpeg file          jpegsize: gets the width and height (in pixels) of a jpeg file
         Andrew Tong, werdna@ugcs.caltech.edu           February 14, 1995          Andrew Tong, werdna@ugcs.caltech.edu           February 14, 1995
Line 17  static const char * const IDENT_IMAGE_C= Line 15  static const char * const IDENT_IMAGE_C=
 */  */
   
 #include "pa_config_includes.h"  #include "pa_config_includes.h"
   
 #include "pa_vmethod_frame.h"  
   
 #include "gif.h"  #include "gif.h"
   
   #include "pa_vmethod_frame.h"
 #include "pa_common.h"  #include "pa_common.h"
 #include "pa_request.h"  #include "pa_request.h"
 #include "pa_vfile.h"  #include "pa_vfile.h"
Line 29  static const char * const IDENT_IMAGE_C= Line 25  static const char * const IDENT_IMAGE_C=
 #include "pa_vdate.h"  #include "pa_vdate.h"
 #include "pa_table.h"  #include "pa_table.h"
   
   volatile const char * IDENT_IMAGE_C="$Id$";
   
 // defines  // defines
   
 static const String spacebar_width_name("space");  static const String spacebar_width_name("space");
Line 47  public: Line 45  public:
   
 // globals  // globals
   
 DECLARE_CLASS_VAR(image, new MImage, 0);  DECLARE_CLASS_VAR(image, new MImage);
   
 // helpers  // helpers
   
Line 181  public: Line 179  public:
                 EXIF_TAG(0xa40b,        DeviceSettingDescription);                  EXIF_TAG(0xa40b,        DeviceSettingDescription);
                 EXIF_TAG(0xa40c,        SubjectDistanceRange);                  EXIF_TAG(0xa40c,        SubjectDistanceRange);
                 EXIF_TAG(0xa420,        ImageUniqueID);                  EXIF_TAG(0xa420,        ImageUniqueID);
   
                   // other tags
                   EXIF_TAG(0xa430,        CameraOwnerName);
                   EXIF_TAG(0xa431,        BodySerialNumber);
                   EXIF_TAG(0xa432,        LensSpecification);
                   EXIF_TAG(0xa433,        LensManufactor);
                   EXIF_TAG(0xa434,        LensModel);
                   EXIF_TAG(0xa435,        LensSerialNumber);
         }          }
 } exif_tag_value2name;  } exif_tag_value2name;
   
Line 232  public: Line 238  public:
 };  };
   
 class Measure_file_reader: public Measure_reader {  class Measure_file_reader: public Measure_reader {
         const String& file_name; const char* fname;          const String& file_name;
         int f;          int f;
   
 public:  public:
         Measure_file_reader(int af, const String& afile_name, const char* afname):           Measure_file_reader(int af, const String& afile_name):
                 file_name(afile_name), fname(afname), f(af) {                  file_name(afile_name), f(af) {
         }          }
   
         override size_t read(const char* &abuf, size_t limit) {          override size_t read(const char* &abuf, size_t limit) {
Line 245  public: Line 251  public:
                         return 0;                          return 0;
   
                 char* lbuf=new(PointerFreeGC) char[limit];                  char* lbuf=new(PointerFreeGC) char[limit];
                 size_t read_size=(size_t)::read(f, lbuf, limit);  abuf=lbuf;                  ssize_t read_size=::read(f, lbuf, limit);  abuf=lbuf;
                 if(ssize_t(read_size)<0 || read_size>limit)                  if(read_size<0)
                         throw Exception(0,                          throw Exception(0, &file_name, "measure read failed: %s (%d)", strerror(errno), errno);
                                 &file_name,   
                                 "measure failed: actually read %u bytes count not in [0..%u] valid range",   
                         read_size, limit);  
   
                 return read_size;                  return read_size;
         }          }
   
         override void seek(long value, int whence) {          override void seek(long value, int whence) {
                 if(lseek(f, value, whence)<0)                  if(lseek(f, value, whence)<0)
                         throw Exception(IMAGE_FORMAT,                          throw Exception(IMAGE_FORMAT, &file_name, "seek(value=%ld, whence=%d) failed: %s (%d)", value, whence, strerror(errno), errno);
                                 &file_name,   
                                 "seek(value=%ld, whence=%d) failed: %s (%d), actual filename '%s'",   
                                         value, whence, strerror(errno), errno, fname);  
         }          }
   
         override long tell() { return lseek(f, 0, SEEK_CUR); }          override long tell() { return lseek(f, 0, SEEK_CUR); }
Line 398  inline uint endian_to_uint(bool is_big, Line 397  inline uint endian_to_uint(bool is_big,
                 x_endian_to_uint(b[0], b[1], b[2], b[3]);                  x_endian_to_uint(b[0], b[1], b[2], b[3]);
 }  }
   
 static void measure_gif(const String& origin_string,   static void measure_gif(const String& origin_string, Measure_reader& reader, ushort& width, ushort& height) {
                          Measure_reader& reader, ushort& width, ushort& height) {  
   
         const char* buf;          const char* buf;
         const size_t head_size=sizeof(GIF_Header);          const size_t head_size=sizeof(GIF_Header);
Line 465  static Value* parse_IFD_entry_formatted_ Line 463  static Value* parse_IFD_entry_formatted_
 }  }
   
 // date.C  // date.C
 tm cstr_to_time_t(char *cstr);  tm cstr_to_time_t(char *, const char **);
   
 static Value* parse_IFD_entry_formatted_value(bool is_big, ushort format,   static Value* parse_IFD_entry_formatted_value(bool is_big, ushort format, 
                                               size_t component_size, uint components_count,                                                 size_t component_size, uint components_count, 
Line 481  static Value* parse_IFD_entry_formatted_ Line 479  static Value* parse_IFD_entry_formatted_
                         strcpy(cstr_writable, cstr);                          strcpy(cstr_writable, cstr);
   
                         try {                          try {
                                 return new VDate(cstr_to_time_t(cstr_writable));                                  tm tmIn=cstr_to_time_t(cstr_writable, 0);
                                   return new VDate(tmIn);
                         }                          }
                         catch(...) { /*ignore bad date times*/ }                          catch(...) { /*ignore bad date times*/ }
                 }                  }
Line 582  static void parse_IFD_entry(HashStringVa Line 581  static void parse_IFD_entry(HashStringVa
   
         if(Value* value=parse_IFD_entry_value(is_big, reader, tiff_base, entry)) {          if(Value* value=parse_IFD_entry_value(is_big, reader, tiff_base, entry)) {
                 if(const char* name=(gps)?exif_gps_tag_value2name.get(tag):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);                          hash.put(name, value);
                 else                  else
                         hash.put(String::Body::Format(tag), value);                          hash.put(String::Body::Format(tag), value);
         }          }
Line 635  static Value* parse_exif(Measure_reader& Line 634  static Value* parse_exif(Measure_reader&
         return vhash;          return vhash;
 }  }
   
 static void measure_jpeg(const String& origin_string,   static void measure_jpeg(const String& origin_string, Measure_reader& reader, ushort& width, ushort& height, Value** exif) {
                          Measure_reader& reader, ushort& width, ushort& height, Value** exif) {  
         // JFIF format markers          // JFIF format markers
         const uchar MARKER=0xFF;          const uchar MARKER=0xFF;
         const uchar CODE_SIZE_A=0xC0;          const uchar CODE_SIZE_A=0xC0;
Line 703  static void measure_jpeg(const String& o Line 701  static void measure_jpeg(const String& o
                 "broken JPEG file - size frame not found");                  "broken JPEG file - size frame not found");
 }  }
   
 static void measure_png(const String& origin_string,   static void measure_png(const String& origin_string, Measure_reader& reader, ushort& width, ushort& height) {
                          Measure_reader& reader, ushort& width, ushort& height) {  
   
         const char* buf;          const char* buf;
         const size_t head_size=sizeof(PNG_Header);          const size_t head_size=sizeof(PNG_Header);
         if(reader.read(buf, head_size)<head_size)          if(reader.read(buf, head_size)<head_size)
                 throw Exception(IMAGE_FORMAT,                   throw Exception(IMAGE_FORMAT, &origin_string, "not PNG file - too small");
                         &origin_string,   
                         "not PNG file - too small");  
         PNG_Header *head=(PNG_Header *)buf;          PNG_Header *head=(PNG_Header *)buf;
   
         if(strncmp(head->signature, "IHDR", 4)!=0)          if(strncmp(head->signature, "IHDR", 4)!=0)
                 throw Exception(IMAGE_FORMAT,                   throw Exception(IMAGE_FORMAT, &origin_string, "not PNG file - wrong signature");
                         &origin_string,   
                         "not PNG file - wrong signature");        
   
         width=endian_to_ushort(true, head->width);          width=endian_to_ushort(true, head->width);
         height=endian_to_ushort(true, head->height);          height=endian_to_ushort(true, head->height);
Line 725  static void measure_png(const String& or Line 718  static void measure_png(const String& or
   
 // measure center  // measure center
   
 static void measure(const String& file_name,   static void measure(const String& file_name, Measure_reader& reader, ushort& width, ushort& height, Value** exif) {
                          Measure_reader& reader, ushort& width, ushort& height, Value** exif) {  
         const char* file_name_cstr=file_name.taint_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, '.')) {          if(const char* cext=strrchr(file_name_cstr, '.')) {
                 cext++;                  cext++;
Line 737  static void measure(const String& file_n Line 729  static void measure(const String& file_n
                 else if(strcasecmp(cext, "PNG")==0)                  else if(strcasecmp(cext, "PNG")==0)
                         measure_png(file_name, reader, width, height);                          measure_png(file_name, reader, width, height);
                 else                  else
                         throw Exception(IMAGE_FORMAT,                           throw Exception(IMAGE_FORMAT, &file_name, "unhandled image file name extension '%s'", cext);
                                 &file_name,   
                                 "unhandled image file name extension '%s'", cext);  
         } else          } else
                 throw Exception(IMAGE_FORMAT,                   throw Exception(IMAGE_FORMAT, &file_name, "can not determine image type - no file name extension");
                         &file_name,   
                         "can not determine image type - no file name extension");  
 }  }
   
 // methods  // methods
Line 753  struct File_measure_action_info { Line 741  struct File_measure_action_info {
         ushort* width;          ushort* width;
         ushort* height;          ushort* height;
         Value** exif;          Value** exif;
         const String* file_name;  
 };  };
 #endif  #endif
 static void file_measure_action(  static void file_measure_action(struct stat& /*finfo*/, int f, const String& file_spec, void *context) {
                                                                 struct stat& /*finfo*/, int f,   
                                                                 const String& /*file_spec*/, const char* fname, bool /*as_text*/,  
                                                                 void *context) {  
         File_measure_action_info& info=*static_cast<File_measure_action_info *>(context);          File_measure_action_info& info=*static_cast<File_measure_action_info *>(context);
   
         Measure_file_reader reader(f, *info.file_name, fname);          Measure_file_reader reader(f, file_spec);
         measure(*info.file_name, reader, *info.width, *info.height, info.exif);          measure(file_spec, reader, *info.width, *info.height, info.exif);
 }  }
   
 static void _measure(Request& r, MethodParams& params) {  static void _measure(Request& r, MethodParams& params) {
Line 776  static void _measure(Request& r, MethodP Line 760  static void _measure(Request& r, MethodP
         if((file_name=data.get_string())) {          if((file_name=data.get_string())) {
                 File_measure_action_info info={                  File_measure_action_info info={
                         &width, &height,                          &width, &height,
                         &exif,                          &exif
                         file_name  
                 };                  };
                 file_read_action_under_lock(r.absolute(*file_name),                   file_read_action_under_lock(r.absolute(*file_name), "measure", file_measure_action, &info);
                         "measure", file_measure_action, &info);  
         } else {          } else {
                 VFile* vfile=data.as_vfile(String::L_AS_IS);                  VFile* vfile=data.as_vfile(String::L_AS_IS);
                 file_name=&vfile->fields().get(name_name)->as_string();                  file_name=&vfile->fields().get(name_name)->as_string();
Line 829  static void _html(Request& r, MethodPara Line 811  static void _html(Request& r, MethodPara
         if(params.count()) {          if(params.count()) {
                 // for backward compatibility: someday was ^html{}                  // 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(!vattribs.is_string()) { // allow empty
                         if((attribs=vattribs.get_hash())) {                          if((attribs=vattribs.get_hash())) {
                                 Attrib_info info={&tag, 0};                                  Attrib_info info={&tag, 0};
                                 attribs->for_each<Attrib_info*>(append_attrib_pair, &info);                                  attribs->for_each<Attrib_info*>(append_attrib_pair, &info);
Line 837  static void _html(Request& r, MethodPara Line 819  static void _html(Request& r, MethodPara
                                 throw Exception(PARSER_RUNTIME,                                   throw Exception(PARSER_RUNTIME, 
                                         0,                                           0, 
                                         "attributes must be hash");                                          "attributes must be hash");
                   }
         }          }
   
         {          {
Line 890  static void _create(Request& r, MethodPa Line 873  static void _create(Request& r, MethodPa
 static void _gif(Request& r, MethodParams& params) {  static void _gif(Request& r, MethodParams& params) {
         gdImage& image=GET_SELF(r, VImage).image();          gdImage& image=GET_SELF(r, VImage).image();
   
         const String *file_name=0;          const String *file_name=params.count()>0?&params.as_string(0, FILE_NAME_MUST_BE_STRING):0;
         if(params.count()>0)  
                 file_name=&params.as_string(0, FILE_NAME_MUST_BE_STRING);  
   
         gdBuf buf=image.Gif();          gdBuf buf=image.Gif();
                   
         VFile& vfile=*new VFile;          VFile& vfile=*new VFile;
         Value* content_type=new VString(*new String("image/gif"));  
         vfile.set(false/*not tainted*/,           vfile.set_binary(false/*not tainted*/, (const char *)buf.ptr, buf.size, file_name, new VString(*new String("image/gif")));
                 (const char*)buf.ptr, buf.size,   
                 file_name? file_name->taint_cstr(String::L_FILE_SPEC): 0,   
                 content_type);  
   
         r.write_no_lang(vfile);          r.write_no_lang(vfile);
 }  }
Line 977  static void _replace(Request& r, MethodP Line 955  static void _replace(Request& r, MethodP
         gdImage::Point* all_p=0;          gdImage::Point* all_p=0;
         size_t count=0;          size_t count=0;
         if(params.count() == 3){          if(params.count() == 3){
                 Table* table=params.as_no_junction(2, COORDINATES_MUST_NOT_BE_CODE).get_table();                  Table* table=params.as_table(2, "coordinates");
                 if(!table)   
                         throw Exception(PARSER_RUNTIME,  
                                 0,  
                                 "coordinates must be table");  
                 count=table->count();                  count=table->count();
                 all_p=new(PointerFreeGC) gdImage::Point[count];                  all_p=new(PointerFreeGC) gdImage::Point[count];
                 gdImage::Point* add_p=all_p;                  gdImage::Point* add_p=all_p;
Line 1007  static void _replace(Request& r, MethodP Line 981  static void _replace(Request& r, MethodP
 static void _polyline(Request& r, MethodParams& params) {  static void _polyline(Request& r, MethodParams& params) {
         gdImage& image=GET_SELF(r, VImage).image();          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_table(1, "coordinates");
         if(!table)   
                 throw Exception(PARSER_RUNTIME,  
                         0,  
                         "coordinates must be table");  
   
         gdImage::Point* all_p=new(PointerFreeGC) gdImage::Point[table->count()];          gdImage::Point* all_p=new(PointerFreeGC) gdImage::Point[table->count()];
         gdImage::Point *add_p=all_p;              gdImage::Point *add_p=all_p;    
Line 1024  static void _polyline(Request& r, Method Line 994  static void _polyline(Request& r, Method
 static void _polygon(Request& r, MethodParams& params) {  static void _polygon(Request& r, MethodParams& params) {
         gdImage& image=GET_SELF(r, VImage).image();          gdImage& image=GET_SELF(r, VImage).image();
   
         Table* table=params.as_no_junction(1, COORDINATES_MUST_NOT_BE_CODE).get_table();          Table* table=(Table*)params.as_table(1, "coordinates");
         if(!table)   
                 throw Exception(PARSER_RUNTIME,  
                         0,  
                         "coordinates must be table");  
   
         gdImage::Point* all_p=new(PointerFreeGC) gdImage::Point[table->count()];          gdImage::Point* all_p=new(PointerFreeGC) gdImage::Point[table->count()];
         gdImage::Point *add_p=all_p;              gdImage::Point *add_p=all_p;    
Line 1040  static void _polygon(Request& r, MethodP Line 1006  static void _polygon(Request& r, MethodP
 static void _polybar(Request& r, MethodParams& params) {  static void _polybar(Request& r, MethodParams& params) {
         gdImage& image=GET_SELF(r, VImage).image();          gdImage& image=GET_SELF(r, VImage).image();
   
         Table* table=params.as_no_junction(1, COORDINATES_MUST_NOT_BE_CODE).get_table();          Table* table=(Table*)params.as_table(1, "coordinates");
         if(!table)   
                 throw Exception(PARSER_RUNTIME,  
                         0,  
                         "coordinates must be table");  
   
         gdImage::Point* all_p=new(PointerFreeGC) gdImage::Point[table->count()];          gdImage::Point* all_p=new(PointerFreeGC) gdImage::Point[table->count()];
         gdImage::Point *add_p=all_p;              gdImage::Point *add_p=all_p;    
Line 1164  static void _font(Request& r, MethodPara Line 1126  static void _font(Request& r, MethodPara
         int monospace_width=0; // proportional          int monospace_width=0; // proportional
         int letter_spacing=1;          int letter_spacing=1;
         if(params.count()>2){          if(params.count()>2){
                 if(HashStringValue* options=params.as_no_junction(2, "param must be int or hash").get_hash()){                  if(HashStringValue* options=params[2].get_hash()){
                         // third option is hash                          // third option is hash
                         if(params.count()>3)                          if(params.count()>3)
                                 throw Exception(PARSER_RUNTIME,                                  throw Exception(PARSER_RUNTIME, 0, "too many params were specified");
                                         0,  
                                         "too many options were specified");  
                         int valid_options=0;                          int valid_options=0;
                         if(Value* vspacebar_width=options->get(spacebar_width_name)){                          if(Value* vspacebar_width=options->get(spacebar_width_name)){
                                 valid_options++;                                  valid_options++;
Line 1189  static void _font(Request& r, MethodPara Line 1149  static void _font(Request& r, MethodPara
                                 throw Exception(PARSER_RUNTIME, 0, CALLED_WITH_INVALID_OPTION);                                  throw Exception(PARSER_RUNTIME, 0, CALLED_WITH_INVALID_OPTION);
                 } else {                  } else {
                         // backward                          // backward
                         spacebar_width=params.as_int(2, "spacebar_width must be int", r);                          spacebar_width=params.as_int(2, "param must be int or hash", r);
                         if(params.count()>3) {                          if(params.count()>3) {
                                 monospace_width=params.as_int(3, "monospace_width must be int", r);                                  monospace_width=params.as_int(3, "monospace_width must be int", r);
                                 if(!monospace_width)                                  if(!monospace_width)
Removed from v.1.136  
changed lines
  Added in v.1.152

E-mail: