/* DEMO10: Save EEPROM to file */ /* step1 : Run DEMO10.EXE */ /* -------------------------------------------------------------- */ #include "PIO.H" #include /* #define filename "A:\DA16.DAT" */ WORD wBase,wIrq; WORD wN10V[16],wP10V[16],w00mA[16],w20mA[16],EEP; int main() { int i,j,k; WORD wBoards,wRetVal,t1,t2,t3,t4,t5,t6; WORD wSubVendor,wSubDevice,wSubAux,wSlotBus,wSlotDevice; FILE *fp; char filename[20]; _clearscreen(0); /* step1 : find address-mapping of PIO/PISO cards */ wRetVal=PIO_DriverInit(&wBoards,0x80,0x04,0x00);/*for PIO-DA16/8/4*/ printf("\n(1) Threr are %d PIO-DA16/8/4 Cards in this PC",wBoards); if ( wBoards==0 ) exit(0); printf("\n\n-------------- The Configuration Space --------------"); for(i=0;i "); ShowPioPiso(wSubVendor,wSubDevice,wSubAux); } PIO_GetConfigAddressSpace(0,&wBase,&wIrq,&t1,&t2,&t3,&t4,&t5); /* select card_0 */ /* step2 : enable all D/I/O port */ outp(wBase,0x11); /* /RESET -> 1 */ outp(wBase+2,0x1c); /* AUX 4/3/2 are D/O, othes D/I */ outp(wBase+3,0); /* all D/O are Low */ printf("\n\n(2) Enter file name : "); scanf("%s",filename); printf("\n\n(3) Save EEPROM data to %s",filename); fp=fopen(filename,"wb+"); for (i=0; i<64;i++) { if (i<16) { EEP_READ(i,&j,&k); wN10V[i]=(j<<8)+k; fprintf(fp,"%5x",wN10V[i]); if (i==7) fprintf(fp,"\n"); if (i==15) fprintf(fp,"\n"); } if ((i>=16)&&(i<32)) { EEP_READ(i,&j,&k); wP10V[i-16]=(j<<8)+k; fprintf(fp,"%5x",wP10V[i-16]); if (i==23) fprintf(fp,"\n"); if (i==31) fprintf(fp,"\n"); } if ((i>=32)&&(i<48)) { EEP_READ(i,&j,&k); w00mA[i-32]=(j<<8)+k; fprintf(fp,"%5x",w00mA[i-32]); if (i==39) fprintf(fp,"\n"); if (i==47) fprintf(fp,"\n"); } if (i>=48) { EEP_READ(i,&j,&k); w20mA[i-48]=(j<<8)+k; fprintf(fp,"%5x",w20mA[i-48]); if (i==55) fprintf(fp,"\n"); if (i==63) fprintf(fp,"\n"); } } fprintf(fp,"========================================\n"); fprintf(fp,"File name : %s",filename); fclose(fp); outp(wBase+5,0); /* disable all interrupt */ outp(wBase+3,0); /* all D/O are Low */ outp(wBase+2,0); /* all AUX as D/I */ PIO_DriverClose(); } /* -------------------------------------------------------------- */ /* AUX2= D/O = CS of EEP AUX3= D/O = SK of EEP */ /* AUX4= D/O = DI of EEP AUX5= D/I = DO of EEP */ /* -------------------------------------------------------------- */ COMM() /* send start 2-bit (0,1) */ { EEP=0x04; outp(wBase+3,EEP); /* CS=H */ EEP=0x0C; outp(wBase+3,EEP); /* SK=H */ /* DI=0 */ EEP=0x04; outp(wBase+3,EEP); /* SK=L */ EEP=0x14; outp(wBase+3,EEP); /* DI=1 */ EEP=0x1c; outp(wBase+3,EEP); /* SK=H */ } /* -------------------------------------------------------------- */ WR_BYTE(int val) /* send the next 8-bit */ { int i,j; for (i=0; i<8; i++) { EEP=EEP&0x14; outp(wBase+3,EEP); /* SK=L */ j=val&0x80; val=val<<1; if (j==0) /* DI=0 */ { EEP=EEP&0x0C; outp(wBase+3,EEP); } else /* DI=1 */ { EEP=EEP|0x10; outp(wBase+3,EEP); } EEP=EEP|0x08; outp(wBase+3,EEP); /* SK=H */ } } /* -------------------------------------------------------------- */ RD_BYTE() /* read the next 8-bit */ { int i,j,val,k; val=0x80; k=0; for (i=0; i<8; i++) { EEP=EEP&0x14; outp(wBase+3,EEP); /* SK=L */ j=(inp(wBase+7))&0x20; if (j!=0) k+=val; /* DO=1 */ EEP=EEP|0x08; outp(wBase+3,EEP); /* SK=H */ val=val>>1; } return(k); } /* -------------------------------------------------------------- */ EEP_WR_EN() /* write Enable */ { COMM(); WR_BYTE(0x30); /* write enable command */ EEP=EEP&0x14; outp(wBase+3,EEP); /* SK=L */ EEP=EEP&0x18; outp(wBase+3,EEP); /* CS=L */ EEP=EEP&0x0C; outp(wBase+3,EEP); /* DI=0 */ } /* -------------------------------------------------------------- */ EEP_WR_DIS() /* write Disable */ { COMM(); WR_BYTE(0); /* write disable command */ EEP=EEP&0x14; outp(wBase+3,EEP); /* SK=L */ EEP=EEP&0x18; outp(wBase+3,EEP); /* CS=L */ EEP=EEP&0x0C; outp(wBase+3,EEP); /* DI=0 */ } /* -------------------------------------------------------------- */ EEP_WRITE(int ADDR, int HI, int LO) /* write 16-bit data to EEP */ { int i,j,k; COMM(); ADDR=ADDR|0x40; WR_BYTE(ADDR); /* write command & address */ WR_BYTE(HI); /* high 8-bit data */ WR_BYTE(LO); /* low 8-bit data */ EEP=EEP&0x14; outp(wBase+3,EEP); /* SK=L */ EEP=EEP&0x18; outp(wBase+3,EEP); /* CS=L */ EEP=EEP&0x0C; outp(wBase+3,EEP); /* DI=0 */ for (i=0; i<10; i++) /* delay>250 ns (for EEP) */ { EEP=EEP|0x08; outp(wBase+3,EEP); /* SK=H */ EEP=EEP&0x14; outp(wBase+3,EEP); /* SK=L */ } EEP=EEP|0x04; outp(wBase+3,EEP); /* CS=H */ for (k=0; k<10; k++) /* wait until write finish */ for (i=0; i<30000; i++) { EEP=EEP|0x08; outp(wBase+3,EEP);/* SK=H */ j=inp(wBase+7)&0x20; EEP=EEP&0x14; outp(wBase+3,EEP);/* SK=L */ if (j!=0) return(0); /* write is finished */ } EEP=EEP&0x18; outp(wBase+3,EEP); /* CS=L */ return(1); /* error --> time out ? */ } /* -------------------------------------------------------------- */ EEP_READ(int ADDR, int *HI, int *LO) /* read 16-bit data from EEP */ { int i,j,k; COMM(); ADDR=ADDR|0x80; WR_BYTE(ADDR); /* read command & address */ EEP=EEP&0x0C; outp(wBase+3,EEP); /* DI=0 */ EEP=EEP&0x14; outp(wBase+3,EEP); /* SK=L */ EEP=EEP|0x08; outp(wBase+3,EEP); /* SK=H */ EEP=EEP&0x14; outp(wBase+3,EEP); /* SK=L */ (*HI)=RD_BYTE(); /* read high 8-bit data */ (*LO)=RD_BYTE(); /* read low 8-bit data */ EEP=EEP&0x14; outp(wBase+3,EEP); /* SK=L */ EEP=EEP&0x18; outp(wBase+3,EEP); /* CS=L */ } /* -------------------------------------------------------------- */ void pio_da16_da(int iChannel_no,int iVal) { iVal=iVal+(iChannel_no%4)*0x4000; /* iChannel_no : 0 - 15 */ outp(wBase+0xf0,iVal); /* iVal : 0x0000 - 0x3fff */ outp(wBase+0xf4,(iVal>>8)); outp(wBase+0xe0+4*(iChannel_no/4),0xff); }