adjtime.c

Go to the documentation of this file.

#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <errno.h>
#include <math.h>
#include <sys/time.h>
 
/* function to a date/time by a specified number of hours */
 
int adjtime(int adj, int y, int m, int d, int h,
            int *adj_y, int *adj_m, int *adj_d, int *adj_h)
{
 
int y1,m1,d1,h1;
 
  while(adj < -24)  
  {
    adjtime(-24,y,m,d,h,&y1,&m1,&d1,&h1);
    y=y1;m=m1;d=d1;h=h1;
    adj=adj+24;
  }
 
  while (adj > 24)
  {
    adjtime(24,y,m,d,h,&y1,&m1,&d1,&h1);
    y=y1;m=m1;d=d1;h=h1;
    adj=adj-24;
  }
 
  h=h+adj;
 
  if(h > 23)
  {
    h=h-24;
    d++;
    if((m == 1 || m == 3  || m == 5 || m == 7 || 
        m == 8 || m == 10 || m == 12 ) && d > 31)
    {
       d=1;
       m++;
       if(m > 12)
       {
         m=1;
         y++;
       }
    }
    if((m == 4 || m == 6 || m == 9 || m == 11) 
       && d > 30)
    {
      d=1;
      m++;
    }
 
    if(m == 2 && (((y%4) && d > 28) || (!(y%4) && d > 29)))
    {
      d=1;
      m++;
    }
  }  
  if(h < 0)
  {
    h=h+24;
    d--;
    if(d < 1)
    {
      m--;
      if(m == 0)
      {
        m=12;
        y--;
      }
      if(m == 1 || m == 3  || m == 5 || m == 7 || 
         m == 8 || m == 10 || m == 12 ) d=31;
      if(m == 4 || m == 6 || m == 9 || m == 11) d=30;
      if(m == 2 &&  y%4) d=28;
      if(m == 2 && !(y%4)) d=29;
    }
  }
 
  *adj_h=h;
  *adj_d=d;
  *adj_m=m;
  *adj_y=y;
  return(0);
}