| [764] | 1 | // 04/01/00 : implantation de la persistance par classe deleguee - Guy Le Meur | 
|---|
|  | 2 |  | 
|---|
|  | 3 | #include "spherepos.h" | 
|---|
|  | 4 |  | 
|---|
|  | 5 | static char *head_spherepos_cc_ = "$Header: /Users/garnier/temp/CVSSophya/SophyaLib/SkyMap/spherepos.cc,v 1.1.1.1 2000-03-02 17:05:39 ansari Exp $"; | 
|---|
|  | 6 |  | 
|---|
|  | 7 |  | 
|---|
|  | 8 | //................. SphereCoordSys class ................. | 
|---|
|  | 9 |  | 
|---|
|  | 10 | SphereCoordSys::SphereCoordSys(){ | 
|---|
|  | 11 | id_ = SphereCoordSys_NEUTRAL; | 
|---|
|  | 12 | description_ = "NEUTRAL SphereCoordSystem"; | 
|---|
|  | 13 | } | 
|---|
|  | 14 | SphereCoordSys::SphereCoordSys(const SphereCoordSys& a ) | 
|---|
|  | 15 | { | 
|---|
|  | 16 | id_ = a.id_; | 
|---|
|  | 17 | description_ = a.description_; | 
|---|
|  | 18 | } | 
|---|
|  | 19 |  | 
|---|
|  | 20 | SphereCoordSys::SphereCoordSys(int id, const string& description){ | 
|---|
|  | 21 | id_ = id; | 
|---|
|  | 22 | description_ = description; | 
|---|
|  | 23 | } | 
|---|
|  | 24 |  | 
|---|
|  | 25 | SphereCoordSys::~SphereCoordSys() | 
|---|
|  | 26 | { | 
|---|
|  | 27 | } | 
|---|
|  | 28 | SphereCoordSys& SphereCoordSys::operator = (const SphereCoordSys& a) | 
|---|
|  | 29 | { | 
|---|
|  | 30 | id_ = a.id_; | 
|---|
|  | 31 | description_ = a.description_; | 
|---|
|  | 32 | return *this; | 
|---|
|  | 33 | } | 
|---|
|  | 34 |  | 
|---|
|  | 35 |  | 
|---|
|  | 36 | //////////////////////////////////////////////////////////////// | 
|---|
|  | 37 | // ------------------------------------------------------------------------- | 
|---|
|  | 38 | //   Les objets delegues pour la gestion de persistance | 
|---|
|  | 39 | // ------------------------------------------------------------------------- | 
|---|
|  | 40 |  | 
|---|
|  | 41 | FIO_SphereCoordSys::FIO_SphereCoordSys() | 
|---|
|  | 42 | { | 
|---|
|  | 43 | dobj=new SphereCoordSys; | 
|---|
|  | 44 | ownobj=true; | 
|---|
|  | 45 | } | 
|---|
|  | 46 | FIO_SphereCoordSys::FIO_SphereCoordSys(string const & filename) | 
|---|
|  | 47 | { | 
|---|
|  | 48 | dobj=new SphereCoordSys; | 
|---|
|  | 49 | ownobj=true; | 
|---|
|  | 50 | Read(filename); | 
|---|
|  | 51 | } | 
|---|
|  | 52 | FIO_SphereCoordSys::FIO_SphereCoordSys(const SphereCoordSys & obj) | 
|---|
|  | 53 | { | 
|---|
|  | 54 | dobj = new SphereCoordSys(obj); | 
|---|
|  | 55 | ownobj=true; | 
|---|
|  | 56 | } | 
|---|
|  | 57 | FIO_SphereCoordSys::FIO_SphereCoordSys(SphereCoordSys * obj) | 
|---|
|  | 58 | { | 
|---|
|  | 59 | dobj = obj; | 
|---|
|  | 60 | ownobj=false; | 
|---|
|  | 61 | } | 
|---|
|  | 62 | FIO_SphereCoordSys::~FIO_SphereCoordSys() | 
|---|
|  | 63 | { | 
|---|
|  | 64 | if (ownobj && dobj) delete dobj; | 
|---|
|  | 65 | } | 
|---|
|  | 66 | AnyDataObj* FIO_SphereCoordSys::DataObj() | 
|---|
|  | 67 | { | 
|---|
|  | 68 | return(dobj); | 
|---|
|  | 69 | } | 
|---|
|  | 70 |  | 
|---|
|  | 71 | void  FIO_SphereCoordSys::SetDataObj(AnyDataObj & o) | 
|---|
|  | 72 | { | 
|---|
|  | 73 | SphereCoordSys * po = dynamic_cast<SphereCoordSys *>(&o); | 
|---|
|  | 74 | if (po == NULL) return; | 
|---|
|  | 75 | if (ownobj && dobj) delete dobj; | 
|---|
|  | 76 | dobj = po; ownobj = false; | 
|---|
|  | 77 | } | 
|---|
|  | 78 |  | 
|---|
|  | 79 |  | 
|---|
|  | 80 | void  FIO_SphereCoordSys::ReadSelf(PInPersist& is) | 
|---|
|  | 81 | { | 
|---|
|  | 82 | uint_8 itab[3]; | 
|---|
|  | 83 | string description; | 
|---|
|  | 84 | is.Get(itab, 3); | 
|---|
|  | 85 | is.GetStr(description); | 
|---|
|  | 86 | if (dobj == NULL) dobj = new SphereCoordSys(itab[1], description); | 
|---|
|  | 87 | else *dobj= SphereCoordSys(itab[1], description); | 
|---|
|  | 88 | } | 
|---|
|  | 89 | void       FIO_SphereCoordSys::WriteSelf(POutPersist& os) const | 
|---|
|  | 90 | { | 
|---|
|  | 91 | if (dobj == NULL)   return;  // Attention - $CHECK$ Guy 04/01/00 | 
|---|
|  | 92 | //  On ecrit 3 uint_8 | 
|---|
|  | 93 | //  0 : Numero de version,  1 : Id,  2  reserve a l | 
|---|
|  | 94 | uint_8 itab[3]; | 
|---|
|  | 95 | itab[0] = 1; | 
|---|
|  | 96 | itab[1] = dobj->Id(); | 
|---|
|  | 97 | itab[2] = 0; | 
|---|
|  | 98 | os.Put(itab, 3); | 
|---|
|  | 99 | os.PutStr(dobj->description()); | 
|---|
|  | 100 | } | 
|---|
|  | 101 |  | 
|---|
|  | 102 |  | 
|---|
|  | 103 |  | 
|---|
|  | 104 | //................. SpherePosition class ................. | 
|---|
|  | 105 |  | 
|---|
|  | 106 | SpherePosition::SpherePosition() | 
|---|
|  | 107 | : UnitVector() | 
|---|
|  | 108 | { | 
|---|
|  | 109 | cs_ = new SphereCoordSys; | 
|---|
|  | 110 | } | 
|---|
|  | 111 |  | 
|---|
|  | 112 | SpherePosition::SpherePosition(double theta, double phi, SphereCoordSys* cs) | 
|---|
|  | 113 | : UnitVector(theta, phi) | 
|---|
|  | 114 | { | 
|---|
|  | 115 | if (cs == NULL) cs_ = new SphereCoordSys; | 
|---|
|  | 116 | else cs_ = cs; | 
|---|
|  | 117 | } | 
|---|
|  | 118 |  | 
|---|
|  | 119 | SpherePosition::SpherePosition(double x, double y, double z, SphereCoordSys* cs) | 
|---|
|  | 120 | : UnitVector(x, y, z) | 
|---|
|  | 121 | { | 
|---|
|  | 122 | if (cs == NULL) cs_ = new SphereCoordSys; | 
|---|
|  | 123 | else cs_ = cs; | 
|---|
|  | 124 | } | 
|---|
|  | 125 |  | 
|---|
|  | 126 | SpherePosition::~SpherePosition() | 
|---|
|  | 127 | { | 
|---|
|  | 128 | if (cs_) delete cs_; | 
|---|
|  | 129 | } | 
|---|
|  | 130 |  | 
|---|
|  | 131 | UnitVector SpherePosition::Transform(const SphereCoordSys& /*cs*/) const | 
|---|
|  | 132 | { | 
|---|
|  | 133 | return(*this); | 
|---|
|  | 134 | } | 
|---|
|  | 135 |  | 
|---|
|  | 136 | double SpherePosition::Separation(const SpherePosition& gamma) const | 
|---|
|  | 137 | { | 
|---|
|  | 138 | return(this->SepAngle(gamma)); | 
|---|
|  | 139 | } | 
|---|