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
|
/****************************************************************
* *
* Copyright (c) 2015-2016 Fidelity National Information *
* Services, Inc. and/or its subsidiaries. All rights reserved. *
* *
* This source code contains the intellectual property *
* of its copyright holder(s), and is made available *
* under a license. If you do not know the terms of *
* the license, please stop and do not read further. *
* *
****************************************************************/
#include "mdef.h"
#include <sys/time.h>
#include "gtm_time.h"
#include "stringpool.h"
#include "op.h"
#include "dollarh.h"
GBLREF spdesc stringpool;
/* If you update this function, consider updating op_horolog() as well, however at this writing they use different services */
void op_zhorolog(mval *s)
{
uint4 days;
time_t seconds;
struct timeval tv;
unsigned char *strpool_free;
long gmtoffset;
assert(stringpool.free <= stringpool.top);
assert(stringpool.free >= stringpool.base);
ENSURE_STP_FREE_SPACE(MAXNUMLEN + 1);
strpool_free = stringpool.free;
assertpro(-1 != gettimeofday(&tv, NULL));
seconds = tv.tv_sec;
gmtoffset = dollarh(seconds, &days, &seconds);
s->str.addr = (char *)strpool_free;
strpool_free = i2asc(strpool_free, days);
*strpool_free++ = ',';
strpool_free = i2asc(strpool_free, (uint4)seconds);
*strpool_free++ = ',';
strpool_free = i2asc(strpool_free, (uint4)tv.tv_usec);
*strpool_free++ = ',';
if (gmtoffset >= 0) /* The sign check is neccessary because i2ascl doesn't handle negative values */
strpool_free = i2ascl(strpool_free, gmtoffset);
else
{
*strpool_free++ = '-';
strpool_free = i2ascl(strpool_free, -1UL * gmtoffset);
}
s->str.len = INTCAST((char *)strpool_free - s->str.addr);
s->mvtype = MV_STR;
stringpool.free = strpool_free;
return;
}
|
