/*-----------------------------------------------------------------------------------*/ void sec_arp_init(void) { uint8_t sum, i; uint8_t temp_buf[KEY_SIZE*3]; /* Read security data from Flash mem */ xmem_pread(temp_buf, (KEY_SIZE*3), MAC_SECURITY_DATA); /* Check if we have a network key */ sum = 0; for(i=KEY_SIZE; i>0; i--) {sum |= temp_buf[i-1];} if(!(sum)) { /* Init slip connection */ slip_arch_init(BAUD2UBR(115200)); PRINTF("sec-arp: Start slip process\n"); process_start(&slip_process, NULL); slip_set_input_callback(slip_input_callback); /* Send hello packet */ create_hello(); } else { PRINTF("sec-arp: Key OK\n"); #if DEBUG PRINTF("sec-arp: buf "); for(i=0; i<(KEY_SIZE*3); i++) PRINTF("%02x ", temp_buf[i]); PRINTF("\n"); #endif /* Set security data */ set_security_data(temp_buf); } }
/*---------------------------------------------------------------------------*/ void node_id_restore(void) { unsigned char buf[4]; xmem_pread(buf, 4, NODE_ID_XMEM_OFFSET); if(buf[0] == 0xad && buf[1] == 0xde) { node_id = (buf[2] << 8) | buf[3]; } else { node_id = 0; } }
/*---------------------------------------------------------------------------*/ int cfs_read(int f, void *buf, unsigned int len) { if(file.fileptr + len > CFS_XMEM_SIZE) { len = CFS_XMEM_SIZE - file.fileptr; } if(file.fileptr + len > file.filesize) { len = file.filesize - file.fileptr; } if(f == 1) { xmem_pread(buf, len, CFS_XMEM_OFFSET + file.fileptr); file.fileptr += len; return len; } else { return -1; } }
/*---------------------------------------------------------------------------*/ void key_flash_restore_keying_material(void *keying_material, uint16_t len, uint16_t offset) { xmem_pread(keying_material, len, KEY_FLASH_KEYING_MATERIAL_OFFSET + offset); }
/*---------------------------------------------------------------------------*/ int elfloader_load(off_t eepromaddr) { struct cle_info h; int ret; void (*elfloader_init)(void); elfloader_unknown[0] = 0; /* The ELF header is located at the start of the buffer. */ ret = cle_read_info(&h, xmem_pread, eepromaddr); if(ret != ELFLOADER_OK) { memcpy(elfloader_unknown, h.name, sizeof(elfloader_unknown)); elfloader_unknown[sizeof(elfloader_unknown) - 1] = 0; return ret; } if(datamemory != NULL) { free(datamemory); } /* We are making semi-permanent allocations, first compact heap! */ /* malloc_compact(); */ datamemory = malloc(IMAX(h.textsize, h.datasize + h.bsssize)); if(datamemory == NULL) { return ELFLOADER_DATA_TO_LARGE; /* XXX or text to large */ } h.data = datamemory; h.bss = datamemory + h.datasize; h.text = TEXTMEMORY; PRINTF("elfloader: copy text segment to RAM %p %p\n", h.data, h.data + h.textsize); ret = xmem_pread(datamemory, h.textsize, eepromaddr + h.textoff); assert(ret > 0); if(h.textrelasize > 0) { PRINTF("elfloader: relocate text in RAM\n"); ret = cle_relocate(&h, xmem_pread, eepromaddr, datamemory, h.textrelaoff, h.textrelasize); if(ret != ELFLOADER_OK) { memcpy(elfloader_unknown, h.name, sizeof(elfloader_unknown)); elfloader_unknown[sizeof(elfloader_unknown) - 1] = 0; return ret; } } PRINTF("elfloader: copy text segment to ROM 0x%lx 0x%lx\n", (unsigned long)h.text, (unsigned long)h.text + h.textsize); ret = rom_erase((h.textsize+ROM_ERASE_UNIT_SIZE) & ~(ROM_ERASE_UNIT_SIZE-1), h.text); assert(ret > 0); ret = rom_pwrite(datamemory, h.textsize, h.text); assert(ret > 0); PRINTF("elfloader: copy data segment to RAM %p %p\n", h.data, h.data + h.datasize); ret = xmem_pread(datamemory, h.datasize, eepromaddr + h.dataoff); assert(ret >= h.datasize); if(h.datarelasize > 0) { PRINTF("elfloader: relocate data segment\n"); ret = cle_relocate(&h, xmem_pread, eepromaddr, datamemory, h.datarelaoff, h.datarelasize); if(ret != ELFLOADER_OK) { memcpy(elfloader_unknown, h.name, sizeof(elfloader_unknown)); elfloader_unknown[sizeof(elfloader_unknown) - 1] = 0; return ret; } } PRINTF("elfloader: zero bss %p %p\n", h.bss, h.bss + h.bsssize); memset(h.bss, 0, h.bsssize); /* Find _init, _fini, and loaded_process. */ elfloader_loaded_process = cle_lookup(&h, xmem_pread, eepromaddr, "autostart_processes"); elfloader_fini = cle_lookup(&h, xmem_pread, eepromaddr, "_fini"); elfloader_init = cle_lookup(&h, xmem_pread, eepromaddr, "_init"); if(elfloader_init != NULL) { PRINTF("init=%p fini=%p\n", elfloader_init, elfloader_fini); (*elfloader_init)(); elfloader_loaded_process = NULL; return ELFLOADER_OK; } if(elfloader_loaded_process != NULL) { PRINTF("elfloader: launch program\n"); process_start(elfloader_loaded_process, NULL); elfloader_fini = NULL; return ELFLOADER_OK; } else { return ELFLOADER_NO_STARTPOINT; } }