summaryrefslogtreecommitdiffstats
path: root/progEEPROM.c
diff options
context:
space:
mode:
Diffstat (limited to 'progEEPROM.c')
-rw-r--r--progEEPROM.c2311
1 files changed, 2311 insertions, 0 deletions
diff --git a/progEEPROM.c b/progEEPROM.c
new file mode 100644
index 0000000..f0e8259
--- /dev/null
+++ b/progEEPROM.c
@@ -0,0 +1,2311 @@
+/**
+ * \file progEEPROM.c
+ * algorithms to program various EEPROM types
+ * Copyright (C) 2009-2022 Alberto Maccioni
+ *
+ * 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 USA
+ * or see <http://www.gnu.org/licenses/>
+ */
+
+#include "common.h"
+
+void ReadI2C(int dim,int addr)
+// read I2C memories
+// dim=size in bytes
+// addr:
+// [3:0] =0: 1 byte address =1: 2 byte address
+// [7:4] A2:A0 value
+// [11:8] 17th address bit location (added to control byte)
+{
+ int k=0,z=0,i,j;
+ int AX=(addr>>4)&7;
+ int addr17=(addr>>8)&0xF;
+ addr&=1;
+ if(dim>0x30000||dim<0){
+ PrintMessage(strings[S_EELim]); //"EEPROM size out of limits\r\n"
+ return;
+ }
+ if(saveLog){
+ OpenLogFile(); //"Log.txt"
+ fprintf(logfile,"ReadI2C(%d,%d) (0x%X,0x%X)\n",dim,addr,dim,addr);
+ }
+ sizeEE=dim;
+ if(memEE) free(memEE);
+ memEE=(unsigned char*)malloc(dim); //EEPROM
+ unsigned int start=GetTickCount();
+ hvreg=0;
+ j=0;
+ bufferU[j++]=VREG_DIS;
+ bufferU[j++]=I2C_INIT;
+ bufferU[j++]=AX; //100k
+ bufferU[j++]=EN_VPP_VCC; //VDD
+ bufferU[j++]=0x1;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(5);
+//****************** read ********************
+ PrintMessage(strings[S_ReadEE]); //read EEPROM ...
+ PrintStatusSetup();
+ int inc;
+ for(i=0,j=0;i<dim;i+=inc){
+ if(i<0x10000&&i>0x10000-(DIMBUF-4)) inc=0x10000-i; //do not cross 64KB boundary
+ else inc=i<dim-(DIMBUF-4)?DIMBUF-4:dim-i;
+ if(!addr){ //1 byte address
+ bufferU[j++]=I2C_READ;
+ bufferU[j++]=inc;
+ bufferU[j++]=0xA0+((i>>7)&0x0E);
+ bufferU[j++]=i&0xFF;
+ }
+ else{ //2 byte address
+ bufferU[j++]=I2C_READ2;
+ bufferU[j++]=inc;
+ bufferU[j++]=0xA0+(i>0xFFFF?addr17:0); //17th bit if>64K
+ bufferU[j++]=(i>>8)&0xFF;
+ bufferU[j++]=i&0xFF;
+ }
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(8);
+ for(j=0;j<DIMBUF-1&&bufferI[j]!=I2C_READ&&bufferI[j]!=I2C_READ2;j++);
+ if(j<DIMBUF-1&&bufferI[j+1]<0xFA){
+ for(z=j+2;z<j+2+bufferI[j+1]&&z<DIMBUF;z++) memEE[k++]=bufferI[z];
+ }
+ PrintStatus(strings[S_CodeReading2],i*100/(dim),i); //"Read: %d%%, addr. %05X"
+ if(RWstop) i=dim;
+ j=0;
+ if(saveLog){
+ fprintf(logfile,strings[S_Log7],i,i,k,k); //"i=%d(0x%X), k=%d(0x%X) \n"
+ }
+ }
+ PrintStatusEnd();
+ if(k!=dim){
+ PrintMessage("\r\n");
+ PrintMessage2(strings[S_ReadEEErr],dim,k); //"Error reading EEPROM area, requested %d bytes, read %d\r\n"
+ sizeEE=k;
+ }
+ else PrintMessage(strings[S_Compl]);
+//****************** exit ********************
+ bufferU[j++]=EN_VPP_VCC; //0
+ bufferU[j++]=0x0;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ unsigned int stop=GetTickCount();
+ PrintStatusClear();
+ DisplayEE(); //visualize
+ int sum=0;
+ for(i=0;i<sizeEE;i++) sum+=memEE[i];
+ PrintMessage1("Checksum: 0x%X\r\n",sum&0xFFFF);
+ sprintf(str,strings[S_End],(stop-start)/1000.0); //"\r\nEnd (%.2f s)\r\n"
+ PrintMessage(str);
+ if(saveLog){
+ fprintf(logfile,str);
+ CloseLogFile();
+ }
+}
+
+void WriteI2C(int dim,int addr,int page)
+// write I2C memories
+// dim=size in bytes
+// addr:
+// [3:0] =0: 1 byte address =1: 2 byte address
+// [7:4] A2:A0 value
+// [11:8] 17th address bit location (added to control byte)
+// page=page size
+{
+ int k=0,z=0,i,j;
+ int err=0;
+ int AX=(addr>>4)&7;
+ int addr17=(addr>>8)&0xF;
+ addr&=1;
+ hvreg=0;
+ if(dim>0x30000||dim<0){
+ PrintMessage(strings[S_EELim]); //"EEPROM size out of limits\r\n"
+ return;
+ }
+ if(saveLog){
+ OpenLogFile(); //"Log.txt"
+ fprintf(logfile,"WriteI2C(%d,%d,%d) (0x%X,0x%X)\n",dim,addr,page,dim,addr);
+ }
+ if(dim>sizeEE){
+ i=sizeEE;
+ memEE=(unsigned char*)realloc(memEE,dim);
+ for(;i<dim;i++) memEE[i]=0xFF;
+ sizeEE=dim;
+ }
+ if(dim<1){
+ PrintMessage(strings[S_NoCode]); //"Data area is empty\r\n"
+ return;
+ }
+ unsigned int start=GetTickCount();
+ j=0;
+ bufferU[j++]=VREG_DIS;
+ bufferU[j++]=I2C_INIT;
+ bufferU[j++]=AX; //100k
+ bufferU[j++]=EN_VPP_VCC; //VDD
+ bufferU[j++]=0x1;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(5);
+//****************** write ********************
+ PrintMessage(strings[S_EEAreaW]); //"Write EEPROM ... "
+ PrintStatusSetup();
+ for(;page>=DIMBUF-6;page>>=1);
+ for(i=0,j=0;i<dim;i+=page){
+ bufferU[j++]=I2C_WRITE;
+ if(!addr){ //1 byte address
+ bufferU[j++]=page;
+ bufferU[j++]=0xA0+((i>>7)&0x0E);
+ bufferU[j++]=i&0xFF;
+ }
+ else{ //2 byte address
+ bufferU[j++]=page+1;
+ bufferU[j++]=0xA0+(i>0xFFFF?addr17:0); //17th bit if>64K
+ bufferU[j++]=(i>>8)&0xFF;
+ bufferU[j++]=i&0xFF;
+ }
+ for(k=0;k<page;k++) bufferU[j++]=memEE[i+k];
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(3);
+ for(j=0;j<DIMBUF-1&&bufferI[j]!=I2C_WRITE;j++);
+ if(bufferI[j]!=I2C_WRITE||bufferI[j+1]>=0xFA) i=dim+10;
+ PrintStatus(strings[S_CodeWriting2],i*100/(dim),i); //"Write: %d%%, addr. %04X"
+ if(RWstop) i=dim;
+ j=0;
+ if(saveLog){
+ fprintf(logfile,strings[S_Log7],i,i,k,k); //"i=%d(0x%X), k=%d(0x%X)\n"
+ }
+ bufferU[j++]=I2C_WRITE;
+ bufferU[j++]=0;
+ bufferU[j++]=0xA0; //ACK polling
+ bufferU[j++]=0;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ int ack=0xFD;
+ for(j=0;ack==0xFD&&j<20;j++){ //ACK polling until write complete
+ PacketIO(2);
+ for(j=0;j<DIMBUF-1&&bufferI[j]!=I2C_WRITE;j++);
+ if(bufferI[j]!=I2C_WRITE||bufferI[j+1]>=0xFA) ack=0xFD;
+ else ack=bufferI[j+1];
+ }
+ j=0;
+ }
+ PrintStatusEnd();
+ PrintMessage(strings[S_Compl]); //"completed\r\n"
+//****************** verify EEPROM ********************
+ PrintMessage(strings[S_EEV]); //"Verify EEPROM ... "
+ PrintStatusSetup();
+ k=0;
+ int inc;
+ for(i=0,j=0;i<dim;i+=inc){
+ if(i<0x10000&&i>0x10000-(DIMBUF-4)) inc=0x10000-i; //do not cross 64KB boundary
+ else inc=i<dim-(DIMBUF-4)?DIMBUF-4:dim-i;
+ if(!addr){ //1 byte address
+ bufferU[j++]=I2C_READ;
+ bufferU[j++]=inc;
+ bufferU[j++]=0xA0+((i>>7)&0x0E);
+ bufferU[j++]=i&0xFF;
+ }
+ else{ //2 byte address
+ bufferU[j++]=I2C_READ2;
+ bufferU[j++]=inc;
+ bufferU[j++]=0xA0+(i>0xFFFF?addr17:0); //17th bit if>64K
+ bufferU[j++]=(i>>8)&0xFF;
+ bufferU[j++]=i&0xFF;
+ }
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(8);
+ for(j=0;j<DIMBUF-1&&bufferI[j]!=I2C_READ&&bufferI[j]!=I2C_READ2;j++);
+ if((bufferI[j]==I2C_READ||bufferI[j]==I2C_READ2)&&bufferI[j+1]<0xFA){
+ for(z=j+2;z<(j+2+bufferI[j+1])&&z<DIMBUF;z++){
+ if(memEE[k++]!=bufferI[z]){
+ PrintMessage("\r\n");
+ PrintMessage4(strings[S_CodeVError],i+z-3,i+z-3,memEE[k-1],bufferI[z]); //"Error verifying address %04X (%d), written %02X, read %02X\r\n"
+ err++;
+ }
+ }
+ }
+ PrintStatus(strings[S_CodeV2],i*100/(dim),i); //"Verify: %d%%, addr. %04X"
+ if(RWstop) i=dim;
+ j=0;
+ if(saveLog){
+ fprintf(logfile,strings[S_Log8],i,i,k,k,err); //"i=%d, k=%d, err=%d\n"
+ }
+ if(err>=max_err) break;
+ }
+ PrintStatusEnd();
+ if(k!=dim){
+ PrintMessage("\r\n");
+ PrintMessage2(strings[S_ReadEEErr],dim,k); //"Error reading EEPROM area, requested %d bytes, read %d\r\n"
+ }
+ PrintMessage1(strings[S_ComplErr],err); //"completed: %d errors\r\n"
+//****************** exit ********************
+ bufferU[j++]=EN_VPP_VCC;
+ bufferU[j++]=0x0;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ unsigned int stop=GetTickCount();
+ PrintStatusClear();
+ sprintf(str,strings[S_EndErr],(stop-start)/1000.0,err,err!=1?strings[S_ErrPlur]:strings[S_ErrSing]); //"\r\nEnd (%.2f s) %d %s\r\n\r\n"
+ PrintMessage(str);
+ if(saveLog){
+ fprintf(logfile,str);
+ CloseLogFile();
+ }
+}
+
+#define PRE 0x08 //RB3
+#define S 0x10 //RB4
+#define W 0x20 //RB5
+#define ORG 0x20 //RB5
+
+void Read93x(int dim,int na,int options)
+// read 93Sx6 uW memories
+// dim=size in bytes
+// na=address bits
+// options=0: x16 organization =1: x8 organization
+{
+ int k=0,z=0,i,j,x8;
+ hvreg=0;
+ if(dim>0x3000||dim<0){
+ PrintMessage(strings[S_EELim]); //"EEPROM size out of limits\r\n"
+ return;
+ }
+ if(na>13) na=13;
+ if(saveLog){
+ OpenLogFile(); //"Log.txt"
+ fprintf(logfile,"Read93x(%d,%d,%d) (0x%X,0x%X)\n",dim,na,options,dim,na);
+ }
+ x8=options&1;
+ sizeEE=dim;
+ if(memEE) free(memEE);
+ memEE=(unsigned char*)malloc(dim); //EEPROM
+ unsigned int start=GetTickCount();
+ j=0;
+ bufferU[j++]=VREG_DIS;
+ bufferU[j++]=uW_INIT;
+ bufferU[j++]=EN_VPP_VCC; //VDD
+ bufferU[j++]=0x1;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=x8?S:S+ORG;
+ bufferU[j++]=0;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(5);
+//****************** read ********************
+ PrintMessage(strings[S_ReadEE]); //read EEPROM ...
+ PrintStatusSetup();
+ int dim2=x8?dim:dim/2;
+ for(i=0;i<dim2;){
+ for(j=0;j<DIMBUF-14&&i<dim2;){
+ bufferU[j++]=uWTX;
+ bufferU[j++]=na+3; //READ
+ bufferU[j++]=0xC0+((i>>(na-5))&0x1F); //110aaaaa aaax0000
+ bufferU[j++]=(i<<(13-na))&0xFF;
+ bufferU[j++]=uWRX;
+ bufferU[j++]=x8?8:16;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=x8?0:ORG;
+ bufferU[j++]=0;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=x8?S:S+ORG;
+ bufferU[j++]=0;
+ i++;
+ }
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ for(z=0;z<DIMBUF-3;z++){
+ for(;bufferI[z]!=uWRX&&z<DIMBUF-3;z++);
+ if(bufferI[z]==uWRX){
+ if(x8) memEE[k++]=bufferI[z+2];
+ else{
+ memEE[k+1]=bufferI[z+2];
+ memEE[k]=bufferI[z+3];
+ k+=2;
+ }
+ z+=3;
+ }
+ }
+ PrintStatus(strings[S_CodeReading2],i*100/dim2,i); //"Read: %d%%, addr. %05X"
+ if(RWstop) i=dim;
+ j=0;
+ if(saveLog){
+ fprintf(logfile,strings[S_Log7],i,i,k,k); //"i=%d(0x%X), k=%d(0x%X) \n"
+ }
+ }
+ PrintStatusEnd();
+ if(k!=dim){
+ PrintMessage("\r\n");
+ PrintMessage2(strings[S_ReadEEErr],dim,k); //"Error reading EEPROM area, requested %d bytes, read %d\r\n"
+ sizeEE=k;
+ }
+ else PrintMessage(strings[S_Compl]);
+//****************** exit ********************
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=0;
+ bufferU[j++]=0;
+ bufferU[j++]=EN_VPP_VCC; //0
+ bufferU[j++]=0x0;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ unsigned int stop=GetTickCount();
+ PrintStatusClear();
+ DisplayEE(); //visualize
+ int sum=0;
+ for(i=0;i<sizeEE;i++) sum+=memEE[i];
+ PrintMessage1("Checksum: 0x%X\r\n",sum&0xFFFF);
+ sprintf(str,strings[S_End],(stop-start)/1000.0); //"\r\nEnd (%.2f s)\r\n"
+ PrintMessage(str);
+ if(saveLog){
+ fprintf(logfile,str);
+ CloseLogFile();
+ }
+}
+
+void Write93Sx(int dim,int na,int page)
+// write 93Sx6 uW memories
+// dim=size in bytes
+// na=address bits
+// page=page size (bytes)
+// automatic write delay
+{
+ int k=0,z=0,i,j;
+ int err=0;
+ hvreg=0;
+ if(dim>0x1000||dim<0){
+ PrintMessage(strings[S_EELim]); //"EEPROM size out of limits\r\n"
+ return;
+ }
+ if(na>13) na=13;
+ if(page>48) page=48;
+ if(saveLog){
+ OpenLogFile(); //"Log.txt"
+ fprintf(logfile,"Write93Sx(%d,%d,%d) (0x%X,0x%X)\n",dim,na,page,dim,na);
+ }
+ if(dim>sizeEE){
+ i=sizeEE;
+ memEE=(unsigned char*)realloc(memEE,dim);
+ for(;i<dim;i++) memEE[i]=0xFF;
+ sizeEE=dim;
+ }
+ if(dim<1){
+ PrintMessage(strings[S_NoCode]); //"Data area is empty\r\n"
+ return;
+ }
+ unsigned int start=GetTickCount();
+ j=0;
+ bufferU[j++]=VREG_DIS;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=0;
+ bufferU[j++]=0;
+ bufferU[j++]=uW_INIT;
+ bufferU[j++]=EN_VPP_VCC; //VDD
+ bufferU[j++]=0x1;
+ bufferU[j++]=WAIT_T3;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=S+W;
+ bufferU[j++]=0;
+ bufferU[j++]=uWTX;
+ bufferU[j++]=na+3;
+ bufferU[j++]=0x98; //100 11xxx write enable
+ bufferU[j++]=0;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=W;
+ bufferU[j++]=0;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=S+W+PRE;
+ bufferU[j++]=0;
+ bufferU[j++]=uWTX;
+ bufferU[j++]=na+3;
+ bufferU[j++]=0x98; //100 11xxx Prot. reg. enable
+ bufferU[j++]=0;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=W+PRE;
+ bufferU[j++]=0;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=S+W+PRE;
+ bufferU[j++]=0;
+ bufferU[j++]=uWTX;
+ bufferU[j++]=na+3;
+ bufferU[j++]=0xFF; //111 11111111 Prot. reg. clear
+ bufferU[j++]=0xF0;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=W+PRE;
+ bufferU[j++]=0;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=S+W;
+ bufferU[j++]=0;
+ bufferU[j++]=uWTX;
+ bufferU[j++]=na+3;
+ bufferU[j++]=0x98; //100 11xxx write enable
+ bufferU[j++]=0;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=W;
+ bufferU[j++]=0;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=S+W+PRE;
+ bufferU[j++]=0;
+ bufferU[j++]=uWTX;
+ bufferU[j++]=na+3;
+ bufferU[j++]=0xC0; //110 xxxxx Prot. reg. read
+ bufferU[j++]=0;
+ bufferU[j++]=uWRX;
+ bufferU[j++]=10;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=W+PRE;
+ bufferU[j++]=0;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(5);
+//****************** write ********************
+ PrintMessage(strings[S_EEAreaW]); //"Write EEPROM ... "
+ PrintStatusSetup();
+ int addr=0;
+ for(i=0,j=0;i<dim;i+=page,addr+=(0x10000>>na)*page/2){
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=W; //make sure to start with S=0
+ bufferU[j++]=0;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=S+W;
+ bufferU[j++]=0;
+ bufferU[j++]=uWTX;
+ bufferU[j++]=3;
+ bufferU[j++]=0xE0; //111aaaaa aaa(a) D page write
+ bufferU[j++]=uWTX;
+ bufferU[j++]=na;
+ bufferU[j++]=addr>>8;
+ if(na>8) bufferU[j++]=addr&0xFF;
+ bufferU[j++]=uWTX;
+ bufferU[j++]=8*page;
+ for(k=0;k<page;k+=2){
+ bufferU[j++]=memEE[i+k+1];
+ bufferU[j++]=memEE[i+k];
+ }
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=W;
+ bufferU[j++]=0;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=S+W; //S=1 to check status
+ bufferU[j++]=0;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ j=0;
+ for(j=0;j<DIMBUF-1&&bufferI[j]!=uWTX;j++);
+ if(bufferI[j]!=uWTX||bufferI[j+1]>=0xFA) i=dim+10;
+ bufferU[j++]=uWRX;
+ bufferU[j++]=1;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ for(z=0,k=0;z<30&&!k;z++){ //Wait until ready
+ PacketIO(2);
+ for(j=0;j<DIMBUF-1&&bufferI[j]!=uWRX;j++);
+ if(bufferI[j]==uWRX) k=bufferI[j+2];
+ }
+ j=0;
+ PrintStatus(strings[S_CodeWriting2],i*100/(dim),i); //"Write: %d%%, addr. %04X"
+ if(RWstop) i=dim;
+ if(saveLog){
+ fprintf(logfile,strings[S_Log7],i,i,k,k); //"i=%d(0x%X), k=%d(0x%X)\n"
+ }
+ }
+ PrintStatusEnd();
+ PrintMessage(strings[S_Compl]); //"completed\r\n"
+//****************** verify EEPROM ********************
+ PrintMessage(strings[S_EEV]); //"Verify EEPROM ... "
+ PrintStatusSetup();
+ j=0;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=S;
+ bufferU[j++]=0;
+ bufferU[j++]=uWTX;
+ bufferU[j++]=na+3; //READ (16bit)
+ bufferU[j++]=0xC0; //110aaaaa aaax0000
+ bufferU[j++]=0;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ k=0;
+ int n=(DIMBUF-2);
+ if(n>30) n=30; //max 240 bit = 30 Byte
+ for(i=0,j=0;i<dim;i+=n){
+ bufferU[j++]=uWRX;
+ bufferU[j++]=i<(dim-n)?n*8:(dim-i)*8;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ for(j=0;bufferI[j]!=uWRX&&j<DIMBUF-1;j++);
+ if(bufferI[j]==uWRX){
+ for(z=j+2;z<j+2+bufferI[j+1]/8&&z<DIMBUF;z+=2,k+=2){
+ if(memEE[k+1]!=bufferI[z]){
+ PrintMessage("\r\n");
+ PrintMessage4(strings[S_CodeVError],i+z-3,i+z-3,memEE[k+1],bufferI[z]); //"Error verifying address %04X (%d), written %02X, read %02X\r\n"
+ err++;
+ }
+ if(memEE[k]!=bufferI[z+1]){
+ PrintMessage("\r\n");
+ PrintMessage4(strings[S_CodeVError],i+z-3,i+z-3,memEE[k],bufferI[z+1]); //"Error verifying address %04X (%d), written %02X, read %02X\r\n"
+ err++;
+ }
+ }
+ }
+ PrintStatus(strings[S_CodeV2],i*100/(dim),i); //"Verify: %d%%, addr. %04X"
+ if(RWstop) i=dim;
+ j=0;
+ if(saveLog){
+ fprintf(logfile,strings[S_Log8],i,i,k,k,err); //"i=%d, k=%d, err=%d\n"
+ }
+ if(err>=max_err) break;
+ }
+ PrintStatusEnd();
+ if(k!=dim){
+ PrintMessage("\r\n");
+ PrintMessage2(strings[S_ReadEEErr],dim,k); //"Error reading EEPROM area, requested %d bytes, read %d\r\n"
+ }
+ PrintMessage1(strings[S_ComplErr],err); //"completed: %d errors\r\n"
+//****************** exit ********************
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=0;
+ bufferU[j++]=0;
+ bufferU[j++]=EN_VPP_VCC;
+ bufferU[j++]=0x0;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ unsigned int stop=GetTickCount();
+ PrintStatusClear();
+ sprintf(str,strings[S_EndErr],(stop-start)/1000.0,err,err!=1?strings[S_ErrPlur]:strings[S_ErrSing]); //"\r\nEnd (%.2f s) %d %s\r\n\r\n"
+ PrintMessage(str);
+ if(saveLog){
+ fprintf(logfile,str);
+ CloseLogFile();
+ }
+}
+
+void Write93Cx(int dim,int na, int options)
+// write 93Cx6 uW memories
+// dim=size in bytes
+// na=address bits
+// options=0: x16 organization =1: x8 organization
+{
+ int k=0,z=0,i,j;
+ int err=0;
+ hvreg=0;
+ if(dim>0x1000||dim<0){
+ PrintMessage(strings[S_EELim]); //"EEPROM size out of limits\r\n"
+ return;
+ }
+ if(na>13) na=13;
+ if(saveLog){
+ OpenLogFile(); //"Log.txt"
+ fprintf(logfile,"Write93Cx(%d,%d,%d) (0x%X,0x%X)\n",dim,na,options,dim,na);
+ }
+ if(dim>sizeEE){
+ i=sizeEE;
+ memEE=(unsigned char*)realloc(memEE,dim);
+ for(;i<dim;i++) memEE[i]=0xFF;
+ sizeEE=dim;
+ }
+ if(dim<1){
+ PrintMessage(strings[S_NoCode]); //"Data area is empty\r\n"
+ return;
+ }
+ unsigned int start=GetTickCount();
+ j=0;
+ bufferU[j++]=VREG_DIS;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=0;
+ bufferU[j++]=0;
+ bufferU[j++]=uW_INIT;
+ bufferU[j++]=EN_VPP_VCC; //VDD
+ bufferU[j++]=0x1;
+ bufferU[j++]=WAIT_T3;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=options==0?S+ORG+PRE:S+PRE;
+ bufferU[j++]=0;
+ bufferU[j++]=uWTX;
+ bufferU[j++]=na+3;
+ bufferU[j++]=0x98; //100 11xxx EWEN
+ bufferU[j++]=0;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=options==0?ORG+PRE:PRE;
+ bufferU[j++]=0;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=options==0?S+ORG+PRE:S+PRE;
+ bufferU[j++]=0;
+ bufferU[j++]=uWTX;
+ bufferU[j++]=na+3;
+ bufferU[j++]=0x90; //100 10xxx ERAL
+ bufferU[j++]=0;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=options==0?ORG+PRE:PRE;
+ bufferU[j++]=0;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=options==0?S+ORG+PRE:S+PRE;
+ bufferU[j++]=0;
+ bufferU[j++]=uWRX;
+ bufferU[j++]=1;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(5);
+ j=0;
+ bufferU[j++]=uWRX;
+ bufferU[j++]=1;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ for(i=0,k=0;i<30&&!k;i++){ //Wait until ready
+ PacketIO(2);
+ for(j=0;j<DIMBUF-1&&bufferI[j]!=uWRX;j++);
+ if(bufferI[j]==uWRX) k=bufferI[j+2];
+ }
+//****************** write ********************
+ PrintMessage(strings[S_EEAreaW]); //"Write EEPROM ... "
+ PrintStatusSetup();
+ int addr=0;
+ j=0;
+ for(i=0;i<dim;i+=options==0?2:1,addr+=0x10000>>na){
+ if(memEE[i]<0xFF||(options==0&&memEE[i+1]<0xFF)){
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=options==0?ORG+PRE:PRE;
+ bufferU[j++]=0;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=options==0?S+ORG+PRE:S+PRE;
+ bufferU[j++]=0;
+ bufferU[j++]=uWTX;
+ bufferU[j++]=3;
+ bufferU[j++]=0xA0; //101aaaaa aaa(a) write
+ bufferU[j++]=uWTX;
+ bufferU[j++]=na;
+ bufferU[j++]=addr>>8;
+ if(na>8) bufferU[j++]=addr&0xFF;
+ bufferU[j++]=uWTX;
+ if(options==0){ //x16
+ bufferU[j++]=16;
+ bufferU[j++]=memEE[i+1];
+ bufferU[j++]=memEE[i];
+ }
+ else{ //x8
+ bufferU[j++]=8;
+ bufferU[j++]=memEE[i];
+ }
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=options==0?ORG+PRE:PRE;
+ bufferU[j++]=0;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=options==0?S+ORG+PRE:S+PRE;
+ bufferU[j++]=0;
+ bufferU[j++]=uWRX;
+ bufferU[j++]=1;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ PrintStatus(strings[S_CodeWriting2],i*100/(dim),i); //"Write: %d%%, addr. %04X"
+ if(RWstop) i=dim;
+ j=0;
+ if(saveLog){
+ fprintf(logfile,strings[S_Log7],i,i,k,k); //"i=%d(0x%X), k=%d(0x%X)\n"
+ }
+ bufferU[j++]=uWRX;
+ bufferU[j++]=1;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ for(z=0,k=0;z<30&&!k;z++){ //Wait until ready
+ PacketIO(2);
+ for(j=0;j<DIMBUF-1&&bufferI[j]!=uWRX;j++);
+ if(bufferI[j]==uWRX) k=bufferI[j+2];
+ }
+ j=0;
+ }
+ }
+ msDelay(2);
+ PrintStatusEnd();
+ if(i!=dim){
+ PrintMessage2(strings[S_CodeWError4],i,dim); //"Error writing code area, requested %d bytes, read %d\r\n"
+ }
+ else PrintMessage(strings[S_Compl]); //"completed\r\n"
+//****************** verify EEPROM ********************
+ PrintMessage(strings[S_EEV]); //"Verify EEPROM ... "
+ PrintStatusSetup();
+ j=0;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=options==0?ORG+PRE:PRE;
+ bufferU[j++]=0;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=options==0?S+ORG+PRE:S+PRE;
+ bufferU[j++]=0;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ k=0;
+ int dim2=options==0?dim/2:dim;
+ for(i=0;i<dim2;){
+ for(j=0;j<DIMBUF-14&&i<dim2;){
+ bufferU[j++]=uWTX;
+ bufferU[j++]=na+3; //READ
+ bufferU[j++]=0xC0+((i>>(na-5))&0x1F); //110aaaaa aaax0000
+ bufferU[j++]=(i<<(13-na))&0xFF;
+ bufferU[j++]=uWRX;
+ bufferU[j++]=options==0?16:8;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=options==0?ORG:0;
+ bufferU[j++]=0;
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=options==0?S+ORG:S;
+ bufferU[j++]=0;
+ i++;
+ }
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ for(z=0;z<DIMBUF-3;z++){
+ for(;bufferI[z]!=uWRX&&z<DIMBUF-3;z++);
+ if(bufferI[z]==uWRX){
+ if(options==1){ //x8
+ if(memEE[k]!=bufferI[z+2]){
+ PrintMessage("\r\n");
+ PrintMessage4(strings[S_CodeVError],k,k,memEE[k],bufferI[z+2]); //"Error verifying address %04X (%d), written %02X, read %02X\r\n"
+ err++;
+ }
+ k++;
+ }
+ else{ //x16
+ if(memEE[k]!=bufferI[z+3]){
+ PrintMessage("\r\n");
+ PrintMessage4(strings[S_CodeVError],k,k,memEE[k],bufferI[z+3]); //"Error verifying address %04X (%d), written %02X, read %02X\r\n"
+ err++;
+ }
+ if(memEE[k+1]!=bufferI[z+2]){
+ PrintMessage("\r\n");
+ PrintMessage4(strings[S_CodeVError],k+1,k+1,memEE[k+1],bufferI[z+2]); //"Error verifying address %04X (%d), written %02X, read %02X\r\n"
+ err++;
+ }
+ k+=2;
+ }
+ z+=3;
+ }
+ }
+ PrintStatus(strings[S_CodeV2],i*100/dim2,i); //"Verify: %d%%, addr. %04X"
+ if(RWstop) i=dim;
+ j=0;
+ if(saveLog){
+ fprintf(logfile,strings[S_Log8],i,i,k,k,err); //"i=%d, k=%d, err=%d\n"
+ }
+ if(err>=max_err) break;
+ }
+ PrintStatusEnd();
+ if(k!=dim){
+ PrintMessage("\r\n");
+ PrintMessage2(strings[S_ReadEEErr],dim,k); //"Error reading EEPROM area, requested %d bytes, read %d\r\n"
+ }
+ PrintMessage1(strings[S_ComplErr],err); //"completed: %d errors\r\n"
+//****************** exit ********************
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=0;
+ bufferU[j++]=0;
+ bufferU[j++]=EN_VPP_VCC;
+ bufferU[j++]=0x0;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ unsigned int stop=GetTickCount();
+ PrintStatusClear();
+ sprintf(str,strings[S_EndErr],(stop-start)/1000.0,err,err!=1?strings[S_ErrPlur]:strings[S_ErrSing]); //"\r\nEnd (%.2f s) %d %s\r\n\r\n"
+ PrintMessage(str);
+ if(saveLog){
+ fprintf(logfile,str);
+ CloseLogFile();
+ }
+}
+
+#define CS 8
+#define HLD 16 //Hold
+#define WP 0x40 //Write protect
+
+void Read25xx(int dim)
+// read 25xx SPI memories
+// dim=size in bytes
+{
+ int k=0,z=0,i,j,ID;
+ hvreg=0;
+ if(dim>0x1000000||dim<0){
+ PrintMessage(strings[S_EELim]); //"EEPROM size out of limits\r\n"
+ return;
+ }
+ if(saveLog){
+ OpenLogFile(); //"Log.txt"
+ fprintf(logfile,"Read25xx(%d) (0x%X)\n",dim,dim);
+ }
+ sizeEE=dim;
+ if(memEE) free(memEE);
+ memEE=(unsigned char*)malloc(dim); //EEPROM
+ unsigned int start=GetTickCount();
+ j=0;
+ bufferU[j++]=VREG_DIS;
+ bufferU[j++]=SPI_INIT;
+ bufferU[j++]=3; //0=100k, 1=200k, 2=300k, 3=500k (in reality 200k)
+// bufferU[j++]=SET_T1T2;
+// bufferU[j++]=2; //force T=28us -> 286 kbps
+// bufferU[j++]=0;
+ bufferU[j++]=EN_VPP_VCC; //VDD
+ bufferU[j++]=0x1;
+ bufferU[j++]=WAIT_T3;
+ bufferU[j++]=EXT_PORT; //CS=1, HLD=1, WP=0
+ bufferU[j++]=CS+HLD;
+ bufferU[j++]=0;
+ bufferU[j++]=EXT_PORT; //CS=0, HLD=1, WP=0
+ bufferU[j++]=HLD;
+ bufferU[j++]=0;
+ bufferU[j++]=SPI_WRITE; //READ ID
+ bufferU[j++]=1;
+ bufferU[j++]=0x9F;
+ bufferU[j++]=SPI_READ;
+ bufferU[j++]=3;
+ bufferU[j++]=EXT_PORT; //CS=1, HLD=1, WP=0
+ bufferU[j++]=CS+HLD;
+ bufferU[j++]=0;
+ bufferU[j++]=EXT_PORT; //CS=0, HLD=1, WP=0
+ bufferU[j++]=HLD;
+ bufferU[j++]=0;
+ bufferU[j++]=SPI_WRITE; //Read
+ if(dim>0x10000){ //24 bit address
+ bufferU[j++]=4;
+ bufferU[j++]=3;
+ bufferU[j++]=0;
+ bufferU[j++]=0;
+ bufferU[j++]=0;
+ }
+ else if(dim>0x200){ //16 bit address
+ bufferU[j++]=3;
+ bufferU[j++]=3;
+ bufferU[j++]=0;
+ bufferU[j++]=0;
+ }
+ else{ //8 bit address
+ bufferU[j++]=2;
+ bufferU[j++]=3;
+ bufferU[j++]=0;
+ }
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(5);
+ for(z=0;z<DIMBUF-4&&bufferI[z]!=SPI_READ;z++);
+ ID=(bufferI[z+2]<<16)+(bufferI[z+3]<<8)+bufferI[z+4];
+ if(ID>0&&ID!=0xFFFFFF) PrintMessage1("DEVICE ID=0x%06X\r\n",ID);
+//****************** read ********************
+ PrintMessage(strings[S_ReadEE]); //read EEPROM ...
+ PrintStatusSetup();
+ for(i=0,j=0;i<dim;i+=DIMBUF-4){
+ bufferU[j++]=SPI_READ;
+ bufferU[j++]=i<dim-(DIMBUF-4)?DIMBUF-4:dim-i;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(4);
+ for(j=0;j<DIMBUF-1&&bufferI[j]!=SPI_READ;j++);
+ if(bufferI[j]==SPI_READ&&bufferI[j+1]<0xFA){
+ for(z=j+2;z<j+2+bufferI[j+1]&&z<DIMBUF;z++) memEE[k++]=bufferI[z];
+ }
+ PrintStatus(strings[S_CodeReading2],i*100/(dim),i); //"Read: %d%%, addr. %05X"
+ if(RWstop) i=dim;
+ j=0;
+ if(saveLog){
+ fprintf(logfile,strings[S_Log7],i,i,k,k); //"i=%d(0x%X), k=%d(0x%X) \n"
+ }
+ }
+ PrintStatusEnd();
+ if(k!=dim){
+ PrintMessage("\r\n");
+ PrintMessage2(strings[S_ReadEEErr],dim,k); //"Error reading EEPROM area, requested %d bytes, read %d\r\n"
+ sizeEE=k;
+ }
+ else PrintMessage(strings[S_Compl]);
+//****************** exit ********************
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=0;
+ bufferU[j++]=0;
+ bufferU[j++]=EN_VPP_VCC; //0
+ bufferU[j++]=0x0;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ unsigned int stop=GetTickCount();
+ PrintStatusClear();
+ DisplayEE(); //visualize
+ int sum=0;
+ for(i=0;i<sizeEE;i++) sum+=memEE[i];
+ PrintMessage1("Checksum: 0x%X\r\n",sum&0xFFFF);
+ sprintf(str,strings[S_End],(stop-start)/1000.0); //"\r\nEnd (%.2f s)\r\n"
+ PrintMessage(str);
+ if(saveLog){
+ fprintf(logfile,str);
+ CloseLogFile();
+ }
+}
+
+/*void Read25xxFast(int dim)
+// read 25xx SPI memories
+// dim=size in bytes
+{
+ int k=0,z=0,i,j,ID;
+ hvreg=0;
+ if(dim>0x1000000||dim<0){
+ PrintMessage(strings[S_EELim]); //"EEPROM size out of limits\r\n"
+ return;
+ }
+ if(saveLog){
+ OpenLogFile(); //"Log.txt"
+ fprintf(logfile,"Read25xxF(%d) (0x%X)\n",dim,dim);
+ }
+ sizeEE=dim;
+ if(memEE) free(memEE);
+ memEE=(unsigned char*)malloc(dim); //EEPROM
+ unsigned int start=GetTickCount();
+ j=0;
+ bufferU[j++]=VREG_DIS;
+ bufferU[j++]=SPI_INIT;
+ bufferU[j++]=3; //0=100k, 1=200k, 2=300k, 3=500k (in reality 200k)
+// bufferU[j++]=SET_T1T2;
+// bufferU[j++]=2; //force T=28us -> 286 kbps
+// bufferU[j++]=0;
+ bufferU[j++]=EN_VPP_VCC; //VDD
+ bufferU[j++]=0x1;
+ bufferU[j++]=WAIT_T3;
+ bufferU[j++]=EXT_PORT; //CS=1, HLD=1, WP=0
+ bufferU[j++]=CS+HLD;
+ bufferU[j++]=0;
+ bufferU[j++]=EXT_PORT; //CS=0, HLD=1, WP=1
+ bufferU[j++]=HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=SPI_WRITE; //READ ID
+ bufferU[j++]=1;
+ bufferU[j++]=0x9F;
+ bufferU[j++]=SPI_READ;
+ bufferU[j++]=3;
+ bufferU[j++]=EXT_PORT; //CS=1, HLD=1, WP=1
+ bufferU[j++]=CS+HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=EXT_PORT; //CS=0, HLD=1, WP=0
+ bufferU[j++]=HLD;
+ bufferU[j++]=0;
+ bufferU[j++]=SPI_WRITE; //Read
+ if(dim>0x10000){ //24 bit address
+ bufferU[j++]=4;
+ bufferU[j++]=3;
+ bufferU[j++]=0;
+ bufferU[j++]=0;
+ bufferU[j++]=0;
+ }
+ else if(dim>0x200){ //16 bit address
+ bufferU[j++]=3;
+ bufferU[j++]=3;
+ bufferU[j++]=0;
+ bufferU[j++]=0;
+ }
+ else{ //8 bit address
+ bufferU[j++]=2;
+ bufferU[j++]=3;
+ bufferU[j++]=0;
+ }
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(5);
+ for(z=0;z<DIMBUF-4&&bufferI[z]!=SPI_READ;z++);
+ ID=(bufferI[z+2]<<16)+(bufferI[z+3]<<8)+bufferI[z+4];
+ if(ID>0&&ID!=0xFFFFFF) PrintMessage1("DEVICE ID=0x%06X\r\n",ID);
+//****************** read ********************
+ PrintMessage(strings[S_ReadEE]); //read EEPROM ...
+ PrintStatusSetup();
+ #define rSize (DIMBUF-5-2)
+ #define npack 255
+ j=0;
+ bufferU[j++]=0xF6;
+ bufferU[j++]=npack;
+ bufferU[j++]=SPI_READ;
+ bufferU[j++]=rSize;
+ bufferU[j++]=0xF7;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ for(i=0;i<dim;i+=rSize*npack){
+ #define TIMEOUT 50
+ ULONG Result;
+ __int64 start,stop,freq,timeout;
+ QueryPerformanceCounter((LARGE_INTEGER *)&start);
+ QueryPerformanceFrequency((LARGE_INTEGER *)&freq);
+ //write
+ Result = WriteFile(WriteHandle,bufferU0,DIMBUF+1,&BytesWritten,NULL);
+// QueryPerformanceCounter((LARGE_INTEGER *)&stop);
+// timeout=stop+delay*freq/1000.0;
+// while(stop<timeout) QueryPerformanceCounter((LARGE_INTEGER *)&stop);
+ //read
+ fprintf(logfile,"bufferU=[");
+ for(int i=0;i<DIMBUF;i++){
+ if(i%32==0) fprintf(logfile,"\n");
+ fprintf(logfile,"%02X ",bufferU[i]);
+ }
+ fprintf(logfile,"]\n");
+ for(int r=0;r<npack;r++){
+ Result = ReadFile(ReadHandle,bufferI0,DIMBUF+1,&NumberOfBytesRead,(LPOVERLAPPED) &HIDOverlapped);
+ Result = WaitForSingleObject(hEventObject,TIMEOUT);
+// if(saveLog&&logfile) WriteLogIO();
+ fprintf(logfile,"bufferI=[");
+ for(int i=0;i<DIMBUF;i++){
+ if(i%32==0) fprintf(logfile,"\n");
+ fprintf(logfile,"%02X ",bufferI[i]);
+ }
+ fprintf(logfile,"]\n");
+ ResetEvent(hEventObject);
+ if(Result!=WAIT_OBJECT_0){
+ PrintMessage(strings[S_comTimeout]); //"comm timeout\r\n"
+ if(saveLog&&logfile) fprintf(logfile,strings[S_comTimeout]);
+ }
+ QueryPerformanceCounter((LARGE_INTEGER *)&stop);
+ if(saveLog&&logfile) fprintf(logfile,"T=%.2f ms (%+.2f ms)\n",(stop-start)*1000.0/freq,(stop-start)*1000.0/freq);
+ QueryPerformanceCounter((LARGE_INTEGER *)&start);
+ for(j=0;j<DIMBUF-1&&bufferI[j]!=SPI_READ;j++);
+ if(bufferI[j]==SPI_READ&&bufferI[j+1]<0xFA){
+ for(z=j+2;z<j+2+bufferI[j+1]&&z<DIMBUF&&k<dim;z++) memEE[k++]=bufferI[z];
+ }
+ PrintStatus(strings[S_CodeReading2],i*100/(dim),i); //"Read: %d%%, addr. %05X"
+ if(RWstop) i=dim;
+ j=0;
+ if(saveLog){
+ fprintf(logfile,strings[S_Log7],i,i,k,k); //"i=%d(0x%X), k=%d(0x%X) \n"
+ }
+ }
+ }
+ PrintStatusEnd();
+ if(k!=dim){
+ PrintMessage("\r\n");
+ PrintMessage2(strings[S_ReadEEErr],dim,k); //"Error reading EEPROM area, requested %d bytes, read %d\r\n"
+ sizeEE=k;
+ }
+ else PrintMessage(strings[S_Compl]);
+//****************** exit ********************
+ bufferU[j++]=EXT_PORT;
+ bufferU[j++]=0;
+ bufferU[j++]=0;
+ bufferU[j++]=EN_VPP_VCC; //0
+ bufferU[j++]=0x0;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ unsigned int stop=GetTickCount();
+ PrintStatusClear();
+ DisplayEE(); //visualize
+ int sum=0;
+ for(i=0;i<sizeEE;i++) sum+=memEE[i];
+ PrintMessage1("Checksum: 0x%X\r\n",sum&0xFFFF);
+ sprintf(str,strings[S_End],(stop-start)/1000.0); //"\r\nEnd (%.2f s)\r\n"
+ PrintMessage(str);
+ if(saveLog){
+ fprintf(logfile,str);
+ CloseLogFile();
+ }
+}
+*/
+
+void Write25xx(int dim,int options)
+// write SPI memories
+// dim=size in bytes
+// options:
+// [11:0]=page size
+// [12]=erase before write
+// [13]=use status register 2
+// automatic write delay
+{
+ int k=0,z=0,i,j,ID;
+ int err=0;
+ hvreg=0;
+ int page=options&0xFFF;
+ if(dim>0x1000000||dim<0){
+ PrintMessage(strings[S_EELim]); //"EEPROM size out of limits\r\n"
+ return;
+ }
+ if(saveLog){
+ OpenLogFile(); //"Log.txt"
+ fprintf(logfile,"Write25xx(%d,%d) (0x%X,0x%X)\n",dim,options,dim,options);
+ }
+ if(dim>sizeEE){
+ i=sizeEE;
+ memEE=(unsigned char*)realloc(memEE,dim);
+ for(;i<dim;i++) memEE[i]=0xFF;
+ sizeEE=dim;
+ }
+ if(dim<1){
+ PrintMessage(strings[S_NoCode]); //"Data area is empty\r\n"
+ return;
+ }
+ unsigned int start=GetTickCount();
+ j=0;
+ bufferU[j++]=VREG_DIS;
+ bufferU[j++]=SPI_INIT;
+ bufferU[j++]=3; //0=100k, 1=200k, 2=300k, 3=500k
+ bufferU[j++]=EN_VPP_VCC; //VDD
+ bufferU[j++]=0x1;
+ bufferU[j++]=WAIT_T3;
+ bufferU[j++]=EXT_PORT; //CS=1, HLD=1, WP=0
+ bufferU[j++]=CS+HLD;
+ bufferU[j++]=0;
+ bufferU[j++]=EXT_PORT; //CS=0, HLD=1, WP=0
+ bufferU[j++]=HLD;
+ bufferU[j++]=0;
+ bufferU[j++]=SPI_WRITE; //READ ID
+ bufferU[j++]=1;
+ bufferU[j++]=0x9F;
+ bufferU[j++]=SPI_READ;
+ bufferU[j++]=3;
+ bufferU[j++]=EXT_PORT; //CS=1, HLD=1, WP=1
+ bufferU[j++]=CS+HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=EXT_PORT; //CS=0, HLD=1, WP=1
+ bufferU[j++]=HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=SPI_WRITE; //READ STATUS
+ bufferU[j++]=1;
+ bufferU[j++]=5;
+ bufferU[j++]=SPI_READ;
+ bufferU[j++]=1;
+ bufferU[j++]=EXT_PORT; //CS=1, HLD=1, WP=1
+ bufferU[j++]=CS+HLD;
+ bufferU[j++]=WP;
+ if(options&0x2000){
+ bufferU[j++]=EXT_PORT; //CS=0, HLD=1, WP=1
+ bufferU[j++]=HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=SPI_WRITE; //READ STATUS2
+ bufferU[j++]=1;
+ bufferU[j++]=0x35;
+ bufferU[j++]=SPI_READ;
+ bufferU[j++]=1;
+ bufferU[j++]=EXT_PORT; //CS=1, HLD=1, WP=1
+ bufferU[j++]=CS+HLD;
+ bufferU[j++]=WP;
+ }
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(5);
+ j=0;
+ for(z=0;z<DIMBUF-4&&bufferI[z]!=SPI_READ;z++);
+ ID=(bufferI[z+2]<<16)+(bufferI[z+3]<<8)+bufferI[z+4];
+ if(ID>0&&ID!=0xFFFFFF){
+ PrintMessage1("DEVICE ID=0x%06X\r\n",ID);
+ if(saveLog) fprintf(logfile,"DEVICE ID=0x%06X\n",ID);
+ }
+ msDelay(10); //wait power-up timer in some devices
+ bufferU[j++]=EXT_PORT; //CS=0, HLD=1, WP=1
+ bufferU[j++]=HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=SPI_WRITE; //WRITE ENABLE
+ bufferU[j++]=1;
+ bufferU[j++]=6;
+ bufferU[j++]=EXT_PORT; //CS=1, HLD=1, WP=1
+ bufferU[j++]=CS+HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=EXT_PORT; //CS=0, HLD=1, WP=1
+ bufferU[j++]=HLD;
+ bufferU[j++]=WP;
+ if(options&0x2000){ //status 1+2
+ bufferU[j++]=SPI_WRITE; //WRITE STATUS
+ bufferU[j++]=3;
+ bufferU[j++]=1;
+ bufferU[j++]=0;
+ bufferU[j++]=0;
+ }
+ else{
+ bufferU[j++]=SPI_WRITE; //WRITE STATUS
+ bufferU[j++]=2;
+ bufferU[j++]=1;
+ bufferU[j++]=0;
+ }
+ bufferU[j++]=EXT_PORT; //CS=1, HLD=1, WP=1
+ bufferU[j++]=CS+HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=EXT_PORT; //CS=0, HLD=1, WP=1
+ bufferU[j++]=HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=SPI_WRITE; //READ STATUS
+ bufferU[j++]=1;
+ bufferU[j++]=5;
+ bufferU[j++]=SPI_READ;
+ bufferU[j++]=1;
+ bufferU[j++]=EXT_PORT; //CS=1, HLD=1, WP=1
+ bufferU[j++]=CS+HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(5);
+ j=0;
+ if(options&0x1000){ //erase before write
+ PrintMessage(strings[S_StartErase]); //"Erasing ... "
+ if(saveLog) fprintf(logfile,"%s\n",strings[S_StartErase]); //"Erasing ... "
+ bufferU[j++]=EXT_PORT; //CS=0, HLD=1, WP=1
+ bufferU[j++]=HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=SPI_WRITE; //READ STATUS
+ bufferU[j++]=1;
+ bufferU[j++]=5;
+ bufferU[j++]=SPI_READ;
+ bufferU[j++]=1;
+ bufferU[j++]=EXT_PORT; //CS=1, HLD=1, WP=1
+ bufferU[j++]=CS+HLD;
+ bufferU[j++]=WP;
+ if(options&0x2000){
+ bufferU[j++]=EXT_PORT; //CS=0, HLD=1, WP=1
+ bufferU[j++]=HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=SPI_WRITE; //READ STATUS2
+ bufferU[j++]=1;
+ bufferU[j++]=0x35;
+ bufferU[j++]=SPI_READ;
+ bufferU[j++]=1;
+ bufferU[j++]=EXT_PORT; //CS=1, HLD=1, WP=1
+ bufferU[j++]=CS+HLD;
+ bufferU[j++]=WP;
+ }
+ bufferU[j++]=EXT_PORT; //CS=0, HLD=1, WP=1
+ bufferU[j++]=HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=SPI_WRITE; //WRITE ENABLE
+ bufferU[j++]=1;
+ bufferU[j++]=6;
+ bufferU[j++]=EXT_PORT; //CS=1, HLD=1, WP=1
+ bufferU[j++]=CS+HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=EXT_PORT; //CS=0, HLD=1, WP=1
+ bufferU[j++]=HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=SPI_WRITE; //CHIP ERASE
+ bufferU[j++]=1;
+ bufferU[j++]=0xC7;
+ bufferU[j++]=EXT_PORT; //CS=1, HLD=1, WP=1
+ bufferU[j++]=CS+HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(5);
+ j=0;
+ bufferU[j++]=EXT_PORT; //CS=0, HLD=1, WP=1
+ bufferU[j++]=HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=SPI_WRITE; //READ STATUS
+ bufferU[j++]=1;
+ bufferU[j++]=5;
+ bufferU[j++]=SPI_READ;
+ bufferU[j++]=1;
+ bufferU[j++]=EXT_PORT; //CS=1, HLD=1, WP=1
+ bufferU[j++]=CS+HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ int pp;
+ for(pp=1,j=0;pp&&j<400;j++){ //wait for erase completion max 40s
+ PacketIO(2);
+ msDelay(100);
+ for(z=0;z<DIMBUF-1&&bufferI[z]!=SPI_READ;z++);
+ pp=bufferI[z+2]&1; //WIP bit
+ PrintStatus(strings[S_StartErase],0,0); //"Erasing ... " Also allows the gui loop to run
+ }
+ if(saveLog) fprintf(logfile,"Erase time %d ms\n",j*100);
+ PrintMessage(strings[S_Compl]); //"completed"
+ PrintStatus(strings[S_Compl],0,0); //"completed"
+// msDelay(100);
+ }
+//****************** write ********************
+ PrintMessage(strings[S_EEAreaW]); //"Write EEPROM ... "
+ if(saveLog) fprintf(logfile,"%s\n",strings[S_EEAreaW]); //"Write EEPROM ... "
+ int pp;
+ for(i=0,j=0;i<dim;i+=page){
+ if(options&0x1000){ //if chip erase skip empty pages
+ for(k=page;k==page&&i<dim-page;){
+ for(k=0;k<page;k++){ if(memEE[i+k]<0xFF) k=page;}
+ if(k==page) i+=page;
+ }
+ }
+ bufferU[j++]=EXT_PORT; //CS=0, HLD=1, WP=1
+ bufferU[j++]=HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=SPI_WRITE; //WRITE ENABLE
+ bufferU[j++]=1;
+ bufferU[j++]=6;
+ bufferU[j++]=EXT_PORT; //CS=1, HLD=1, WP=1
+ bufferU[j++]=CS+HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=EXT_PORT; //CS=0, HLD=1, WP=1
+ bufferU[j++]=HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=SPI_WRITE; //WRITE
+ if(dim>0x10000){ //24 bit address
+ bufferU[j++]=4;
+ bufferU[j++]=2;
+ bufferU[j++]=i>>16;
+ bufferU[j++]=(i>>8)&0xFF;
+ bufferU[j++]=i&0xFF;
+ }
+ else if(dim>0x200){ //16 bit address
+ bufferU[j++]=3;
+ bufferU[j++]=2;
+ bufferU[j++]=i>>8;
+ bufferU[j++]=i&0xFF;
+ }
+ else{ //8 bit address
+ bufferU[j++]=2;
+ bufferU[j++]=2+(i&0x100?8:0);
+ bufferU[j++]=i&0xFF;
+ }
+ pp=page<DIMBUF-j-4?page:DIMBUF-j-4;
+ for(k=0;k<page;){
+ bufferU[j++]=SPI_WRITE;
+ bufferU[j++]=pp;
+ for(;k<page&&pp;k++,pp--) bufferU[j++]=memEE[i+k];
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ for(z=0;z<DIMBUF-1&&bufferI[z]!=SPI_WRITE;z++);
+ if(bufferI[z+1]>=0xFA) k=i=dim+10;
+ pp=(page-k)<DIMBUF-4?page-k:DIMBUF-4;
+ j=0;
+ }
+ bufferU[j++]=EXT_PORT; //CS=1, HLD=1, WP=1
+ bufferU[j++]=CS+HLD;
+ bufferU[j++]=WP;
+
+ bufferU[j++]=EXT_PORT; //CS=0, HLD=1, WP=1
+ bufferU[j++]=HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=SPI_WRITE; //READ STATUS
+ bufferU[j++]=1;
+ bufferU[j++]=5;
+ bufferU[j++]=SPI_READ;
+ bufferU[j++]=1;
+ bufferU[j++]=EXT_PORT; //CS=1, HLD=1, WP=1
+ bufferU[j++]=CS+HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ j=0;
+ bufferU[j++]=EXT_PORT; //CS=0, HLD=1, WP=1
+ bufferU[j++]=HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=SPI_WRITE; //READ STATUS
+ bufferU[j++]=1;
+ bufferU[j++]=5;
+ bufferU[j++]=SPI_READ;
+ bufferU[j++]=1;
+ bufferU[j++]=EXT_PORT; //CS=1, HLD=1, WP=1
+ bufferU[j++]=CS+HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ for(pp=1,j=0;pp&&j<50;j++){ //wait for write completion
+ PacketIO(2);
+ for(z=0;z<DIMBUF-1&&bufferI[z]!=SPI_READ;z++);
+ pp=bufferI[z+2]&1; //WIP bit
+ }
+ PrintStatus(strings[S_CodeWriting2],i*100/(dim),i); //"Write: %d%%, addr. %04X"
+ if(RWstop) i=dim;
+ j=0;
+ if(saveLog){
+ fprintf(logfile,strings[S_Log7],i,i,0,0); //"i=%d(0x%X), k=%d(0x%X)\n"
+ }
+ }
+ PrintStatusEnd();
+ PrintMessage(strings[S_Compl]); //"completed\r\n"
+//****************** verify EEPROM ********************
+ PrintMessage(strings[S_EEV]); //"Verify EEPROM ... "
+ if(saveLog) fprintf(logfile,"%s\n",strings[S_EEV]); //"Verify EEPROM ... "
+ PrintStatusSetup();
+ j=0;
+ bufferU[j++]=EXT_PORT; //CS=0, HLD=1, WP=0
+ bufferU[j++]=HLD;
+ bufferU[j++]=0;
+ bufferU[j++]=SPI_WRITE; //Read
+ if(dim>0x10000){ //24 bit address
+ bufferU[j++]=4;
+ bufferU[j++]=3;
+ bufferU[j++]=0;
+ bufferU[j++]=0;
+ bufferU[j++]=0;
+ }
+ else if(dim>0x200){ //16 bit address
+ bufferU[j++]=3;
+ bufferU[j++]=3;
+ bufferU[j++]=0;
+ bufferU[j++]=0;
+ }
+ else{ //8 bit address
+ bufferU[j++]=2;
+ bufferU[j++]=3;
+ bufferU[j++]=0;
+ }
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ int i0,k2,valid;
+ k=0;
+ for(i=0,j=0;i<dim;i+=DIMBUF-4){
+ if(options&0x1000){ //skip empty space if erase before write
+ i0=i;
+ for(valid=0;!valid&&i<dim;i+=valid?0:DIMBUF-4){ //skip verification if 0xFF
+ for(k2=0;k2<DIMBUF-4&&!valid&&i+k2<dim;k2++) if(memEE[i+k2]<0xFF) valid=1;
+ }
+ if(i>=dim) break;
+ if(i>i0){ //some data was skipped; update current address
+ j=0;
+ bufferU[j++]=EXT_PORT; //CS=1, HLD=1, WP=1
+ bufferU[j++]=CS+HLD;
+ bufferU[j++]=WP;
+ bufferU[j++]=EXT_PORT; //CS=0, HLD=1, WP=0
+ bufferU[j++]=HLD;
+ bufferU[j++]=0;
+ bufferU[j++]=SPI_WRITE; //Read
+ if(dim>0x10000){ //24 bit address
+ bufferU[j++]=4;
+ bufferU[j++]=3;
+ bufferU[j++]=i>>16;
+ bufferU[j++]=(i>>8)&0xFF;
+ bufferU[j++]=i&0xFF;
+ }
+ else if(dim>0x200){ //16 bit address
+ bufferU[j++]=3;
+ bufferU[j++]=3;
+ bufferU[j++]=i>>8;
+ bufferU[j++]=i&0xFF;
+ }
+ else{ //8 bit address
+ bufferU[j++]=2;
+ bufferU[j++]=3+(i&0x100?8:0);
+ bufferU[j++]=i&0xFF;
+ }
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ j=0;
+ }
+ }
+ bufferU[j++]=SPI_READ;
+ bufferU[j++]=i<dim-(DIMBUF-4)?DIMBUF-4:dim-i;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(4);
+ for(j=0;j<DIMBUF-1&&bufferI[j]!=SPI_READ;j++);
+ if(bufferI[j]==SPI_READ&&bufferI[j+1]<0xFA){
+ for(z=0;z<bufferI[j+1]&&z<DIMBUF;z++){
+ if(memEE[i+z]!=bufferI[z+j+2]){
+ PrintMessage4(strings[S_CodeVError],i+z,i+z,memEE[i+z],bufferI[z+3]); //"Error verifying address %04X (%d), written %02X, read %02X\r\n"
+ err++;
+ }
+ }
+ }
+ PrintStatus(strings[S_CodeV2],i*100/(dim),i); //"Verify: %d%%, addr. %04X"
+ if(RWstop) i=dim;
+ j=0;
+ if(saveLog){
+ fprintf(logfile,strings[S_Log8],i,i,k,k,err); //"i=%d, k=%d, err=%d\n"
+ }
+ if(err>=max_err) break;
+ }
+ PrintStatusEnd();
+ if(i<dim){
+ PrintMessage("\r\n");
+ PrintMessage2(strings[S_ReadEEErr],dim,i); //"Error reading EEPROM area, requested %d bytes, read %d\r\n"
+ }
+ PrintMessage1(strings[S_ComplErr],err); //"completed: %d errors\r\n"
+//****************** exit ********************
+ bufferU[j++]=EN_VPP_VCC;
+ bufferU[j++]=0x0;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ unsigned int stop=GetTickCount();
+ PrintStatusClear();
+ sprintf(str,strings[S_EndErr],(stop-start)/1000.0,err,err!=1?strings[S_ErrPlur]:strings[S_ErrSing]); //"\r\nEnd (%.2f s) %d %s\r\n\r\n"
+ PrintMessage(str);
+ if(saveLog){
+ fprintf(logfile,str);
+ CloseLogFile();
+ }
+}
+
+struct ID_OW{
+ int id;
+ char *device;
+} OW_LIST[]={
+ {0x10,"DS1820\r\n"},
+ {0x14,"DS2430\r\n"},
+ {0x23,"DS2433\r\n"},
+ {0x28,"DS18B20\r\n"},
+ {0x2D,"DS2431\r\n"},
+ {0x43,"DS28EC20\r\n"},
+};
+
+void OW_ID(int id)
+{
+ char s[64];
+ int i;
+ for(i=0;i<sizeof(OW_LIST)/sizeof(OW_LIST[0]);i++){
+ if(id==OW_LIST[i].id){
+ sprintf(s,OW_LIST[i].device,id);
+ PrintMessage(s);
+ return;
+ }
+ }
+ sprintf(s,"%s",strings[S_nodev]); //"Unknown device\r\n");
+ PrintMessage(s);
+}
+
+#define READ_ROM 0x33
+#define MATCH_ROM 0x55
+#define SKIP_ROM 0xCC
+#define SEARCH_ROM 0xF0
+#define WRITE_SCRATCHPAD 0x0F
+#define READ_SCRATCHPAD 0xAA
+#define COPY_SCRATCHPAD 0x55
+#define READ_MEMORY 0xF0
+#define WRITE_APP_REGISTER 0x99
+#define READ_STAT_REGISTER 0x66
+#define READ_APP_REGISTER 0xC3
+#define COPY_LOCK_APP_REGISTER 0x5A
+
+void ReadOneWireMem(int dim,int options)
+// read OneWire memories
+// dim=size in bytes
+// options:
+// 1=status register + application register
+// 2=protection bytes + ID after memory area
+{
+ int k=0,z=0,i,j;
+ hvreg=0;
+ if(FWVersion<0x800){
+ PrintMessage1(strings[S_FWver2old],"0.8.0"); //"This firmware is too old. Version %s is required\r\n"
+ return;
+ }
+ if(dim>0x10000||dim<0){
+ PrintMessage(strings[S_EELim]); //"EEPROM size out of limits\r\n"
+ return;
+ }
+ if(saveLog){
+ OpenLogFile(); //"Log.txt"
+ fprintf(logfile,"ReadOneWireMem(%d) (0x%X)\n",dim,dim);
+ }
+ sizeEE=dim;
+ if(memEE) free(memEE);
+ memEE=(unsigned char*)malloc(dim); //EEPROM
+ unsigned int start=GetTickCount();
+ j=0;
+ bufferU[j++]=VREG_DIS;
+ bufferU[j++]=uW_INIT; //set RB1=0 to use as GND terminal beside RB0
+ bufferU[j++]=EN_VPP_VCC; //VDD
+ bufferU[j++]=0x1;
+ bufferU[j++]=WAIT_T3;
+ bufferU[j++]=OW_RESET;
+ bufferU[j++]=OW_WRITE;
+ bufferU[j++]=1;
+ bufferU[j++]=READ_ROM;
+ bufferU[j++]=OW_READ;
+ bufferU[j++]=8;
+ if(dim<=32){ //1 byte address
+ bufferU[j++]=OW_WRITE;
+ bufferU[j++]=2;
+ bufferU[j++]=READ_MEMORY;
+ bufferU[j++]=0; //address
+ }
+ else{ //2 byte address
+ bufferU[j++]=OW_WRITE;
+ bufferU[j++]=3;
+ bufferU[j++]=READ_MEMORY;
+ bufferU[j++]=0; //address
+ bufferU[j++]=0; //address
+ }
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(12);
+ j=0;
+ for(z=0;bufferI[z]!=OW_RESET&&z<DIMBUF;z++);
+ if(bufferI[z]==OW_RESET&&bufferI[z+1]==0){ //no presence pulse
+ PrintMessage(strings[S_ComErr]); //communication error
+ bufferU[j++]=EN_VPP_VCC; //turn off
+ bufferU[j++]=0x0;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ return;
+ }
+ for(;bufferI[z]!=OW_READ&&z<DIMBUF;z++);
+ if(bufferI[z]==OW_READ&&z<DIMBUF-9){
+ PrintMessage1("Family code: 0x%02X ",bufferI[z+2]);
+ OW_ID(bufferI[z+2]);
+ PrintMessage3("Serial ID: 0x%02X%02X%02X",bufferI[z+3],bufferI[z+4],bufferI[z+5]);
+ PrintMessage3("%02X%02X%02X",bufferI[z+6],bufferI[z+7],bufferI[z+8]);
+ PrintMessage1("\r\nCRC: 0x%02X\r\n",bufferI[z+9]);
+ }
+//****************** read ********************
+ PrintStatusSetup();
+ for(i=0,j=0;i<dim;i+=DIMBUF-4){
+ bufferU[j++]=OW_READ;
+ bufferU[j++]=i<dim-(DIMBUF-4)?DIMBUF-4:dim-i;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(37);
+ for(j=0;bufferI[j]!=OW_READ&&j<DIMBUF;j++);
+ if(bufferI[j]==OW_READ&&bufferI[j+1]<0xFA){
+ for(z=j+2;z<j+2+bufferI[j+1]&&z<DIMBUF;z++) memEE[k++]=bufferI[z];
+ }
+ PrintStatus(strings[S_CodeReading2],i*100/(dim),i); //"Read: %d%%, addr. %05X"
+ if(RWstop) i=dim;
+ j=0;
+ if(saveLog){
+ fprintf(logfile,strings[S_Log7],i,i,k,k); //"i=%d(0x%X), k=%d(0x%X) \n"
+ }
+ }
+ if(options==1){ //read status register + application register
+ bufferU[j++]=OW_RESET;
+ bufferU[j++]=OW_WRITE;
+ bufferU[j++]=3;
+ bufferU[j++]=SKIP_ROM;
+ bufferU[j++]=READ_STAT_REGISTER;
+ bufferU[j++]=0;
+ bufferU[j++]=OW_READ;
+ bufferU[j++]=1;
+ bufferU[j++]=OW_RESET;
+ bufferU[j++]=OW_WRITE;
+ bufferU[j++]=3;
+ bufferU[j++]=SKIP_ROM;
+ bufferU[j++]=READ_APP_REGISTER;
+ bufferU[j++]=0;
+ bufferU[j++]=OW_READ;
+ bufferU[j++]=8;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(15);
+ j=0;
+ for(z=0;bufferI[z]!=OW_READ&&z<DIMBUF-2;z++);
+ if(z<DIMBUF-2) PrintMessage1("Status register: 0x%02X\r\n",bufferI[z+2]);
+ for(z+=2;bufferI[z]!=OW_READ&&z<DIMBUF-10;z++);
+ PrintMessage("Application register: 0x");
+ for(i=z+2;i<z+10&&i<DIMBUF;i++) PrintMessage1("%02X",bufferI[i]);
+ PrintMessage("\r\n");
+ }
+ else if(options==2){ //read protection & ID bytes
+ bufferU[j++]=OW_READ;
+ if(dim==0xA00) bufferU[j++]=0x24;
+ else bufferU[j++]=8;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(25);
+ j=0;
+ for(z=0;bufferI[z]!=OW_READ&&z<DIMBUF-2;z++);
+ if(bufferI[z]==OW_READ&&bufferI[z+1]<0xFA){
+ if(dim==0xA00){
+ for(i=0;i<10;i++) PrintMessage2("Protection Control Byte Block %d: 0x%02X\r\n",i,bufferI[z+2+i]);
+ PrintMessage("User EEPROM:\r\n");
+ for(i=0;i<10;i++) PrintMessage1("%02X",bufferI[z+2+i+10]);
+ PrintMessage("\r\n");
+ for(i=0;i<10;i++) PrintMessage1("%02X",bufferI[z+2+i+20]);
+ PrintMessage1("\r\nMemory Block Lock: 0x%02X\r\n",bufferI[z+2+30]);
+ PrintMessage1("Register Page Lock: 0x%02X\r\n",bufferI[z+2+31]);
+ PrintMessage1("Factory Byte: 0x%02X\r\n",bufferI[z+2+32]);
+ PrintMessage2("Factory Trim Bytes: 0x%02X%02X\r\n",bufferI[z+2+33],bufferI[z+2+34]);
+ PrintMessage2("Manufacturer ID: 0x%02X%02X\r\n",bufferI[z+2+35],bufferI[z+2+36]);
+ }
+ else{
+ PrintMessage1("Protection Control Byte Page 0: 0x%02X\r\n",bufferI[z+2]);
+ PrintMessage1("Protection Control Byte Page 1: 0x%02X\r\n",bufferI[z+2+1]);
+ PrintMessage1("Protection Control Byte Page 2: 0x%02X\r\n",bufferI[z+2+2]);
+ PrintMessage1("Protection Control Byte Page 3: 0x%02X\r\n",bufferI[z+2+3]);
+ PrintMessage1("Copy Protection Byte: 0x%02X\r\n",bufferI[z+2+4]);
+ PrintMessage1("Factory Byte: 0x%02X\r\n",bufferI[z+2+5]);
+ PrintMessage2("User Bytes/Manufacturer ID: 0x%02X%02X\r\n",bufferI[z+2+6],bufferI[z+2+7]);
+ }
+ }
+ }
+ PrintStatusEnd();
+ if(k!=dim){
+ PrintMessage("\r\n");
+ PrintMessage2(strings[S_ReadEEErr],dim,k); //"Error reading EEPROM area, requested %d bytes, read %d\r\n"
+ sizeEE=k;
+ }
+//****************** exit ********************
+ bufferU[j++]=EN_VPP_VCC; //turn off
+ bufferU[j++]=0x0;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ unsigned int stop=GetTickCount();
+ PrintStatusClear();
+ DisplayEE(); //visualize
+ int sum=0;
+ for(i=0;i<sizeEE;i++) sum+=memEE[i];
+ PrintMessage1("Checksum: 0x%X\r\n",sum&0xFFFF);
+ sprintf(str,strings[S_End],(stop-start)/1000.0); //"\r\nEnd (%.2f s)\r\n"
+ PrintMessage(str);
+ if(saveLog){
+ fprintf(logfile,str);
+ CloseLogFile();
+ }
+}
+
+void WriteOneWireMem(int dim,int options)
+// write OneWire memories
+// dim=size in bytes
+// options:
+// 0 = 8 byte scratchpad
+// 1 = 32 byte scratchpad
+{
+ int k=0,z=0,i,j;
+ int err=0;
+ hvreg=0;
+ if(FWVersion<0x800){
+ PrintMessage1(strings[S_FWver2old],"0.8.0"); //"This firmware is too old. Version %s is required\r\n"
+ return;
+ }
+ if(dim>0x10000||dim<0){
+ PrintMessage(strings[S_EELim]); //"EEPROM size out of limits\r\n"
+ return;
+ }
+ if(saveLog){
+ OpenLogFile(); //"Log.txt"
+ fprintf(logfile,"WriteOneWireMem(%d,%d) (0x%X,0x%X)\n",dim,options,dim,options);
+ }
+ if(dim>sizeEE){
+ i=sizeEE;
+ memEE=(unsigned char*)realloc(memEE,dim);
+ for(;i<dim;i++) memEE[i]=0xFF;
+ sizeEE=dim;
+ }
+ if(dim<1){
+ PrintMessage(strings[S_NoCode]); //"Data area is empty\r\n"
+ return;
+ }
+ unsigned int start=GetTickCount();
+ j=0;
+ bufferU[j++]=VREG_DIS;
+ bufferU[j++]=uW_INIT; //set RB1=0 to use as GND terminal beside RB0
+ bufferU[j++]=EN_VPP_VCC; //VDD
+ bufferU[j++]=0x1;
+ bufferU[j++]=WAIT_T3;
+ bufferU[j++]=OW_RESET;
+ bufferU[j++]=OW_WRITE;
+ bufferU[j++]=1;
+ bufferU[j++]=READ_ROM;
+ bufferU[j++]=OW_READ;
+ bufferU[j++]=8;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(12);
+ j=0;
+ for(z=0;bufferI[z]!=OW_RESET&&z<DIMBUF;z++);
+ if(bufferI[z]==OW_RESET&&bufferI[z+1]==0){ //no presence pulse
+ PrintMessage(strings[S_ComErr]); //communication error
+ bufferU[j++]=EN_VPP_VCC; //turn off
+ bufferU[j++]=0x0;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ j=0;
+ if(saveLog) CloseLogFile();
+ return;
+ }
+ for(z=0;bufferI[z]!=OW_READ&&z<DIMBUF;z++);
+ if(bufferI[z]==OW_READ){
+ PrintMessage1("Family code: 0x%02X ",bufferI[z+2]);
+ OW_ID(bufferI[z+2]);
+ PrintMessage3("Serial ID: 0x%02X%02X%02X",bufferI[z+3],bufferI[z+4],bufferI[z+5]);
+ PrintMessage3("%02X%02X%02X",bufferI[z+6],bufferI[z+7],bufferI[z+8]);
+ PrintMessage1("\r\nCRC: 0x%02X\r\n",bufferI[z+9]);
+ }
+//****************** write ********************
+ PrintMessage(strings[S_EEAreaW]); //"Write EEPROM ... "
+ int page=options==0?8:32;
+ for(i=0,j=0;i<dim;i+=page){
+ bufferU[j++]=OW_RESET;
+ bufferU[j++]=OW_WRITE;
+ bufferU[j++]=page+(dim<=32?3:4);
+ bufferU[j++]=SKIP_ROM;
+ bufferU[j++]=WRITE_SCRATCHPAD;
+ bufferU[j++]=i&0xFF;
+ if(dim>32) bufferU[j++]=i>>8;
+ for(k=0;k<page;k++) bufferU[j++]=memEE[i+k];
+ bufferU[j++]=OW_RESET;
+ bufferU[j++]=OW_WRITE;
+ bufferU[j++]=dim<=32?3:5;
+ bufferU[j++]=SKIP_ROM;
+ bufferU[j++]=COPY_SCRATCHPAD;
+ if(dim<=32) bufferU[j++]=0xA5;
+ else{
+ bufferU[j++]=i&0xFF;
+ bufferU[j++]=i>>8;
+ bufferU[j++]=page-1;
+ }
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(6+0.8*page);
+ msDelay(10); //TPROG
+ j=0;
+ PrintStatus(strings[S_CodeWriting2],i*100/(dim),i); //"Write: %d%%, addr. %04X"
+ if(RWstop) i=dim;
+ if(saveLog){
+ fprintf(logfile,strings[S_Log7],i,i,0,0); //"i=%d(0x%X), k=%d(0x%X)\n"
+ }
+ }
+ PrintStatusEnd();
+ PrintMessage(strings[S_Compl]); //"completed\r\n"
+//****************** verify EEPROM ********************
+ PrintMessage(strings[S_EEV]); //"Verify EEPROM ... "
+ if(saveLog) fprintf(logfile,"%s\n",strings[S_EEV]); //"Verify EEPROM ... "
+ PrintStatusSetup();
+ k=0;
+ bufferU[j++]=OW_RESET;
+ bufferU[j++]=OW_WRITE;
+ bufferU[j++]=1;
+ bufferU[j++]=SKIP_ROM;
+ if(dim<=32){ //1 byte address
+ bufferU[j++]=OW_WRITE;
+ bufferU[j++]=2;
+ bufferU[j++]=READ_MEMORY;
+ bufferU[j++]=0; //address
+ }
+ else{ //2 byte address
+ bufferU[j++]=OW_WRITE;
+ bufferU[j++]=3;
+ bufferU[j++]=READ_MEMORY;
+ bufferU[j++]=0; //address
+ bufferU[j++]=0; //address
+ }
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(10);
+ j=0;
+ for(i=0,j=0;i<dim;i+=DIMBUF-4){
+ bufferU[j++]=OW_READ;
+ bufferU[j++]=i<dim-(DIMBUF-4)?DIMBUF-4:dim-i;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(37);
+ for(j=0;bufferI[j]!=OW_READ&&j<DIMBUF;j++);
+ if(bufferI[j]==OW_READ&&bufferI[j+1]<0xFA){
+ for(z=j+2;z<j+2+bufferI[j+1]&&z<DIMBUF;z++){
+ if(memEE[k++]!=bufferI[z]){
+ PrintMessage("\r\n");
+ PrintMessage4(strings[S_CodeVError],i+z-(j+2),i+z-(j+2),memEE[k-1],bufferI[z]); //"Error verifying address %04X (%d), written %02X, read %02X\r\n"
+ err++;
+ }
+ }
+ }
+ PrintStatus(strings[S_CodeV2],i*100/(dim),i); //"Verify: %d%%, addr. %04X"
+ if(RWstop) i=dim;
+ j=0;
+ if(saveLog){
+ fprintf(logfile,strings[S_Log8],i,i,k,k,err); //"i=%d, k=%d, err=%d\n"
+ }
+ if(err>=max_err) break;
+ }
+ PrintStatusEnd();
+ if(k!=dim){
+ PrintMessage("\r\n");
+ PrintMessage2(strings[S_ReadEEErr],dim,k); //"Error reading EEPROM area, requested %d bytes, read %d\r\n"
+ sizeEE=k;
+ }
+ PrintMessage1(strings[S_ComplErr],err); //"completed: %d errors\r\n"
+//****************** exit ********************
+ bufferU[j++]=EN_VPP_VCC; //turn off
+ bufferU[j++]=0x0;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ unsigned int stop=GetTickCount();
+ PrintStatusClear();
+ sprintf(str,strings[S_EndErr],(stop-start)/1000.0,err,err!=1?strings[S_ErrPlur]:strings[S_ErrSing]); //"\r\nEnd (%.2f s) %d %s\r\n\r\n"
+ PrintMessage(str);
+ if(saveLog){
+ fprintf(logfile,str);
+ CloseLogFile();
+ }
+}
+
+#define READ_SCRATCHPAD2 0xBE
+#define CONVERT_TEMP 0x44
+#define RECALL_EE 0xB8
+#define READ_PWSUP 0xB4
+
+void ReadDS1820()
+// read DS1820 one-wire digital thermometer
+{
+ int z=0,j;
+ double TLSB=0.5;
+ hvreg=0;
+ if(FWVersion<0x800){
+ PrintMessage1(strings[S_FWver2old],"0.8.0"); //"This firmware is too old. Version %s is required\r\n"
+ return;
+ }
+ if(saveLog){
+ OpenLogFile(); //"Log.txt"
+ fprintf(logfile,"ReadDS1820()\n");
+ }
+ unsigned int start=GetTickCount();
+ j=0;
+ bufferU[j++]=VREG_DIS;
+ bufferU[j++]=uW_INIT; //set RB1=0 to use as GND terminal beside RB0
+ bufferU[j++]=EN_VPP_VCC; //VDD
+ bufferU[j++]=0x1;
+ bufferU[j++]=WAIT_T3;
+ bufferU[j++]=OW_RESET;
+ bufferU[j++]=OW_WRITE;
+ bufferU[j++]=1;
+ bufferU[j++]=READ_ROM;
+ bufferU[j++]=OW_READ;
+ bufferU[j++]=8;
+ bufferU[j++]=OW_RESET;
+ bufferU[j++]=OW_WRITE;
+ bufferU[j++]=2;
+ bufferU[j++]=SKIP_ROM;
+ bufferU[j++]=CONVERT_TEMP;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(16);
+ j=0;
+ for(z=0;bufferI[z]!=OW_RESET&&z<DIMBUF;z++);
+ if(bufferI[z]==OW_RESET&&bufferI[z+1]==0){ //no presence pulse
+ PrintMessage(strings[S_ComErr]); //communication error
+ bufferU[j++]=EN_VPP_VCC; //turn off
+ bufferU[j++]=0x0;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ if(saveLog) CloseLogFile();
+ return;
+ }
+ for(z=0;bufferI[z]!=OW_READ&&z<DIMBUF;z++);
+ if(z<DIMBUF-9){
+ PrintMessage1("Family code: 0x%02X ",bufferI[z+2]);
+ OW_ID(bufferI[z+2]);
+ if(bufferI[z+2]==0x10) TLSB=0.5; //DS1820
+ else if(bufferI[z+2]==0x28) TLSB=0.0625; //DS18B20
+ PrintMessage3("Serial ID: 0x%02X%02X%02X",bufferI[z+3],bufferI[z+4],bufferI[z+5]);
+ PrintMessage3("%02X%02X%02X",bufferI[z+6],bufferI[z+7],bufferI[z+8]);
+ PrintMessage1("\r\nCRC: 0x%02X\r\n",bufferI[z+9]);
+ }
+//****************** read ********************
+ msDelay(800);
+ bufferU[j++]=OW_RESET;
+ bufferU[j++]=OW_WRITE;
+ bufferU[j++]=2;
+ bufferU[j++]=SKIP_ROM;
+ bufferU[j++]=READ_SCRATCHPAD2;
+ bufferU[j++]=OW_READ;
+ bufferU[j++]=8;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(10);
+ j=0;
+ for(z=0;bufferI[z]!=OW_READ&&z<DIMBUF-2;z++);
+ //PrintMessage("0x");
+ //for(i=z+2;i<z+10&&i<DIMBUF;i++) PrintMessage1("%02X",bufferI[i]);
+ //PrintMessage("\r\n");
+ int T=bufferI[z+2]+(bufferI[z+3]<<8);
+ if(T>0xF000) T|=0xFFFF0000; //adjust negative value
+#ifdef _MSC_VER
+ PrintMessage2("T=%.4f°C (0x%04X)\r\n",T*TLSB,T);
+#else
+ PrintMessage2("T=%.4f°C (0x%04X)\r\n",T*TLSB,T);
+#endif
+//****************** exit ********************
+ bufferU[j++]=EN_VPP_VCC; //turn off
+ bufferU[j++]=0x0;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ unsigned int stop=GetTickCount();
+ sprintf(str,strings[S_End],(stop-start)/1000.0); //"\r\nEnd (%.2f s)\r\n"
+ PrintMessage(str);
+ if(saveLog){
+ fprintf(logfile,str);
+ CloseLogFile();
+ }
+}
+
+
+#define UNIO_READ 0x03
+#define UNIO_CRRD 0x06
+#define UNIO_WRITE 0x6C
+#define UNIO_WREN 0x96
+#define UNIO_WRDI 0x91
+#define UNIO_RDSR 0x05
+#define UNIO_WRSR 0x6E
+#define UNIO_ERAL 0x6D
+#define UNIO_SETAL 0x67
+
+void Read11xx(int dim)
+// read 11xx UNIO memories
+// dim=size in bytes
+{
+ int k=0,z=0,i,j;
+ hvreg=0;
+ if(FWVersion<0x800){
+ PrintMessage1(strings[S_FWver2old],"0.8.0"); //"This firmware is too old. Version %s is required\r\n"
+ return;
+ }
+ if(dim>=0x10000||dim<0){
+ PrintMessage(strings[S_EELim]); //"EEPROM size out of limits\r\n"
+ return;
+ }
+ if(saveLog){
+ OpenLogFile(); //"Log.txt"
+ fprintf(logfile,"Read11xx(%d) (0x%X)\n",dim,dim);
+ }
+ sizeEE=dim;
+ if(memEE) free(memEE);
+ memEE=(unsigned char*)malloc(dim); //EEPROM
+ unsigned int start=GetTickCount();
+ j=0;
+ bufferU[j++]=VREG_DIS;
+ bufferU[j++]=EN_VPP_VCC; //VDD
+ bufferU[j++]=0x1;
+ bufferU[j++]=WAIT_T3;
+ bufferU[j++]=UNIO_COM;
+ bufferU[j++]=2; //write x bytes
+ bufferU[j++]=1; //read x bytes
+ bufferU[j++]=0xA0;
+ bufferU[j++]=UNIO_RDSR;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(5);
+//****************** read ********************
+ PrintMessage(strings[S_ReadEE]); //read EEPROM ...
+ PrintStatusSetup();
+ for(i=0,j=0;i<dim;i+=DIMBUF-5){
+ bufferU[j++]=UNIO_COM;
+ bufferU[j++]=4; //write x bytes
+ bufferU[j++]=i<dim-(DIMBUF-5)?DIMBUF-5:dim-i; //read x bytes
+ bufferU[j++]=0xA0;
+ bufferU[j++]=UNIO_READ;
+ bufferU[j++]=i>>8;
+ bufferU[j++]=i&0xFF;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(14);
+ for(j=0;j<DIMBUF-1&&bufferI[j]!=UNIO_COM;j++);
+ if(bufferI[j]==UNIO_COM&&bufferI[j+1]<0xFA){
+ for(z=j+2;z<j+2+bufferI[j+1]&&z<DIMBUF;z++) memEE[k++]=bufferI[z];
+ }
+ PrintStatus(strings[S_CodeReading2],i*100/(dim),i); //"Read: %d%%, addr. %05X"
+ if(RWstop) i=dim;
+ j=0;
+ if(saveLog){
+ fprintf(logfile,strings[S_Log7],i,i,k,k); //"i=%d(0x%X), k=%d(0x%X) \n"
+ }
+ }
+ PrintStatusEnd();
+ if(k!=dim){
+ PrintMessage("\r\n");
+ PrintMessage2(strings[S_ReadEEErr],dim,k); //"Error reading EEPROM area, requested %d bytes, read %d\r\n"
+ sizeEE=k;
+ }
+ else PrintMessage(strings[S_Compl]);
+//****************** exit ********************
+ bufferU[j++]=EN_VPP_VCC;
+ bufferU[j++]=0x0;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ unsigned int stop=GetTickCount();
+ PrintStatusClear();
+ DisplayEE(); //visualize
+ int sum=0;
+ for(i=0;i<sizeEE;i++) sum+=memEE[i];
+ PrintMessage1("Checksum: 0x%X\r\n",sum&0xFFFF);
+ sprintf(str,strings[S_End],(stop-start)/1000.0); //"\r\nEnd (%.2f s)\r\n"
+ PrintMessage(str);
+ if(saveLog){
+ fprintf(logfile,str);
+ CloseLogFile();
+ }
+}
+
+void Write11xx(int dim,int page)
+// write 11xx UNIO memories
+// dim=size in bytes
+// page=page size
+{
+ int k=0,z=0,i,j;
+ int err=0;
+ if(FWVersion<0x800){
+ PrintMessage1(strings[S_FWver2old],"0.8.0"); //"This firmware is too old. Version %s is required\r\n"
+ return;
+ }
+ hvreg=0;
+ if(dim>=0x10000||dim<0){
+ PrintMessage(strings[S_EELim]); //"EEPROM size out of limits\r\n"
+ return;
+ }
+ if(saveLog){
+ OpenLogFile(); //"Log.txt"
+ fprintf(logfile,"Write11xx(%d,%d) (0x%X,0x%X)\n",dim,page,dim,page);
+ }
+ if(dim>sizeEE){
+ i=sizeEE;
+ memEE=(unsigned char*)realloc(memEE,dim);
+ for(;i<dim;i++) memEE[i]=0xFF;
+ sizeEE=dim;
+ }
+ if(dim<1){
+ PrintMessage(strings[S_NoCode]); //"Data area is empty\r\n"
+ return;
+ }
+ unsigned int start=GetTickCount();
+ j=0;
+ bufferU[j++]=VREG_DIS;
+ bufferU[j++]=EN_VPP_VCC; //VDD
+ bufferU[j++]=0x1;
+ bufferU[j++]=WAIT_T3;
+ bufferU[j++]=UNIO_STBY;
+ bufferU[j++]=UNIO_COM;
+ bufferU[j++]=2; //write x bytes
+ bufferU[j++]=0; //read x bytes
+ bufferU[j++]=0xA0;
+ bufferU[j++]=UNIO_WREN;
+ bufferU[j++]=UNIO_COM;
+ bufferU[j++]=2; //write x bytes
+ bufferU[j++]=1; //read x bytes
+ bufferU[j++]=0xA0;
+ bufferU[j++]=UNIO_RDSR;
+ bufferU[j++]=UNIO_COM;
+ bufferU[j++]=3; //write x bytes
+ bufferU[j++]=0; //read x bytes
+ bufferU[j++]=0xA0;
+ bufferU[j++]=UNIO_WRSR;
+ bufferU[j++]=0;
+ bufferU[j++]=WAIT_T3;
+ bufferU[j++]=WAIT_T3;
+ bufferU[j++]=WAIT_T3;
+ bufferU[j++]=WAIT_T3;
+ bufferU[j++]=WAIT_T3;
+ bufferU[j++]=UNIO_COM;
+ bufferU[j++]=2; //write x bytes
+ bufferU[j++]=1; //read x bytes
+ bufferU[j++]=0xA0;
+ bufferU[j++]=UNIO_RDSR;
+ bufferU[j++]=UNIO_COM;
+ bufferU[j++]=2; //write x bytes
+ bufferU[j++]=0; //read x bytes
+ bufferU[j++]=0xA0;
+ bufferU[j++]=UNIO_WREN;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(25);
+//****************** write ********************
+ PrintMessage(strings[S_EEAreaW]); //"Write EEPROM ... "
+ PrintStatusSetup();
+ for(;page>=DIMBUF-8;page>>=1);
+ for(i=0,j=0;i<dim;i+=page){
+ bufferU[j++]=UNIO_COM;
+ bufferU[j++]=4+page; //write x bytes
+ bufferU[j++]=0; //read x bytes
+ bufferU[j++]=0xA0;
+ bufferU[j++]=UNIO_WRITE;
+ bufferU[j++]=i>>8;
+ bufferU[j++]=i&0xFF;
+ for(k=0;k<page;k++) bufferU[j++]=memEE[i+k];
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO((5+page)*0.2+2);
+ for(j=0;j<DIMBUF-1&&bufferI[j]!=UNIO_COM;j++);
+ if(bufferI[j]!=UNIO_COM||bufferI[j+1]>=0xFA) i=dim+10;
+ PrintStatus(strings[S_CodeWriting2],i*100/(dim),i); //"Write: %d%%, addr. %04X"
+ if(RWstop) i=dim;
+ j=0;
+ if(saveLog){
+ fprintf(logfile,strings[S_Log7],i,i,k,k); //"i=%d(0x%X), k=%d(0x%X)\n"
+ }
+ bufferU[j++]=UNIO_COM;
+ bufferU[j++]=2; //write x bytes
+ bufferU[j++]=1; //read x bytes
+ bufferU[j++]=0xA0;
+ bufferU[j++]=UNIO_RDSR;
+ bufferU[j++]=UNIO_COM;
+ bufferU[j++]=2; //write x bytes
+ bufferU[j++]=0; //read x bytes
+ bufferU[j++]=0xA0;
+ bufferU[j++]=UNIO_WREN;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ int status=1;
+ for(k=0;status&&k<20;k++){ //status polling until write complete
+ PacketIO(2);
+ for(j=0;j<DIMBUF-1&&bufferI[j]!=UNIO_COM;j++);
+ if(bufferI[j]==UNIO_COM) status=bufferI[j+2]&1;
+ }
+ j=0;
+ }
+ PrintStatusEnd();
+ PrintMessage(strings[S_Compl]); //"completed\r\n"
+//****************** verify EEPROM ********************
+ PrintMessage(strings[S_EEV]); //"Verify EEPROM ... "
+ PrintStatusSetup();
+ k=0;
+ for(i=0,j=0;i<dim;i+=DIMBUF-4){
+ bufferU[j++]=UNIO_COM;
+ bufferU[j++]=4; //write x bytes
+ bufferU[j++]=i<dim-(DIMBUF-4)?DIMBUF-4:dim-i; //read x bytes
+ bufferU[j++]=0xA0;
+ bufferU[j++]=UNIO_READ;
+ bufferU[j++]=i>>8;
+ bufferU[j++]=i&0xFF;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(14);
+ for(j=0;j<DIMBUF-1&&bufferI[j]!=UNIO_COM;j++);
+ if(bufferI[j]==UNIO_COM&&bufferI[j+1]<0xFA){
+ for(z=j+2;z<j+2+bufferI[j+1]&&z<DIMBUF;z++){
+ if(memEE[k++]!=bufferI[z]){
+ PrintMessage("\r\n");
+ PrintMessage4(strings[S_CodeVError],i+z-3,i+z-3,memEE[k-1],bufferI[z]); //"Error verifying address %04X (%d), written %02X, read %02X\r\n"
+ err++;
+ }
+ }
+ }
+ PrintStatus(strings[S_CodeV2],i*100/(dim),i); //"Verify: %d%%, addr. %04X"
+ if(RWstop) i=dim;
+ j=0;
+ if(saveLog){
+ fprintf(logfile,strings[S_Log8],i,i,k,k,err); //"i=%d, k=%d, err=%d\n"
+ }
+ if(err>=max_err) break;
+ }
+ PrintStatusEnd();
+ if(k!=dim){
+ PrintMessage("\r\n");
+ PrintMessage2(strings[S_ReadEEErr],dim,k); //"Error reading EEPROM area, requested %d bytes, read %d\r\n"
+ }
+ PrintMessage1(strings[S_ComplErr],err); //"completed: %d errors\r\n"
+//****************** exit ********************
+ bufferU[j++]=EN_VPP_VCC;
+ bufferU[j++]=0x0;
+ bufferU[j++]=FLUSH;
+ for(;j<DIMBUF;j++) bufferU[j]=0x0;
+ PacketIO(2);
+ unsigned int stop=GetTickCount();
+ PrintStatusClear();
+ sprintf(str,strings[S_EndErr],(stop-start)/1000.0,err,err!=1?strings[S_ErrPlur]:strings[S_ErrSing]); //"\r\nEnd (%.2f s) %d %s\r\n\r\n"
+ PrintMessage(str);
+ if(saveLog){
+ fprintf(logfile,str);
+ CloseLogFile();
+ }
+}
generated by cgit v1.2.3-54-g00ecf (git 2.39.0) at 2024-09-16 22:00:30 +0200