time.c

   1 /*
   2  * Copyright (C) 2005-2009 Andre Noll <maan@systemlinux.org>
   3  *
   4  * Licensed under the GPL v2. For licencing details see COPYING.
   5  */
   6
   7 #include "para.h"
   8 /** \file time.c Helper functions for dealing with time values. */
   9
  10 /**
  11  * Convert struct timeval to milliseconds.
  12  *
  13  * \param tv The time value value to convert.
  14  *
  15  * \return The number off 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 }
  21
  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 }
  33
  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 }
  45
  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;
  61
  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 }
  79
  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 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 }
  97
  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;
 110
 111         result->tv_sec = x / 1000 / 1000;
 112         result->tv_usec = x % (1000 * 1000);
 113 }
 114
 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;
 126
 127         result->tv_sec = x / 1000 / 1000;
 128         result->tv_usec = x % (1000 * 1000);
 129 }
 130
 131 /**
 132  * Compute a convex combination of two time values.
 133  *
 134  * \param a The first coefiicent.
 135  * \param tv1 The first time value.
 136  * \param b The second coefiicent.
 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 One if \a x is positive, -1 otherwise.
 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, subtract = ((a > 0 && b < 0) || (a < 0 && b > 0));
 151         unsigned long a1 = PARA_ABS(a), b1 = PARA_ABS(b);
 152
 153         tv_scale(a1, tv1, &tmp1);
 154         tv_scale(b1, tv2, &tmp2);
 155         if (subtract)
 156                 ret = tv_diff(&tmp1, &tmp2, &tmp3);
 157         else
 158                 tv_add(&tmp1, &tmp2, &tmp3);
 159         if (a1 + b1)
 160                 tv_divide(a1 + b1, &tmp3, result);
 161         else {
 162                 result->tv_sec = 0;
 163                 result->tv_usec = 0;
 164         }
 165         if (!a || !b) {
 166                 if (a + b < 0)
 167                         ret = -1;
 168         } else
 169                 if (a < 0)
 170                         ret = -ret;
 171         return ret;
 172 }
 173
 174 /**
 175  * Compute when to send a chunk of an audio file.
 176  *
 177  * \param chunk_num The number of the chunk.
 178  * \param chunk_tv The duration of one chunk.
 179  * \param stream_start When the first chunk was sent.
 180  * \param result The time when to send chunk number \a chunk_num.
 181  *
 182  * This function computes stream_start + chunk_num * chunk_time.
 183  */
 184 void compute_chunk_time(long unsigned chunk_num,
 185                 struct timeval *chunk_tv, struct timeval *stream_start,
 186                 struct timeval *result)
 187 {
 188         struct timeval tmp;
 189
 190         tv_scale(chunk_num, chunk_tv, &tmp);
 191         tv_add(&tmp, stream_start, result);
 192 }