1 | // This may look like C code, but it is really -*- C++ -*-
|
---|
2 | // Classe DVList : Liste dynamique de variables (valeurs)
|
---|
3 | // identifiees par un nom Reza Ansari - Dec 96
|
---|
4 |
|
---|
5 | #ifndef DVLIST_H_SEEN
|
---|
6 | #define DVLIST_H_SEEN
|
---|
7 |
|
---|
8 | #include "objfio.h"
|
---|
9 |
|
---|
10 | #include <stdio.h>
|
---|
11 |
|
---|
12 | #include <iostream.h>
|
---|
13 |
|
---|
14 | #include <list>
|
---|
15 | #include <map>
|
---|
16 | #include <string.h>
|
---|
17 | #include <string>
|
---|
18 |
|
---|
19 | namespace SOPHYA {
|
---|
20 |
|
---|
21 | // Classe utilitaire pour manipuler des variables typees
|
---|
22 | //! A simple class for holding string, integer and float type values.
|
---|
23 | class MuTyV {
|
---|
24 | public:
|
---|
25 | union {
|
---|
26 | int_8 iv;
|
---|
27 | r_8 dv;
|
---|
28 | char strv[39];
|
---|
29 | } mtv;
|
---|
30 | char typ;
|
---|
31 |
|
---|
32 | static char myStrBuf[64];
|
---|
33 |
|
---|
34 | inline MuTyV() { typ = 'I'; mtv.iv = 0; mtv.dv = 0.; mtv.strv[0] ='\0'; }
|
---|
35 | inline MuTyV(MuTyV const & a) { typ = a.typ; mtv = a.mtv; }
|
---|
36 | inline MuTyV(int_4 i) { typ = 'I'; mtv.iv = (int_8)i; mtv.dv = 0.; mtv.strv[0] ='\0'; }
|
---|
37 | inline MuTyV(int_8 i) { typ = 'I'; mtv.iv = i; mtv.dv = 0.; mtv.strv[0] ='\0'; }
|
---|
38 | inline MuTyV(r_4 f) { typ = 'D'; mtv.dv = (r_8)f; mtv.iv = 0; mtv.strv[0] ='\0'; }
|
---|
39 | inline MuTyV(r_8 d) { typ = 'D'; mtv.dv = d; mtv.iv = 0; mtv.strv[0] ='\0'; }
|
---|
40 | inline MuTyV(char const* s) { typ = 'S'; strncpy(mtv.strv, s, 39); mtv.strv[38] = '\0'; }
|
---|
41 | inline MuTyV(string const& s) { typ = 'S'; strncpy(mtv.strv, s.c_str(), 39); mtv.strv[38] = '\0'; }
|
---|
42 | inline MuTyV & operator= (MuTyV const & a) { typ = a.typ; mtv = a.mtv; return(*this); }
|
---|
43 | inline int_4 operator= (int_4 v) { typ = 'I'; mtv.iv = (int_8)v; return(v); }
|
---|
44 | inline int_8 operator= (int_8 v) { typ = 'I'; mtv.iv = v; return(v); }
|
---|
45 | inline r_4 operator= (r_4 v) { typ = 'D'; mtv.dv = (r_8)v; return(v); }
|
---|
46 | inline r_8 operator= (r_8 v) { typ = 'D'; mtv.dv = v; return(v); }
|
---|
47 | inline char* operator= (char* s) { typ = 'S'; strncpy(mtv.strv, s, 39);
|
---|
48 | mtv.strv[38] = '\0'; return(s); }
|
---|
49 | inline string& operator= (string& s) { typ = 'S'; strncpy(mtv.strv, s.c_str(), 39);
|
---|
50 | mtv.strv[38] = '\0'; return(s); }
|
---|
51 |
|
---|
52 | inline operator int_4() { if (typ == 'I') return((int_4)mtv.iv);
|
---|
53 | else if (typ == 'D') return((int_4)mtv.dv);
|
---|
54 | else return(atol(mtv.strv)); }
|
---|
55 | inline operator int_8() { if (typ == 'I') return((int_8)mtv.iv);
|
---|
56 | else if (typ == 'D') return((int_8)mtv.dv);
|
---|
57 | else return(atol(mtv.strv)); }
|
---|
58 | inline operator r_4() { if (typ == 'I') return((r_4)mtv.iv);
|
---|
59 | else if (typ == 'D') return((r_4)mtv.dv);
|
---|
60 | else return((r_4)atof(mtv.strv)); }
|
---|
61 | inline operator r_8() { if (typ == 'I') return((r_8)mtv.iv);
|
---|
62 | else if (typ == 'D') return(mtv.dv);
|
---|
63 | else return(atof(mtv.strv)); }
|
---|
64 | inline operator string() { char *ss=myStrBuf;
|
---|
65 | if (typ == 'I') sprintf(ss,"%ld", (long)mtv.iv);
|
---|
66 | else if (typ == 'D') sprintf(ss,"%.20g", mtv.dv);
|
---|
67 | else ss = mtv.strv;
|
---|
68 | return(ss); }
|
---|
69 | };
|
---|
70 |
|
---|
71 | // Classe liste de variables Dynamic Variable List
|
---|
72 |
|
---|
73 | //! Dynamic Variable List class.
|
---|
74 | class DVList : public AnyDataObj {
|
---|
75 | public:
|
---|
76 | // enum {classId = ClassId_DVList };
|
---|
77 |
|
---|
78 | DVList();
|
---|
79 | DVList(const DVList&);
|
---|
80 | DVList(char *flnm);
|
---|
81 |
|
---|
82 | virtual ~DVList();
|
---|
83 |
|
---|
84 | DVList& operator= (const DVList&);
|
---|
85 |
|
---|
86 | void Clear();
|
---|
87 | DVList& Merge(const DVList&);
|
---|
88 |
|
---|
89 | int_8 GetI(string const& key, int_8 def=-1);
|
---|
90 | r_8 GetD(string const& key, r_8 def=-9.e19);
|
---|
91 | string GetS(string const& key, char* def="");
|
---|
92 | string GetComment(string const& key);
|
---|
93 |
|
---|
94 | void SetI(string const& key, int_8 val);
|
---|
95 | void SetD(string const& key, r_8 val);
|
---|
96 | void SetS(string const& key, char const* val);
|
---|
97 | void SetS(string const& key, string val);
|
---|
98 | void SetComment(string const& key, string const& comm);
|
---|
99 |
|
---|
100 | MuTyV& Get(string const& key);
|
---|
101 | /*! Returns the value associated with the name \b key */
|
---|
102 | inline MuTyV& operator() (string const& key) { return Get(key); }
|
---|
103 | /*! Returns the value associated with the name \b key */
|
---|
104 | inline MuTyV& operator[] (string const& key) { return Get(key); }
|
---|
105 | /*! Returns the global comment string associated with the object */
|
---|
106 | inline string& Comment() { return(comment); }
|
---|
107 |
|
---|
108 | /*! Prints a brief description of object on \b cout */
|
---|
109 | inline void Show() const { Show(cout); }
|
---|
110 | virtual void Show(ostream& os) const;
|
---|
111 | /*! Prints the list of variables on \b cout */
|
---|
112 | inline void Print() const { Print(cout); }
|
---|
113 | virtual void Print(ostream& os) const;
|
---|
114 |
|
---|
115 | // Chaque element dans un DVList est constitue desormais d'un MuTyV
|
---|
116 | // et d'une chaine de caracteres (commentaire) regroupe dans la structure
|
---|
117 | // dvlElement. Ces elements sont associes aux noms de variables dans un
|
---|
118 | // map<...> ValList. Reza 02/2000
|
---|
119 |
|
---|
120 | struct dvlElement {MuTyV elval; string elcomm; } ;
|
---|
121 | typedef map<string, dvlElement, less<string> > ValList;
|
---|
122 | /*! Returns an iterator pointing on the first variable in the list */
|
---|
123 | inline ValList::const_iterator Begin() { return(mvlist.begin()); }
|
---|
124 | /*! Returns the iterator end value */
|
---|
125 | inline ValList::const_iterator End() { return(mvlist.end()); }
|
---|
126 |
|
---|
127 |
|
---|
128 | private:
|
---|
129 |
|
---|
130 | ValList mvlist;
|
---|
131 | string comment;
|
---|
132 | };
|
---|
133 |
|
---|
134 | /*! operator << overloading - Prints the list on the stream \b s */
|
---|
135 | inline ostream& operator << (ostream& s, DVList const & dvl)
|
---|
136 | { dvl.Print(s); return(s); }
|
---|
137 |
|
---|
138 | /*! Writes the object in the POutPersist stream \b os */
|
---|
139 | inline POutPersist& operator << (POutPersist& os, DVList & obj)
|
---|
140 | { ObjFileIO<DVList> fio(&obj); fio.Write(os); return(os); }
|
---|
141 | /*! Reads the object from the PInPersist stream \b is */
|
---|
142 | inline PInPersist& operator >> (PInPersist& is, DVList & obj)
|
---|
143 | { ObjFileIO<DVList> fio(&obj); fio.Read(is); return(is); }
|
---|
144 |
|
---|
145 | // Classe pour la gestion de persistance
|
---|
146 | // ObjFileIO<DVList>
|
---|
147 |
|
---|
148 | } // namespace SOPHYA
|
---|
149 |
|
---|
150 | #endif /* DVLIST_H__SEEN */
|
---|
151 |
|
---|
152 |
|
---|