From 1ec3ab371385d675f4e1b402781741c39f418297 Mon Sep 17 00:00:00 2001
From: Steve Lhomme <slhomme@matroska.org>
Date: Sun, 16 Oct 2022 16:39:18 +0200
Subject: [PATCH] add the tag writer to the built examples

And remove dead code.
---
 CMakeLists.txt      |   4 +
 test/tags/test9.cpp | 237 --------------------------------------------
 2 files changed, 4 insertions(+), 237 deletions(-)

diff --git a/CMakeLists.txt b/CMakeLists.txt
index f4936d9..3b6cafb 100644
--- a/CMakeLists.txt
+++ b/CMakeLists.txt
@@ -101,6 +101,10 @@ if(BUILD_EXAMPLES)
   add_executable(test8 test/mux/test8.cpp)
   target_link_libraries(test8 matroska)
   target_include_directories(test8 PRIVATE $<BUILD_INTERFACE:${CMAKE_CURRENT_BINARY_DIR}>)
+
+  add_executable(test9 test/tags/test9.cpp)
+  target_link_libraries(test9 matroska)
+  target_include_directories(test9 PRIVATE $<BUILD_INTERFACE:${CMAKE_CURRENT_BINARY_DIR}>)
 endif()
 
 install(TARGETS matroska
diff --git a/test/tags/test9.cpp b/test/tags/test9.cpp
index 3811fc1..d6b4ace 100644
--- a/test/tags/test9.cpp
+++ b/test/tags/test9.cpp
@@ -96,243 +96,6 @@ int main() {
     *(static_cast<EbmlUInteger *>(&GetChild<KaxTagTrackUID>(targets))) =
       1234;
 
-#if 0
-  // comment of the Targets
-     KaxTagMultiComment &mcomB = GetChild<KaxTagMultiComment>(targets);
-    *(static_cast<EbmlString *>
-      (&GetChild<KaxTagMultiCommentName>(mcomB))) =
-      "Comment Level 5";
-
-    *(static_cast<EbmlUInteger *>(&GetChild<KaxTagChapterUID>(targets))) =
-      5678;
-
-     KaxTagMultiComment &mcomA = GetChild<KaxTagMultiComment>(tag);
-    *(static_cast<EbmlString *>
-      (&GetChild<KaxTagMultiCommentName>(mcomA))) =
-      "Comment Level 3";
-
-    KaxTagGeneral &general = GetChild<KaxTagGeneral>(tag);
-    *(static_cast<EbmlUnicodeString *>(&GetChild<KaxTagSubject>(general))) =
-      L"Subject";
-    *(static_cast<EbmlUnicodeString *>
-      (&GetChild<KaxTagBibliography>(general))) =
-      L"Bibliography";
-    *(static_cast<EbmlString *>(&GetChild<KaxTagLanguage>(general))) = "ger";
-    KaxTagRating &rating = GetChild<KaxTagRating>(general);
-    rating.CopyBuffer((binary *)"hallo", 5);
-     *(static_cast<EbmlUnicodeString *>
-       (&GetChild<KaxTagEncoder>(general))) =
-       L"Encoder";
-     *(static_cast<EbmlUnicodeString *>
-       (&GetChild<KaxTagEncodeSettings>(general))) =
-       L"EncodeSettings";
-     *(static_cast<EbmlUnicodeString *>
-       (&GetChild<KaxTagFile>(general))) =
-       L"File";
-    *(static_cast<EbmlUnicodeString *>
-      (&GetChild<KaxTagArchivalLocation>(general))) =
-      L"ArchivalLocation";
-    KaxTagKeywords &keywords1 = GetChild<KaxTagKeywords>(general);
-    *(static_cast<EbmlUnicodeString *>(&keywords1)) =
-      L"Keywords, 1";
-    *(static_cast<EbmlUnicodeString *>
-      (&GetNextChild<KaxTagKeywords>(general, keywords1))) =
-      L"Keywords, 2";
-    *(static_cast<EbmlUnicodeString *>
-      (&GetChild<KaxTagMood>(general))) =
-      L"Mood";
-    KaxTagRecordLocation &recordLocation1 =
-      GetChild<KaxTagRecordLocation>(general);
-    *(static_cast<EbmlString *>(&recordLocation1)) =
-      "RecordLocation, 1";
-    *(static_cast<EbmlString *>
-      (&GetNextChild<KaxTagRecordLocation>(general, recordLocation1))) =
-      "RecordLocation, 2";
-    *(static_cast<EbmlUnicodeString *>
-      (&GetChild<KaxTagSource>(general))) =
-      L"Source";
-    *(static_cast<EbmlUnicodeString *>
-      (&GetChild<KaxTagSourceForm>(general))) =
-      L"SourceForm";
-    *(static_cast<EbmlUnicodeString *>
-      (&GetChild<KaxTagProduct>(general))) =
-      L"Product";
-    *(static_cast<EbmlUnicodeString *>
-      (&GetChild<KaxTagOriginalMediaType>(general))) =
-      L"OriginalMediaType";
-    *(static_cast<EbmlUInteger *>
-      (&GetChild<KaxTagPlayCounter>(general))) =
-      123456;
-    *(static_cast<EbmlSInteger *>
-      (&GetChild<KaxTagPopularimeter>(general))) =
-      234567;
-
-    KaxTagGenres &genres = GetChild<KaxTagGenres>(tag);
-    *(static_cast<EbmlString *>
-      (&GetChild<KaxTagAudioGenre>(genres))) =
-      "AudioGenre";
-    KaxTagVideoGenre &videoGenre = GetChild<KaxTagVideoGenre>(genres);
-    videoGenre.CopyBuffer((binary *)"hallo", 5);
-    *(static_cast<EbmlString *>
-      (&GetChild<KaxTagSubGenre>(genres))) =
-      "SubGenre";
-
-    KaxTagAudioSpecific &aspec = GetChild<KaxTagAudioSpecific>(tag);
-    KaxTagAudioEncryption &aenc = GetChild<KaxTagAudioEncryption>(aspec);
-    aenc.CopyBuffer((binary *)"hallo", 5);
-    *(static_cast<EbmlFloat *>
-      (&GetChild<KaxTagAudioGain>(aspec))) =
-      42.0;
-    *(static_cast<EbmlFloat *>
-      (&GetChild<KaxTagAudioPeak>(aspec))) =
-      54.0;
-    *(static_cast<EbmlFloat *>
-      (&GetChild<KaxTagBPM>(aspec))) =
-      23.0;
-    KaxTagEqualisation &aeq = GetChild<KaxTagEqualisation>(aspec);
-    aeq.CopyBuffer((binary *)"hallo", 5);
-    *(static_cast<EbmlUInteger *>
-      (&GetChild<KaxTagDiscTrack>(aspec))) =
-      2;
-    *(static_cast<EbmlUInteger *>
-      (&GetChild<KaxTagSetPart>(aspec))) =
-      4;
-    *(static_cast<EbmlString *>
-      (&GetChild<KaxTagInitialKey>(aspec))) =
-      "InitialKey";
-    *(static_cast<EbmlString *>
-      (&GetChild<KaxTagOfficialAudioFileURL>(aspec))) =
-      "OfficialAudioFileURL";
-    *(static_cast<EbmlString *>
-      (&GetChild<KaxTagOfficialAudioSourceURL>(aspec))) =
-      "OfficialAudioSourceURL";
-
-    KaxTagImageSpecific &ispec = GetChild<KaxTagImageSpecific>(tag);
-    *(static_cast<EbmlUInteger *>
-      (&GetChild<KaxTagCaptureDPI>(ispec))) =
-      42;
-    KaxTagCaptureLightness &clight = GetChild<KaxTagCaptureLightness>(ispec);
-    clight.CopyBuffer((binary *)"hallo", 5);
-    *(static_cast<EbmlUInteger *>
-      (&GetChild<KaxTagCapturePaletteSetting>(ispec))) =
-      54;
-    KaxTagCaptureSharpness &csharp = GetChild<KaxTagCaptureSharpness>(ispec);
-    csharp.CopyBuffer((binary *)"hallo", 5);
-    *(static_cast<EbmlUnicodeString *>
-      (&GetChild<KaxTagCropped>(ispec))) =
-      L"Cropped";
-    *(static_cast<EbmlString *>
-      (&GetChild<KaxTagOriginalDimensions>(ispec))) =
-      "OriginalDimensions";
-
-    KaxTagMultiCommercial &mcmrcl = GetChild<KaxTagMultiCommercial>(tag);
-    KaxTagCommercial &cmrcl = GetChild<KaxTagCommercial>(mcmrcl);
-    *(static_cast<EbmlUInteger *>
-      (&GetChild<KaxTagMultiCommercialType>(cmrcl))) =
-      3;
-    *(static_cast<EbmlUnicodeString *>
-      (&GetChild<KaxTagMultiCommercialAddress>(cmrcl))) =
-      L"MultiCommercialAddress";
-    *(static_cast<EbmlString *>
-      (&GetChild<KaxTagMultiCommercialURL>(cmrcl))) =
-      "MultiCommercialURL";
-    *(static_cast<EbmlString *>
-      (&GetChild<KaxTagMultiCommercialEmail>(cmrcl))) =
-      "MultiCommercialEmail";
-
-     KaxTagMultiPrice &mprice = GetChild<KaxTagMultiPrice>(cmrcl);
-     *(static_cast<EbmlString *>
-       (&GetChild<KaxTagMultiPriceCurrency>(mprice))) =
-       "MultiPriceCurrency";
-     *(static_cast<EbmlFloat *>
-       (&GetChild<KaxTagMultiPriceAmount>(mprice))) =
-       42.0;
-     KaxTagMultiPricePriceDate &pdate =
-       GetChild<KaxTagMultiPricePriceDate>(mprice);
-     pdate.SetEpochDate(time(NULL));
-
-    KaxTagMultiDate &mdate = GetChild<KaxTagMultiDate>(tag);
-    KaxTagDate &date = GetChild<KaxTagDate>(mdate);
-    *(static_cast<EbmlUInteger *>
-      (&GetChild<KaxTagMultiDateType>(date))) =
-      4;
-    KaxTagMultiDateDateBegin &dbeg =
-      GetChild<KaxTagMultiDateDateBegin>(date);
-    dbeg.SetEpochDate(time(NULL));
-    KaxTagMultiDateDateEnd &dend =
-      GetChild<KaxTagMultiDateDateEnd>(date);
-    dend.SetEpochDate(time(NULL));
-
-    KaxTagMultiEntity &ment = GetChild<KaxTagMultiEntity>(tag);
-    KaxTagEntity &ent = GetChild<KaxTagEntity>(ment);
-    *(static_cast<EbmlUInteger *>
-      (&GetChild<KaxTagMultiEntityType>(ent))) =
-      1;
-    *(static_cast<EbmlUnicodeString *>
-      (&GetChild<KaxTagMultiEntityName>(ent))) =
-      L"MultiEntityName";
-    *(static_cast<EbmlString *>
-      (&GetChild<KaxTagMultiEntityURL>(ent))) =
-      "MultiEntityURL";
-    *(static_cast<EbmlString *>
-      (&GetChild<KaxTagMultiEntityEmail>(ent))) =
-      "MultiEntityEmail";
-    *(static_cast<EbmlUnicodeString *>
-      (&GetChild<KaxTagMultiEntityAddress>(ent))) =
-      L"MultiEntityAddress";
-
-     KaxTagMultiIdentifier &mident = GetChild<KaxTagMultiIdentifier>(tag);
-     KaxTagIdentifier &ident = GetChild<KaxTagIdentifier>(mident);
-     *(static_cast<EbmlUInteger *>
-       (&GetChild<KaxTagMultiIdentifierType>(ident))) =
-       5;
-     KaxTagMultiIdentifierBinary &ibin =
-       GetChild<KaxTagMultiIdentifierBinary>(ident);
-     ibin.CopyBuffer((binary *)"hallo", 5);
-     *(static_cast<EbmlUnicodeString *>
-       (&GetChild<KaxTagMultiIdentifierString>(ident))) =
-       L"MultiIdentifierString";
-
-    KaxTagMultiLegal &mlegal = GetChild<KaxTagMultiLegal>(tag);
-    KaxTagLegal &legal = GetChild<KaxTagLegal>(mlegal);
-    *(static_cast<EbmlUInteger *>
-      (&GetChild<KaxTagMultiLegalType>(legal))) =
-      3;
-    *(static_cast<EbmlString *>
-      (&GetChild<KaxTagMultiLegalURL>(legal))) =
-      "MultiLegalURL";
-    *(static_cast<EbmlUnicodeString *>
-      (&GetChild<KaxTagMultiLegalAddress>(legal))) =
-      L"MultiLegalAddress";
-
-    KaxTagMultiTitle &mtit = GetChild<KaxTagMultiTitle>(tag);
-    KaxTagTitle &tit = GetChild<KaxTagTitle>(mtit);
-    *(static_cast<EbmlUInteger *>
-      (&GetChild<KaxTagMultiTitleType>(tit))) =
-      2;
-    *(static_cast<EbmlUnicodeString *>
-      (&GetChild<KaxTagMultiTitleName>(tit))) =
-      L"MultiTitleName";
-    *(static_cast<EbmlUnicodeString *>
-      (&GetChild<KaxTagMultiTitleSubTitle>(tit))) =
-      L"MultiTitleSubTitle";
-    *(static_cast<EbmlUnicodeString *>
-      (&GetChild<KaxTagMultiTitleEdition>(tit))) =
-      L"MultiTitleEdition";
-    *(static_cast<EbmlUnicodeString *>
-      (&GetChild<KaxTagMultiTitleAddress>(tit))) =
-      L"MultiTitleAddress";
-    *(static_cast<EbmlString *>
-      (&GetChild<KaxTagMultiTitleURL>(tit))) =
-      "MultiTitleURL";
-    *(static_cast<EbmlString *>
-      (&GetChild<KaxTagMultiTitleEmail>(tit))) =
-      "MultiTitleEmail";
-    *(static_cast<EbmlString *>
-      (&GetChild<KaxTagMultiTitleLanguage>(tit))) =
-      "MultiTitleLanguage";
-#endif
-
     KaxTagSimple &stag_l1 = GetChild<KaxTagSimple>(tag);
     *(static_cast<EbmlUnicodeString *>(&GetChild<KaxTagName>(stag_l1))) =
       L"SIMPLE_TAG_NAME_LEVEL1_1";
-- 
2.40.0