File: fxleaps.cpp

package info (click to toggle)
gogglesmm 1.2.5-6
  • links: PTS
  • area: main
  • in suites: forky, sid
  • size: 16,812 kB
  • sloc: cpp: 231,960; ansic: 893; xml: 222; makefile: 33
file content (77 lines) | stat: -rw-r--r-- 3,417 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
/********************************************************************************
*                                                                               *
*                                T i m e   S t u f f                            *
*                                                                               *
*********************************************************************************
* Copyright (C) 2019,2022 by Jeroen van der Zijp.   All Rights Reserved.        *
*********************************************************************************
* This library is free software; you can redistribute it and/or modify          *
* it under the terms of the GNU Lesser General Public License as published by   *
* the Free Software Foundation; either version 3 of the License, or             *
* (at your option) any later version.                                           *
*                                                                               *
* This library is distributed in the hope that it will be useful,               *
* but WITHOUT ANY WARRANTY; without even the implied warranty of                *
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the                 *
* GNU Lesser General Public License for more details.                           *
*                                                                               *
* You should have received a copy of the GNU Lesser General Public License      *
* along with this program.  If not, see <http://www.gnu.org/licenses/>          *
********************************************************************************/
#include "xincs.h"
#include "fxver.h"
#include "fxdefs.h"
#include "FXString.h"
#include "FXSystem.h"


/*
  Notes:
  - Return number of leap seconds from utc or tai (nanoseconds) since Unix Epoch.
  - Leap seconds date may be obtained from International Earth Rotation
    System (www.iers.org), Bulletin C.  At the time of this writing,
    https://datacenter.iers.org/data/16/bulletinc-059.txt.
  - List of leap seconds is obtained from IETF,
    https://www.ietf.org/timezones/data/leap-seconds.list.
  - When new leap seconds are announced by IERS, leapsecond table must be
    appended with a new entry; please notify jeroen@fox-toolkit.net if new
    data is available but not yet incorporated into "leapseconds.h".
  - We only remember *when* the leap seconds happen; the index in the array
    tells us how many leap seconds there were up to that time (just add 10,
    since when leap seconds were first applied, there were 10 of them).
*/


using namespace FX;

/*******************************************************************************/

namespace FX {

#include "leapseconds.h"

// Return leap seconds from utc in nanocseconds since Unix Epoch
FXival FXSystem::leapSeconds(FXTime utc){
  FXival l=0,h=ARRAYNUMBER(leapseconds_utc)-1,m;
  if(leapseconds_utc[h]<=utc) return h+10;
  if(utc<leapseconds_utc[l]) return 0;
  while(l<(m=(h+l)>>1)){
    if(leapseconds_utc[m]<=utc) l=m; else h=m;
    }
  return l+10;
  }


// Return leap seconds from tai in nanocseconds since Unix Epoch
FXival FXSystem::leapSecondsTAI(FXTime tai){
  FXival l=0,h=ARRAYNUMBER(leapseconds_tai)-1,m;
  if(leapseconds_tai[h]<=tai) return h+10;
  if(tai<leapseconds_tai[l]) return 0;
  while(l<(m=(h+l)>>1)){
    if(leapseconds_tai[m]<=tai) l=m; else h=m;
    }
  return l+10;
  }

}