/****************************************************************************** * * Name:	skgehwt.c * Project:	GEnesis, PCI Gigabit Ethernet Adapter * Version:	$Revision: 1.13 $ * Date:	$Date: 1999/11/22 13:31:12 $ * Purpose:	Hardware Timer. * ******************************************************************************//****************************************************************************** * *	(C)Copyright 1998,1999 SysKonnect, *	a business unit of Schneider & Koch & Co. Datensysteme GmbH. * *	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. * *	The information in this file is provided "AS IS" without warranty. * ******************************************************************************//****************************************************************************** * * History: * *	$Log: skgehwt.c,v $ *	Revision 1.13  1999/11/22 13:31:12  cgoos *	Changed license header to GPL. * *	Revision 1.12  1998/10/15 15:11:34  gklug *	fix: ID_sccs to SysKonnectFileId * *	Revision 1.11  1998/10/08 15:27:51  gklug *	chg: correction factor is host clock dependent * *	Revision 1.10  1998/09/15 14:18:31  cgoos *	Changed more BOOLEANs to SK_xxx * *	Revision 1.9  1998/09/15 14:16:06  cgoos *	Changed line 107: FALSE to SK_FALSE * *	Revision 1.8  1998/08/24 13:04:44  gklug *	fix: typo * *	Revision 1.7  1998/08/19 09:50:49  gklug *	fix: remove struct keyword from c-code (see CCC) add typedefs * *	Revision 1.6  1998/08/17 09:59:02  gklug *	fix: typos * *	Revision 1.5  1998/08/14 07:09:10  gklug *	fix: chg pAc -> pAC * *	Revision 1.4  1998/08/10 14:14:52  gklug *	rmv: unneccessary SK_ADDR macro * *	Revision 1.3  1998/08/07 12:53:44  gklug *	fix: first compiled version * *	Revision 1.2  1998/08/07 09:19:29  gklug *	adapt functions to the C coding conventions *	rmv unneccessary functions. * *	Revision 1.1  1998/08/05 11:28:36  gklug *	first version: adapted from SMT/FDDI * * * * ******************************************************************************/#include <config.h>/*	Event queue and dispatcher*/static const char SysKonnectFileId[] =	"$Header: /usr56/projects/ge/schedule/skgehwt.c,v 1.13 1999/11/22 13:31:12 cgoos Exp $" ;#include "h/skdrv1st.h"		/* Driver Specific Definitions */#include "h/skdrv2nd.h"		/* Adapter Control- and Driver specific Def. */#ifdef __C2MAN__/*	Hardware Timer function queue management.	General Description: */intro(){}#endif/* * Prototypes of local functions. */#define	SK_HWT_MAX	(65000)/* correction factor */#define	SK_HWT_FAC	(1000 * (SK_U32)pAC->GIni.GIHstClkFact / 100)/* * Initialize hardware timer. * * Must be called during init level 1. */void	SkHwtInit(SK_AC	*pAC,	/* Adapters context */SK_IOC	Ioc)	/* IoContext */{	pAC->Hwt.TStart = 0 ;	pAC->Hwt.TStop	= 0 ;	pAC->Hwt.TActive = SK_FALSE ;	SkHwtStop(pAC,Ioc) ;}/* * * Start hardware timer (clock ticks are 16us). * */void	SkHwtStart(SK_AC	*pAC,	/* Adapters context */SK_IOC	Ioc,	/* IoContext */SK_U32	Time)	/* Time in units of 16us to load the timer with. */{	SK_U32	Cnt ;	if (Time > SK_HWT_MAX)		Time = SK_HWT_MAX ;	pAC->Hwt.TStart = Time ;	pAC->Hwt.TStop = 0L ;	Cnt = Time ;	/*	 * if time < 16 us	 *	time = 16 us	 */	if (!Cnt) {		Cnt++ ;	}	SK_OUT32(Ioc, B2_TI_INI, Cnt * SK_HWT_FAC) ;	SK_OUT16(Ioc, B2_TI_CRTL, TIM_START) ;	/* Start timer. */	pAC->Hwt.TActive = SK_TRUE ;}/* * Stop hardware timer. * and clear the timer IRQ */void	SkHwtStop(SK_AC	*pAC,	/* Adapters context */SK_IOC	Ioc)	/* IoContext */{	SK_OUT16(Ioc, B2_TI_CRTL, TIM_STOP) ;	SK_OUT16(Ioc, B2_TI_CRTL, TIM_CLR_IRQ) ;	pAC->Hwt.TActive = SK_FALSE ;}/* *	Stop hardware timer and read time elapsed since last start. * * returns *	The elapsed time since last start in units of 16us. * */SK_U32	SkHwtRead(SK_AC	*pAC,	/* Adapters context */SK_IOC	Ioc)	/* IoContext */{	SK_U32	TRead ;	SK_U32	IStatus ;	if (pAC->Hwt.TActive) {		SkHwtStop(pAC,Ioc) ;		SK_IN32(Ioc, B2_TI_VAL, &TRead);		TRead /= SK_HWT_FAC;		SK_IN32(Ioc, B0_ISRC, &IStatus);		/* Check if timer expired (or wraparound). */		if ((TRead > pAC->Hwt.TStart) || (IStatus & IS_TIMINT)) {			SkHwtStop(pAC,Ioc) ;			pAC->Hwt.TStop = pAC->Hwt.TStart ;		} else {			pAC->Hwt.TStop = pAC->Hwt.TStart - TRead ;		}	}	return (pAC->Hwt.TStop) ;}/* * interrupt source= timer */void	SkHwtIsr(SK_AC	*pAC,	/* Adapters context */SK_IOC	Ioc)	/* IoContext */{	SkHwtStop(pAC,Ioc);	pAC->Hwt.TStop = pAC->Hwt.TStart;	SkTimerDone(pAC,Ioc) ;}/* End of file */