]> git.saurik.com Git - wxWidgets.git/blob - src/common/serbase.cpp
attempt to fix a report about compile problems in generic treectrl
[wxWidgets.git] / 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