--- parser3/src/classes/image.C	2020/12/23 15:01:13	1.181
+++ parser3/src/classes/image.C	2025/05/26 00:52:15	1.196
@@ -1,8 +1,8 @@
 /** @file
 	Parser: @b image parser class.
 
-	Copyright (c) 2001-2020 Art. Lebedev Studio (http://www.artlebedev.com)
-	Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
+	Copyright (c) 2001-2024 Art. Lebedev Studio (http://www.artlebedev.com)
+	Authors: Konstantin Morshnev <moko@design.ru>, Alexandr Petrosian <paf@design.ru>
 */
 
 /*
@@ -26,7 +26,7 @@
 #include "pa_table.h"
 #include "pa_charsets.h"
 
-volatile const char * IDENT_IMAGE_C="$Id: image.C,v 1.181 2020/12/23 15:01:13 moko Exp $";
+volatile const char * IDENT_IMAGE_C="$Id: image.C,v 1.196 2025/05/26 00:52:15 moko Exp $";
 
 // defines
 
@@ -189,7 +189,14 @@ public:
 		EXIF_TAG(0xa434,	LensModel);
 		EXIF_TAG(0xa435,	LensSerialNumber);
 	}
-} exif_tag_value2name;
+
+	static EXIF_tag_value2name &instance(){
+		static EXIF_tag_value2name *singleton=NULL;
+		if(!singleton)
+			singleton=new EXIF_tag_value2name;
+		return *singleton;
+	}
+};
 
 class EXIF_gps_tag_value2name: public Hash<int, const char*> {
 public:
@@ -226,7 +233,15 @@ public:
 		EXIF_TAG(0x1D,	GPSDateStamp);
 		EXIF_TAG(0x1E,	GPSDifferential);
 	}
-} exif_gps_tag_value2name;
+
+	static EXIF_gps_tag_value2name &instance(){
+		static EXIF_gps_tag_value2name *singleton=NULL;
+		if(!singleton)
+			singleton=new EXIF_gps_tag_value2name;
+		return *singleton;
+	}
+
+};
 
 
 ///*********************************************** support functions
@@ -421,11 +436,8 @@ static Value* parse_IFD_entry_formatted_
 		size_t length=components_count;
 		// Data format is "YYYY:MM:DD HH:MM:SS"+0x00, total 20bytes
 		if(length==JPEG_EXIF_DATE_CHARS && isdigit((unsigned char)cstr[0]) && cstr[length-1]==0) {
-			char cstr_writable[JPEG_EXIF_DATE_CHARS];
-			strcpy(cstr_writable, cstr);
-
 			try {
-				tm tmIn=cstr_to_time_t(cstr_writable, 0);
+				tm tmIn=cstr_to_time_t(pa_strdup(cstr), 0);
 				return new VDate(tmIn);
 			}
 			catch(...) { /*ignore bad date times*/ }
@@ -441,7 +453,7 @@ static Value* parse_IFD_entry_formatted_
 	HashStringValue& hash=result->hash();
 	for(uint i=0; i<components_count; i++, value+=component_size) {
 		hash.put(
-			String::Body::Format(i),
+			String::Body::uitoa(i),
 			parse_IFD_entry_formatted_one_value(is_big, format, component_size, value));
 	}
 
@@ -515,10 +527,10 @@ static void parse_IFD_entry(HashStringVa
 	}
 
 	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::instance().get(tag) : EXIF_tag_value2name::instance().get(tag)))
 			hash.put(name, value);
 		else
-			hash.put(String::Body::Format(tag), value);
+			hash.put(String::Body::uitoa((int)tag), value);
 	}
 }
 
@@ -632,7 +644,7 @@ static void measure_jpeg(const String& o
 			{
 				// Segments that contain size info
 				if(reader.read(buf, sizeof(JPG_Size_segment_body))<sizeof(JPG_Size_segment_body))
-					throw Exception(IMAGE_FORMAT, &origin_string, "not JPEG file - can not fully read Size segment");
+					throw Exception(IMAGE_FORMAT, &origin_string, "not JPEG file - cannot fully read Size segment");
 				JPG_Size_segment_body *body=(JPG_Size_segment_body *)buf;
 				
 				info.width=endian_to_ushort(true, body->width);
@@ -963,7 +975,7 @@ static void measure(const String& file_n
 		else
 			throw Exception(IMAGE_FORMAT, &file_name, "unhandled file name extension '%s'", cext);
 	} else
-		throw Exception(IMAGE_FORMAT, &file_name, "can not determine file type - no file name extension");
+		throw Exception(IMAGE_FORMAT, &file_name, "cannot determine file type - no file name extension");
 }
 
 // methods
@@ -1014,7 +1026,7 @@ static void _measure(Request& r, MethodP
 	if(file_name=data.get_string()) {
 		file_read_action_under_lock(r.full_disk_path(*file_name), "measure", file_measure_action, &info);
 	} else {
-		VFile* vfile=data.as_vfile(String::L_AS_IS);
+		VFile* vfile=data.as_vfile();
 		file_name=&vfile->fields().get(name_name)->as_string();
 		Measure_buf_reader reader(vfile->value_ptr(), vfile->value_size(), *file_name);
 		measure(*file_name, reader, info);
@@ -1078,13 +1090,13 @@ static gdImage* load(Request& r, const S
 			throw Exception(IMAGE_FORMAT, &file_name, "is not in GIF format");
 		return image;
 	} else {
-		throw Exception("file.missing", 0, "can not open '%s'", file_name_cstr);
+		throw Exception("file.missing", 0, "cannot open '%s'", file_name_cstr);
 	}
 }
 
 
 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_file_name(0);
 
 	gdImage* image=load(r, file_name);
 	GET_SELF(r, VImage).set(&file_name, image->SX(), image->SY(), image);
@@ -1335,12 +1347,12 @@ 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");
+	const String& alphabet=params.as_string(0, "alphabet must be string");
 	size_t alphabet_length=alphabet.length(r.charsets.source());
 	if(!alphabet_length)
 		throw Exception(PARSER_RUNTIME, 0, "alphabet must not be empty");
 
-	gdImage* image=load(r, params.as_string(1, FILE_NAME_MUST_NOT_BE_CODE));
+	gdImage* image=load(r, params.as_file_name(1));
 
 	int spacebar_width=image->SX();
 	int monospace_width=0; // proportional
@@ -1387,14 +1399,14 @@ static void _font(Request& r, MethodPara
 static void _text(Request& r, MethodParams& params) {
 	int x=params.as_int(0, "x must be int", r);
 	int y=params.as_int(1, "y must be int", r);
-	const String& s=params.as_string(2, "text must not be code");
+	const String& s=params.as_string(2, "text must be string");
 
 	VImage& vimage=GET_SELF(r, VImage);
 	vimage.font().string_display(vimage.image(), x, y, s);
 }
 
 static void _length(Request& r, MethodParams& params) {
-	const String& s=params.as_string(0, "text must not be code");
+	const String& s=params.as_string(0, "text must be string");
 
 	VImage& vimage=GET_SELF(r, VImage);
 	r.write(*new VInt(vimage.font().string_width(s)));
@@ -1443,8 +1455,8 @@ 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)) {
-		return static_cast<VImage *>(vimage)->image();
+	if(VImage* vimage=dynamic_cast<VImage *>(&value)) {
+		return vimage->image();
 	} else
 		throw Exception(PARSER_RUNTIME, 0, msg);
 }