| /* | |
| * Copyright 2015 Google Inc. | |
| * | |
| * Use of this source code is governed by a BSD-style license that can be | |
| * found in the LICENSE file. | |
| */ | |
| #include "SkPDFMetadata.h" | |
| #include "SkPDFTypes.h" | |
| #include <utility> | |
| #ifdef SK_PDF_GENERATE_PDFA | |
| #include "SkMD5.h" | |
| #endif | |
| static SkString pdf_date(const SkTime::DateTime& dt) { | |
| int timeZoneMinutes = SkToInt(dt.fTimeZoneMinutes); | |
| char timezoneSign = timeZoneMinutes >= 0 ? '+' : '-'; | |
| int timeZoneHours = SkTAbs(timeZoneMinutes) / 60; | |
| timeZoneMinutes = SkTAbs(timeZoneMinutes) % 60; | |
| return SkStringPrintf( | |
| "D:%04u%02u%02u%02u%02u%02u%c%02d'%02d'", | |
| static_cast<unsigned>(dt.fYear), static_cast<unsigned>(dt.fMonth), | |
| static_cast<unsigned>(dt.fDay), static_cast<unsigned>(dt.fHour), | |
| static_cast<unsigned>(dt.fMinute), | |
| static_cast<unsigned>(dt.fSecond), timezoneSign, timeZoneHours, | |
| timeZoneMinutes); | |
| } | |
| SkPDFObject* SkPDFMetadata::createDocumentInformationDict() const { | |
| SkAutoTUnref<SkPDFDict> dict(new SkPDFDict); | |
| static const char* keys[] = { | |
| "Title", "Author", "Subject", "Keywords", "Creator"}; | |
| for (const char* key : keys) { | |
| for (const SkDocument::Attribute& keyValue : fInfo) { | |
| if (keyValue.fKey.equals(key)) { | |
| dict->insertString(key, keyValue.fValue); | |
| } | |
| } | |
| } | |
| dict->insertString("Producer", "Skia/PDF"); | |
| if (fCreation) { | |
| dict->insertString("CreationDate", pdf_date(*fCreation.get())); | |
| } | |
| if (fModified) { | |
| dict->insertString("ModDate", pdf_date(*fModified.get())); | |
| } | |
| return dict.detach(); | |
| } | |
| #ifdef SK_PDF_GENERATE_PDFA | |
| SkPDFMetadata::UUID SkPDFMetadata::uuid() const { | |
| // The main requirement is for the UUID to be unique; the exact | |
| // format of the data that will be hashed is not important. | |
| SkMD5 md5; | |
| const char uuidNamespace[] = "org.skia.pdf\n"; | |
| md5.write(uuidNamespace, strlen(uuidNamespace)); | |
| SkMSec msec = SkTime::GetMSecs(); | |
| md5.write(&msec, sizeof(msec)); | |
| SkTime::DateTime dateTime; | |
| SkTime::GetDateTime(&dateTime); | |
| md5.write(&dateTime, sizeof(dateTime)); | |
| if (fCreation) { | |
| md5.write(fCreation.get(), sizeof(fCreation)); | |
| } | |
| if (fModified) { | |
| md5.write(fModified.get(), sizeof(fModified)); | |
| } | |
| for (const auto& kv : fInfo) { | |
| md5.write(kv.fKey.c_str(), kv.fKey.size()); | |
| md5.write("\037", 1); | |
| md5.write(kv.fValue.c_str(), kv.fValue.size()); | |
| md5.write("\036", 1); | |
| } | |
| SkMD5::Digest digest; | |
| md5.finish(digest); | |
| // See RFC 4122, page 6-7. | |
| digest.data[6] = (digest.data[6] & 0x0F) | 0x30; | |
| digest.data[8] = (digest.data[6] & 0x3F) | 0x80; | |
| static_assert(sizeof(digest) == sizeof(UUID), "uuid_size"); | |
| SkPDFMetadata::UUID uuid; | |
| memcpy(&uuid, &digest, sizeof(digest)); | |
| return uuid; | |
| } | |
| SkPDFObject* SkPDFMetadata::CreatePdfId(const UUID& doc, const UUID& instance) { | |
| // /ID [ <81b14aafa313db63dbd6f981e49f94f4> | |
| // <81b14aafa313db63dbd6f981e49f94f4> ] | |
| SkAutoTUnref<SkPDFArray> array(new SkPDFArray); | |
| static_assert(sizeof(UUID) == 16, "uuid_size"); | |
| array->appendString( | |
| SkString(reinterpret_cast<const char*>(&doc), sizeof(UUID))); | |
| array->appendString( | |
| SkString(reinterpret_cast<const char*>(&instance), sizeof(UUID))); | |
| return array.detach(); | |
| } | |
| // Improvement on SkStringPrintf to allow for arbitrarily long output. | |
| // TODO: replace SkStringPrintf. | |
| static SkString sk_string_printf(const char* format, ...) { | |
| #ifdef SK_BUILD_FOR_WIN | |
| va_list args; | |
| va_start(args, format); | |
| char buffer[1024]; | |
| int length = _vsnprintf_s(buffer, sizeof(buffer), _TRUNCATE, format, args); | |
| va_end(args); | |
| if (length >= 0 && length < (int)sizeof(buffer)) { | |
| return SkString(buffer, length); | |
| } | |
| va_start(args, format); | |
| length = _vscprintf(format, args); | |
| va_end(args); | |
| SkString string((size_t)length); | |
| va_start(args, format); | |
| SkDEBUGCODE(int check = ) _vsnprintf_s(string.writable_str(), length + 1, | |
| _TRUNCATE, format, args); | |
| va_end(args); | |
| SkASSERT(check == length); | |
| SkASSERT(string[length] == '\0'); | |
| return std::move(string); | |
| #else // C99/C++11 standard vsnprintf | |
| // TODO: When all compilers support this, remove windows-specific code. | |
| va_list args; | |
| va_start(args, format); | |
| char buffer[1024]; | |
| int length = vsnprintf(buffer, sizeof(buffer), format, args); | |
| va_end(args); | |
| if (length < 0) { | |
| return SkString(); | |
| } | |
| if (length < (int)sizeof(buffer)) { | |
| return SkString(buffer, length); | |
| } | |
| SkString string((size_t)length); | |
| va_start(args, format); | |
| SkDEBUGCODE(int check = ) | |
| vsnprintf(string.writable_str(), length + 1, format, args); | |
| va_end(args); | |
| SkASSERT(check == length); | |
| SkASSERT(string[length] == '\0'); | |
| return std::move(string); | |
| #endif | |
| } | |
| static const SkString get(const SkTArray<SkDocument::Attribute>& info, | |
| const char* key) { | |
| for (const auto& keyValue : info) { | |
| if (keyValue.fKey.equals(key)) { | |
| return keyValue.fValue; | |
| } | |
| } | |
| return SkString(); | |
| } | |
| #define HEXIFY(INPUT_PTR, OUTPUT_PTR, HEX_STRING, BYTE_COUNT) \ | |
| do { \ | |
| for (int i = 0; i < (BYTE_COUNT); ++i) { \ | |
| uint8_t value = *(INPUT_PTR)++; \ | |
| *(OUTPUT_PTR)++ = (HEX_STRING)[value >> 4]; \ | |
| *(OUTPUT_PTR)++ = (HEX_STRING)[value & 0xF]; \ | |
| } \ | |
| } while (false) | |
| static SkString uuid_to_string(const SkPDFMetadata::UUID& uuid) { | |
| // 8-4-4-4-12 | |
| char buffer[36]; // [32 + 4] | |
| static const char gHex[] = "0123456789abcdef"; | |
| SkASSERT(strlen(gHex) == 16); | |
| char* ptr = buffer; | |
| const uint8_t* data = uuid.fData; | |
| HEXIFY(data, ptr, gHex, 4); | |
| *ptr++ = '-'; | |
| HEXIFY(data, ptr, gHex, 2); | |
| *ptr++ = '-'; | |
| HEXIFY(data, ptr, gHex, 2); | |
| *ptr++ = '-'; | |
| HEXIFY(data, ptr, gHex, 2); | |
| *ptr++ = '-'; | |
| HEXIFY(data, ptr, gHex, 6); | |
| SkASSERT(ptr == buffer + 36); | |
| SkASSERT(data == uuid.fData + 16); | |
| return SkString(buffer, 36); | |
| } | |
| #undef HEXIFY | |
| namespace { | |
| class PDFXMLObject final : public SkPDFObject { | |
| public: | |
| PDFXMLObject(SkString xml) : fXML(std::move(xml)) {} | |
| void emitObject(SkWStream* stream, | |
| const SkPDFObjNumMap& omap, | |
| const SkPDFSubstituteMap& smap) const override { | |
| SkPDFDict dict("Metadata"); | |
| dict.insertName("Subtype", "XML"); | |
| dict.insertInt("Length", fXML.size()); | |
| dict.emitObject(stream, omap, smap); | |
| static const char streamBegin[] = " stream\n"; | |
| stream->write(streamBegin, strlen(streamBegin)); | |
| // Do not compress this. The standard requires that a | |
| // program that does not understand PDF can grep for | |
| // "<?xpacket" and extracť the entire XML. | |
| stream->write(fXML.c_str(), fXML.size()); | |
| static const char streamEnd[] = "\nendstream"; | |
| stream->write(streamEnd, strlen(streamEnd)); | |
| } | |
| private: | |
| const SkString fXML; | |
| }; | |
| } // namespace | |
| static int count_xml_escape_size(const SkString& input) { | |
| int extra = 0; | |
| for (size_t i = 0; i < input.size(); ++i) { | |
| if (input[i] == '&') { | |
| extra += 4; // strlen("&") - strlen("&") | |
| } else if (input[i] == '<') { | |
| extra += 3; // strlen("<") - strlen("<") | |
| } | |
| } | |
| return extra; | |
| } | |
| const SkString escape_xml(const SkString& input, | |
| const char* before = nullptr, | |
| const char* after = nullptr) { | |
| if (input.size() == 0) { | |
| return input; | |
| } | |
| // "&" --> "&" and "<" --> "<" | |
| // text is assumed to be in UTF-8 | |
| // all strings are xml content, not attribute values. | |
| size_t beforeLen = before ? strlen(before) : 0; | |
| size_t afterLen = after ? strlen(after) : 0; | |
| int extra = count_xml_escape_size(input); | |
| SkString output(input.size() + extra + beforeLen + afterLen); | |
| char* out = output.writable_str(); | |
| if (before) { | |
| strncpy(out, before, beforeLen); | |
| out += beforeLen; | |
| } | |
| static const char kAmp[] = "&"; | |
| static const char kLt[] = "<"; | |
| for (size_t i = 0; i < input.size(); ++i) { | |
| if (input[i] == '&') { | |
| strncpy(out, kAmp, strlen(kAmp)); | |
| out += strlen(kAmp); | |
| } else if (input[i] == '<') { | |
| strncpy(out, kLt, strlen(kLt)); | |
| out += strlen(kLt); | |
| } else { | |
| *out++ = input[i]; | |
| } | |
| } | |
| if (after) { | |
| strncpy(out, after, afterLen); | |
| out += afterLen; | |
| } | |
| // Validate that we haven't written outside of our string. | |
| SkASSERT(out == &output.writable_str()[output.size()]); | |
| *out = '\0'; | |
| return std::move(output); | |
| } | |
| SkPDFObject* SkPDFMetadata::createXMPObject(const UUID& doc, | |
| const UUID& instance) const { | |
| static const char templateString[] = | |
| "<?xpacket begin=\"\" id=\"W5M0MpCehiHzreSzNTczkc9d\"?>\n" | |
| "<x:xmpmeta xmlns:x=\"adobe:ns:meta/\"\n" | |
| " x:xmptk=\"Adobe XMP Core 5.4-c005 78.147326, " | |
| "2012/08/23-13:03:03\">\n" | |
| "<rdf:RDF " | |
| "xmlns:rdf=\"http://www.w3.org/1999/02/22-rdf-syntax-ns#\">\n" | |
| "<rdf:Description rdf:about=\"\"\n" | |
| " xmlns:xmp=\"http://ns.adobe.com/xap/1.0/\"\n" | |
| " xmlns:dc=\"http://purl.org/dc/elements/1.1/\"\n" | |
| " xmlns:xmpMM=\"http://ns.adobe.com/xap/1.0/mm/\"\n" | |
| " xmlns:pdf=\"http://ns.adobe.com/pdf/1.3/\"\n" | |
| " xmlns:pdfaid=\"http://www.aiim.org/pdfa/ns/id/\">\n" | |
| "<pdfaid:part>2</pdfaid:part>\n" | |
| "<pdfaid:conformance>B</pdfaid:conformance>\n" | |
| "%s" // ModifyDate | |
| "%s" // CreateDate | |
| "%s" // MetadataDate | |
| "%s" // xmp:CreatorTool | |
| "<dc:format>application/pdf</dc:format>\n" | |
| "%s" // dc:title | |
| "%s" // dc:description | |
| "%s" // author | |
| "%s" // keywords | |
| "<xmpMM:DocumentID>uuid:%s</xmpMM:DocumentID>\n" | |
| "<xmpMM:InstanceID>uuid:%s</xmpMM:InstanceID>\n" | |
| "<pdf:Producer>Skia/PDF</pdf:Producer>\n" | |
| "%s" // pdf:Keywords | |
| "</rdf:Description>\n" | |
| "</rdf:RDF>\n" | |
| "</x:xmpmeta>\n" // Note: the standard suggests 4k of padding. | |
| "<?xpacket end=\"w\"?>\n"; | |
| SkString creationDate; | |
| SkString modificationDate; | |
| SkString metadataDate; | |
| if (fCreation) { | |
| SkString tmp; | |
| fCreation->toISO8601(&tmp); | |
| SkASSERT(0 == count_xml_escape_size(tmp)); | |
| // YYYY-mm-ddTHH:MM:SS[+|-]ZZ:ZZ; no need to escape | |
| creationDate = sk_string_printf("<xmp:CreateDate>%s</xmp:CreateDate>\n", | |
| tmp.c_str()); | |
| } | |
| if (fModified) { | |
| SkString tmp; | |
| fModified->toISO8601(&tmp); | |
| SkASSERT(0 == count_xml_escape_size(tmp)); | |
| modificationDate = sk_string_printf( | |
| "<xmp:ModifyDate>%s</xmp:ModifyDate>\n", tmp.c_str()); | |
| metadataDate = sk_string_printf( | |
| "<xmp:MetadataDate>%s</xmp:MetadataDate>\n", tmp.c_str()); | |
| } | |
| SkString title = | |
| escape_xml(get(fInfo, "Title"), "<dc:title><rdf:Alt><rdf:li>", | |
| "</rdf:li></rdf:Alt></dc:title>\n"); | |
| SkString author = | |
| escape_xml(get(fInfo, "Author"), "<dc:creator><rdf:Bag><rdf:li>", | |
| "</rdf:li></rdf:Bag></dc:creator>\n"); | |
| // TODO: in theory, XMP can support multiple authors. Split on a delimiter? | |
| SkString subject = escape_xml(get(fInfo, "Subject"), | |
| "<dc:description><rdf:Alt><rdf:li>", | |
| "</rdf:li></rdf:Alt></dc:description>\n"); | |
| SkString keywords1 = | |
| escape_xml(get(fInfo, "Keywords"), "<dc:subject><rdf:Bag><rdf:li>", | |
| "</rdf:li></rdf:Bag></dc:subject>\n"); | |
| SkString keywords2 = escape_xml(get(fInfo, "Keywords"), "<pdf:Keywords>", | |
| "</pdf:Keywords>\n"); | |
| // TODO: in theory, keywords can be a list too. | |
| SkString creator = escape_xml(get(fInfo, "Creator"), "<xmp:CreatorTool>", | |
| "</xmp:CreatorTool>\n"); | |
| SkString documentID = uuid_to_string(doc); // no need to escape | |
| SkASSERT(0 == count_xml_escape_size(documentID)); | |
| SkString instanceID = uuid_to_string(instance); | |
| SkASSERT(0 == count_xml_escape_size(instanceID)); | |
| return new PDFXMLObject(sk_string_printf( | |
| templateString, modificationDate.c_str(), creationDate.c_str(), | |
| metadataDate.c_str(), creator.c_str(), title.c_str(), | |
| subject.c_str(), author.c_str(), keywords1.c_str(), | |
| documentID.c_str(), instanceID.c_str(), keywords2.c_str())); | |
| } | |
| #endif // SK_PDF_GENERATE_PDFA |