/* ------------------------------------------------------------------------ */ /* */ /* Control Access System 'C' Source File */ /* */ /* ------------------------------------------------------------------------ */ /* Author: Andrés Roldán Aranda */ /* ------------------------------------------------------------------------ */ // Source control directives for the C-51 Compiler #pragma ROM (LARGE) // The ROM directive is used to determine the size // of the program memory. The ROM directive effects // the codind of the jump instructions. #pragma small // This directive control de selection of the memory // model to be implemented. // SMALL: All variables and local data segments of // functions and procedures are defined to reside in the // internal data memory of the 8051 system. // Thus the access to data objects is very efficient. // A disadvantage of this model is the limited address // space. #pragma ot(5,SIZE) // The OPTIMIZE directive sets the optimizing level. // A highger optimizing level contains each proceding // lower optimizing level. // Opt=5 // Global Common Subexpresion-elimination: // Identical subexpressions within a function are // calculated only once, when possible. The intermediate // results are stored in a register and used instead of // a new calculation. // Simple Loop Optimizing: // Program loops that fill a memory range with a // constant are converted an optimized in the runtime // as a result. // SIZE. // Optimization emphasis is placed in code size. #include // 8052 register definition #include "def.h" // HW application register definition #define TIMER0_COUNT 0x0003 // Timer 0 load value //(10000h -((12.000.000 Hz / (12*Freq))-17 )) #define NUMdeDIG 4 // Code digits number #define ON 0 #define OFF 1 //*************************** Global Variables *************************** unsigned char APIL=1,LOC; //APIL=available numeric passwords //LOC EEPROM auxiliary password pointer char secuencia[NUMdeDIG]; //Entered Keypad password unsigned long int clave; //Auxiliary var. used in BCD-entered code conversion int clave_aux; //Variables used when an access code is stored in char clave_aux1,clave_aux2; //EEPROM int LSB; char MSB; unsigned int time,aux; //Dalay signaling var. Used in TIMER 0 interruption bit abit=0,modo_sup; //Supervisor mode signaling se usan para se¤alizar el modo supervisor bit alarm_puerta=ON; //An alarm is set if the door is opened for too much. //*************************** Extern Functions *************************** //From keypad module extern scan_teclado( void ); //Returns the key pressed extern enviar_columna( unsigned char dato ); // Used in supervisor mode test //From EEPROM module extern unsigned char mChip24LC04B_Read( unsigned char Address ); extern unsigned char mChip24LC04B_Write(unsigned char Address, unsigned char Dato); /************************ * TIMER 0 Setup * ************************/ void arranque_timer(void) { EA=0; // Disable all interrupt. TR0=0; // Paramos el tim TMOD &= ~0x0F; // Borramos los bits del timer0 TMOD |=0x01; // Ponemos el timer0 en contador de 16 bits TL0=(TIMER0_COUNT & 0x00FF); TH0=(TIMER0_COUNT >> 8); PT0=0; // Ponemos baja prioridad al timer0 ET0=1; // Habilitamos la posibilid de int_timer0 TR0=1; // Arrancamos el timer0 EA=1; // Habilitamos interrupciones } /***************************** * TIMER 0 INTER. * *****************************/ static void timer0_isr (void) interrupt 1 using 2 { TR0=0; // Stop timer 0 TL0= TL0 + (TIMER0_COUNT & 0x00FF); //Reload timer 0 LSB TH0= TH0 + (TIMER0_COUNT >> 8); //Reload timer 0 LSB TR0=1; // Start Timer 0 time++; if((modo_sup) & ((time%5)==0)) { LED_Yellow=abit; //Now supervisor mode is active LED_Green=abit; // LEDS are blinking LED_Red=abit; abit=~abit; } } /********************* * Delay procedure * *********************/ void delay(unsigned int retardo) { aux=time; while(time20) { alarm_puerta=OFF; break; }//if }//while } /********************************** * Steady state conditions setup * * in normal mode operation * **********************************/ void inicializar_sistema(void) { LED_Yellow=ON; // LED_Yellow=ON LED_Green=OFF; // LED_Green=OFF LED_Red=OFF; // LED_Red=OFF Door_opener_solenoid=OFF; // Door opener solenoid=OFF Buzzer=OFF; // Buzzer=OFF } /********************* * NEW EEPROM TEST * *********************/ bit test_actualizacion_eeprom() // If keys (#,*,8) are pressed { // all access codes are deleted // this is usefull when a new EPPROM // is used. aux=time; while(time> 8); //Access code MSB for(LOC=1;LOC4) //If access code has more than 4 digits { LSB=(clave & 0x0000FFFF); // The same as before MSB=(clave >> 16); clave_aux1=(LSB & 0x00FF); clave_aux2=(LSB >> 8); for(LOC=1;LOC> 8); //Access code MSB if(mChip24LC04B_Write(APIL,clave_aux1)) //If Access code LSB is written // in EEPROM whit no errors { // APIL is incremented. APIL++; if(mChip24LC04B_Write(APIL,clave_aux2)) { APIL++; return 1; } } return 0; //No update confitmation } if(NUMdeDIG>4) //If access code has more than 4 digits { LSB=(clave & 0x0000FFFF); // The same as before MSB=(clave >> 16); clave_aux1=(LSB & 0x00FF); clave_aux2=(LSB >> 8); if(mChip24LC04B_Write(APIL,clave_aux1)) { APIL++; if(mChip24LC04B_Write(APIL,clave_aux2)) { APIL++; if(mChip24LC04B_Write(APIL,MSB)) { APIL++; return 1; } } } return 0; } } /************************ * Delete an access code * ************************/ bit anulacion() //After code in entered, '*' key must be pressed to delete { unsigned int D; if(comprobar_acceso()) //Test if code==Access Code ? { //LOC=Code memory locaton if(NUMdeDIG<=4) //If access code has 4 digits { //Remove code and order the access codes in EEPROM for(D=LOC;D4) //If access code has more than 4 digits { for(D=LOC;D