Code

wire up systemd support in autoconf -- tomek@pipebreaker.pl
[rrdtool.git] / src / rrd_diff.c
1 /*****************************************************************************
2  * RRDtool 1.4.3  Copyright by Tobi Oetiker, 1997-2010
3  * This code is stolen from rateup (mrtg-2.x) by Dave Rand
4  *****************************************************************************
5  * diff calculate the difference between two very long integers available as
6  *      strings
7  *****************************************************************************
8  * $Id$
9  * $Log$
10  * Revision 1.4  2003/03/10 00:30:34  oetiker
11  * handle cases with two negative numbers
12  * --  Sasha Mikheev <sasha@avalon-net.co.il>
13  *
14  * Revision 1.3  2002/04/01 18:31:22  oetiker
15  * "!" takes a higher preference than "||" this means rrd_update N:: would
16  * segfault -- Oliver Cook <ollie@uk.clara.net>
17  *
18  * Revision 1.2  2002/02/01 20:34:49  oetiker
19  * fixed version number and date/time
20  *
21  * Revision 1.1.1.1  2001/02/25 22:25:05  oetiker
22  * checkin
23  *
24  * Revision 1.1  1998/10/08 18:21:45  oetiker
25  * Initial revision
26  *
27  * Revision 1.3  1998/02/06 21:10:52  oetiker
28  * removed max define .. it is now in rrd_tool.h
29  *
30  * Revision 1.2  1997/12/07 20:38:03  oetiker
31  * ansified
32  *
33  * Revision 1.1  1997/11/28 23:31:59  oetiker
34  * Initial revision
35  *
36  *****************************************************************************/
38 #include <ctype.h>
39 #include "rrd_tool.h"
41 double rrd_diff(
42     char *a,
43     char *b)
44 {
45     char      res[LAST_DS_LEN + 1], *a1, *b1, *r1, *fix;
46     int       c, x, m;
47     char      a_neg = 0, b_neg = 0;
48     double    result;
50     while (!(isdigit((int) *a) || *a == 0)) {
51         if (*a == '-')
52             a_neg = 1;
53         a++;
54     }
55     fix = a;
56     while (isdigit((int) *fix))
57         fix++;
58     *fix = 0;           /* maybe there is some non digit data in the string */
59     while (!(isdigit((int) *b) || *b == 0)) {
60         if (*b == '-')
61             b_neg = 1;
62         b++;
63     }
64     fix = b;
65     while (isdigit((int) *fix))
66         fix++;
67     *fix = 0;           /* maybe there is some non digit data in the string */
68     if (!isdigit((int) *a) || !isdigit((int) *b))
69         return DNAN;
70     if (a_neg + b_neg == 1) /* can not handle numbers with different signs yet */
71         return DNAN;
72     a1 = &a[strlen(a) - 1];
73     m = max(strlen(a), strlen(b));
74     if (m > LAST_DS_LEN)
75         return DNAN;    /* result string too short */
77     r1 = &res[m + 1];
78     for (b1 = res; b1 <= r1; b1++)
79         *b1 = ' ';
80     b1 = &b[strlen(b) - 1];
81     r1[1] = 0;          /* Null terminate result */
82     c = 0;
83     for (x = 0; x < m; x++) {
84         if (a1 >= a && b1 >= b) {
85             *r1 = ((*a1 - c) - *b1) + '0';
86         } else if (a1 >= a) {
87             *r1 = (*a1 - c);
88         } else {
89             *r1 = ('0' - *b1 - c) + '0';
90         }
91         if (*r1 < '0') {
92             *r1 += 10;
93             c = 1;
94         } else if (*r1 > '9') { /* 0 - 10 */
95             *r1 -= 10;
96             c = 1;
97         } else {
98             c = 0;
99         }
100         a1--;
101         b1--;
102         r1--;
103     }
104     if (c) {
105         r1 = &res[m + 1];
106         for (x = 0; isdigit((int) *r1) && x < m; x++, r1--) {
107             *r1 = ('9' - *r1 + c) + '0';
108             if (*r1 > '9') {
109                 *r1 -= 10;
110                 c = 1;
111             } else {
112                 c = 0;
113             }
114         }
115         result = -atof(res);
116     } else
117         result = atof(res);
119     if (a_neg + b_neg == 2) /* both are negatives, reverse sign */
120         result = -result;
122     return result;