home *** CD-ROM | disk | FTP | other *** search
- /* Copyright (c) 1990 Commodore-Amiga, Inc.
- *
- * This example is provided in electronic form by Commodore-Amiga, Inc. for
- * use with the 1.3 revisions of the Addison-Wesley Amiga reference manuals.
- * The 1.3 Addison-Wesley Amiga Reference Manual series contains additional
- * information on the correct usage of the techniques and operating system
- * functions presented in this example. The source and executable code of
- * this example may only be distributed in free electronic form, via bulletin
- * board or as part of a fully non-commercial and freely redistributable
- * diskette. Both the source and executable code (including comments) must
- * be included, without modification, in any copy. This example may not be
- * published in printed form or distributed with any commercial product.
- * However, the programming techniques and support routines set forth in
- * this example may be used in the development of original executable
- * software products for Commodore Amiga computers.
- * All other rights reserved.
- * This example is provided "as-is" and is subject to change; no warranties
- * are made. All use is at your own risk. No liability or responsibility
- * is assumed.
- */
-
-
- /* Lattice use -b1 - cfist -v -y */
- /* Link with lc.lib, amiga.lib */
- #include <exec/types.h>
- #include <exec/memory.h>
- #include <devices/timer.h>
- #include <proto/all.h>
- #include <stdio.h>
-
- #ifdef LATTICE
- int CXBRK(void) { return(0); } /* Disable Lattice CTRL/C handling */
- int chkabort(void) { return(0); } /* really */
- #endif
-
- struct Library *TimerBase; /* setup the interface variable (must be global) */
-
- void main(int argc,char **argv)
- {
- struct timeval *time1, *time2, *time3;
- struct timerequest *tr;
- LONG error,result;
- /*------------------------------------*/
- /* Get some memory for our structures */
- /*------------------------------------*/
- time1=(struct timeval *)AllocMem(sizeof(struct timeval),
- MEMF_PUBLIC | MEMF_CLEAR);
- time2=(struct timeval *)AllocMem(sizeof(struct timeval),
- MEMF_PUBLIC | MEMF_CLEAR);
- time3=(struct timeval *)AllocMem(sizeof(struct timeval),
- MEMF_PUBLIC | MEMF_CLEAR);
- tr=(struct timerequest *)AllocMem(sizeof(struct timerequest),
- MEMF_PUBLIC | MEMF_CLEAR);
- /* Make sure we got the memory */
- if(!time1 || !time2 || !time3 || !tr) goto cleanexit;
- /*----------------------------------------------------*/
- /* Set up some values to test time arithmetic with */
- /* In a real application these values might be filled */
- /* in via the GET_SYSTIME command of the timer device */
- /*----------------------------------------------------*/
- time1->tv_secs = 3; time1->tv_micro = 0; /* 3.0 seconds */
- time2->tv_secs = 2; time2->tv_micro = 500000; /* 2.5 seconds */
- time3->tv_secs = 1; time3->tv_micro = 900000; /* 1.9 seconds */
-
- printf("Time1 is %ld.%ld\n" , time1->tv_secs,time1->tv_micro);
- printf("Time2 is %ld.%ld\n" , time2->tv_secs,time2->tv_micro);
- printf("Time3 is %ld.%ld\n\n",time3->tv_secs,time3->tv_micro);
- /*-------------------------------*/
- /* Open the MICROHZ timer device */
- /*-------------------------------*/
- error = OpenDevice(TIMERNAME,UNIT_MICROHZ,(struct IORequest *) tr, 0L);
- if(error) goto cleanexit;
-
- /* Set up to use the special time arithmetic functions */
- TimerBase = (struct Library *)tr->tr_node.io_Device;
- /*---------------------------------------------------------*/
- /* Now that TimerBase is initialized, it is permissible */
- /* to call the time-comparison or time-arithmetic routines */
- /* Result of this example is -1 which means the first */
- /* parameter has greater time value than second parameter */
- /* +1 means the second parameter is bigger; 0 means equal. */
- /*---------------------------------------------------------*/
- result = CmpTime( time1, time2 );
- printf("Time1 and 2 compare = %ld\n",result);
-
- /* Add to time1 the values in time2 */
- AddTime( time1, time2);
- printf("Time1+time2 result = %ld.%ld\n",time1->tv_secs,time1->tv_micro);
-
- /* Subtract values in time3 from the value */
- /* currently in time1. Results in time1. */
- SubTime( time2, time3);
- printf("Time2-time3 result = %ld.%ld\n",time2->tv_secs,time2->tv_micro);
- /*------------------------------------*/
- /* Free system resources that we used */
- /*------------------------------------*/
- cleanexit:
- if (!error)CloseDevice((struct IORequest *) tr);
- if (tr) FreeMem(tr, sizeof(struct timerequest));
- if (time3) FreeMem(time3,sizeof(struct timeval));
- if (time2) FreeMem(time2,sizeof(struct timeval));
- if (time1) FreeMem(time1,sizeof(struct timeval));
- }
-