1 /*
2 * Copyright (C) 2005-2012 Andre Noll <maan@systemlinux.org>
3 *
4 * Licensed under the GPL v2. For licencing details see COPYING.
5 */
7 #include "para.h"
8 /** \file time.c Helper functions for dealing with time values. */
10 /**
11 * Convert struct timeval to milliseconds.
12 *
13 * \param tv The time value value to convert.
14 *
15 * \return The number of milliseconds in \a tv.
16 */
17 long unsigned tv2ms(const struct timeval *tv)
18 {
19 return tv->tv_sec * 1000 + (tv->tv_usec + 500)/ 1000;
20 }
22 /**
23 * Convert milliseconds to a struct timeval.
24 *
25 * \param n The number of milliseconds.
26 * \param tv Result pointer.
27 */
28 void ms2tv(long unsigned n, struct timeval *tv)
29 {
30 tv->tv_sec = n / 1000;
31 tv->tv_usec = (n % 1000) * 1000;
32 }
34 /**
35 * Convert a double to a struct timeval.
36 *
37 * \param x The value to convert.
38 * \param tv Result pointer.
39 */
40 void d2tv(double x, struct timeval *tv)
41 {
42 tv->tv_sec = x;
43 tv->tv_usec = (x - (double)tv->tv_sec) * 1000.0 * 1000.0 + 0.5;
44 }
46 /**
47 * Compute the difference of two time values.
48 *
49 * \param b Minuend.
50 * \param a Subtrahend.
51 * \param diff Result pointer.
52 *
53 * If \a diff is not \p NULL, it contains the absolute value |\a b - \a a| on
54 * return.
55 *
56 * \return If \a b < \a a, this function returns -1, otherwise it returns 1.
57 */
58 int tv_diff(const struct timeval *b, const struct timeval *a, struct timeval *diff)
59 {
60 int ret = 1;
62 if ((b->tv_sec < a->tv_sec) ||
63 ((b->tv_sec == a->tv_sec) && (b->tv_usec < a->tv_usec))) {
64 const struct timeval *tmp = a;
65 a = b;
66 b = tmp;
67 ret = -1;
68 }
69 if (!diff)
70 return ret;
71 diff->tv_sec = b->tv_sec - a->tv_sec;
72 if (b->tv_usec < a->tv_usec) {
73 diff->tv_sec--;
74 diff->tv_usec = 1000 * 1000 - a->tv_usec + b->tv_usec;
75 } else
76 diff->tv_usec = b->tv_usec - a->tv_usec;
77 return ret;
78 }
80 /**
81 * Add two time values.
82 *
83 * \param a First addend.
84 * \param b Second addend.
85 * \param sum Contains the sum \a a + \a b on return.
86 */
87 void tv_add(const struct timeval *a, const struct timeval *b,
88 struct timeval *sum)
89 {
90 sum->tv_sec = a->tv_sec + b->tv_sec;
91 if (a->tv_usec + b->tv_usec >= 1000 * 1000) {
92 sum->tv_sec++;
93 sum->tv_usec = a->tv_usec + b->tv_usec - 1000 * 1000;
94 } else
95 sum->tv_usec = a->tv_usec + b->tv_usec;
96 }
98 /**
99 * Compute integer multiple of given struct timeval.
100 *
101 * \param mult The integer value to multiply with.
102 * \param tv The timevalue to multiply.
103 *
104 * \param result Contains \a mult * \a tv on return.
105 */
106 void tv_scale(const unsigned long mult, const struct timeval *tv,
107 struct timeval *result)
108 {
109 uint64_t x = ((uint64_t)tv->tv_sec * 1000 * 1000 + tv->tv_usec) * mult;
111 result->tv_sec = x / 1000 / 1000;
112 result->tv_usec = x % (1000 * 1000);
113 }
115 /**
116 * Compute a fraction of given struct timeval.
117 *
118 * \param divisor The integer value to divide by.
119 * \param tv The timevalue to divide.
120 * \param result Contains (1 / mult) * tv on return.
121 */
122 void tv_divide(const unsigned long divisor, const struct timeval *tv,
123 struct timeval *result)
124 {
125 uint64_t x = ((uint64_t)tv->tv_sec * 1000 * 1000 + tv->tv_usec) / divisor;
127 result->tv_sec = x / 1000 / 1000;
128 result->tv_usec = x % (1000 * 1000);
129 }
131 /**
132 * Compute a convex combination of two time values.
133 *
134 * \param a The first coefficient.
135 * \param tv1 The first time value.
136 * \param b The second coefficient.
137 * \param tv2 The second time value.
138 * \param result Contains the convex combination upon return.
139 *
140 * Compute x := (a * tv1 + b * tv2) / (|a| + |b|) and store |x| in \a result.
141 * Both \a a and \a b may be negative.
142 *
143 * \return Zero, 1 or -1, if \a x is zero, positive or negative, respectively.
144 */
145 int tv_convex_combination(const long a, const struct timeval *tv1,
146 const long b, const struct timeval *tv2,
147 struct timeval *result)
148 {
149 struct timeval tmp1, tmp2, tmp3;
150 int ret = 1;
151 unsigned long a1, b1;
153 if (a == 0 && b == 0) {
154 result->tv_sec = 0;
155 result->tv_usec = 0;
156 return 0;
157 }
158 a1 = PARA_ABS(a);
159 b1 = PARA_ABS(b);
160 tv_scale(a1, tv1, &tmp1);
161 tv_scale(b1, tv2, &tmp2);
162 if ((a > 0 && b < 0) || (a < 0 && b > 0)) /* subtract */
163 ret = tv_diff(&tmp1, &tmp2, &tmp3);
164 else
166 tv_divide(a1 + b1, &tmp3, result);
167 if (!a || !b) {
168 if (a + b < 0)
169 ret = -1;
170 } else if (a < 0)
171 ret = -ret;
172 return ret;
173 }
175 /**
176 * Compute when to send a chunk of an audio file.
177 *
178 * \param chunk_num The number of the chunk.
179 * \param chunk_tv The duration of one chunk.
180 * \param stream_start When the first chunk was sent.
181 * \param result The time when to send chunk number \a chunk_num.
182 *
183 * This function computes \a stream_start + \a chunk_num * \a chunk_time.
184 */
185 void compute_chunk_time(long unsigned chunk_num,
186 struct timeval *chunk_tv, struct timeval *stream_start,
187 struct timeval *result)
188 {
189 struct timeval tmp;
191 tv_scale(chunk_num, chunk_tv, &tmp);