home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 441.lha / kickdate / kickdate.c < prev    next >
C/C++ Source or Header  |  1990-11-13  |  4KB  |  178 lines
  1. /* KICKDATE - Copyright 1990 Joe Porkka
  2.                FREELY DISTRIBUTABLE
  3.  
  4.        Purpose: Keeps the current date on the Kickstart disk
  5.                 for A1000 owners with autoboot harddrives.
  6.  
  7. Version 1.0
  8.  
  9. */
  10.  
  11.  
  12. #include <exec/types.h>
  13. #include <exec/io.h>
  14. #include <devices/trackdisk.h>
  15. #include <exec/memory.h>
  16.  
  17. char *buffer;
  18.  
  19. struct IOStdReq *diskreq, *CreateStdIO();
  20. struct MsgPort *rport=0,*CreatePort();
  21. int dev=0, ioreqs=0, ports=0;
  22. int limit;
  23. int outcount=0;
  24.  
  25. DeleteStdIO(req) struct IOStdReq *req;
  26. {
  27.     if(req==0) {
  28.        /* printf("Delete a null message-ignored\n"); */
  29.     } else {
  30.        req->io_Message.mn_Node.ln_Type=0xff;
  31.        req->io_Device=(struct Device *)-1;
  32.        req->io_Unit=(struct Unit *)-1;
  33.        /* printf("Freeing a stdio\n"); */
  34.        FreeMem(req,sizeof(struct IOStdReq));
  35.     }
  36. }
  37.  
  38. void
  39. main(av,ac)
  40.     int av;
  41.     char **ac;
  42. {
  43.  
  44.     int status;
  45.     int fetchtime=0;
  46.     if(av!=2) {
  47.        printf("Usage: kickdate set | get | getset\n");
  48.        printf("       set -> write date to disk. get -> get date from disk\n");
  49.        printf("       getset -> get, then periodically write date\n");
  50.        return;
  51.     }
  52.     if( stricmp(ac[1],"set")==0 ) fetchtime=0;
  53.     if( stricmp(ac[1],"get")==0 ) fetchtime = 1;
  54.     if( stricmp(ac[1],"getset")==0 ) fetchtime = 2;
  55.     buffer=0;
  56.     rport=CreatePort("disk.port",0);
  57.     if(rport==0) {
  58.        printf("port open failed\n");
  59.        goto portfail;
  60.     }
  61.     ports=1;
  62.     /* printf("GEE!\n"); */
  63.     diskreq=CreateStdIO(rport);
  64.     if(diskreq==0) {
  65.        printf("CreateStdIO failed\n");
  66.        goto iofail;
  67.     }
  68.     ioreqs=1;
  69.     /* printf("Attempt OpenDevice\n"); */
  70.     status=OpenDevice("trackdisk.device",0,diskreq,0);
  71.     if(status!=0) {
  72.        printf("Opendevice failed\n");
  73.        goto iofail;
  74.     }
  75.     dev=1;
  76.  
  77.     buffer = (char *)AllocMem(512, MEMF_CHIP);
  78.     if(buffer==0) goto memfail;
  79.     getsector(0,0,0);
  80.     if(!(diskreq->io_Error || diskreq->io_Actual!=512)) {
  81.        if( ((long *)buffer)[0]=='KICK') {
  82.            if(fetchtime) {
  83.                SetNewTime( ((long *)buffer)[1]);
  84.            } else {
  85.                ((long*)buffer)[1]=GetSysTime();
  86.                writesector(0,0,0);
  87.                if(diskreq->io_Error || diskreq->io_Actual!=512) {
  88.                    fetchtime=0;
  89.                }
  90.            }
  91.        }
  92.        if(fetchtime==2) {  /* Stay resident */
  93.            while(1) {
  94.                Delay(5*60*50); /* Sleep for 5 minutes */
  95.                /* printf("Done sleep %ld\n", SetSignal(0,0)); */
  96.                if(SetSignal(0,0)&(1<<12)) break;  /* CTRL_C */
  97.                getsector(0,0,0);
  98.                /* printf("Got it!\n"); */
  99.                if(!(diskreq->io_Error || diskreq->io_Actual!=512)) {
  100.                    if( ((long *)buffer)[0]=='KICK') {
  101.                        ((long*)buffer)[1]=GetSysTime();
  102.                        writesector(0,0,0);
  103.                        /* printf("Wrote it!\n"); */
  104.                        if(diskreq->io_Error || diskreq->io_Actual!=512) {
  105.                            /* break; */
  106.                        }
  107.                        MotorOff();
  108.                    }
  109.                    MotorOff();
  110.                } else break;
  111.            }
  112.        }
  113.     }
  114.  
  115.  
  116.     MotorOff();
  117.  
  118.  
  119. memfail:
  120.     if(buffer) FreeMem(buffer, 512);
  121.     CloseDevice(diskreq);
  122. iofail:
  123.     DeleteStdIO(diskreq);
  124. portfail:
  125.     if(rport) {
  126.        RemPort(rport);
  127.        FreeMem(rport,sizeof(*rport));
  128.     }
  129. }
  130.  
  131. CXBRK() {
  132.     MotorOff();
  133.  
  134.     if(dev) {CloseDevice(diskreq);}
  135.     if(ioreqs) {
  136.        DeleteStdIO(diskreq);
  137.     }
  138.     if(ports) {
  139.        if(rport) {
  140.            RemPort(rport);
  141.            FreeMem(rport,sizeof(*rport));
  142.        }
  143.     }
  144.     exit(0);
  145. }
  146.  
  147. getsector(cyl,sec,head)
  148.     int cyl,sec,head;
  149. {
  150.     diskreq->io_Offset = TD_SECTOR * (sec+NUMSECS*head+NUMSECS*2*cyl);
  151.     diskreq->io_Length=TD_SECTOR;
  152.     diskreq->io_Data=(APTR)buffer;
  153.     diskreq->io_Command=CMD_READ;
  154.     diskreq->io_Flags=0;
  155.     DoIO(diskreq);
  156. }
  157.  
  158. writesector(cyl,sec,head)
  159.     int cyl,sec,head;
  160. {
  161.     diskreq->io_Offset = TD_SECTOR * (sec+NUMSECS*head+NUMSECS*2*cyl);
  162.     diskreq->io_Length=TD_SECTOR;
  163.     diskreq->io_Data=(APTR)buffer;
  164.     diskreq->io_Command=CMD_WRITE;
  165.     diskreq->io_Flags=0;
  166.     DoIO(diskreq);
  167.     diskreq->io_Command=CMD_UPDATE;
  168.     diskreq->io_Flags=0;
  169.     DoIO(diskreq);
  170. }
  171.  
  172. MotorOff()
  173. {
  174.     diskreq->io_Command=TD_MOTOR;
  175.     diskreq->io_Length=0;
  176.     DoIO(diskreq);
  177. }
  178.