1 files changed, 252 insertions, 0 deletions
diff --git a/src/binary.h b/src/binary.h
new file mode 100644
index 00000000..528217fa
--- /dev/null
+++ b/src/binary.h
@@ -0,0 +1,252 @@
+#ifndef _BINARY_H
+#define _BINARY_H
+
+#include "parser.h"
+
+namespace ledger {
+
+#if 0
+class binary_parser_t : public parser_t
+{
+ public:
+  virtual bool test(std::istream& in) const;
+
+  virtual unsigned int parse(std::istream&	 in,
+			     journal_t *	 journal,
+			     account_t *	 master        = NULL,
+			     const string * original_file = NULL);
+};
+#endif
+
+template <typename T>
+inline void read_binary_number_nocheck(std::istream& in, T& num) {
+  in.read((char *)&num, sizeof(num));
+}
+
+template <typename T>
+inline void read_binary_number_nocheck(char *& data, T& num) {
+  num = *((T *) data);
+  data += sizeof(T);
+}
+
+template <typename T>
+inline T read_binary_number_nocheck(std::istream& in) {
+  T num;
+  read_binary_number_nocheck(in, num);
+  return num;
+}
+
+template <typename T>
+inline T read_binary_number_nocheck(char *& data) {
+  T num;
+  read_binary_number_nocheck(data, num);
+  return num;
+}
+
+#if DEBUG_LEVEL >= ALPHA
+#define read_binary_guard(in, id)				\
+  if (read_binary_number_nocheck<unsigned short>(in) != id)	\
+      assert(0);
+#else
+#define read_binary_guard(in, id)
+#endif
+
+template <typename T>
+inline void read_binary_number(std::istream& in, T& num) {
+  read_binary_guard(in, 0x2003);
+  in.read((char *)&num, sizeof(num));
+  read_binary_guard(in, 0x2004);
+}
+
+template <typename T>
+inline void read_binary_number(char *& data, T& num) {
+  read_binary_guard(data, 0x2003);
+  num = *((T *) data);
+  data += sizeof(T);
+  read_binary_guard(data, 0x2004);
+}
+
+template <typename T>
+inline T read_binary_number(std::istream& in) {
+  T num;
+  read_binary_number(in, num);
+  return num;
+}
+
+template <typename T>
+inline T read_binary_number(char *& data) {
+  T num;
+  read_binary_number(data, num);
+  return num;
+}
+
+void read_binary_bool(std::istream& in, bool& num);
+void read_binary_bool(char *& data, bool& num);
+
+inline bool read_binary_bool(std::istream& in) {
+  bool num;
+  read_binary_bool(in, num);
+  return num;
+}
+
+inline bool read_binary_bool(char *& data) {
+  bool num;
+  read_binary_bool(data, num);
+  return num;
+}
+
+template <typename T>
+void read_binary_long(std::istream& in, T& num)
+{
+  read_binary_guard(in, 0x2001);
+
+  unsigned char len;
+  read_binary_number_nocheck(in, len);
+
+  num = 0;
+  unsigned char temp;
+  if (len > 3) {
+    read_binary_number_nocheck(in, temp);
+    num |= ((unsigned long)temp) << 24;
+  }
+  if (len > 2) {
+    read_binary_number_nocheck(in, temp);
+    num |= ((unsigned long)temp) << 16;
+  }
+  if (len > 1) {
+    read_binary_number_nocheck(in, temp);
+    num |= ((unsigned long)temp) << 8;
+  }
+
+  read_binary_number_nocheck(in, temp);
+  num |= ((unsigned long)temp);
+
+  read_binary_guard(in, 0x2002);
+}
+
+template <typename T>
+void read_binary_long(char *& data, T& num)
+{
+  read_binary_guard(data, 0x2001);
+
+  unsigned char len;
+  read_binary_number_nocheck(data, len);
+
+  num = 0;
+  unsigned char temp;
+  if (len > 3) {
+    read_binary_number_nocheck(data, temp);
+    num |= ((unsigned long)temp) << 24;
+  }
+  if (len > 2) {
+    read_binary_number_nocheck(data, temp);
+    num |= ((unsigned long)temp) << 16;
+  }
+  if (len > 1) {
+    read_binary_number_nocheck(data, temp);
+    num |= ((unsigned long)temp) << 8;
+  }
+
+  read_binary_number_nocheck(data, temp);
+  num |= ((unsigned long)temp);
+
+  read_binary_guard(data, 0x2002);
+}
+
+template <typename T>
+inline T read_binary_long(std::istream& in) {
+  T num;
+  read_binary_long(in, num);
+  return num;
+}
+
+template <typename T>
+inline T read_binary_long(char *& data) {
+  T num;
+  read_binary_long(data, num);
+  return num;
+}
+
+void read_binary_string(std::istream& in, string& str);
+void read_binary_string(char *& data, string& str);
+void read_binary_string(char *& data, string * str);
+
+inline string read_binary_string(std::istream& in) {
+  string temp;
+  read_binary_string(in, temp);
+  return temp;
+}
+
+inline string read_binary_string(char *& data) {
+  string temp;
+  read_binary_string(data, temp);
+  return temp;
+}
+
+
+template <typename T>
+inline void write_binary_number_nocheck(std::ostream& out, T num) {
+  out.write((char *)&num, sizeof(num));
+}
+
+#if DEBUG_LEVEL >= ALPHA
+#define write_binary_guard(out, id)			\
+  write_binary_number_nocheck<unsigned short>(out, id)
+#else
+#define write_binary_guard(in, id)
+#endif
+
+template <typename T>
+inline void write_binary_number(std::ostream& out, T num) {
+  write_binary_guard(out, 0x2003);
+  out.write((char *)&num, sizeof(num));
+  write_binary_guard(out, 0x2004);
+}
+
+void write_binary_bool(std::ostream& out, bool num);
+
+template <typename T>
+void write_binary_long(std::ostream& out, T num)
+{
+  write_binary_guard(out, 0x2001);
+
+  unsigned char len = 4;
+  if (((unsigned long)num) < 0x00000100UL)
+    len = 1;
+  else if (((unsigned long)num) < 0x00010000UL)
+    len = 2;
+  else if (((unsigned long)num) < 0x01000000UL)
+    len = 3;
+  write_binary_number_nocheck<unsigned char>(out, len);
+
+  unsigned char temp;
+  if (len > 3) {
+    temp = (((unsigned long)num) & 0xFF000000UL) >> 24;
+    write_binary_number_nocheck(out, temp);
+  }
+  if (len > 2) {
+    temp = (((unsigned long)num) & 0x00FF0000UL) >> 16;
+    write_binary_number_nocheck(out, temp);
+  }
+  if (len > 1) {
+    temp = (((unsigned long)num) & 0x0000FF00UL) >> 8;
+    write_binary_number_nocheck(out, temp);
+  }
+
+  temp = (((unsigned long)num) & 0x000000FFUL);
+  write_binary_number_nocheck(out, temp);
+
+  write_binary_guard(out, 0x2002);
+}
+
+void write_binary_string(std::ostream& out, const string& str);
+
+
+
+#if 0
+void write_binary_journal(std::ostream& out, journal_t * journal);
+#endif
+
+} // namespace ledger
+
+#endif // _BINARY_H