source: Sophya/trunk/SophyaLib/NTools/dates.cc@ 2506

Last change on this file since 2506 was 2506, checked in by ansari, 22 years ago

Remplacement THROW par throw - Reza 15/03/2004
File size: 19.6 KB
Line 
1#include "machdefs.h"
2#include <stdlib.h>
3#include <string.h>
4#include <stdio.h>
5#include <iostream>
6#include <time.h>
7#include <ctype.h>
8#include <math.h>
9#include "perrors.h"
10#include "dates.h"
11
12//++
13// Class TimeZone
14// Lib Outils++
15// include dates.h
16//
17// Classe de fuseau horaire. Permet les conversion
18// GMT <-> temps local, en gérant les changements
19// d'heure hiver-été.
20// Deux fuseaux horaires sont prédéfinis, "France"
21// et "Chili".
22//--
23
24TimeZone* gTimeZone = NULL;
25
26//++
27// Titre Constructeurs
28//--
29
30//++
31TimeZone::TimeZone()
32//
33// Constructeur par défaut. Il lit la variable
34// d'environnement ACQ_TZ pour choisir le fuseau
35// horaire. Si la variable n'est pas définie, nous
36// sommes en France...
37//--
38{
39 char* p = getenv("ACQ_TZ");
40#if defined(__DECCXX) || defined(__KCC__) || defined(__aCC__)
41 if (!p) p = const_cast<char *>("France");
42#else
43 if (!p) p = "France";
44#endif
45 SetZone(p);
46}
47
48//++
49TimeZone::TimeZone(const char* nom)
50//
51// Constructeur à partir du nom d'un fuseau horaire.
52//--
53{
54 SetZone(nom);
55}
56
57//++
58void TimeZone::SetZone(const char* nom)
59//
60// Choisit un fuseau horaire. Contient la définition
61// du fuseau "France" (GMT+1, DST : dernier dimanche
62// de mars - dernier dimanche de septembre, c'est-à-dire
63// pré-gouvernement Juppé), et Chili (GMT-4, DST :
64// deuxième dimanche d'octobre - deuxième dimanche de mars).
65//--
66{
67 if (!strcmp(nom,"France")) {
68 strcpy(code,"MET");
69 strcpy(name,nom);
70 gmtOffset = 1;
71 hasDST = 1;
72 dstByWeekDay = 1;
73 dstStartDay = Date::jour_Dimanche; // dernier dimanche de mars
74 dstStartNum = -1;
75 dstStartMonth = Date::mois_Mars;
76 dstStopDay = Date::jour_Dimanche; // dernier dimanche de septembre
77 dstStopNum = -1;
78 dstStopMonth = Date::mois_Septembre;
79 dstOffset = 1;
80 } else if (!strcmp(nom,"Chili") || !strcmp(nom,"Chile")) {
81// # Chile has 2nd Sunday in October to 2nd Sunday in March DST
82 strcpy(code,"CST");
83 strcpy(name,"Chili");
84 gmtOffset = -4;
85 hasDST = 1;
86 dstByWeekDay = 1;
87 dstStartDay = Date::jour_Dimanche; // 2e dimanche d'octobre
88 dstStartNum = 2;
89 dstStartMonth = Date::mois_Octobre;
90 dstStopDay = Date::jour_Dimanche; // 2e dimanche de mars
91 dstStopNum = 2;
92 dstStopMonth = Date::mois_Mars;
93 dstOffset = 1;
94 } else throw ParmError("TimeZone::SetZone() ");
95}
96
97//++
98int TimeZone::IsDst(const Date& date)
99//
100// Teste si une date est en heure d'été (DST).
101//--
102{
103 Date dt = date;
104 if (dt.MM < 0 || dt.JJ < 0) throw ParmError(PExcLongMessage(""));
105 if (dt.hh >= 0) dt += gmtOffset/24.0; // date "fictive" en local d'hiver
106 else dt.ss = dt.hh = dt.mm = 0; // minuit local si heure indeterminee
107 // On est en-dehors des mois frontiere ?
108 if (dstStartMonth < dstStopMonth) {
109 if (dt.MM < dstStartMonth) return 0;
110 if (dt.MM > dstStopMonth) return 0;
111 if (dt.MM > dstStartMonth && dt.MM < dstStopMonth) return 1;
112 } else {
113 if (dt.MM < dstStopMonth) return 1;
114 if (dt.MM > dstStartMonth) return 1;
115 if (dt.MM > dstStopMonth && dt.MM < dstStartMonth) return 0;
116 }
117
118 // Nous sommes dans un mois-frontiere
119 DBASSERT(dt.MM == dstStopMonth || dt.MM == dstStartMonth);
120
121 if (dt.MM == dstStartMonth) {
122 int jour;
123 if (dstByWeekDay) jour = Date::NthMonthDay(dstStartNum,dstStartDay, dt.MM, dt.AA);
124 else jour = (dstStartNum>0) ? dstStartNum : Date::MonthDays(dt.MM, dt.AA)+1-dstStartNum;
125 if (dt.JJ < jour) return 0;
126 if (dt.JJ > jour) return 1;
127 if (dt.hh > 1) return 1;
128 return 0;
129 } else {
130 int jour;
131 if (dstByWeekDay) jour = Date::NthMonthDay(dstStopNum,dstStopDay, dt.MM, dt.AA);
132 else jour = (dstStopNum>0) ? dstStopNum : Date::MonthDays(dt.MM, dt.AA)+1-dstStopNum;
133 if (dt.JJ < jour) return 1;
134 if (dt.JJ > jour) return 0;
135 if (dt.hh < 2) return 0;
136 return 1;
137 }
138}
139
140//++
141int TimeZone::GetOffset(const Date& date)
142//
143// Retourne la difference TL-GMT pour une date donnée,
144// en tenant compte de l'heure d'été éventuelle.
145//--
146{
147 return IsDst(date) ? gmtOffset+dstOffset : gmtOffset;
148}
149
150//++
151// Class Date
152// Lib Outils++
153// include dates.h
154//
155// Une classe date comme une autre, avec gestion
156// temps local / GMT / changement d'heure, et un
157// jour temps sidéral.
158//
159// Une partie de la date (heure, jour...) peut être
160// indéterminée. Les comparaisons sont alors faites
161// de façon astucieuse...
162//
163// La date peut être déterminée de minuit à minuit
164// ou de midi à midi (nuit d'observation). Logique
165// complexe et peut-être foireuse pour passer de
166// l'un à l'autre, mais pas encore d'ennuis pour le
167// moment... Une date-nuit doit avoir une heure
168// indéterminée.
169//
170// Il faut que Date::gTimeZone soit initialisé pour
171// éviter des gros pépins, mais PeidaInit() le fait.
172//
173// An 2000 : Lorsqu'on gère des dates sous forme de chaine :
174// * En sortie, 2 caractères pour l'année entre 1950 et 1999
175// et 4 caractères sinon
176// * En entrée, si AA<100 on ajoute 1900.
177//--
178
179//++
180short Date::MonthDays(short mois, short annee)
181//
182// Retourne le nombre de jours dans le mois
183//--
184{
185 if (mois<1 || mois>12) throw ParmError(PExcLongMessage(""));
186
187 switch(mois) {
188 case mois_Janvier:
189 case mois_Mars:
190 case mois_Mai:
191 case mois_Juillet:
192 case mois_Aout:
193 case mois_Octobre:
194 case mois_Decembre:
195 return 31;
196 case mois_Avril:
197 case mois_Juin:
198 case mois_Septembre:
199 case mois_Novembre:
200 return 30;
201 case mois_Fevrier:
202 return (((annee%4 == 0) && (annee%100 != 0)) || (annee%400 == 0)) ? 29 : 28;
203 }
204 return -1;
205}
206
207//++
208short Date::YearDays(short annee)
209//
210// Retourne le nombre de jours dans l'année
211//--
212{
213 return (((annee%4 == 0) && (annee%100 != 0)) || (annee%400 == 0)) ? 366 : 365;
214}
215
216//++
217bool Date::UndetDate() const
218//
219// Retourne true si une partie de la date (jour
220// ou mois ou année) est indéterminée.
221//--
222{
223 return ((AA == -1) || (MM == -1) || (JJ == -1));
224}
225
226//++
227bool Date::AllUndetDate() const
228//
229// Retourne true si toute la date (jour
230// et mois et année) est indéterminée.
231//--
232{
233 return ((AA == -1) && (MM == -1) && (JJ == -1));
234}
235
236//++
237bool Date::UndetTime() const
238//
239// Retourne true si une partie de l'heure (heure
240// ou minutes ou secondes) est indéterminée.
241//--
242{
243 return ((hh == -1) || (mm == -1) || (ss == -1));
244}
245
246//++
247bool Date::AllUndetTime() const
248//
249// Retourne true si toute l'heure (heure
250// et minutes et secondes) est indéterminée.
251//--
252{
253 return ((hh == -1) && (mm == -1) && (ss == -1));
254}
255
256//Date::operator double() const
257
258//++
259double
260Date::GetDays() const
261//
262// Jours écoulés depuis le 0 janvier 1901 0h TU
263//--
264{
265 if (UndetTime() && !AllUndetTime()) throw ParmError(PExcLongMessage(""));
266 if (UndetDate() && !AllUndetDate()) throw ParmError(PExcLongMessage(""));
267 double t=0;
268 if (!UndetDate()) {
269 int nban = AA-1901;
270 if (nban >= 0)
271 t = nban*365 + (nban/4) - (nban/100) + ((nban+300)/400);
272 else
273 t = nban*365 + (nban/4) - (nban/100) + ((nban-100)/400);
274 for (int i=1; i<MM; i++) t += Date::MonthDays(i,AA);
275 t += JJ;
276 }
277 if (!UndetTime()) t += hh/24.0 + mm/1440.0 + ss/86400.0;
278 else if (nuit) t += 0.5;
279 return t;
280}
281
282//++
283void Date::Set(double t)
284//
285// Jours écoulés depuis le 0 janvier 1901 0h TU
286//--
287{
288 t += 1/8640000.0;
289 int nban = int(floor((t/*-1*/) / 365.2425));
290 if (nban >= 0)
291 t -= nban*365 + ((nban)/4) - ((nban)/100) + ((nban+300)/400);
292 else
293 t -= nban*365 + ((nban)/4) - ((nban)/100) + ((nban-100)/400);
294
295 AA = 1901 + nban;
296 if (t > Date::YearDays(AA)+1) {
297 t -= Date::YearDays(AA);
298 AA++;
299 } else if (t<1) {
300 AA--;
301 t += Date::YearDays(AA);
302 }
303
304 MM = 1;
305 while (t > Date::MonthDays(MM,AA)+1) {
306 t -= Date::MonthDays(MM,AA);
307 MM++;
308 }
309
310 JJ = int(t);
311 t -= JJ;
312
313 t *= 24;
314 hh = int(t);
315
316 t = (t-hh)*60;
317 mm = int(t);
318
319 t = (t-mm)*60;
320 ss = t;
321
322 nuit = 0;
323}
324//++
325Date::Date()
326//
327// Constructeur. Prend l'heure courante...
328//--
329: timeZone(gTimeZone)
330{
331 time_t t = time(NULL);
332 struct tm* TM = gmtime(&t);
333
334 AA = TM->tm_year + 1900;
335 MM = TM->tm_mon+1;
336 JJ = TM->tm_mday;
337 hh = TM->tm_hour;
338 mm = TM->tm_min;
339 ss = TM->tm_sec;
340 nuit = 0;
341}
342
343//++
344Date::Date(int J, int M, int A, int h, int m, double s)
345//
346// Constructeur simple.
347//--
348: JJ(J), MM(M), AA(A), hh(h), mm(m), ss(s), timeZone(gTimeZone), nuit(0)
349{
350}
351
352//++
353Date::Date(double t)
354//
355// Constructeur à partir des
356// jours écoulés depuis le 0 janvier 1901 0h TU
357//
358//--
359: timeZone(gTimeZone)
360{
361 Set(t);
362}
363
364//++
365void Date::SetTimeZone(TimeZone* tz)
366//
367// On change de fuseau horaire.
368//--
369{
370 timeZone = tz;
371}
372
373//++
374Date::Date(const char* date, const char* heure, int tOpt)
375//
376// Constructeur à partir de la date sous la forme
377// 'DD/MM/YYYY' 'HH/MM/SS', et tOpt est Date::kGMTTime
378// (par défaut) ou Date::kLocalTime.
379//
380// Tout ou partie de la date peut être indéterminée ('??').
381//--
382: timeZone(gTimeZone)
383{
384 Set(date,heure,tOpt);
385}
386
387//++
388Date::Date(string const& date, string const& heure, int tOpt)
389//
390// Constructeur à partir de la date sous la forme
391// 'DD/MM/YYYY' 'HH/MM/SS', et tOpt est Date::kGMTTime
392// (par défaut) ou Date::kLocalTime.
393//
394// Tout ou partie de la date peut être indéterminée ('??').
395//--
396: timeZone(gTimeZone)
397{
398 Set(date,heure,tOpt);
399}
400
401//++
402void Date::Set(string const& date, string const& heure, int tOpt)
403//
404// Positionne la date sous la forme
405// 'DD/MM/YYYY' 'HH/MM/SS', et tOpt est Date::kGMTTime
406// (par défaut) ou Date::kLocalTime.
407//
408// Tout ou partie de la date peut être indéterminée ('??').
409//--
410{
411 Set(date.c_str(), heure == "" ? (char*)NULL : heure.c_str(), tOpt);
412}
413
414//++
415void Date::Set(const char* date, const char* heure, int tOpt)
416//
417// Positionne la date sous la forme
418// 'DD/MM/YYYY' 'HH/MM/SS', et tOpt est Date::kGMTTime
419// (par défaut) ou Date::kLocalTime.
420//
421// Tout ou partie de la date peut être indéterminée ('??').
422//--
423{
424 nuit = 0;
425 if (date) {
426 if (strlen(date) >= 5) { // J(J)/M(M)/AA(AA), ?/?/?, combinaison
427 const char* p = date;
428 if (p[0] == '?' && (p[1] == '?' || p[1] == '/')) JJ = -1;
429 else {
430 if (!isdigit(p[0])) ParmError(PExcLongMessage(""));
431 if (!isdigit(p[1]) && p[1] != '/') ParmError(PExcLongMessage(""));
432 JJ = atoi(p);
433 if (JJ <= 0) ParmError(PExcLongMessage(""));
434 }
435
436 if (p[1] == '/') p += 2;
437 else if (p[2] == '/') p+= 3;
438 else ParmError(PExcLongMessage(""));
439
440 if (p[0] == '?' && (p[1] == '?' || p[1] == '/')) MM = -1;
441 else {
442 if (!isdigit(p[0])) ParmError(PExcLongMessage(""));
443 if (!isdigit(p[1]) && p[1] != '/') ParmError(PExcLongMessage(""));
444 MM = atoi(p);
445 if (MM <= 0 || MM >12) ParmError(PExcLongMessage(""));
446 }
447
448 if (p[1] == '/') p += 2;
449 else if (p[2] == '/') p+= 3;
450 else ParmError(PExcLongMessage(""));
451
452 if (p[0] == '?') AA = -1;
453 else {
454 if (!isdigit(p[0])) ParmError(PExcLongMessage(""));
455 if (!isdigit(p[1])) ParmError(PExcLongMessage(""));
456 AA = atoi(p);
457 if (AA < 100 && AA >= 0 && date[6] != '0') AA += 1900;
458 }
459
460 if (AA > 0 && MM > 0 && JJ > 0 && JJ > MonthDays(MM,AA)) ParmError(PExcLongMessage(""));
461
462 } else if (strlen(date)==4) { // Code EROS de date
463 if (date[0] == '?') AA = -1;
464 else {
465 if (!isdigit(date[0])) ParmError(PExcLongMessage(""));
466 AA = 1990 + date[0] - '0';
467 }
468
469 if (date[1] == '?') MM = -1;
470 else {
471 if (!isalpha(date[1])) ParmError(PExcLongMessage(""));
472 if (islower(date[1]))
473 MM = date[1] - 'a' + 1;
474 else
475 MM = date[1] - 'A' + 1;
476 if (MM<1 || MM>12) ParmError(PExcLongMessage(""));
477 }
478
479 if (date[2] == '?' && date[3] == '?') JJ = -1;
480 else {
481 if (!isdigit(date[2])) ParmError(PExcLongMessage(""));
482 if (!isdigit(date[3])) ParmError(PExcLongMessage(""));
483 JJ = atoi(date+2);
484 }
485
486 if (AA > 0 && MM > 0 && JJ > 0 && JJ > MonthDays(MM,AA)) ParmError(PExcLongMessage(""));
487 nuit = 1;
488 } else ParmError(PExcLongMessage("")); // Mauvaise longueur
489 } else { // Pas de date
490 JJ = MM = AA = -1;
491 }
492
493 if (heure) {
494 const char* p = heure;
495 if (p[0] == '?' && (p[1] == '?' || p[1] == ':')) hh = -1;
496 else {
497 if (!isdigit(p[0])) ParmError(PExcLongMessage(""));
498 if (!isdigit(p[1]) && p[1] != ':') ParmError(PExcLongMessage(""));
499 hh = atoi(p);
500 }
501
502 if (p[1] == ':') p += 2;
503 else if (p[2] == ':') p+= 3;
504 else ParmError(PExcLongMessage(""));
505
506 if (p[0] == '?' && (p[1] == '?' || p[1] == ':')) mm = -1;
507 else {
508 if (!isdigit(p[0])) ParmError(PExcLongMessage(""));
509 if (!isdigit(p[1]) && p[1] != '/') ParmError(PExcLongMessage(""));
510 mm = atoi(p);
511 }
512
513 if (p[1] == ':') p += 2;
514 else if (p[2] == ':') p+= 3;
515 else ParmError(PExcLongMessage(""));
516
517 if (p[0] == '?') ss = -1;
518 else {
519 if (!isdigit(p[0])) ParmError(PExcLongMessage(""));
520 ss = atoi(p);
521 }
522 } else {
523 ss = hh = mm = -1;
524 }
525
526 if (tOpt == kLocalTime) {
527 DBASSERT(timeZone != NULL);
528 operator -= (timeZone->gmtOffset/24.0);
529 if (timeZone->IsDst(*this))
530 operator -= (timeZone->dstOffset/24.0); // A VERIFIER SANS DOUTE INEXACT
531 }
532
533 if (nuit && !UndetTime() && hh < 12)
534 *this += 1;
535}
536
537//++
538void Date::GetDateStr(char* s, int tOpt) const
539//
540// Récupère la date sous la forme d'une chaîne 'DD/MM/YYYY'
541// en tOpt = Date::kGMTTime ou Date::kLocalTime.
542//--
543{
544 Date dt(*this);
545 if (tOpt == kLocalTime && !UndetTime()) {
546 DBASSERT(timeZone != NULL);
547 dt += timeZone->GetOffset(*this)/24.0;
548 }
549
550 if (dt.AA < 1950 || dt.AA > 1999)
551 sprintf(s, "%02d/%02d/%04d", dt.JJ, dt.MM, dt.AA);
552 else
553 sprintf(s, "%02d/%02d/%02d", dt.JJ, dt.MM, dt.AA-1900);
554
555 if (dt.JJ == -1)
556 s[0] = s[1] = '?';
557 if (dt.MM == -1)
558 s[3] = s[4] = '?';
559 if (dt.AA == -1) {
560 s[6] = s[7] = '?';
561 s[8] = '\0';
562 }
563}
564
565//++
566void Date::GetDateCode(char* s, int tOpt) const
567//
568// Code EROS de la date.
569//--
570{
571 Date dt(*this);
572 if (tOpt == kLocalTime && !UndetTime()) {
573 DBASSERT(timeZone != NULL);
574 dt += timeZone->GetOffset(*this)/24.0;
575 }
576
577 if (!dt.UndetTime() && dt.hh<12) dt -= 1;
578
579 if (dt.AA != -1) {
580 if (dt.AA < 1990 || dt.AA > 2016) ParmError(PExcLongMessage(""));
581 int i = dt.AA - 1990;
582 if (i<10)
583 s[0] = '0' + i;
584 else
585 s[0] = 'a' + i - 10;
586 } else
587 s[0] = '?';
588
589 if (dt.MM != -1)
590 s[1] = 'a' + dt.MM - 1;
591 else
592 s[1] = '?';
593
594 if (dt.JJ != -1)
595 sprintf(s+2, "%02d", dt.JJ);
596 else
597 s[2] = s[3] = '?';
598
599 s[4] = 0;
600}
601
602//++
603void Date::GetTimeStr(char* s, int tOpt) const
604//
605// Récupère l'heure sous la forme 'HH:MM:SS'
606//--
607{
608 Date dt(*this);
609 if (tOpt == kLocalTime) {
610 DBASSERT(timeZone != NULL);
611 dt += timeZone->GetOffset(*this)/24.0;
612 }
613
614 sprintf(s, "%02d:%02d:%02d", dt.hh, dt.mm, int(dt.ss));
615 if (dt.hh == -1)
616 s[0] = s[1] = '?';
617 if (dt.mm == -1)
618 s[3] = s[4] = '?';
619 if (dt.ss == -1)
620 s[6] = s[7] = '?';
621}
622
623//++
624void Date::GetSidTStr(char* s) const
625//
626// Récupèrera un jour le temps sidéral.
627//--
628{
629 strcpy(s,"TOBEDONE!!");
630}
631
632//++
633string Date::DateStr(int tOpt) const
634//
635// Récupère la date sous la forme d'une chaîne 'DD/MM/YYYY'
636// en tOpt = Date::kGMTTime ou Date::kLocalTime.
637//--
638{
639 char s[20];
640 GetDateStr(s,tOpt);
641 return s;
642}
643
644//++
645string Date::DateCode(int tOpt) const
646//
647// Code EROS de la date.
648//--
649{
650 char s[20];
651 GetDateCode(s,tOpt);
652 return s;
653}
654
655//++
656string Date::TimeStr(int tOpt) const
657//
658// Récupère l'heure sous la forme 'HH:MM:SS'
659//--
660{
661 char s[20];
662 GetTimeStr(s,tOpt);
663 return s;
664}
665
666//++
667string Date::SidTStr() const
668//
669// Récupèrera un jour le temps sidéral.
670//--
671{
672 char s[20];
673 GetSidTStr(s);
674 return s;
675}
676
677//++
678int Date::DayOfWeek(int tOpt) const
679//
680// Retourne le jour dans la semaine, 0-6
681// avec 0 = Date::jour_Lundi.
682//--
683{
684 double t = GetDays();
685 if (tOpt == kLocalTime && hh >=0) {
686 DBASSERT(timeZone != NULL);
687 t += timeZone->GetOffset(*this)/24.0;
688 }
689 int ndays = int(t); // nb de jours depuis 0 janvier 1901
690 ndays = (ndays + 1) % 7;
691 if (ndays<0) ndays += 7;
692 return ndays;
693}
694
695//++
696short Date::NthMonthDay(short i, short joursem, short mois, short annee)
697//
698// Retourne la date correspondant au ieme joursem dans le mois
699// correspondant (exemple, 2e dimanche de mars 1960).
700//--
701{
702 if (i>0) {
703 int jprem = Date(1, mois, annee, 0, 0, 0).DayOfWeek();
704 int d = (joursem - jprem);
705 if (d<0) d+=7;
706 return d + 1 + (i-1)*7;
707 } else {
708 int ider = MonthDays(mois, annee);
709 int jder = Date(ider, mois, annee, 0, 0, 0).DayOfWeek();
710 int d = (joursem - jder);
711 if (d>0) d-=7;
712 return d + ider + (i+1)*7;
713 }
714}
715
716//++
717Date& Date::operator += (double dt)
718//
719// dt en jours
720//--
721{
722 int u = UndetTime();
723 Set(GetDays()+dt);
724 if (u) ss = hh = mm = -1;
725 return *this;
726}
727
728//++
729Date& Date::operator -= (double dt)
730//
731// dt en jours
732//--
733{
734 int u = UndetTime();
735 Set(GetDays()-dt);
736 if (u) ss = hh = mm = -1;
737 return *this;
738}
739
740//++
741Date operator + (Date const& d, double dt)
742//
743//--
744{
745 Date a(d);
746 a += dt;
747 return a;
748}
749
750//++
751Date operator - (Date const& d, double dt)
752//
753//--
754{
755 Date a(d);
756 a -= dt;
757 return a;
758}
759
760//++
761double operator - (Date const& a, Date const& b)
762//
763// Résultat en jours
764//--
765{
766 if (a.UndetTime() != b.UndetTime()) ParmError(PExcLongMessage(""));
767 if (a.UndetDate() != b.UndetDate()) ParmError(PExcLongMessage(""));
768 return a.GetDays() - b.GetDays();
769}
770
771//++
772bool operator == (Date const& a, Date const& b)
773//
774// On n'a pas égalite dès que des éléments déterminés sont différents
775//--
776{
777 if (a.nuit && a.UndetTime() && !b.nuit && !b.UndetTime() && b.hh<12)
778 {Date d = a+1; d.nuit = 0; return d == b;}
779 else if (b.nuit && b.UndetTime() && !a.nuit && !a.UndetTime() && a.hh<12)
780 {Date d = b+1; d.nuit = 0; return a == d;}
781
782 if (a.AA != -1 && b.AA != -1 && a.AA != b.AA) return false;
783 if (a.MM != -1 && b.MM != -1 && a.MM != b.MM) return false;
784 if (a.JJ != -1 && b.JJ != -1 && a.JJ != b.JJ) return false;
785 if (a.hh != -1 && b.hh != -1 && a.hh != b.hh) return false;
786 if (a.mm != -1 && b.mm != -1 && a.mm != b.mm) return false;
787 if (a.ss != -1 && b.ss != -1 && a.ss != b.ss) return false;
788 return true;
789}
790
791//++
792bool operator != (Date const& a, Date const& b)
793//
794//--
795{
796 return !(a == b);
797}
798
799//++
800bool operator <= (Date const& a, Date const& b)
801//
802// Inégalité large. Pas de subtilités
803//--
804{
805 if (a.nuit && a.UndetTime() && !b.nuit && !b.UndetTime() && b.hh<12)
806 {Date d = a+1; d.nuit = 0; return d <= b;}
807 else if (b.nuit && b.UndetTime() && !a.nuit && !a.UndetTime() && a.hh<12)
808 {Date d = b+1; d.nuit = 0; return a <= d;}
809
810 if (a.AA != -1 && b.AA != -1) {
811 if (a.AA < b.AA) return true;
812 if (a.AA > b.AA) return false;
813 }
814 if (a.MM != -1 && b.MM != -1) {
815 if (a.MM < b.MM) return true;
816 if (a.MM > b.MM) return false;
817 }
818 if (a.JJ != -1 && b.JJ != -1) {
819 if (a.JJ < b.JJ) return true;
820 if (a.JJ > b.JJ) return false;
821 }
822 if (a.hh != -1 && b.hh != -1) {
823 if (a.hh < b.hh) return true;
824 if (a.hh > b.hh) return false;
825 }
826 if (a.mm != -1 && b.mm != -1) {
827 if (a.mm < b.mm) return true;
828 if (a.mm > b.mm) return false;
829 }
830 if (a.ss != -1 && b.ss != -1) {
831 if (a.ss < b.ss) return true;
832 if (a.ss > b.ss) return false;
833 }
834 return true;
835}
836
837//++
838bool operator < (Date const& a, Date const& b)
839//
840// Inégalité stricte, codée à partir de la large pour résoudre
841// sans cas particuliers les subtilités
842// 01/02/95 < ??/03/95 mais pas 01/02/95 < ??/02/95
843//--
844{
845 return (a <= b) && !(a == b);
846}
847
848//++
849bool operator >= (Date const& a, Date const& b)
850//
851//--
852{
853 return (b <= a);
854}
855
856//++
857bool operator > (Date const& a, Date const& b)
858//
859//--
860{
861 return (b < a);
862}
863
864//++
865ostream& operator << (ostream& s, Date const& d)
866//
867//--
868{
869 char x[20];
870 d.GetDateStr(x);
871 s << x << " ";
872 d.GetTimeStr(x);
873 s << x;
874 return s;
875}
Note: See TracBrowser for help on using the repository browser.