src/common/serbase.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        serbase.cpp
   3 // Purpose:     wxStream base classes
   4 // Author:      Robert Roebling
   5 // Modified by:
   6 // Created:     11/07/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Robert Roebling
   9 // Licence:     wxWindows license
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 #ifdef __GNUG__
  13 #pragma implementation "serbase.h"
  14 #endif
  15
  16 #ifdef wxUSE_SERIAL
  17
  18 // For compilers that support precompilation, includes "wx.h".
  19 #include "wx/wxprec.h"
  20
  21 #include "wx/serbase.h"
  22 #include "wx/datstrm.h"
  23 #include "wx/objstrm.h"
  24
  25 #ifdef __BORLANDC__
  26 #pragma hdrstop
  27 #endif
  28
  29 // ----------------------------------------------------------------------------
  30 // wxObject_Serialize
  31 // ----------------------------------------------------------------------------
  32
  33 #if !USE_SHARED_LIBRARY
  34 IMPLEMENT_DYNAMIC_CLASS(wxObject_Serialize,wxObject)
  35 IMPLEMENT_SERIAL_CLASS(wxList, wxObject)
  36 IMPLEMENT_SERIAL_CLASS(wxHashTable, wxObject)
  37 #endif
  38
  39 void WXSERIAL(wxList)::StoreObject(wxObjectOutputStream& s)
  40 {
  41   wxList *lst_object = (wxList *)Object();
  42   wxNode *node = lst_object->First();
  43
  44   if (s.FirstStage()) {
  45     while (node) {
  46       s.AddChild(node->Data());
  47       node = node->Next();
  48     }
  49     return;
  50   }
  51
  52   wxDataOutputStream data_s(s);
  53
  54   data_s.Write8(lst_object->GetDeleteContents());
  55   data_s.Write8(lst_object->GetKeyType());
  56   data_s.Write32( lst_object->Number() );
  57
  58   if (lst_object->GetKeyType() == wxKEY_INTEGER) {
  59     while (node) {
  60       data_s.Write32(node->GetKeyInteger());
  61       node = node->Next();
  62     }
  63   } else {
  64     while (node) {
  65       data_s.WriteString(node->GetKeyString());
  66       node = node->Next();
  67     }
  68   }
  69 }
  70
  71 void WXSERIAL(wxList)::LoadObject(wxObjectInputStream& s)
  72 {
  73   wxDataInputStream data_s(s);
  74   wxList *list = (wxList *)Object();
  75   int number, i;
  76
  77   list->DeleteContents( data_s.Read8() );
  78   list->SetKeyType( (wxKeyType) data_s.Read8() );
  79   number = data_s.Read32();
  80
  81   if (list->GetKeyType() == wxKEY_INTEGER) {
  82     for (i=0;i<number;i++)
  83       list->Append( data_s.Read32(), s.GetChild() );
  84   } else {
  85     for (i=0;i<number;i++)
  86       list->Append( data_s.ReadString(), s.GetChild() );
  87   }
  88 }
  89
  90 // ----------------------------------------------------------------------------
  91
  92 void WXSERIAL(wxHashTable)::StoreObject(wxObjectOutputStream& s)
  93 {
  94   wxHashTable *table = (wxHashTable *)Object();
  95   int i;
  96
  97   if (s.FirstStage()) {
  98     for (i=0;i<table->n;i++)
  99       s.AddChild(table->hash_table[i]);
 100     return;
 101   }
 102
 103   wxDataOutputStream data_s(s);
 104
 105   data_s.Write8(table->key_type);
 106   data_s.Write32(table->n);
 107 }
 108
 109 void WXSERIAL(wxHashTable)::LoadObject(wxObjectInputStream& s)
 110 {
 111   wxHashTable *table = (wxHashTable *)Object();
 112   wxDataInputStream data_s(s);
 113   int i, key, n;
 114
 115   key = data_s.Read8();
 116   n = data_s.Read32();
 117
 118   table->Create(key, n);
 119
 120   for (i=0;i<n;i++)
 121     table->hash_table[i] = (wxList *)s.GetChild();
 122 }
 123
 124 #endif