/* -*- mona-c++ -*-
* Copyright (c) Leipzig, Madrid 2004 - 2008
* Max-Planck-Institute for Human Cognitive and Brain Science
* Max-Planck-Institute for Evolutionary Anthropology
* BIT, ETSI Telecomunicacion, UPM
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*
*/
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif
#include <stdio.h>
#include <errno.h>
#include <string.h>
#include <signal.h>
#include <sys/time.h>
//#include <mia/types.hh>
#include <libmona/watch.hh>
const int TIMERSPAN=2000;
CWatch::CWatch()
{
itimerval value;
itimerval oldvalue;
value.it_interval.tv_sec = TIMERSPAN;
value.it_interval.tv_usec= 0;
value.it_value.tv_sec = TIMERSPAN;
value.it_value.tv_usec = 0;
if (signal(SIGVTALRM,CWatch::overlap_handler)==SIG_ERR){
fprintf(stderr,"Unable to catch signal:%s\n",strerror(errno));
}
if (setitimer(ITIMER_VIRTUAL,&value,&oldvalue)) {
fprintf(stderr,"Warning: setitimer returned with %s\n",strerror(errno));
}
}
double CWatch::get_seconds()
{
itimerval value;
if (getitimer(ITIMER_VIRTUAL,&value)){
fprintf(stderr,"Warning: setitimer returned %s\n",strerror(errno));
}
double result = TIMERSPAN - value.it_value.tv_sec;
double resultlow = value.it_value.tv_usec/1e+6;
return (result - resultlow) + TIMERSPAN*double(overlaps);
}
void CWatch::overlap_handler(int p_sig)
{
if (p_sig == SIGVTALRM) {
overlaps++;
}
signal(SIGVTALRM,CWatch::overlap_handler);
}
int CWatch::overlaps=0;
/* CVS LOG
$Log$
Revision 1.4 2005/06/29 13:22:23 wollny
switch to version 0.7
Revision 1.1.1.1 2005/03/17 13:44:22 gerddie
initial import
Revision 1.3 2004/08/25 09:08:32 wollny
added an emacs style comment to all source files
Revision 1.2 2004/06/03 09:57:32 wollny
Changed (hopefully) all instancable class names to Cxxxxx
Revision 1.1 2004/05/04 15:14:55 wollny
make libviewit compile
Revision 1.3 2002/06/20 09:59:48 gerddie
added cvs-log entry
*/