Copy asdcplib 2.5.11 into the tree.

1 files changed, 342 insertions, 0 deletions

diff --git a/asdcplib/src/klvsplit.cpp b/asdcplib/src/klvsplit.cpp
new file mode 100755
index 00000000..2de65288
--- /dev/null
+++ b/asdcplib/src/klvsplit.cpp
@@ -0,0 +1,342 @@
+/*
+Copyright (c) 2005-2013, John Hurst
+All rights reserved.
+
+Redistribution and use in source and binary forms, with or without
+modification, are permitted provided that the following conditions
+are met:
+1. Redistributions of source code must retain the above copyright
+   notice, this list of conditions and the following disclaimer.
+2. Redistributions in binary form must reproduce the above copyright
+   notice, this list of conditions and the following disclaimer in the
+   documentation and/or other materials provided with the distribution.
+3. The name of the author may not be used to endorse or promote products
+   derived from this software without specific prior written permission.
+
+THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
+IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
+OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
+IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
+INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
+NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
+DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
+THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
+(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
+THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+*/
+/*! \file    klvwalk.cpp
+    \version $Id: klvsplit.cpp,v 1.5 2015/10/07 16:41:23 jhurst Exp $
+    \brief   KLV+MXF test
+*/
+
+#include "MXF.h"
+#include <KM_log.h>
+
+
+using namespace ASDCP;
+using Kumu::DefaultLogSink;
+
+
+//------------------------------------------------------------------------------------------
+//
+// command line option parser class
+
+static const char* PROGRAM_NAME = "klvsplit";    // program name for messages
+typedef std::list<std::string> FileList_t;
+
+// Increment the iterator, test for an additional non-option command line argument.
+// Causes the caller to return if there are no remaining arguments or if the next
+// argument begins with '-'.
+#define TEST_EXTRA_ARG(i,c)    if ( ++i >= argc || argv[(i)][0] == '-' ) \
+                                 { \
+                                   fprintf(stderr, "Argument not found for option -%c.\n", (c)); \
+                                   return; \
+                                 }
+
+//
+void
+banner(FILE* stream = stdout)
+{
+  fprintf(stream, "\n\
+%s (asdcplib %s)\n\n\
+Copyright (c) 2005-2013 John Hurst\n\
+%s is part of the asdcplib DCP tools package.\n\
+asdcplib may be copied only under the terms of the license found at\n\
+the top of every file in the asdcplib distribution kit.\n\n\
+Specify the -h (help) option for further information about %s\n\n",
+	  PROGRAM_NAME, ASDCP::Version(), PROGRAM_NAME, PROGRAM_NAME);
+}
+
+//
+void
+usage(FILE* stream = stdout)
+{
+  fprintf(stream, "\
+USAGE: %s [-l <limit>] [-p <prefix>] [-s <suffix>] [-u|-U] [-v] \n\
+           (<type-name>|<type-ul>) <mxf-filename>+\n\
+\n\
+       %s -d\n\
+\n\
+       %s [-h|-help] [-V]\n\
+\n\
+  -d           - List the valid packet type names\n\
+  -h | -help   - Show help\n\
+  -l <limit>   - Stop processing after <limit> matching packets\n\
+  -p <prefix>  - Use <prefix> to start output filenames (default\n\
+                   uses the input filename minus any extension\n\
+  -s <suffix>  - Append <suffix> to output filenames\n\
+  -u           - Unwrap the packet value (i.e., do not output KL)\n\
+  -U           - Do not unwrap (default)\n\
+  -v           - Verbose. Prints informative messages to stderr\n\
+  -V           - Show version information\n\
+\n\
+  NOTES: o There is no option grouping, all options must be distinct arguments.\n\
+         o All option arguments must be separated from the option by whitespace.\n\
+\n", PROGRAM_NAME, PROGRAM_NAME, PROGRAM_NAME);
+}
+
+//
+//
+ class CommandOptions
+ {
+   CommandOptions();
+
+ public:
+   bool   error_flag;               // true if the given options are in error or not complete
+   bool   version_flag;             // true if the version display option was selected
+   bool   help_flag;                // true if the help display option was selected
+   bool   verbose_flag;             // true if the informative messages option was selected
+   bool   unwrap_mode;              // true if we are to strip the K and L before writing
+   bool   list_mode;
+   ASDCP::UL target_ul;             // a UL value identifying the packets to be extracted
+   ui64_t  extract_limit;           // limit extraction to the given number of packets
+   std::string prefix;              // output filename prefix
+   std::string suffix;              // output filename suffix
+   FileList_t inFileList;           // File to operate on
+
+   CommandOptions(int argc, const char** argv, const ASDCP::Dictionary& dict) :
+     error_flag(true), version_flag(false), help_flag(false),
+     verbose_flag(false), unwrap_mode(false), list_mode(false), extract_limit(ui64_C(-1))
+   {
+     for ( int i = 1; i < argc; ++i )
+       {
+
+	 if ( (strcmp( argv[i], "-help") == 0) )
+	   {
+	     help_flag = true;
+	     continue;
+	   }
+         
+	 if ( argv[i][0] == '-' && isalpha(argv[i][1]) && argv[i][2] == 0 )
+	   {
+	     switch ( argv[i][1] )
+	       {
+	       case 'd': list_mode = true; break;
+	       case 'h': help_flag = true; break;
+
+	       case 'l':
+		 TEST_EXTRA_ARG(i, 'l');
+		 extract_limit = Kumu::xabs(strtoll(argv[i], 0, 10));
+		 break;
+
+	       case 'p':
+		 TEST_EXTRA_ARG(i, 'p');
+		 prefix = argv[i];
+		 break;
+
+	       case 's':
+		 TEST_EXTRA_ARG(i, 's');
+		 suffix = argv[i];
+		 break;
+
+	       case 'u': unwrap_mode = true; break;
+	       case 'U': unwrap_mode = false; break;
+	       case 'V': version_flag = true; break;
+	       case 'v': verbose_flag = true; break;
+
+	       default:
+		 fprintf(stderr, "Unrecognized option: %s\n", argv[i]);
+		 return;
+	       }
+	   }
+	 else if ( argv[i][0] != '-' )
+	   {
+	     if ( ! target_ul.HasValue() )
+	       {
+		 if ( ! target_ul.DecodeHex(argv[i]) )
+		   {
+		     const ASDCP::MDDEntry *e = dict.FindSymbol(argv[i]);
+
+		     if ( e != 0 )
+		       target_ul = e->ul;
+		   }
+
+		 if ( ! target_ul.HasValue() )
+		   {
+		     fprintf(stderr, "Value is not a UL or valid object name: %s\n", argv[i]);
+		     return;
+		   }
+	       }
+	     else
+	       {
+		 inFileList.push_back(argv[i]);
+	       }
+	   }
+	 else
+	   {
+	     fprintf(stderr, "Unrecognized option: %s\n", argv[i]);
+	     return;
+	   }
+       }
+
+     if ( help_flag || version_flag )
+       return;
+     
+     if ( ! list_mode )
+       {
+	 if ( inFileList.empty() )
+	   {
+	     fputs("Input filename(s) required.\n", stderr);
+	     return;
+	   }
+     
+	 if ( ! target_ul.HasValue() )
+	   {
+	     fputs("Packet UL not set.  Use %s -u <ul> or keyword.\n", stderr);
+	     return;
+	   }
+       }
+
+     error_flag = false;
+   }
+ };
+
+
+//---------------------------------------------------------------------------------------------------
+//
+
+int
+main(int argc, const char** argv)
+{
+  const Dictionary *dict = &DefaultCompositeDict();
+  CommandOptions Options(argc, argv, *dict);
+
+  if ( Options.version_flag )
+    banner();
+
+  if ( Options.help_flag )
+    usage();
+
+  if ( Options.version_flag || Options.help_flag )
+    return 0;
+
+  if ( Options.error_flag )
+    {
+      fprintf(stderr, "There was a problem. Type %s -h for help.\n", PROGRAM_NAME);
+      return 3;
+    }
+
+  if ( Options.list_mode )
+    {
+      DefaultLogSink().UnsetFilterFlag(Kumu::LOG_ALLOW_WARN);
+      char buf[64];
+
+      MDD_t di = (MDD_t)0;
+      while ( di < MDD_Max )
+	{
+	  const MDDEntry& e = dict->Type(di);
+
+	  if ( e.name != 0  && ( e.ul[4] == 1 || e.ul[4] == 2 ) )
+	    {
+	      if ( Options.verbose_flag )
+		{
+		  UL tmp_ul(e.ul);
+		  printf("%s %s\n", tmp_ul.EncodeString(buf, 64), e.name);
+		}
+	      else
+		{
+		  printf("%s\n", e.name);
+		}
+	    }
+
+	  di = (MDD_t)(di + 1);
+	}
+
+      return 0;
+    }
+
+  Result_t result = RESULT_OK;
+  FileList_t::iterator fi;
+
+  for ( fi = Options.inFileList.begin(); KM_SUCCESS(result) && fi != Options.inFileList.end(); ++fi )
+    {
+      if ( Options.verbose_flag )
+	fprintf(stderr, "Opening file %s\n", (fi->c_str()));
+      
+      std::string this_prefix =  Options.prefix.empty() ? Kumu::PathSetExtension(*fi, "") + "_" : Options.prefix;
+      Kumu::FileReader reader;
+      KLVFilePacket packet;
+      char filename_buf[1024];
+      ui64_t item_counter = 0;
+
+      result = reader.OpenRead(fi->c_str());
+	  
+      if ( KM_SUCCESS(result) )
+	result = packet.InitFromFile(reader);
+	  
+      while ( KM_SUCCESS(result) && item_counter < Options.extract_limit )
+	{
+	  if ( packet.GetUL() == Options.target_ul
+	       || packet.GetUL().MatchIgnoreStream(Options.target_ul) )
+	    {
+	      snprintf(filename_buf, 1024, "%s%010qu%s", this_prefix.c_str(), item_counter, Options.suffix.c_str());
+
+	      if ( Options.verbose_flag )
+		fprintf(stderr, "%s (%llu bytes)\n", filename_buf, packet.ValueLength());
+
+	      Kumu::FileWriter writer;
+	      writer.OpenWrite(filename_buf);
+
+	      if ( KM_SUCCESS(result) )
+		{
+		  if ( Options.unwrap_mode )
+		    {
+		      result = writer.Write(packet.m_Buffer.RoData() + packet.KLLength(), packet.ValueLength());
+		    }
+		  else
+		    {
+		      result = writer.Write(packet.m_Buffer.RoData(), packet.m_Buffer.Size());
+		    }
+
+		  ++item_counter;
+		}
+	    }
+
+	  if ( KM_SUCCESS(result) )
+	    result = packet.InitFromFile(reader);
+	}
+	  
+      if ( result == RESULT_ENDOFFILE )
+	result = RESULT_OK;
+    }
+
+  if ( KM_FAILURE(result) )
+    {
+      fputs("Program stopped on error.\n", stderr);
+      
+      if ( result != RESULT_FAIL )
+	{
+	  fputs(result, stderr);
+	  fputc('\n', stderr);
+	}
+      
+      return 1;
+    }
+  
+  return 0;
+}
+
+
+//
+// end klvwalk.cpp
+//