Lorcan Smith
/
Enet_SPI
SNMP agent attached to SPI slave
main.cpp@0:2a53a4c3238c, 2012-08-13 (annotated)
- Committer:
- lorcansmith
- Date:
- Mon Aug 13 15:07:40 2012 +0000
- Revision:
- 0:2a53a4c3238c
- Child:
- 2:25e12a7fe0aa
v1.1 release includes ioAlarm traps
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
lorcansmith | 0:2a53a4c3238c | 1 | |
lorcansmith | 0:2a53a4c3238c | 2 | /* |
lorcansmith | 0:2a53a4c3238c | 3 | Generated: Enet_SPI_LPC1768.bin |
lorcansmith | 0:2a53a4c3238c | 4 | |
lorcansmith | 0:2a53a4c3238c | 5 | mbed test software for Ethernet HTTPServer with simultaneous SPI for 4 data byte updates |
lorcansmith | 0:2a53a4c3238c | 6 | |
lorcansmith | 0:2a53a4c3238c | 7 | Send serial message via USB every 1.0 second tick |
lorcansmith | 0:2a53a4c3238c | 8 | Version Date Author Change |
lorcansmith | 0:2a53a4c3238c | 9 | 0.2: 06/10/11 LS Add block checksum character to SPI data |
lorcansmith | 0:2a53a4c3238c | 10 | 0.3: 07/10/11 LS Add SPI read from cmd_buf |
lorcansmith | 0:2a53a4c3238c | 11 | 0.4: 13/10/11 LS Integrated with HTTP server example code |
lorcansmith | 0:2a53a4c3238c | 12 | 0.5: 18/10/11 LS Initial file handling |
lorcansmith | 0:2a53a4c3238c | 13 | 0.6: 26/10/11 LS File IO handled by SPI_server class |
lorcansmith | 0:2a53a4c3238c | 14 | 0.64: 04/11/11 LS RPC bodge added as part of HTTP file handling: |
lorcansmith | 0:2a53a4c3238c | 15 | 0.66: 04/11/11 LS Show register values as hex bytes as well as word value |
lorcansmith | 0:2a53a4c3238c | 16 | 0.78: 17/11/11 LS Add SNMP files for system info reporting, but HTTP svr.bind disabled |
lorcansmith | 0:2a53a4c3238c | 17 | 0.79 30/11/11 LS Add f3kTable as ID 7 in F3000 private MIB |
lorcansmith | 0:2a53a4c3238c | 18 | 0.79e 12/12/11 LS Reads network addresses from file & uses Field enterprise address |
lorcansmith | 0:2a53a4c3238c | 19 | 0.80 18/12/11 LS Save last number read in read_addrs_from_file(). |
lorcansmith | 0:2a53a4c3238c | 20 | Add write_addrs_to_file() to testaddrs.txt |
lorcansmith | 0:2a53a4c3238c | 21 | 0.81 22/12/11 LS Add new_cmd_idx to indicate which parameter has been set (0 for none). |
lorcansmith | 0:2a53a4c3238c | 22 | 0.82 22/12/11 LS Add blinker to show comms activity |
lorcansmith | 0:2a53a4c3238c | 23 | 0.83 23/12/11 LS Clear cmd_buf[0] after SPI been read 4 times |
lorcansmith | 0:2a53a4c3238c | 24 | 0.84 27/12/11 LS snmp_fw_version & f3k_fw_version saved as 4 char strings |
lorcansmith | 0:2a53a4c3238c | 25 | 0.85 29/12/11 LS Update f3k_sys_set_value() & f3k_sys_set_test() to enable net address change |
lorcansmith | 0:2a53a4c3238c | 26 | 0.90 29/12/11 LS Add 3-step routine for passing commands over SPI bus from cmd_buf |
lorcansmith | 0:2a53a4c3238c | 27 | 0.92 06/01/12 LS Change 3000 index for 3000 firmware version |
lorcansmith | 0:2a53a4c3238c | 28 | 0.93 09/01/12 LS Add copy_net_addresses_from() for address updates from 3000 CPU |
lorcansmith | 0:2a53a4c3238c | 29 | 0.94 10/01/12 LS Add led_link = LPC_GPIO1->FIOPIN & (1<<25) in netservice.cpp |
lorcansmith | 0:2a53a4c3238c | 30 | 0.95 11/01/12 LS Fix f3k_speed reporting error in private_mib.c |
lorcansmith | 0:2a53a4c3238c | 31 | 0.96 12/01/12 LS Move led_link = LPC_GPIO1->FIOPIN & (1<<25) to eth_poll in eth_drv.cpp |
lorcansmith | 0:2a53a4c3238c | 32 | 0.97 30/01/12 LS Add get_SPI_count() & SPI count to MIB as 3000 CPU activity indicator |
lorcansmith | 0:2a53a4c3238c | 33 | 0.98 26/04/12 LS Increase snmp_publiccommunity[7] to [21] and allow this to be set from file |
lorcansmith | 0:2a53a4c3238c | 34 | 0.99 08/06/12 LS #define SNMP_TRAP_DESTINATIONS 1. Declare th_ad[4] for host trap address |
lorcansmith | 0:2a53a4c3238c | 35 | Add init_traps() to ensure head-head link status trap is sent |
lorcansmith | 0:2a53a4c3238c | 36 | 21/06/12 Add check for changes to IO bytes and chk_SPI_active() every 60 seconds |
lorcansmith | 0:2a53a4c3238c | 37 | 1.00 22/06/12 LS Save SNMP changes to net addresses & mask4_IO_registers in net_adrs.txt |
lorcansmith | 0:2a53a4c3238c | 38 | 1.01 25/07/12 LS Allow snmp_publiccommunity to be modified via SNMP |
lorcansmith | 0:2a53a4c3238c | 39 | 1.02 26/07/12 LS Add changed variable in snmp_varbind io_var to ioChange trap |
lorcansmith | 0:2a53a4c3238c | 40 | 1.03 01/08/12 LS Only monitor ls byte of I/O registers for changes to mask out Monostable O/Ps |
lorcansmith | 0:2a53a4c3238c | 41 | 1.04 03/08/12 LS Add chk_alarms() for monitoring up to NUM_MASK I/O alarms |
lorcansmith | 0:2a53a4c3238c | 42 | 1.05 03/08/12 LS Add struct snmp_varbind io_alarm to pass alarm_msg to f3kIOalarm_trap() |
lorcansmith | 0:2a53a4c3238c | 43 | 1.06 07/08/12 LS Reduce MSG_LNGTH to 16 from 32. Free up more RAM for alarm strings |
lorcansmith | 0:2a53a4c3238c | 44 | 1.07 08/08/12 LS Add SNMP R/W of alarm strings |
lorcansmith | 0:2a53a4c3238c | 45 | 1.08 09/08/12 LS Create array of NUM_MASK alarm strings |
lorcansmith | 0:2a53a4c3238c | 46 | 1.09 09/08/12 LS Correct problems reading alarm strings via SNMP OK with 32 char strings |
lorcansmith | 0:2a53a4c3238c | 47 | 1.10 09/08/12 LS Tested OK with MSG_LNGTH 16 char strings |
lorcansmith | 0:2a53a4c3238c | 48 | |
lorcansmith | 0:2a53a4c3238c | 49 | http://192.168.99.99/rpc/offset,604 writes 604 to reg_offset |
lorcansmith | 0:2a53a4c3238c | 50 | http://192.168.99.99/rpc/led2/write,1 writes 1 to led2 |
lorcansmith | 0:2a53a4c3238c | 51 | http://192.168.99.99/files/IO1000PX.htm uploads file IO1000PX.htm |
lorcansmith | 0:2a53a4c3238c | 52 | */ |
lorcansmith | 0:2a53a4c3238c | 53 | |
lorcansmith | 0:2a53a4c3238c | 54 | #include "mbed.h" |
lorcansmith | 0:2a53a4c3238c | 55 | #include "EthernetNetIf.h" |
lorcansmith | 0:2a53a4c3238c | 56 | #include "HTTPServer.h" |
lorcansmith | 0:2a53a4c3238c | 57 | #include "snmp_structs.h" |
lorcansmith | 0:2a53a4c3238c | 58 | #include "snmp_msg.h" |
lorcansmith | 0:2a53a4c3238c | 59 | #include "snmp_asn1.h" |
lorcansmith | 0:2a53a4c3238c | 60 | #include "IO_file.h" |
lorcansmith | 0:2a53a4c3238c | 61 | |
lorcansmith | 0:2a53a4c3238c | 62 | #define LPC1768 0x60 // SPI address of LPC1768 module |
lorcansmith | 0:2a53a4c3238c | 63 | #define READ_IO 0x01 // bit in address field for data reads |
lorcansmith | 0:2a53a4c3238c | 64 | #define SPI_BYTES 4 // # of data bytes in SPI message |
lorcansmith | 0:2a53a4c3238c | 65 | #define INV_SPI_CNT 0xfffff // invalid (over-range SPI count |
lorcansmith | 0:2a53a4c3238c | 66 | #define NUM_READ 8 // # of SPI replies for valid reads |
lorcansmith | 0:2a53a4c3238c | 67 | #define NUM_INDX 4 // # of SPI replies for valid cmd_buf index |
lorcansmith | 0:2a53a4c3238c | 68 | #define MAX_CMD 4 // size of CMD buffer |
lorcansmith | 0:2a53a4c3238c | 69 | #define NO_CMD 0xff // data on cmd_buf[0] when NO_CMD to be sent |
lorcansmith | 0:2a53a4c3238c | 70 | #define NO_UPDATE 0 // NO change to Ethernet addresses |
lorcansmith | 0:2a53a4c3238c | 71 | #define UPDATED 0xff // Ethernet addresses updated in file |
lorcansmith | 0:2a53a4c3238c | 72 | #define NET_ADRS_FILE "/webfs/net_adrs.txt" |
lorcansmith | 0:2a53a4c3238c | 73 | #define ALARM_FILE "/webfs/alarms.txt" |
lorcansmith | 0:2a53a4c3238c | 74 | |
lorcansmith | 0:2a53a4c3238c | 75 | |
lorcansmith | 0:2a53a4c3238c | 76 | const char * snmp_fw_version = "1.10"; |
lorcansmith | 0:2a53a4c3238c | 77 | |
lorcansmith | 0:2a53a4c3238c | 78 | /** v0.7: OID for enterprise specific ioChange TRAPs */ |
lorcansmith | 0:2a53a4c3238c | 79 | const struct snmp_obj_id io_change_id = {9,{1,3,6,1,4,1,SNMP_ENTERPRISE_ID,3,1}}; |
lorcansmith | 0:2a53a4c3238c | 80 | /** v1.08: OID for enterprise specific ioAlarm TRAPs */ |
lorcansmith | 0:2a53a4c3238c | 81 | const struct snmp_obj_id io_alarm_id = {9,{1,3,6,1,4,1,SNMP_ENTERPRISE_ID,4,1}}; |
lorcansmith | 0:2a53a4c3238c | 82 | //const struct snmp_obj_id al_mask_id = {9,{1,3,6,1,4,1,SNMP_ENTERPRISE_ID,5,1}}; |
lorcansmith | 0:2a53a4c3238c | 83 | /* v1.05: structures for enterprise specific TRAPs */ |
lorcansmith | 0:2a53a4c3238c | 84 | extern struct snmp_varbind io_var; |
lorcansmith | 0:2a53a4c3238c | 85 | extern struct snmp_varbind al_var; |
lorcansmith | 0:2a53a4c3238c | 86 | extern struct snmp_varbind io_alarm; |
lorcansmith | 0:2a53a4c3238c | 87 | /* v1.02: OID for enterprise specific ioChange & ioAlarm TRAPs */ |
lorcansmith | 0:2a53a4c3238c | 88 | unsigned char io_chng_idx; // index of changed I/O register |
lorcansmith | 0:2a53a4c3238c | 89 | u32_t io_chng_val; // new I/O value if changed |
lorcansmith | 0:2a53a4c3238c | 90 | s32_t io_oid[10]; // OID for io values used by ioChange & ioAlarm |
lorcansmith | 0:2a53a4c3238c | 91 | s32_t als_oid[10]; // OID for alarm string |
lorcansmith | 0:2a53a4c3238c | 92 | |
lorcansmith | 0:2a53a4c3238c | 93 | /* default ethernet address setup */ |
lorcansmith | 0:2a53a4c3238c | 94 | unsigned char ip_ad[4] = {192,168,99,99}; |
lorcansmith | 0:2a53a4c3238c | 95 | unsigned char msk_ad[4] = {255,255,255,0}; |
lorcansmith | 0:2a53a4c3238c | 96 | unsigned char gwy_ad[4] = {192,168,99,253}; |
lorcansmith | 0:2a53a4c3238c | 97 | unsigned char dns_ad[4] = {192,168,99,253}; |
lorcansmith | 0:2a53a4c3238c | 98 | unsigned char th_ad[4] = {146,38,105,49}; // v0.99: host address for SNMP traps |
lorcansmith | 0:2a53a4c3238c | 99 | unsigned char net_addrs_set = false; // flags net address update from SNMP |
lorcansmith | 0:2a53a4c3238c | 100 | unsigned char net_addrs_chng = NO_UPDATE; // flags net address changed in 3000 |
lorcansmith | 0:2a53a4c3238c | 101 | unsigned char byte_changed = false; // true if any IO regs have changed |
lorcansmith | 0:2a53a4c3238c | 102 | unsigned char all_IO_updated = false; // true if all 32 IO regs have been read |
lorcansmith | 0:2a53a4c3238c | 103 | unsigned char alarm_str_set = false; // flags alarm string update from SNMP |
lorcansmith | 0:2a53a4c3238c | 104 | char hex_mask[12]; // IO mask as hex string |
lorcansmith | 0:2a53a4c3238c | 105 | char reg_change[NUM_MASK]; // register changed associated with io_masks |
lorcansmith | 0:2a53a4c3238c | 106 | u32_t new_io_val[NUM_MASK]; // chnaged IO value associated with io_masks |
lorcansmith | 0:2a53a4c3238c | 107 | unsigned long io_mask[NUM_MASK]; // masks for alarms on IO registers |
lorcansmith | 0:2a53a4c3238c | 108 | unsigned long mask4_IO_registers = 0x3fffffff; // mask for IO regs ignoring IO31 & 32 |
lorcansmith | 0:2a53a4c3238c | 109 | unsigned long spi_count = 0; // last SPI_COUNT saved in SPI interrupt |
lorcansmith | 0:2a53a4c3238c | 110 | unsigned char spi_active = true; // avoid false trap message at start |
lorcansmith | 0:2a53a4c3238c | 111 | |
lorcansmith | 0:2a53a4c3238c | 112 | char alarm_msg[NUM_MASK][MSG_LNGTH]; // alarm messages associated with io_masks |
lorcansmith | 0:2a53a4c3238c | 113 | static u8_t syslocation[MSG_LNGTH]; /* v0.9b */ |
lorcansmith | 0:2a53a4c3238c | 114 | u8_t sysloc_len; |
lorcansmith | 0:2a53a4c3238c | 115 | |
lorcansmith | 0:2a53a4c3238c | 116 | SPISlave spi_slave(p11, p12, p13, p14); // mosi, miso, sclk, ssel |
lorcansmith | 0:2a53a4c3238c | 117 | |
lorcansmith | 0:2a53a4c3238c | 118 | Ticker comms_tick; |
lorcansmith | 0:2a53a4c3238c | 119 | Ticker sys_tick; // system tick for SNMP sysuptime report |
lorcansmith | 0:2a53a4c3238c | 120 | Ticker spi_tick; // tick for monitoring SPI activity |
lorcansmith | 0:2a53a4c3238c | 121 | Timeout cold_start_delay; |
lorcansmith | 0:2a53a4c3238c | 122 | |
lorcansmith | 0:2a53a4c3238c | 123 | DigitalOut led1(LED1, "led1"); // mimics head-head link status o/p in 3000 I/O |
lorcansmith | 0:2a53a4c3238c | 124 | DigitalOut led2(LED2, "led2"); |
lorcansmith | 0:2a53a4c3238c | 125 | DigitalOut led3(LED3, "led3"); |
lorcansmith | 0:2a53a4c3238c | 126 | DigitalOut led4(LED4, "led4"); |
lorcansmith | 0:2a53a4c3238c | 127 | DigitalOut led_link(p29); // Green link status: ON=good, Blink=Activity |
lorcansmith | 0:2a53a4c3238c | 128 | DigitalOut led_speed(p30); // Yellow link speed: ON for 100Mb/s |
lorcansmith | 0:2a53a4c3238c | 129 | |
lorcansmith | 0:2a53a4c3238c | 130 | unsigned char blink_led = false; |
lorcansmith | 0:2a53a4c3238c | 131 | unsigned char trap_init = false; // true after cold_start trap sent |
lorcansmith | 0:2a53a4c3238c | 132 | |
lorcansmith | 0:2a53a4c3238c | 133 | LocalFileSystem fs( "webfs" ); |
lorcansmith | 0:2a53a4c3238c | 134 | |
lorcansmith | 0:2a53a4c3238c | 135 | IpAddr mip, mnm, mgw, mdns; // instantiate from core\ipaddr.cpp |
lorcansmith | 0:2a53a4c3238c | 136 | |
lorcansmith | 0:2a53a4c3238c | 137 | //EthernetNetIf eth; // use if DNS sets up address |
lorcansmith | 0:2a53a4c3238c | 138 | |
lorcansmith | 0:2a53a4c3238c | 139 | HTTPServer svr; |
lorcansmith | 0:2a53a4c3238c | 140 | SPI_Server fsvr( "fsvr" ); |
lorcansmith | 0:2a53a4c3238c | 141 | |
lorcansmith | 0:2a53a4c3238c | 142 | Serial pc( USBTX, USBRX ); // for diagnostic serial comms to PC via USB |
lorcansmith | 0:2a53a4c3238c | 143 | |
lorcansmith | 0:2a53a4c3238c | 144 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 145 | /* SPI interface data and routines */ |
lorcansmith | 0:2a53a4c3238c | 146 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 147 | /* commands sent to 3000 cpu from cmd_buf[0] and |
lorcansmith | 0:2a53a4c3238c | 148 | waiting commands stored in higher indices until sent */ |
lorcansmith | 0:2a53a4c3238c | 149 | unsigned char cmd_buf[ MAX_CMD ]; // store for commands from Ethernet |
lorcansmith | 0:2a53a4c3238c | 150 | unsigned char new_cmd_idx; |
lorcansmith | 0:2a53a4c3238c | 151 | |
lorcansmith | 0:2a53a4c3238c | 152 | |
lorcansmith | 0:2a53a4c3238c | 153 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 154 | /* SPI_Server: |
lorcansmith | 0:2a53a4c3238c | 155 | * Description: Instantiates Class to hold & access all data read from RAM by SPI |
lorcansmith | 0:2a53a4c3238c | 156 | * Called by FSHandler::doGet() in services\http\server\impl |
lorcansmith | 0:2a53a4c3238c | 157 | * Parameters: name of object instantiated |
lorcansmith | 0:2a53a4c3238c | 158 | * Returns: NONE |
lorcansmith | 0:2a53a4c3238c | 159 | */ |
lorcansmith | 0:2a53a4c3238c | 160 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 161 | SPI_Server::SPI_Server(const char * name) |
lorcansmith | 0:2a53a4c3238c | 162 | { |
lorcansmith | 0:2a53a4c3238c | 163 | int idx; |
lorcansmith | 0:2a53a4c3238c | 164 | for ( idx = 0; idx < MAX_RAM; idx++ ) |
lorcansmith | 0:2a53a4c3238c | 165 | { // clear ram_img to minimise traps at start-up |
lorcansmith | 0:2a53a4c3238c | 166 | ram_img[ idx ] = 0; |
lorcansmith | 0:2a53a4c3238c | 167 | } |
lorcansmith | 0:2a53a4c3238c | 168 | reg_offset = 0; |
lorcansmith | 0:2a53a4c3238c | 169 | } |
lorcansmith | 0:2a53a4c3238c | 170 | |
lorcansmith | 0:2a53a4c3238c | 171 | SPI_Server::~SPI_Server() |
lorcansmith | 0:2a53a4c3238c | 172 | { |
lorcansmith | 0:2a53a4c3238c | 173 | if(fp) fclose(fp); |
lorcansmith | 0:2a53a4c3238c | 174 | } |
lorcansmith | 0:2a53a4c3238c | 175 | |
lorcansmith | 0:2a53a4c3238c | 176 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 177 | /* update_IO_file: |
lorcansmith | 0:2a53a4c3238c | 178 | * Description: Reads data from ram_img[] into IO1000PX.htm for web access |
lorcansmith | 0:2a53a4c3238c | 179 | * Called by FSHandler::doGet() in services\http\server\impl |
lorcansmith | 0:2a53a4c3238c | 180 | * Globals used: NONE |
lorcansmith | 0:2a53a4c3238c | 181 | * Parameters: NONE |
lorcansmith | 0:2a53a4c3238c | 182 | * Returns: 0 if OK, 1 if failed to open files |
lorcansmith | 0:2a53a4c3238c | 183 | */ |
lorcansmith | 0:2a53a4c3238c | 184 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 185 | int SPI_Server::update_IO_file() |
lorcansmith | 0:2a53a4c3238c | 186 | { |
lorcansmith | 0:2a53a4c3238c | 187 | int c, i; // characters read/written in files |
lorcansmith | 0:2a53a4c3238c | 188 | unsigned short chnl, dval; // data from 1000PX |
lorcansmith | 0:2a53a4c3238c | 189 | |
lorcansmith | 0:2a53a4c3238c | 190 | DBG("\r\nIn SPI_Server::update_IO_file()\r\n"); |
lorcansmith | 0:2a53a4c3238c | 191 | FILE *fr = fopen("/webfs/hdr.htm", "r"); |
lorcansmith | 0:2a53a4c3238c | 192 | if(!fr) { |
lorcansmith | 0:2a53a4c3238c | 193 | fprintf(stderr, "\r\nFile /webfs/hdr.htm could not be opened!\r\n"); |
lorcansmith | 0:2a53a4c3238c | 194 | exit(1); |
lorcansmith | 0:2a53a4c3238c | 195 | } |
lorcansmith | 0:2a53a4c3238c | 196 | else |
lorcansmith | 0:2a53a4c3238c | 197 | { |
lorcansmith | 0:2a53a4c3238c | 198 | fp = fopen( "/webfs/IO1000PX.htm", "w" ); |
lorcansmith | 0:2a53a4c3238c | 199 | if(!fp) { |
lorcansmith | 0:2a53a4c3238c | 200 | fprintf(stderr, "\r\nFile /webfs/IO1000PX.htm could not be opened to write!\r\n" ); |
lorcansmith | 0:2a53a4c3238c | 201 | exit(1); |
lorcansmith | 0:2a53a4c3238c | 202 | } |
lorcansmith | 0:2a53a4c3238c | 203 | else |
lorcansmith | 0:2a53a4c3238c | 204 | { |
lorcansmith | 0:2a53a4c3238c | 205 | while ( (c = fgetc(fr)) != EOF ) |
lorcansmith | 0:2a53a4c3238c | 206 | { |
lorcansmith | 0:2a53a4c3238c | 207 | fputc( c, fp ); |
lorcansmith | 0:2a53a4c3238c | 208 | } |
lorcansmith | 0:2a53a4c3238c | 209 | fclose(fr); |
lorcansmith | 0:2a53a4c3238c | 210 | DBG("\r\nIn SPI_Server::update_IO_file() - header copied\r\n"); |
lorcansmith | 0:2a53a4c3238c | 211 | for ( i = 0; i < 16; i++ ) |
lorcansmith | 0:2a53a4c3238c | 212 | { |
lorcansmith | 0:2a53a4c3238c | 213 | chnl = reg_offset + i; |
lorcansmith | 0:2a53a4c3238c | 214 | dval = 256 * ram_img[ 2*chnl ] + ram_img[ 2*chnl + 1 ]; |
lorcansmith | 0:2a53a4c3238c | 215 | fprintf(fp, " <TR VALIGN=TOP>\r\n"); |
lorcansmith | 0:2a53a4c3238c | 216 | fprintf(fp, " <TD WIDTH=124>\r\n"); |
lorcansmith | 0:2a53a4c3238c | 217 | fprintf(fp, " <P>%02d</P>\r\n", chnl ); |
lorcansmith | 0:2a53a4c3238c | 218 | fprintf(fp, " </TD>\r\n"); |
lorcansmith | 0:2a53a4c3238c | 219 | fprintf(fp, " <TD WIDTH=124>\r\n"); |
lorcansmith | 0:2a53a4c3238c | 220 | fprintf(fp, " <P>%d</P>\r\n", dval ); |
lorcansmith | 0:2a53a4c3238c | 221 | fprintf(fp, " </TD>\r\n"); |
lorcansmith | 0:2a53a4c3238c | 222 | fprintf(fp, " <TD WIDTH=124>\r\n"); |
lorcansmith | 0:2a53a4c3238c | 223 | fprintf(fp, " <P>%02x</P>\r\n", (dval/256) ); |
lorcansmith | 0:2a53a4c3238c | 224 | fprintf(fp, " </TD>\r\n"); |
lorcansmith | 0:2a53a4c3238c | 225 | fprintf(fp, " <TD WIDTH=124>\r\n"); |
lorcansmith | 0:2a53a4c3238c | 226 | fprintf(fp, " <P>%02x</P>\r\n", (dval & 0xff) ); |
lorcansmith | 0:2a53a4c3238c | 227 | fprintf(fp, " </TD>\r\n"); |
lorcansmith | 0:2a53a4c3238c | 228 | fprintf(fp, " </TR>\r\n"); |
lorcansmith | 0:2a53a4c3238c | 229 | } |
lorcansmith | 0:2a53a4c3238c | 230 | fprintf(fp, "</TABLE>\r\n<P><BR><BR>\r\n</P>\r\n</BODY>\r\n</HTML>\r\n"); |
lorcansmith | 0:2a53a4c3238c | 231 | } |
lorcansmith | 0:2a53a4c3238c | 232 | } |
lorcansmith | 0:2a53a4c3238c | 233 | fclose(fp); |
lorcansmith | 0:2a53a4c3238c | 234 | // fclose(fr); |
lorcansmith | 0:2a53a4c3238c | 235 | return 0; |
lorcansmith | 0:2a53a4c3238c | 236 | } |
lorcansmith | 0:2a53a4c3238c | 237 | |
lorcansmith | 0:2a53a4c3238c | 238 | int SPI_Server::read( void ) |
lorcansmith | 0:2a53a4c3238c | 239 | { |
lorcansmith | 0:2a53a4c3238c | 240 | DBG("\r\nIn SPI_Server::read()\r\n"); |
lorcansmith | 0:2a53a4c3238c | 241 | return reg_offset; |
lorcansmith | 0:2a53a4c3238c | 242 | } |
lorcansmith | 0:2a53a4c3238c | 243 | |
lorcansmith | 0:2a53a4c3238c | 244 | void SPI_Server::write( int new_offset ) |
lorcansmith | 0:2a53a4c3238c | 245 | { |
lorcansmith | 0:2a53a4c3238c | 246 | DBG("\r\nIn SPI_Server::write()\r\n"); |
lorcansmith | 0:2a53a4c3238c | 247 | if ( (new_offset >= 0) && (new_offset < MAX_RAM) ) reg_offset = new_offset; |
lorcansmith | 0:2a53a4c3238c | 248 | } |
lorcansmith | 0:2a53a4c3238c | 249 | |
lorcansmith | 0:2a53a4c3238c | 250 | unsigned char SPI_Server::get_byte( unsigned short idx ) |
lorcansmith | 0:2a53a4c3238c | 251 | { |
lorcansmith | 0:2a53a4c3238c | 252 | return ram_img[ idx ]; |
lorcansmith | 0:2a53a4c3238c | 253 | } |
lorcansmith | 0:2a53a4c3238c | 254 | |
lorcansmith | 0:2a53a4c3238c | 255 | void SPI_Server::put_byte( unsigned short idx, unsigned char new_byte ) |
lorcansmith | 0:2a53a4c3238c | 256 | { |
lorcansmith | 0:2a53a4c3238c | 257 | if ( idx < MAX_RAM ) |
lorcansmith | 0:2a53a4c3238c | 258 | ram_img[ idx ] = new_byte; |
lorcansmith | 0:2a53a4c3238c | 259 | } |
lorcansmith | 0:2a53a4c3238c | 260 | |
lorcansmith | 0:2a53a4c3238c | 261 | unsigned short SPI_Server::get_error( void ) |
lorcansmith | 0:2a53a4c3238c | 262 | { |
lorcansmith | 0:2a53a4c3238c | 263 | // return error register value from Field 3000 CPU |
lorcansmith | 0:2a53a4c3238c | 264 | return (256 * ram_img[ 1786 ]) + ram_img[ 1787 ]; |
lorcansmith | 0:2a53a4c3238c | 265 | } |
lorcansmith | 0:2a53a4c3238c | 266 | |
lorcansmith | 0:2a53a4c3238c | 267 | unsigned short SPI_Server::get_SPI_count( void ) |
lorcansmith | 0:2a53a4c3238c | 268 | { |
lorcansmith | 0:2a53a4c3238c | 269 | // return SPI write count from Field 3000 CPU - indicates F3000 running OK |
lorcansmith | 0:2a53a4c3238c | 270 | return (256 * ram_img[ SPI_COUNT ]) + ram_img[ SPI_COUNT + 1 ]; |
lorcansmith | 0:2a53a4c3238c | 271 | } |
lorcansmith | 0:2a53a4c3238c | 272 | |
lorcansmith | 0:2a53a4c3238c | 273 | unsigned char * SPI_Server::net_address_ptr( void ) |
lorcansmith | 0:2a53a4c3238c | 274 | { |
lorcansmith | 0:2a53a4c3238c | 275 | return &ram_img[ NET_IP_ADDRESS ]; |
lorcansmith | 0:2a53a4c3238c | 276 | } |
lorcansmith | 0:2a53a4c3238c | 277 | |
lorcansmith | 0:2a53a4c3238c | 278 | unsigned char * SPI_Server::trap_host_ptr( void ) |
lorcansmith | 0:2a53a4c3238c | 279 | { |
lorcansmith | 0:2a53a4c3238c | 280 | return &ram_img[ TRAP_HOST_ADDRESS ]; |
lorcansmith | 0:2a53a4c3238c | 281 | } |
lorcansmith | 0:2a53a4c3238c | 282 | |
lorcansmith | 0:2a53a4c3238c | 283 | #if 0 |
lorcansmith | 0:2a53a4c3238c | 284 | //#ifdef MBED_RPC trap_host_ptr |
lorcansmith | 0:2a53a4c3238c | 285 | const struct rpc_method *SPI_Server::get_rpc_methods() { |
lorcansmith | 0:2a53a4c3238c | 286 | static const rpc_method methods[] = { |
lorcansmith | 0:2a53a4c3238c | 287 | { "read", rpc_method_caller<int, SPI_Server, &SPI_Server::read> }, |
lorcansmith | 0:2a53a4c3238c | 288 | { "write", rpc_method_caller<SPI_Server, int, &SPI_Server::write> }, |
lorcansmith | 0:2a53a4c3238c | 289 | RPC_METHOD_SUPER(Base) //Stream) |
lorcansmith | 0:2a53a4c3238c | 290 | }; |
lorcansmith | 0:2a53a4c3238c | 291 | return methods; |
lorcansmith | 0:2a53a4c3238c | 292 | } |
lorcansmith | 0:2a53a4c3238c | 293 | |
lorcansmith | 0:2a53a4c3238c | 294 | struct rpc_class *SPI_Server::get_rpc_class() { |
lorcansmith | 0:2a53a4c3238c | 295 | static const rpc_function funcs[] = { |
lorcansmith | 0:2a53a4c3238c | 296 | { "new", rpc_function_caller<const char*, int, &Base::construct<SPI_Server, int> > }, |
lorcansmith | 0:2a53a4c3238c | 297 | RPC_METHOD_END |
lorcansmith | 0:2a53a4c3238c | 298 | }; |
lorcansmith | 0:2a53a4c3238c | 299 | static rpc_class c = { "SPI_Server", funcs, NULL }; |
lorcansmith | 0:2a53a4c3238c | 300 | return &c; |
lorcansmith | 0:2a53a4c3238c | 301 | } |
lorcansmith | 0:2a53a4c3238c | 302 | #endif |
lorcansmith | 0:2a53a4c3238c | 303 | |
lorcansmith | 0:2a53a4c3238c | 304 | void check4write_offset( char * req ) |
lorcansmith | 0:2a53a4c3238c | 305 | { |
lorcansmith | 0:2a53a4c3238c | 306 | unsigned char l, c, i; |
lorcansmith | 0:2a53a4c3238c | 307 | char v[ 20 ] = {0}; |
lorcansmith | 0:2a53a4c3238c | 308 | char s[ 20 ] = {0}; |
lorcansmith | 0:2a53a4c3238c | 309 | char * p; |
lorcansmith | 0:2a53a4c3238c | 310 | |
lorcansmith | 0:2a53a4c3238c | 311 | strcpy( v, "/offset," ); |
lorcansmith | 0:2a53a4c3238c | 312 | p = strstr( req, v ); |
lorcansmith | 0:2a53a4c3238c | 313 | strcpy( s, p ); |
lorcansmith | 0:2a53a4c3238c | 314 | if ( p != NULL ) |
lorcansmith | 0:2a53a4c3238c | 315 | { |
lorcansmith | 0:2a53a4c3238c | 316 | i = strlen(v); |
lorcansmith | 0:2a53a4c3238c | 317 | l = strlen(s); |
lorcansmith | 0:2a53a4c3238c | 318 | if ( (l > i) && (l < (i + 6)) ) |
lorcansmith | 0:2a53a4c3238c | 319 | { |
lorcansmith | 0:2a53a4c3238c | 320 | l -= i; |
lorcansmith | 0:2a53a4c3238c | 321 | for ( c = 0; c < l; c++ ) |
lorcansmith | 0:2a53a4c3238c | 322 | { |
lorcansmith | 0:2a53a4c3238c | 323 | v[ c ] = s[ i + c ]; |
lorcansmith | 0:2a53a4c3238c | 324 | } |
lorcansmith | 0:2a53a4c3238c | 325 | v[ c ] = 0; |
lorcansmith | 0:2a53a4c3238c | 326 | fsvr.write( atoi(v) ); |
lorcansmith | 0:2a53a4c3238c | 327 | } |
lorcansmith | 0:2a53a4c3238c | 328 | } |
lorcansmith | 0:2a53a4c3238c | 329 | } |
lorcansmith | 0:2a53a4c3238c | 330 | |
lorcansmith | 0:2a53a4c3238c | 331 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 332 | /* chk_alarms: v1.04 |
lorcansmith | 0:2a53a4c3238c | 333 | * Description: called when io_value has changed and checks each io_mask |
lorcansmith | 0:2a53a4c3238c | 334 | * to see if this mask_idx (IO register - 1) is masked in |
lorcansmith | 0:2a53a4c3238c | 335 | * Globals used: reg_change[], io_mask[], new_io_val[] |
lorcansmith | 0:2a53a4c3238c | 336 | * Parameters: IN: int mask_idx - 0-based index into mask = (io_reg - 1) |
lorcansmith | 0:2a53a4c3238c | 337 | * IN: unsigned short io_value - new I/O value for register |
lorcansmith | 0:2a53a4c3238c | 338 | * Returns: NONE |
lorcansmith | 0:2a53a4c3238c | 339 | */ |
lorcansmith | 0:2a53a4c3238c | 340 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 341 | void chk_alarms( int mask_idx, unsigned short io_value ) |
lorcansmith | 0:2a53a4c3238c | 342 | { |
lorcansmith | 0:2a53a4c3238c | 343 | unsigned char mask; |
lorcansmith | 0:2a53a4c3238c | 344 | |
lorcansmith | 0:2a53a4c3238c | 345 | for ( mask = 0; mask < NUM_MASK; mask++ ) |
lorcansmith | 0:2a53a4c3238c | 346 | { |
lorcansmith | 0:2a53a4c3238c | 347 | if ( (reg_change[ mask ] == 0) && ( io_mask[ mask ] & (1 << mask_idx) ) ) |
lorcansmith | 0:2a53a4c3238c | 348 | { // masked-in register has changed |
lorcansmith | 0:2a53a4c3238c | 349 | new_io_val[ mask ] = (u32_t)io_value; |
lorcansmith | 0:2a53a4c3238c | 350 | reg_change[ mask ] = mask_idx + 1; |
lorcansmith | 0:2a53a4c3238c | 351 | } |
lorcansmith | 0:2a53a4c3238c | 352 | } |
lorcansmith | 0:2a53a4c3238c | 353 | } |
lorcansmith | 0:2a53a4c3238c | 354 | |
lorcansmith | 0:2a53a4c3238c | 355 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 356 | /* get_SPI_data: |
lorcansmith | 0:2a53a4c3238c | 357 | * Description: Implements transaction as SPI slave. |
lorcansmith | 0:2a53a4c3238c | 358 | * Reads 4 data bytes from SPI bus into destbuf for SPI write, or |
lorcansmith | 0:2a53a4c3238c | 359 | * Puts 1 byte from srcbuf onto SPI for SPI read |
lorcansmith | 0:2a53a4c3238c | 360 | * Called by main when spi_slave.receive interrupts |
lorcansmith | 0:2a53a4c3238c | 361 | * LPC1768 SPI slave handles a maximum of 8 bytes per transfer |
lorcansmith | 0:2a53a4c3238c | 362 | * Globals used: NONE |
lorcansmith | 0:2a53a4c3238c | 363 | * Parameters: IN/OUT: unsigned char * srcbuf : buffer to read from |
lorcansmith | 0:2a53a4c3238c | 364 | * Returns: int buf_idx : index to SPI data in destbuf/srcbuf |
lorcansmith | 0:2a53a4c3238c | 365 | */ |
lorcansmith | 0:2a53a4c3238c | 366 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 367 | int get_SPI_data( unsigned char * srcbuf ) |
lorcansmith | 0:2a53a4c3238c | 368 | { |
lorcansmith | 0:2a53a4c3238c | 369 | static unsigned char rd_cnt; // v0.83: count of times valid data put on bus |
lorcansmith | 0:2a53a4c3238c | 370 | int buf_idx = 0xffff; // index to save SPI data into destbuf |
lorcansmith | 0:2a53a4c3238c | 371 | int idx; // index to compare with net address block |
lorcansmith | 0:2a53a4c3238c | 372 | unsigned char spi_buf[ 8 ]; // temporary buffer for SPI data received |
lorcansmith | 0:2a53a4c3238c | 373 | unsigned char byte_cnt; // count of SPI data bytes received |
lorcansmith | 0:2a53a4c3238c | 374 | unsigned char spiv; // SPI value - initial slave address |
lorcansmith | 0:2a53a4c3238c | 375 | unsigned char bcc = 0; // received block check character |
lorcansmith | 0:2a53a4c3238c | 376 | unsigned char bcc_ok = false; // default to reject messages without bcc |
lorcansmith | 0:2a53a4c3238c | 377 | unsigned short io_val; // first I/O value changed from registers 1-32 |
lorcansmith | 0:2a53a4c3238c | 378 | |
lorcansmith | 0:2a53a4c3238c | 379 | spiv = spi_slave.read(); // Read byte from master |
lorcansmith | 0:2a53a4c3238c | 380 | if ( (spiv & 0xfe) == (LPC1768 & 0xfe) ) |
lorcansmith | 0:2a53a4c3238c | 381 | { |
lorcansmith | 0:2a53a4c3238c | 382 | if ( spiv & READ_IO ) |
lorcansmith | 0:2a53a4c3238c | 383 | { |
lorcansmith | 0:2a53a4c3238c | 384 | led4 = 1; |
lorcansmith | 0:2a53a4c3238c | 385 | led3 = 0; |
lorcansmith | 0:2a53a4c3238c | 386 | if ( *srcbuf < NO_CMD ) |
lorcansmith | 0:2a53a4c3238c | 387 | { // new data to be read by 3000 cpu |
lorcansmith | 0:2a53a4c3238c | 388 | if ( ++rd_cnt >= NUM_READ ) |
lorcansmith | 0:2a53a4c3238c | 389 | { // v0.83: clear data after 4 reads |
lorcansmith | 0:2a53a4c3238c | 390 | spi_slave.reply( NO_CMD ); // put invalid data in SPI buffer |
lorcansmith | 0:2a53a4c3238c | 391 | *srcbuf = NO_CMD; |
lorcansmith | 0:2a53a4c3238c | 392 | rd_cnt = 0; |
lorcansmith | 0:2a53a4c3238c | 393 | } |
lorcansmith | 0:2a53a4c3238c | 394 | else if ( rd_cnt >= NUM_INDX ) |
lorcansmith | 0:2a53a4c3238c | 395 | { // next put data from srcbuf in SPI buffer |
lorcansmith | 0:2a53a4c3238c | 396 | spi_slave.reply( *srcbuf ); |
lorcansmith | 0:2a53a4c3238c | 397 | } |
lorcansmith | 0:2a53a4c3238c | 398 | else // put new_cmd_idx on SPI bus first |
lorcansmith | 0:2a53a4c3238c | 399 | { |
lorcansmith | 0:2a53a4c3238c | 400 | spi_slave.reply( NO_CMD - new_cmd_idx ); // put new_cmd_idx in SPI buffer |
lorcansmith | 0:2a53a4c3238c | 401 | } |
lorcansmith | 0:2a53a4c3238c | 402 | } // end if ( *srcbuf < 0xff ) |
lorcansmith | 0:2a53a4c3238c | 403 | else |
lorcansmith | 0:2a53a4c3238c | 404 | { |
lorcansmith | 0:2a53a4c3238c | 405 | rd_cnt = 0; // re-initialise read count |
lorcansmith | 0:2a53a4c3238c | 406 | spi_slave.reply( NO_CMD ); // put invalid data in SPI buffer |
lorcansmith | 0:2a53a4c3238c | 407 | } |
lorcansmith | 0:2a53a4c3238c | 408 | } |
lorcansmith | 0:2a53a4c3238c | 409 | else // NOT READ_IO - data write |
lorcansmith | 0:2a53a4c3238c | 410 | { |
lorcansmith | 0:2a53a4c3238c | 411 | buf_idx = spi_slave.read(); // Read ms index from master |
lorcansmith | 0:2a53a4c3238c | 412 | bcc ^= buf_idx; // Start checksum calculation |
lorcansmith | 0:2a53a4c3238c | 413 | buf_idx *= 256; // Make ms index from master |
lorcansmith | 0:2a53a4c3238c | 414 | buf_idx += spi_slave.read(); // Read ls index from master |
lorcansmith | 0:2a53a4c3238c | 415 | bcc ^= (buf_idx & 0xff); |
lorcansmith | 0:2a53a4c3238c | 416 | byte_cnt = 0; |
lorcansmith | 0:2a53a4c3238c | 417 | while( spi_slave.receive() ) { |
lorcansmith | 0:2a53a4c3238c | 418 | if( byte_cnt < SPI_BYTES ) { // Read 4 data bytes |
lorcansmith | 0:2a53a4c3238c | 419 | spi_buf[ byte_cnt ] = spi_slave.read(); |
lorcansmith | 0:2a53a4c3238c | 420 | bcc ^= spi_buf[ byte_cnt++ ]; |
lorcansmith | 0:2a53a4c3238c | 421 | } |
lorcansmith | 0:2a53a4c3238c | 422 | else if ( byte_cnt == SPI_BYTES ) { |
lorcansmith | 0:2a53a4c3238c | 423 | spiv = spi_slave.read(); |
lorcansmith | 0:2a53a4c3238c | 424 | bcc_ok = ( bcc == spiv ); |
lorcansmith | 0:2a53a4c3238c | 425 | } |
lorcansmith | 0:2a53a4c3238c | 426 | } // end while ( spi_slave.receive() ) |
lorcansmith | 0:2a53a4c3238c | 427 | if ( bcc_ok && (buf_idx < MAX_RAM) ) |
lorcansmith | 0:2a53a4c3238c | 428 | { |
lorcansmith | 0:2a53a4c3238c | 429 | for( byte_cnt = 0; byte_cnt < SPI_BYTES; byte_cnt++ ) |
lorcansmith | 0:2a53a4c3238c | 430 | { |
lorcansmith | 0:2a53a4c3238c | 431 | idx = buf_idx + byte_cnt; |
lorcansmith | 0:2a53a4c3238c | 432 | if ( (idx <= MAX_IO_REG_BYTE) && (idx & 1) ) // check only ls byte of IO registers |
lorcansmith | 0:2a53a4c3238c | 433 | { // check ls byte of IO register changed from last saved |
lorcansmith | 0:2a53a4c3238c | 434 | if ( spi_buf[ byte_cnt ] != fsvr.get_byte( idx ) ) |
lorcansmith | 0:2a53a4c3238c | 435 | { // ls byte of register changed |
lorcansmith | 0:2a53a4c3238c | 436 | io_val = spi_buf[ byte_cnt ] + 256 * spi_buf[ byte_cnt - 1 ]; |
lorcansmith | 0:2a53a4c3238c | 437 | if ( !byte_changed && ( mask4_IO_registers & (1 << (idx/2)) ) ) |
lorcansmith | 0:2a53a4c3238c | 438 | { // masked-in register has changed |
lorcansmith | 0:2a53a4c3238c | 439 | io_chng_val = io_val; |
lorcansmith | 0:2a53a4c3238c | 440 | io_chng_idx = idx/2 + 1; // save index of first I/O register to change |
lorcansmith | 0:2a53a4c3238c | 441 | byte_changed = true; |
lorcansmith | 0:2a53a4c3238c | 442 | } |
lorcansmith | 0:2a53a4c3238c | 443 | chk_alarms( idx/2, io_val ); |
lorcansmith | 0:2a53a4c3238c | 444 | } |
lorcansmith | 0:2a53a4c3238c | 445 | if ( idx == MAX_IO_REG_BYTE ) |
lorcansmith | 0:2a53a4c3238c | 446 | { // after each I/O scan |
lorcansmith | 0:2a53a4c3238c | 447 | all_IO_updated = true; |
lorcansmith | 0:2a53a4c3238c | 448 | spi_count = fsvr.get_SPI_count(); // save last SPI_count value |
lorcansmith | 0:2a53a4c3238c | 449 | } |
lorcansmith | 0:2a53a4c3238c | 450 | } |
lorcansmith | 0:2a53a4c3238c | 451 | else if ( idx == NET_ADDRESS_CHANGE ) |
lorcansmith | 0:2a53a4c3238c | 452 | { // v0.93: check for net address update from 3000 CPU |
lorcansmith | 0:2a53a4c3238c | 453 | if ( spi_buf[ byte_cnt ] == NO_UPDATE ) |
lorcansmith | 0:2a53a4c3238c | 454 | { |
lorcansmith | 0:2a53a4c3238c | 455 | net_addrs_chng = NO_UPDATE; |
lorcansmith | 0:2a53a4c3238c | 456 | } |
lorcansmith | 0:2a53a4c3238c | 457 | else if ( net_addrs_chng != UPDATED ) |
lorcansmith | 0:2a53a4c3238c | 458 | { |
lorcansmith | 0:2a53a4c3238c | 459 | net_addrs_chng = spi_buf[ byte_cnt ]; |
lorcansmith | 0:2a53a4c3238c | 460 | } |
lorcansmith | 0:2a53a4c3238c | 461 | } |
lorcansmith | 0:2a53a4c3238c | 462 | fsvr.put_byte( idx, spi_buf[ byte_cnt ] ); // save byte read from SPI |
lorcansmith | 0:2a53a4c3238c | 463 | } |
lorcansmith | 0:2a53a4c3238c | 464 | led3 = 0; |
lorcansmith | 0:2a53a4c3238c | 465 | } |
lorcansmith | 0:2a53a4c3238c | 466 | else // checksum failed |
lorcansmith | 0:2a53a4c3238c | 467 | { |
lorcansmith | 0:2a53a4c3238c | 468 | led3 = 1; |
lorcansmith | 0:2a53a4c3238c | 469 | } |
lorcansmith | 0:2a53a4c3238c | 470 | led4 = 0; |
lorcansmith | 0:2a53a4c3238c | 471 | } // end else not READ_IO |
lorcansmith | 0:2a53a4c3238c | 472 | } // end if ( (spiv & 0xfe) == (LPC1768 & 0xfe) ) |
lorcansmith | 0:2a53a4c3238c | 473 | return buf_idx; |
lorcansmith | 0:2a53a4c3238c | 474 | } |
lorcansmith | 0:2a53a4c3238c | 475 | |
lorcansmith | 0:2a53a4c3238c | 476 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 477 | /* chk_SPI_active: |
lorcansmith | 0:2a53a4c3238c | 478 | * Description: checks spi_count has been updated in SPI interrupt |
lorcansmith | 0:2a53a4c3238c | 479 | * to be called by timer, independently of SPI interrupt |
lorcansmith | 0:2a53a4c3238c | 480 | * Globals used: spi_active, spi_count |
lorcansmith | 0:2a53a4c3238c | 481 | * Parameters: NONE |
lorcansmith | 0:2a53a4c3238c | 482 | * Returns: NONE |
lorcansmith | 0:2a53a4c3238c | 483 | */ |
lorcansmith | 0:2a53a4c3238c | 484 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 485 | void chk_SPI_active( void ) |
lorcansmith | 0:2a53a4c3238c | 486 | { |
lorcansmith | 0:2a53a4c3238c | 487 | if ( spi_count == INV_SPI_CNT ) |
lorcansmith | 0:2a53a4c3238c | 488 | { |
lorcansmith | 0:2a53a4c3238c | 489 | spi_active = false; // flag SPI failure |
lorcansmith | 0:2a53a4c3238c | 490 | } |
lorcansmith | 0:2a53a4c3238c | 491 | else |
lorcansmith | 0:2a53a4c3238c | 492 | { |
lorcansmith | 0:2a53a4c3238c | 493 | spi_count = INV_SPI_CNT; // set to be overwritten by next SPI update |
lorcansmith | 0:2a53a4c3238c | 494 | spi_active = true; // SPI updated OK |
lorcansmith | 0:2a53a4c3238c | 495 | } |
lorcansmith | 0:2a53a4c3238c | 496 | } |
lorcansmith | 0:2a53a4c3238c | 497 | |
lorcansmith | 0:2a53a4c3238c | 498 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 499 | /* get_hex_mask: |
lorcansmith | 0:2a53a4c3238c | 500 | * Description: converts long bit_mask to hexadecimal string |
lorcansmith | 0:2a53a4c3238c | 501 | * Globals used: hex_mask |
lorcansmith | 0:2a53a4c3238c | 502 | * Parameters: IN: unsigned long bit_mask - numeric value of bit mask |
lorcansmith | 0:2a53a4c3238c | 503 | * Returns: pointer to hex_mask |
lorcansmith | 0:2a53a4c3238c | 504 | */ |
lorcansmith | 0:2a53a4c3238c | 505 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 506 | char * get_hex_mask( unsigned long bit_mask ) |
lorcansmith | 0:2a53a4c3238c | 507 | { |
lorcansmith | 0:2a53a4c3238c | 508 | unsigned char i; |
lorcansmith | 0:2a53a4c3238c | 509 | for ( i = 0; i < 12; i++ ) |
lorcansmith | 0:2a53a4c3238c | 510 | { |
lorcansmith | 0:2a53a4c3238c | 511 | hex_mask[ i ] = 0; |
lorcansmith | 0:2a53a4c3238c | 512 | } |
lorcansmith | 0:2a53a4c3238c | 513 | sprintf(hex_mask, "%08x", bit_mask); |
lorcansmith | 0:2a53a4c3238c | 514 | return hex_mask; |
lorcansmith | 0:2a53a4c3238c | 515 | } |
lorcansmith | 0:2a53a4c3238c | 516 | |
lorcansmith | 0:2a53a4c3238c | 517 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 518 | /* convert2decimal: |
lorcansmith | 0:2a53a4c3238c | 519 | * Description: converts hexadecimal string to long mask4_IO_registers |
lorcansmith | 0:2a53a4c3238c | 520 | * Globals used: NONE |
lorcansmith | 0:2a53a4c3238c | 521 | * Parameters: u8_t * uc_ptr: pointer to hex-formatted mask string |
lorcansmith | 0:2a53a4c3238c | 522 | * u16_t len: length of string |
lorcansmith | 0:2a53a4c3238c | 523 | * Returns: unsigned long temp_sum |
lorcansmith | 0:2a53a4c3238c | 524 | */ |
lorcansmith | 0:2a53a4c3238c | 525 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 526 | unsigned long convert2decimal( u8_t * uc_ptr, u16_t len ) |
lorcansmith | 0:2a53a4c3238c | 527 | { |
lorcansmith | 0:2a53a4c3238c | 528 | char ch, i; |
lorcansmith | 0:2a53a4c3238c | 529 | unsigned long temp_sum = 0; |
lorcansmith | 0:2a53a4c3238c | 530 | |
lorcansmith | 0:2a53a4c3238c | 531 | for ( i = 0; i < len; i++ ) |
lorcansmith | 0:2a53a4c3238c | 532 | { |
lorcansmith | 0:2a53a4c3238c | 533 | ch = (char)*(uc_ptr + i); |
lorcansmith | 0:2a53a4c3238c | 534 | if ( islower( ch ) ) |
lorcansmith | 0:2a53a4c3238c | 535 | { |
lorcansmith | 0:2a53a4c3238c | 536 | ch = ch - 'a' + 10; |
lorcansmith | 0:2a53a4c3238c | 537 | } |
lorcansmith | 0:2a53a4c3238c | 538 | else if ( isupper( ch ) ) |
lorcansmith | 0:2a53a4c3238c | 539 | { |
lorcansmith | 0:2a53a4c3238c | 540 | ch = ch - 'A' + 10; |
lorcansmith | 0:2a53a4c3238c | 541 | } |
lorcansmith | 0:2a53a4c3238c | 542 | else if ( isdigit( ch ) ) |
lorcansmith | 0:2a53a4c3238c | 543 | { |
lorcansmith | 0:2a53a4c3238c | 544 | ch = ch - '0'; |
lorcansmith | 0:2a53a4c3238c | 545 | } |
lorcansmith | 0:2a53a4c3238c | 546 | else |
lorcansmith | 0:2a53a4c3238c | 547 | { |
lorcansmith | 0:2a53a4c3238c | 548 | temp_sum = 0xfffffff; |
lorcansmith | 0:2a53a4c3238c | 549 | ch = 15; |
lorcansmith | 0:2a53a4c3238c | 550 | i = len; // end on error; |
lorcansmith | 0:2a53a4c3238c | 551 | } |
lorcansmith | 0:2a53a4c3238c | 552 | temp_sum = 16 * temp_sum + ch; |
lorcansmith | 0:2a53a4c3238c | 553 | } |
lorcansmith | 0:2a53a4c3238c | 554 | return temp_sum; |
lorcansmith | 0:2a53a4c3238c | 555 | } |
lorcansmith | 0:2a53a4c3238c | 556 | |
lorcansmith | 0:2a53a4c3238c | 557 | void send_ram( void ) |
lorcansmith | 0:2a53a4c3238c | 558 | { |
lorcansmith | 0:2a53a4c3238c | 559 | static int idx; |
lorcansmith | 0:2a53a4c3238c | 560 | char i; |
lorcansmith | 0:2a53a4c3238c | 561 | |
lorcansmith | 0:2a53a4c3238c | 562 | if ( (idx & 0x7ff) == 0 ) |
lorcansmith | 0:2a53a4c3238c | 563 | { |
lorcansmith | 0:2a53a4c3238c | 564 | pc.printf("CMD data %x", idx ); |
lorcansmith | 0:2a53a4c3238c | 565 | for ( i = 0; i < MAX_CMD; i++ ) |
lorcansmith | 0:2a53a4c3238c | 566 | { |
lorcansmith | 0:2a53a4c3238c | 567 | pc.printf(", %x", cmd_buf[ i ] ); |
lorcansmith | 0:2a53a4c3238c | 568 | } |
lorcansmith | 0:2a53a4c3238c | 569 | pc.printf( "\r\n" ); |
lorcansmith | 0:2a53a4c3238c | 570 | pc.printf("RAM data %x", idx & 0x7ff ); |
lorcansmith | 0:2a53a4c3238c | 571 | for ( i = 0; i < 8; i++ ) |
lorcansmith | 0:2a53a4c3238c | 572 | { |
lorcansmith | 0:2a53a4c3238c | 573 | pc.printf(", %x", fsvr.get_byte(idx++ & 0x7ff) ); |
lorcansmith | 0:2a53a4c3238c | 574 | } |
lorcansmith | 0:2a53a4c3238c | 575 | pc.printf( "\r\n" ); |
lorcansmith | 0:2a53a4c3238c | 576 | } |
lorcansmith | 0:2a53a4c3238c | 577 | else |
lorcansmith | 0:2a53a4c3238c | 578 | { |
lorcansmith | 0:2a53a4c3238c | 579 | pc.printf("RAM data %x", idx & 0x7ff ); |
lorcansmith | 0:2a53a4c3238c | 580 | for ( i = 0; i < 8; i++ ) |
lorcansmith | 0:2a53a4c3238c | 581 | { |
lorcansmith | 0:2a53a4c3238c | 582 | pc.printf(", %x", fsvr.get_byte(idx++ & 0x7ff) ); |
lorcansmith | 0:2a53a4c3238c | 583 | } |
lorcansmith | 0:2a53a4c3238c | 584 | pc.printf( "\r\n" ); |
lorcansmith | 0:2a53a4c3238c | 585 | } |
lorcansmith | 0:2a53a4c3238c | 586 | } |
lorcansmith | 0:2a53a4c3238c | 587 | |
lorcansmith | 0:2a53a4c3238c | 588 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 589 | /* write_addrs_to_file: |
lorcansmith | 0:2a53a4c3238c | 590 | * Description: Writes net addresses to /webfs/net_adrs.txt |
lorcansmith | 0:2a53a4c3238c | 591 | * Globals used: NET_ADRS_FILE |
lorcansmith | 0:2a53a4c3238c | 592 | * Parameters: NONE |
lorcansmith | 0:2a53a4c3238c | 593 | * Returns: 0 if OK, 1 if failed to open files |
lorcansmith | 0:2a53a4c3238c | 594 | */ |
lorcansmith | 0:2a53a4c3238c | 595 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 596 | int write_addrs_to_file() |
lorcansmith | 0:2a53a4c3238c | 597 | { |
lorcansmith | 0:2a53a4c3238c | 598 | FILE *fp = fopen( NET_ADRS_FILE, "w" ); |
lorcansmith | 0:2a53a4c3238c | 599 | if(!fp) { |
lorcansmith | 0:2a53a4c3238c | 600 | fprintf(stderr, "\r\nFile /webfs/net_adrs.txt could not be opened to write!\r\n"); |
lorcansmith | 0:2a53a4c3238c | 601 | exit(1); |
lorcansmith | 0:2a53a4c3238c | 602 | } |
lorcansmith | 0:2a53a4c3238c | 603 | else // file opened OK, so save addresses |
lorcansmith | 0:2a53a4c3238c | 604 | { |
lorcansmith | 0:2a53a4c3238c | 605 | fprintf(fp, "IP address %u.%u.%u.%u \r\n", ip_ad[0],ip_ad[1],ip_ad[2],ip_ad[3]); |
lorcansmith | 0:2a53a4c3238c | 606 | fprintf(fp, "Address mask %u.%u.%u.%u \r\n", msk_ad[0],msk_ad[1],msk_ad[2],msk_ad[3]); |
lorcansmith | 0:2a53a4c3238c | 607 | fprintf(fp, "Gwy address %u.%u.%u.%u \r\n", gwy_ad[0],gwy_ad[1],gwy_ad[2],gwy_ad[3]); |
lorcansmith | 0:2a53a4c3238c | 608 | fprintf(fp, "DNS address %u.%u.%u.%u \r\n", dns_ad[0],dns_ad[1],dns_ad[2],dns_ad[3]); |
lorcansmith | 0:2a53a4c3238c | 609 | fprintf(fp, "%s\r\n", snmp_publiccommunity ); // v0.98: save community string |
lorcansmith | 0:2a53a4c3238c | 610 | fprintf(fp, "Trap host address %u.%u.%u.%u \r\n", th_ad[0],th_ad[1],th_ad[2],th_ad[3]); |
lorcansmith | 0:2a53a4c3238c | 611 | fprintf(fp, "%u \r\n", mask4_IO_registers ); |
lorcansmith | 0:2a53a4c3238c | 612 | fclose(fp); |
lorcansmith | 0:2a53a4c3238c | 613 | } // file opened OK |
lorcansmith | 0:2a53a4c3238c | 614 | return 0; |
lorcansmith | 0:2a53a4c3238c | 615 | } |
lorcansmith | 0:2a53a4c3238c | 616 | |
lorcansmith | 0:2a53a4c3238c | 617 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 618 | /* copy_trap_host_address: v0.99 |
lorcansmith | 0:2a53a4c3238c | 619 | * Description: Copies src array to th_ad |
lorcansmith | 0:2a53a4c3238c | 620 | * Globals used: th_ad |
lorcansmith | 0:2a53a4c3238c | 621 | * net_addrs_chng set to UPDATED |
lorcansmith | 0:2a53a4c3238c | 622 | * Parameters: IN: unsigned char * src - source array of 4 bytes |
lorcansmith | 0:2a53a4c3238c | 623 | * Returns: NONE |
lorcansmith | 0:2a53a4c3238c | 624 | */ |
lorcansmith | 0:2a53a4c3238c | 625 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 626 | void copy_trap_host_address( unsigned char * src ) |
lorcansmith | 0:2a53a4c3238c | 627 | { |
lorcansmith | 0:2a53a4c3238c | 628 | unsigned char i; |
lorcansmith | 0:2a53a4c3238c | 629 | for ( i = 0; i < 4; i++ ) |
lorcansmith | 0:2a53a4c3238c | 630 | { |
lorcansmith | 0:2a53a4c3238c | 631 | if ( src[ i ] != 0 ) |
lorcansmith | 0:2a53a4c3238c | 632 | { |
lorcansmith | 0:2a53a4c3238c | 633 | { |
lorcansmith | 0:2a53a4c3238c | 634 | th_ad[ i ] = src[ i ]; |
lorcansmith | 0:2a53a4c3238c | 635 | } |
lorcansmith | 0:2a53a4c3238c | 636 | } |
lorcansmith | 0:2a53a4c3238c | 637 | } |
lorcansmith | 0:2a53a4c3238c | 638 | net_addrs_chng = UPDATED; |
lorcansmith | 0:2a53a4c3238c | 639 | } |
lorcansmith | 0:2a53a4c3238c | 640 | |
lorcansmith | 0:2a53a4c3238c | 641 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 642 | /* copy_net_addresses_from: v0.93 |
lorcansmith | 0:2a53a4c3238c | 643 | * Description: Copies src array to ip_ad, msk_ad, gwy_ad, dns_ad |
lorcansmith | 0:2a53a4c3238c | 644 | * Globals used: ip_ad, msk_ad, gwy_ad, dns_ad |
lorcansmith | 0:2a53a4c3238c | 645 | * Parameters: IN: unsigned char * src - source array of 16 bytes |
lorcansmith | 0:2a53a4c3238c | 646 | * Returns: NONE |
lorcansmith | 0:2a53a4c3238c | 647 | */ |
lorcansmith | 0:2a53a4c3238c | 648 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 649 | void copy_net_addresses_from( unsigned char * src ) |
lorcansmith | 0:2a53a4c3238c | 650 | { |
lorcansmith | 0:2a53a4c3238c | 651 | unsigned char i; |
lorcansmith | 0:2a53a4c3238c | 652 | for ( i = 0; i < 4; i++ ) |
lorcansmith | 0:2a53a4c3238c | 653 | { |
lorcansmith | 0:2a53a4c3238c | 654 | if ( src[ i ] != 0 ) |
lorcansmith | 0:2a53a4c3238c | 655 | { |
lorcansmith | 0:2a53a4c3238c | 656 | ip_ad[ i ] = src[ i ]; |
lorcansmith | 0:2a53a4c3238c | 657 | } |
lorcansmith | 0:2a53a4c3238c | 658 | } |
lorcansmith | 0:2a53a4c3238c | 659 | for ( i = 4; i < 8; i++ ) |
lorcansmith | 0:2a53a4c3238c | 660 | { |
lorcansmith | 0:2a53a4c3238c | 661 | if ( src[ i ] != 0 ) |
lorcansmith | 0:2a53a4c3238c | 662 | { |
lorcansmith | 0:2a53a4c3238c | 663 | msk_ad[ i-4 ] = src[ i ]; |
lorcansmith | 0:2a53a4c3238c | 664 | } |
lorcansmith | 0:2a53a4c3238c | 665 | } |
lorcansmith | 0:2a53a4c3238c | 666 | for ( i = 8; i < 12; i++ ) |
lorcansmith | 0:2a53a4c3238c | 667 | { |
lorcansmith | 0:2a53a4c3238c | 668 | if ( src[ i ] != 0 ) |
lorcansmith | 0:2a53a4c3238c | 669 | { |
lorcansmith | 0:2a53a4c3238c | 670 | gwy_ad[ i-8 ] = src[ i ]; |
lorcansmith | 0:2a53a4c3238c | 671 | } |
lorcansmith | 0:2a53a4c3238c | 672 | } |
lorcansmith | 0:2a53a4c3238c | 673 | for ( i = 12; i < 16; i++ ) |
lorcansmith | 0:2a53a4c3238c | 674 | { |
lorcansmith | 0:2a53a4c3238c | 675 | if ( src[ i ] != 0 ) |
lorcansmith | 0:2a53a4c3238c | 676 | { |
lorcansmith | 0:2a53a4c3238c | 677 | dns_ad[ i-12 ] = src[ i ]; |
lorcansmith | 0:2a53a4c3238c | 678 | } |
lorcansmith | 0:2a53a4c3238c | 679 | } |
lorcansmith | 0:2a53a4c3238c | 680 | } |
lorcansmith | 0:2a53a4c3238c | 681 | |
lorcansmith | 0:2a53a4c3238c | 682 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 683 | /* parse4numbers: |
lorcansmith | 0:2a53a4c3238c | 684 | * Description: Reads file fr and separates out max_num numbers delimited by |
lorcansmith | 0:2a53a4c3238c | 685 | * any non-digit characters |
lorcansmith | 0:2a53a4c3238c | 686 | * Globals used: |
lorcansmith | 0:2a53a4c3238c | 687 | * Parameters: IN: FILE *fr - file to read |
lorcansmith | 0:2a53a4c3238c | 688 | * OUT: unsigned char * numb - array of numbers read |
lorcansmith | 0:2a53a4c3238c | 689 | * IN: unsigned char max_num - number of numbers to read |
lorcansmith | 0:2a53a4c3238c | 690 | * Returns: NONE |
lorcansmith | 0:2a53a4c3238c | 691 | */ |
lorcansmith | 0:2a53a4c3238c | 692 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 693 | void parse4numbers( FILE *fr, unsigned char * numb, unsigned char max_num ) |
lorcansmith | 0:2a53a4c3238c | 694 | { |
lorcansmith | 0:2a53a4c3238c | 695 | int c, i, new_num; |
lorcansmith | 0:2a53a4c3238c | 696 | char digit_found = false; |
lorcansmith | 0:2a53a4c3238c | 697 | char number_completed = false; |
lorcansmith | 0:2a53a4c3238c | 698 | |
lorcansmith | 0:2a53a4c3238c | 699 | i = new_num = 0; |
lorcansmith | 0:2a53a4c3238c | 700 | while ( ((c = fgetc(fr)) != EOF) && (i < max_num) ) |
lorcansmith | 0:2a53a4c3238c | 701 | { |
lorcansmith | 0:2a53a4c3238c | 702 | numb[ i ] = 0; |
lorcansmith | 0:2a53a4c3238c | 703 | if ( c < '0' || c > '9' ) |
lorcansmith | 0:2a53a4c3238c | 704 | { // not a numeric character |
lorcansmith | 0:2a53a4c3238c | 705 | if ( digit_found ) |
lorcansmith | 0:2a53a4c3238c | 706 | { |
lorcansmith | 0:2a53a4c3238c | 707 | number_completed = true; |
lorcansmith | 0:2a53a4c3238c | 708 | if ( i >= (max_num - 1) ) |
lorcansmith | 0:2a53a4c3238c | 709 | { // max_num distinct numbers read |
lorcansmith | 0:2a53a4c3238c | 710 | break; |
lorcansmith | 0:2a53a4c3238c | 711 | } |
lorcansmith | 0:2a53a4c3238c | 712 | } |
lorcansmith | 0:2a53a4c3238c | 713 | } |
lorcansmith | 0:2a53a4c3238c | 714 | else // numeric character |
lorcansmith | 0:2a53a4c3238c | 715 | { |
lorcansmith | 0:2a53a4c3238c | 716 | digit_found = true; |
lorcansmith | 0:2a53a4c3238c | 717 | if ( number_completed ) |
lorcansmith | 0:2a53a4c3238c | 718 | { // save number into array |
lorcansmith | 0:2a53a4c3238c | 719 | numb[ i++ ] = new_num & 0xff; |
lorcansmith | 0:2a53a4c3238c | 720 | new_num = 0; |
lorcansmith | 0:2a53a4c3238c | 721 | } |
lorcansmith | 0:2a53a4c3238c | 722 | new_num = 10*new_num + c - '0'; |
lorcansmith | 0:2a53a4c3238c | 723 | number_completed = false; |
lorcansmith | 0:2a53a4c3238c | 724 | } // else numeric character |
lorcansmith | 0:2a53a4c3238c | 725 | } // end while |
lorcansmith | 0:2a53a4c3238c | 726 | if ( (number_completed || (c == EOF)) && (i < max_num) ) |
lorcansmith | 0:2a53a4c3238c | 727 | { // 0.80: save last number read |
lorcansmith | 0:2a53a4c3238c | 728 | numb[ i++ ] = new_num & 0xff; |
lorcansmith | 0:2a53a4c3238c | 729 | } |
lorcansmith | 0:2a53a4c3238c | 730 | } |
lorcansmith | 0:2a53a4c3238c | 731 | |
lorcansmith | 0:2a53a4c3238c | 732 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 733 | /* read_addrs_from_file: |
lorcansmith | 0:2a53a4c3238c | 734 | * Description: Reads data from /webfs/net_adrs.txt |
lorcansmith | 0:2a53a4c3238c | 735 | * Globals used: NET_ADRS_FILE |
lorcansmith | 0:2a53a4c3238c | 736 | * Parameters: NONE |
lorcansmith | 0:2a53a4c3238c | 737 | * Returns: 0 if OK, 1 if failed to open files |
lorcansmith | 0:2a53a4c3238c | 738 | */ |
lorcansmith | 0:2a53a4c3238c | 739 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 740 | int read_addrs_from_file() |
lorcansmith | 0:2a53a4c3238c | 741 | { |
lorcansmith | 0:2a53a4c3238c | 742 | int c, i; |
lorcansmith | 0:2a53a4c3238c | 743 | unsigned char numbers[17]; |
lorcansmith | 0:2a53a4c3238c | 744 | char community[ MAX_COMMUNITY ]; |
lorcansmith | 0:2a53a4c3238c | 745 | |
lorcansmith | 0:2a53a4c3238c | 746 | for ( i = 0; i < MAX_COMMUNITY; i++ ) |
lorcansmith | 0:2a53a4c3238c | 747 | { |
lorcansmith | 0:2a53a4c3238c | 748 | community[ i ] = 0; |
lorcansmith | 0:2a53a4c3238c | 749 | } |
lorcansmith | 0:2a53a4c3238c | 750 | FILE *fr = fopen( NET_ADRS_FILE, "r" ); |
lorcansmith | 0:2a53a4c3238c | 751 | if(!fr) { |
lorcansmith | 0:2a53a4c3238c | 752 | fprintf(stderr, "\r\nFile /webfs/net_adrs.txt could not be opened!\r\n"); |
lorcansmith | 0:2a53a4c3238c | 753 | exit(1); |
lorcansmith | 0:2a53a4c3238c | 754 | } |
lorcansmith | 0:2a53a4c3238c | 755 | else // file opened OK |
lorcansmith | 0:2a53a4c3238c | 756 | { |
lorcansmith | 0:2a53a4c3238c | 757 | parse4numbers( fr, numbers, 16 ); |
lorcansmith | 0:2a53a4c3238c | 758 | copy_net_addresses_from( numbers ); // v0.93: new subroutine |
lorcansmith | 0:2a53a4c3238c | 759 | /* v0.98: now read the community string from the file after reading end of line */ |
lorcansmith | 0:2a53a4c3238c | 760 | while ( ((c = fgetc(fr)) != EOF) && ((c == ' ') || (c == '\r') || (c == '\n')) ); |
lorcansmith | 0:2a53a4c3238c | 761 | i = 0; |
lorcansmith | 0:2a53a4c3238c | 762 | do |
lorcansmith | 0:2a53a4c3238c | 763 | { |
lorcansmith | 0:2a53a4c3238c | 764 | c = (char)c; |
lorcansmith | 0:2a53a4c3238c | 765 | if ( (c != ' ') && (c != '\r') && (c != '\n') && (i < MAX_COMMUNITY-1) ) |
lorcansmith | 0:2a53a4c3238c | 766 | { |
lorcansmith | 0:2a53a4c3238c | 767 | community[ i++ ] = c; |
lorcansmith | 0:2a53a4c3238c | 768 | } |
lorcansmith | 0:2a53a4c3238c | 769 | else // string terminated |
lorcansmith | 0:2a53a4c3238c | 770 | { |
lorcansmith | 0:2a53a4c3238c | 771 | break; |
lorcansmith | 0:2a53a4c3238c | 772 | } |
lorcansmith | 0:2a53a4c3238c | 773 | } while ( ((c = fgetc(fr)) != EOF) && (c != 0) ); |
lorcansmith | 0:2a53a4c3238c | 774 | parse4numbers( fr, numbers, 4 ); // now read in Trap host address |
lorcansmith | 0:2a53a4c3238c | 775 | copy_trap_host_address( numbers ); |
lorcansmith | 0:2a53a4c3238c | 776 | fscanf( fr, "%lu", &mask4_IO_registers ); |
lorcansmith | 0:2a53a4c3238c | 777 | fclose(fr); |
lorcansmith | 0:2a53a4c3238c | 778 | } // file opened OK |
lorcansmith | 0:2a53a4c3238c | 779 | if ( strlen(community) >= MIN_COMMUNITY ) |
lorcansmith | 0:2a53a4c3238c | 780 | { // string length 4 to 20 characters |
lorcansmith | 0:2a53a4c3238c | 781 | strcpy( snmp_publiccommunity, community ); |
lorcansmith | 0:2a53a4c3238c | 782 | pc.printf("community: %s %d \r\n", snmp_publiccommunity, strlen(snmp_publiccommunity) ); |
lorcansmith | 0:2a53a4c3238c | 783 | } |
lorcansmith | 0:2a53a4c3238c | 784 | else |
lorcansmith | 0:2a53a4c3238c | 785 | { |
lorcansmith | 0:2a53a4c3238c | 786 | pc.printf("community too short: %s %d \r\n", community, strlen(community) ); |
lorcansmith | 0:2a53a4c3238c | 787 | } |
lorcansmith | 0:2a53a4c3238c | 788 | return 0; |
lorcansmith | 0:2a53a4c3238c | 789 | } |
lorcansmith | 0:2a53a4c3238c | 790 | |
lorcansmith | 0:2a53a4c3238c | 791 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 792 | /* read_alarm_from_file: |
lorcansmith | 0:2a53a4c3238c | 793 | * Description: Reads one alarm_msg from /webfs/alarms.txt if alarm_idx < NUM_MASK |
lorcansmith | 0:2a53a4c3238c | 794 | * or can read all io_masks as well if alarm_idx >= NUM_MASK |
lorcansmith | 0:2a53a4c3238c | 795 | * Globals used: ALARM_FILE, alarm_msg, io_mask |
lorcansmith | 0:2a53a4c3238c | 796 | * Parameters: IN: unsigned char alarm_idx - index to alarm message |
lorcansmith | 0:2a53a4c3238c | 797 | * Returns: 0 if OK, 1 if failed to open files |
lorcansmith | 0:2a53a4c3238c | 798 | */ |
lorcansmith | 0:2a53a4c3238c | 799 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 800 | int read_alarm_from_file(unsigned char alarm_idx) |
lorcansmith | 0:2a53a4c3238c | 801 | { |
lorcansmith | 0:2a53a4c3238c | 802 | unsigned char i; |
lorcansmith | 0:2a53a4c3238c | 803 | |
lorcansmith | 0:2a53a4c3238c | 804 | FILE *fr = fopen( ALARM_FILE, "r" ); |
lorcansmith | 0:2a53a4c3238c | 805 | if(!fr) { |
lorcansmith | 0:2a53a4c3238c | 806 | fprintf(stderr, "\r\nFile /webfs/alarm.txt could not be opened!\r\n"); |
lorcansmith | 0:2a53a4c3238c | 807 | exit(1); |
lorcansmith | 0:2a53a4c3238c | 808 | } |
lorcansmith | 0:2a53a4c3238c | 809 | else // file opened OK |
lorcansmith | 0:2a53a4c3238c | 810 | { |
lorcansmith | 0:2a53a4c3238c | 811 | if ( alarm_idx < NUM_MASK ) |
lorcansmith | 0:2a53a4c3238c | 812 | { |
lorcansmith | 0:2a53a4c3238c | 813 | for ( i = 0; i <= alarm_idx; i++ ) |
lorcansmith | 0:2a53a4c3238c | 814 | { // read specified alarm_msg |
lorcansmith | 0:2a53a4c3238c | 815 | fscanf( fr, "%s", &alarm_msg[ i ] ); |
lorcansmith | 0:2a53a4c3238c | 816 | } |
lorcansmith | 0:2a53a4c3238c | 817 | } |
lorcansmith | 0:2a53a4c3238c | 818 | else // read io_masks |
lorcansmith | 0:2a53a4c3238c | 819 | { |
lorcansmith | 0:2a53a4c3238c | 820 | for ( i = 0; i < NUM_MASK; i++ ) |
lorcansmith | 0:2a53a4c3238c | 821 | { // read all alarm_msg |
lorcansmith | 0:2a53a4c3238c | 822 | fscanf( fr, "%s", &alarm_msg[ i ] ); |
lorcansmith | 0:2a53a4c3238c | 823 | } |
lorcansmith | 0:2a53a4c3238c | 824 | for ( i = 0; i < NUM_MASK; i++ ) |
lorcansmith | 0:2a53a4c3238c | 825 | { // read all io_masks |
lorcansmith | 0:2a53a4c3238c | 826 | fscanf( fr, "%lx", &io_mask[ i ] ); |
lorcansmith | 0:2a53a4c3238c | 827 | } |
lorcansmith | 0:2a53a4c3238c | 828 | } |
lorcansmith | 0:2a53a4c3238c | 829 | fclose(fr); |
lorcansmith | 0:2a53a4c3238c | 830 | } // file opened OK |
lorcansmith | 0:2a53a4c3238c | 831 | return 0; |
lorcansmith | 0:2a53a4c3238c | 832 | } |
lorcansmith | 0:2a53a4c3238c | 833 | |
lorcansmith | 0:2a53a4c3238c | 834 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 835 | /* blinker: |
lorcansmith | 0:2a53a4c3238c | 836 | * Description: Blinks led_link for 10 calls |
lorcansmith | 0:2a53a4c3238c | 837 | * Globals used: led_link, blink_led, |
lorcansmith | 0:2a53a4c3238c | 838 | * Parameters: NONE |
lorcansmith | 0:2a53a4c3238c | 839 | * Returns: NONE |
lorcansmith | 0:2a53a4c3238c | 840 | */ |
lorcansmith | 0:2a53a4c3238c | 841 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 842 | void blinker( void ) |
lorcansmith | 0:2a53a4c3238c | 843 | { |
lorcansmith | 0:2a53a4c3238c | 844 | static unsigned char blink_cnt; |
lorcansmith | 0:2a53a4c3238c | 845 | |
lorcansmith | 0:2a53a4c3238c | 846 | if ( blink_led && blink_cnt++ < 10 ) |
lorcansmith | 0:2a53a4c3238c | 847 | { |
lorcansmith | 0:2a53a4c3238c | 848 | led_link = !led_link; |
lorcansmith | 0:2a53a4c3238c | 849 | } |
lorcansmith | 0:2a53a4c3238c | 850 | else |
lorcansmith | 0:2a53a4c3238c | 851 | { |
lorcansmith | 0:2a53a4c3238c | 852 | blink_cnt = 0; |
lorcansmith | 0:2a53a4c3238c | 853 | blink_led = false; |
lorcansmith | 0:2a53a4c3238c | 854 | } |
lorcansmith | 0:2a53a4c3238c | 855 | } |
lorcansmith | 0:2a53a4c3238c | 856 | |
lorcansmith | 0:2a53a4c3238c | 857 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 858 | /* write_alarms_to_file: v1.04 |
lorcansmith | 0:2a53a4c3238c | 859 | * Description: Writes alarm messages and masks to /webfs/alarms.txt |
lorcansmith | 0:2a53a4c3238c | 860 | * Globals used: ALARM_FILE, alarm_msg[], io_mask[] |
lorcansmith | 0:2a53a4c3238c | 861 | * Parameters: NONE |
lorcansmith | 0:2a53a4c3238c | 862 | * Returns: 0 if OK, 1 if failed to open files |
lorcansmith | 0:2a53a4c3238c | 863 | */ |
lorcansmith | 0:2a53a4c3238c | 864 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 865 | int write_alarms_to_file( void ) |
lorcansmith | 0:2a53a4c3238c | 866 | { |
lorcansmith | 0:2a53a4c3238c | 867 | u8_t i = 1; // return value if failed to write file |
lorcansmith | 0:2a53a4c3238c | 868 | |
lorcansmith | 0:2a53a4c3238c | 869 | FILE *fp = fopen( ALARM_FILE, "w" ); |
lorcansmith | 0:2a53a4c3238c | 870 | if(!fp) { |
lorcansmith | 0:2a53a4c3238c | 871 | fprintf(stderr, "\r\nFile /webfs/alarms.txt could not be opened to write!\r\n"); |
lorcansmith | 0:2a53a4c3238c | 872 | } |
lorcansmith | 0:2a53a4c3238c | 873 | else // file opened OK, so save addresses |
lorcansmith | 0:2a53a4c3238c | 874 | { |
lorcansmith | 0:2a53a4c3238c | 875 | for ( i = 0; i < NUM_MASK; i++ ) |
lorcansmith | 0:2a53a4c3238c | 876 | { |
lorcansmith | 0:2a53a4c3238c | 877 | fprintf(fp, "%s\r\n", alarm_msg[ i ] ); |
lorcansmith | 0:2a53a4c3238c | 878 | } |
lorcansmith | 0:2a53a4c3238c | 879 | for ( i = 0; i < NUM_MASK; i++ ) |
lorcansmith | 0:2a53a4c3238c | 880 | { |
lorcansmith | 0:2a53a4c3238c | 881 | fprintf(fp, "%08x\r\n", io_mask[ i ] ); |
lorcansmith | 0:2a53a4c3238c | 882 | } |
lorcansmith | 0:2a53a4c3238c | 883 | fclose(fp); |
lorcansmith | 0:2a53a4c3238c | 884 | i = 0; |
lorcansmith | 0:2a53a4c3238c | 885 | } // file opened OK |
lorcansmith | 0:2a53a4c3238c | 886 | return i; |
lorcansmith | 0:2a53a4c3238c | 887 | } |
lorcansmith | 0:2a53a4c3238c | 888 | |
lorcansmith | 0:2a53a4c3238c | 889 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 890 | /* init_traps: |
lorcansmith | 0:2a53a4c3238c | 891 | * Description: initialises trap flags and sends cold start trap when done |
lorcansmith | 0:2a53a4c3238c | 892 | * Globals used: led1: mimics state of head-link status output in 3000 I/O |
lorcansmith | 0:2a53a4c3238c | 893 | * trap_init set true after cold start |
lorcansmith | 0:2a53a4c3238c | 894 | * Parameters: NONE |
lorcansmith | 0:2a53a4c3238c | 895 | * Returns: NONE |
lorcansmith | 0:2a53a4c3238c | 896 | */ |
lorcansmith | 0:2a53a4c3238c | 897 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 898 | void init_traps( void ) |
lorcansmith | 0:2a53a4c3238c | 899 | { |
lorcansmith | 0:2a53a4c3238c | 900 | u8_t i = 0; |
lorcansmith | 0:2a53a4c3238c | 901 | |
lorcansmith | 0:2a53a4c3238c | 902 | snmp_coldstart_trap(); |
lorcansmith | 0:2a53a4c3238c | 903 | // force sending trap for head-head link up/down status |
lorcansmith | 0:2a53a4c3238c | 904 | led1 = fsvr.get_byte( H_H_LINK_LSBYTE ) ? 0 : 1; |
lorcansmith | 0:2a53a4c3238c | 905 | /* initialise variable binding for f3kIOchange_trap */ |
lorcansmith | 0:2a53a4c3238c | 906 | io_var.next = io_var.prev = NULL; |
lorcansmith | 0:2a53a4c3238c | 907 | io_var.ident_len = io_change_id.len; |
lorcansmith | 0:2a53a4c3238c | 908 | io_var.ident = io_oid; |
lorcansmith | 0:2a53a4c3238c | 909 | do |
lorcansmith | 0:2a53a4c3238c | 910 | { |
lorcansmith | 0:2a53a4c3238c | 911 | io_oid[ i ] = io_change_id.id[ i ]; |
lorcansmith | 0:2a53a4c3238c | 912 | } while ( i++ < io_change_id.len ); |
lorcansmith | 0:2a53a4c3238c | 913 | io_var.value_type = (SNMP_ASN1_APPLIC | SNMP_ASN1_PRIMIT | SNMP_ASN1_GAUGE); |
lorcansmith | 0:2a53a4c3238c | 914 | io_var.value_len = sizeof(u32_t); |
lorcansmith | 0:2a53a4c3238c | 915 | io_var.value = &io_chng_val; |
lorcansmith | 0:2a53a4c3238c | 916 | /* initialise variable binding for f3kIOalarm_trap al_var data */ |
lorcansmith | 0:2a53a4c3238c | 917 | al_var.prev = NULL; // first in list |
lorcansmith | 0:2a53a4c3238c | 918 | al_var.next = &io_alarm; // NULL if only varbind in list |
lorcansmith | 0:2a53a4c3238c | 919 | al_var.ident_len = io_change_id.len; |
lorcansmith | 0:2a53a4c3238c | 920 | al_var.ident = io_oid; |
lorcansmith | 0:2a53a4c3238c | 921 | al_var.value_type = (SNMP_ASN1_APPLIC | SNMP_ASN1_PRIMIT | SNMP_ASN1_GAUGE); |
lorcansmith | 0:2a53a4c3238c | 922 | al_var.value_len = sizeof(u32_t); |
lorcansmith | 0:2a53a4c3238c | 923 | al_var.value = &new_io_val[ 0 ]; |
lorcansmith | 0:2a53a4c3238c | 924 | /* initialise variable binding for f3kIOalarm_trap string */ |
lorcansmith | 0:2a53a4c3238c | 925 | io_alarm.prev = &al_var; // after al_var binding |
lorcansmith | 0:2a53a4c3238c | 926 | io_alarm.next = NULL; // always last in list ... al_string_id |
lorcansmith | 0:2a53a4c3238c | 927 | io_alarm.ident_len = io_alarm_id.len; |
lorcansmith | 0:2a53a4c3238c | 928 | io_alarm.ident = als_oid; |
lorcansmith | 0:2a53a4c3238c | 929 | for ( i = 0; i < io_alarm_id.len; i++ ) |
lorcansmith | 0:2a53a4c3238c | 930 | { |
lorcansmith | 0:2a53a4c3238c | 931 | als_oid[ i ] = io_alarm_id.id[ i ]; |
lorcansmith | 0:2a53a4c3238c | 932 | } |
lorcansmith | 0:2a53a4c3238c | 933 | io_alarm.value_type = (SNMP_ASN1_UNIV | SNMP_ASN1_PRIMIT | SNMP_ASN1_OC_STR); |
lorcansmith | 0:2a53a4c3238c | 934 | io_alarm.value_len = MSG_LNGTH; |
lorcansmith | 0:2a53a4c3238c | 935 | io_alarm.value = &alarm_msg[ 0 ]; |
lorcansmith | 0:2a53a4c3238c | 936 | trap_init = true; |
lorcansmith | 0:2a53a4c3238c | 937 | } |
lorcansmith | 0:2a53a4c3238c | 938 | |
lorcansmith | 0:2a53a4c3238c | 939 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 940 | /* check_all_traps: |
lorcansmith | 0:2a53a4c3238c | 941 | * Description: test states for all trap events and sends appropriate trap |
lorcansmith | 0:2a53a4c3238c | 942 | * Globals used: led1: mimics state of head-link status output in 3000 I/O |
lorcansmith | 0:2a53a4c3238c | 943 | * led2: set to ON if SPI not active |
lorcansmith | 0:2a53a4c3238c | 944 | * byte_changed, all_IO_updated, spi_active |
lorcansmith | 0:2a53a4c3238c | 945 | * Parameters: NONE |
lorcansmith | 0:2a53a4c3238c | 946 | * Returns: NONE |
lorcansmith | 0:2a53a4c3238c | 947 | */ |
lorcansmith | 0:2a53a4c3238c | 948 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 949 | void check_all_traps( void ) |
lorcansmith | 0:2a53a4c3238c | 950 | { |
lorcansmith | 0:2a53a4c3238c | 951 | unsigned char alm; |
lorcansmith | 0:2a53a4c3238c | 952 | |
lorcansmith | 0:2a53a4c3238c | 953 | if ( !led1 && (fsvr.get_byte( H_H_LINK_LSBYTE ) || fsvr.get_byte( H_H_LINK_MSBYTE )) ) |
lorcansmith | 0:2a53a4c3238c | 954 | { // change of link state |
lorcansmith | 0:2a53a4c3238c | 955 | led1 = 1; // flag: link is up when led1 on |
lorcansmith | 0:2a53a4c3238c | 956 | snmp_linkup_trap(); |
lorcansmith | 0:2a53a4c3238c | 957 | } |
lorcansmith | 0:2a53a4c3238c | 958 | else if ( (fsvr.get_byte( H_H_LINK_LSBYTE ) == 0) && (fsvr.get_byte( H_H_LINK_MSBYTE ) == 0) && led1 ) |
lorcansmith | 0:2a53a4c3238c | 959 | { // change of link state |
lorcansmith | 0:2a53a4c3238c | 960 | led1 = 0; |
lorcansmith | 0:2a53a4c3238c | 961 | snmp_linkdown_trap(); |
lorcansmith | 0:2a53a4c3238c | 962 | } |
lorcansmith | 0:2a53a4c3238c | 963 | if ( all_IO_updated && byte_changed ) |
lorcansmith | 0:2a53a4c3238c | 964 | { // any masked-in I/O register changed |
lorcansmith | 0:2a53a4c3238c | 965 | io_oid[ IO_INDEX ] = io_chng_idx; |
lorcansmith | 0:2a53a4c3238c | 966 | io_var.value = &io_chng_val; |
lorcansmith | 0:2a53a4c3238c | 967 | f3kIOchange_trap(); |
lorcansmith | 0:2a53a4c3238c | 968 | all_IO_updated = byte_changed = false; |
lorcansmith | 0:2a53a4c3238c | 969 | } |
lorcansmith | 0:2a53a4c3238c | 970 | if ( spi_active && led2 ) |
lorcansmith | 0:2a53a4c3238c | 971 | { |
lorcansmith | 0:2a53a4c3238c | 972 | led2 = 0; // flag: SPI is up when led2 off |
lorcansmith | 0:2a53a4c3238c | 973 | snmp_SPIup_trap(); |
lorcansmith | 0:2a53a4c3238c | 974 | } |
lorcansmith | 0:2a53a4c3238c | 975 | else if ( !spi_active && !led2 ) |
lorcansmith | 0:2a53a4c3238c | 976 | { |
lorcansmith | 0:2a53a4c3238c | 977 | led2 = 1; // flag: SPI is down when led2 on |
lorcansmith | 0:2a53a4c3238c | 978 | snmp_SPIdown_trap(); |
lorcansmith | 0:2a53a4c3238c | 979 | } |
lorcansmith | 0:2a53a4c3238c | 980 | /* send trap for any changed I/O alarm */ |
lorcansmith | 0:2a53a4c3238c | 981 | for ( alm = 0; alm < NUM_MASK; alm++ ) |
lorcansmith | 0:2a53a4c3238c | 982 | { |
lorcansmith | 0:2a53a4c3238c | 983 | if ( reg_change[ alm ] ) |
lorcansmith | 0:2a53a4c3238c | 984 | { // any alarmed I/O register changed |
lorcansmith | 0:2a53a4c3238c | 985 | io_oid[ IO_INDEX ] = reg_change[ alm ]; |
lorcansmith | 0:2a53a4c3238c | 986 | al_var.value = &new_io_val[ alm ]; |
lorcansmith | 0:2a53a4c3238c | 987 | als_oid[ IO_INDEX ] = alm + 1; |
lorcansmith | 0:2a53a4c3238c | 988 | io_alarm.value = &alarm_msg[ alm ]; |
lorcansmith | 0:2a53a4c3238c | 989 | io_alarm.value_len = strlen( (const char * )alarm_msg[ alm ] ); |
lorcansmith | 0:2a53a4c3238c | 990 | f3kIOalarm_trap(); |
lorcansmith | 0:2a53a4c3238c | 991 | reg_change[ alm ] = 0; |
lorcansmith | 0:2a53a4c3238c | 992 | } |
lorcansmith | 0:2a53a4c3238c | 993 | } |
lorcansmith | 0:2a53a4c3238c | 994 | } |
lorcansmith | 0:2a53a4c3238c | 995 | |
lorcansmith | 0:2a53a4c3238c | 996 | |
lorcansmith | 0:2a53a4c3238c | 997 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 998 | /****************************************************************************/ |
lorcansmith | 0:2a53a4c3238c | 999 | int main() { |
lorcansmith | 0:2a53a4c3238c | 1000 | int idx; |
lorcansmith | 0:2a53a4c3238c | 1001 | |
lorcansmith | 0:2a53a4c3238c | 1002 | new_cmd_idx = 0xaa; |
lorcansmith | 0:2a53a4c3238c | 1003 | for ( idx = 0; idx < MAX_CMD; idx++ ) |
lorcansmith | 0:2a53a4c3238c | 1004 | { // put meaningful non-valid data in cmd_buf |
lorcansmith | 0:2a53a4c3238c | 1005 | cmd_buf[ idx ] = new_cmd_idx; |
lorcansmith | 0:2a53a4c3238c | 1006 | } |
lorcansmith | 0:2a53a4c3238c | 1007 | /* v1.04: clear all alarm trap masks */ |
lorcansmith | 0:2a53a4c3238c | 1008 | for ( idx = 0; idx < NUM_MASK; idx++ ) |
lorcansmith | 0:2a53a4c3238c | 1009 | { |
lorcansmith | 0:2a53a4c3238c | 1010 | reg_change[ idx ] = 0; // clear all I/O register changed flags |
lorcansmith | 0:2a53a4c3238c | 1011 | io_mask[ idx ] = 0; // clear masks for alarms on IO registers |
lorcansmith | 0:2a53a4c3238c | 1012 | } |
lorcansmith | 0:2a53a4c3238c | 1013 | pc.printf("=================== Version %s ====================\r\n", snmp_fw_version); |
lorcansmith | 0:2a53a4c3238c | 1014 | // pc.printf("Press any key to start...\r\n"); |
lorcansmith | 0:2a53a4c3238c | 1015 | led3 = 1; |
lorcansmith | 0:2a53a4c3238c | 1016 | |
lorcansmith | 0:2a53a4c3238c | 1017 | FSHandler::mount("/webfs", "/files"); // Mount /webfs path on /files web path |
lorcansmith | 0:2a53a4c3238c | 1018 | FSHandler::mount("/webfs", "/"); // Mount /webfs path on web root path |
lorcansmith | 0:2a53a4c3238c | 1019 | read_addrs_from_file(); |
lorcansmith | 0:2a53a4c3238c | 1020 | read_alarm_from_file( NUM_MASK ); // read all I/O masks |
lorcansmith | 0:2a53a4c3238c | 1021 | |
lorcansmith | 0:2a53a4c3238c | 1022 | /* Force fixed Ethernet address */ |
lorcansmith | 0:2a53a4c3238c | 1023 | EthernetNetIf eth( |
lorcansmith | 0:2a53a4c3238c | 1024 | IpAddr( ip_ad[0], ip_ad[1], ip_ad[2], ip_ad[3] ), //IP Address |
lorcansmith | 0:2a53a4c3238c | 1025 | IpAddr( msk_ad[0], msk_ad[1], msk_ad[2], msk_ad[3] ), //Network Mask |
lorcansmith | 0:2a53a4c3238c | 1026 | IpAddr( gwy_ad[0], gwy_ad[1], gwy_ad[2], gwy_ad[3] ), //Gateway |
lorcansmith | 0:2a53a4c3238c | 1027 | IpAddr( dns_ad[0], dns_ad[1], dns_ad[2], dns_ad[3] ) //DNS Server |
lorcansmith | 0:2a53a4c3238c | 1028 | ); |
lorcansmith | 0:2a53a4c3238c | 1029 | |
lorcansmith | 0:2a53a4c3238c | 1030 | Base::add_rpc_class<DigitalOut>(); |
lorcansmith | 0:2a53a4c3238c | 1031 | #if 0 |
lorcansmith | 0:2a53a4c3238c | 1032 | Base::add_rpc_class<SPI_Server>(); |
lorcansmith | 0:2a53a4c3238c | 1033 | #endif |
lorcansmith | 0:2a53a4c3238c | 1034 | |
lorcansmith | 0:2a53a4c3238c | 1035 | // pc.getc(); // wait for keyboard |
lorcansmith | 0:2a53a4c3238c | 1036 | led3 = 0; |
lorcansmith | 0:2a53a4c3238c | 1037 | |
lorcansmith | 0:2a53a4c3238c | 1038 | strcpy( (char *)syslocation, (const char *)syslocation_default ); |
lorcansmith | 0:2a53a4c3238c | 1039 | sysloc_len = strlen( (const char *)syslocation ); |
lorcansmith | 0:2a53a4c3238c | 1040 | snmp_set_syslocation( syslocation, &sysloc_len ); |
lorcansmith | 0:2a53a4c3238c | 1041 | |
lorcansmith | 0:2a53a4c3238c | 1042 | pc.printf("\r\nSetting up...\r\n"); |
lorcansmith | 0:2a53a4c3238c | 1043 | EthernetErr ethErr = eth.setup(); |
lorcansmith | 0:2a53a4c3238c | 1044 | if( ethErr ) |
lorcansmith | 0:2a53a4c3238c | 1045 | { |
lorcansmith | 0:2a53a4c3238c | 1046 | pc.printf("Error %d in Ethernet setup.\r\n", ethErr); |
lorcansmith | 0:2a53a4c3238c | 1047 | // return -1; |
lorcansmith | 0:2a53a4c3238c | 1048 | } |
lorcansmith | 0:2a53a4c3238c | 1049 | else // Ethernet Setup OK |
lorcansmith | 0:2a53a4c3238c | 1050 | { |
lorcansmith | 0:2a53a4c3238c | 1051 | mip = eth.getIp(); |
lorcansmith | 0:2a53a4c3238c | 1052 | led3 = 1; |
lorcansmith | 0:2a53a4c3238c | 1053 | led_speed = LPC_GPIO1->FIOPIN & (1<<26); // GPIO1.26 = "LED_SPEED". |
lorcansmith | 0:2a53a4c3238c | 1054 | led_link = LPC_GPIO1->FIOPIN & (1<<25); // GPIO1.25 = "LED_LINK". |
lorcansmith | 0:2a53a4c3238c | 1055 | pc.printf("\r\nEthernet Setup OK\r\n"); |
lorcansmith | 0:2a53a4c3238c | 1056 | |
lorcansmith | 0:2a53a4c3238c | 1057 | svr.addHandler<RPCHandler>("/rpc"); |
lorcansmith | 0:2a53a4c3238c | 1058 | svr.addHandler<FSHandler>("/files"); |
lorcansmith | 0:2a53a4c3238c | 1059 | svr.addHandler<FSHandler>("/"); //Default handler |
lorcansmith | 0:2a53a4c3238c | 1060 | //Example : Access to mbed.htm : http://a.b.c.d/mbed.htm or http://a.b.c.d/files/mbed.htm |
lorcansmith | 0:2a53a4c3238c | 1061 | |
lorcansmith | 0:2a53a4c3238c | 1062 | // svr.bind(80); disable for SNMP development |
lorcansmith | 0:2a53a4c3238c | 1063 | |
lorcansmith | 0:2a53a4c3238c | 1064 | // snmp_init(); done in lwip/core/init.c |
lorcansmith | 0:2a53a4c3238c | 1065 | |
lorcansmith | 0:2a53a4c3238c | 1066 | pc.printf("Listening...\n\r"); |
lorcansmith | 0:2a53a4c3238c | 1067 | |
lorcansmith | 0:2a53a4c3238c | 1068 | snmp_trap_dst_ip_set( ONLY_TRAP, (ip_addr_t *)&th_ad[0] ); |
lorcansmith | 0:2a53a4c3238c | 1069 | snmp_trap_dst_enable( ONLY_TRAP, ENABLED ); |
lorcansmith | 0:2a53a4c3238c | 1070 | snmp_coldstart_trap(); // to force ARP call |
lorcansmith | 0:2a53a4c3238c | 1071 | |
lorcansmith | 0:2a53a4c3238c | 1072 | led3 = led4 = 0; |
lorcansmith | 0:2a53a4c3238c | 1073 | spi_slave.format(8,3); // Setup: byte data, high steady state clock, 2nd edge capture |
lorcansmith | 0:2a53a4c3238c | 1074 | |
lorcansmith | 0:2a53a4c3238c | 1075 | sys_tick.attach( &snmp_inc_sysuptime, 0.01 ); |
lorcansmith | 0:2a53a4c3238c | 1076 | spi_tick.attach( &chk_SPI_active, 120.0 ); |
lorcansmith | 0:2a53a4c3238c | 1077 | comms_tick.attach( &blinker, 0.07 ); // tick to blink activity LED |
lorcansmith | 0:2a53a4c3238c | 1078 | cold_start_delay.attach( &init_traps, 30.0 ); // send cold_start trap after 30 seconds |
lorcansmith | 0:2a53a4c3238c | 1079 | |
lorcansmith | 0:2a53a4c3238c | 1080 | |
lorcansmith | 0:2a53a4c3238c | 1081 | // Listen indefinitely to Ethernet and SPI |
lorcansmith | 0:2a53a4c3238c | 1082 | while ( true ) |
lorcansmith | 0:2a53a4c3238c | 1083 | { |
lorcansmith | 0:2a53a4c3238c | 1084 | Net::poll(); // check for Ethernet requests |
lorcansmith | 0:2a53a4c3238c | 1085 | |
lorcansmith | 0:2a53a4c3238c | 1086 | if ( trap_init ) |
lorcansmith | 0:2a53a4c3238c | 1087 | { |
lorcansmith | 0:2a53a4c3238c | 1088 | check_all_traps(); |
lorcansmith | 0:2a53a4c3238c | 1089 | } |
lorcansmith | 0:2a53a4c3238c | 1090 | |
lorcansmith | 0:2a53a4c3238c | 1091 | if( spi_slave.receive() ) { |
lorcansmith | 0:2a53a4c3238c | 1092 | // Data available - needs chip select line to activate |
lorcansmith | 0:2a53a4c3238c | 1093 | get_SPI_data( cmd_buf ); |
lorcansmith | 0:2a53a4c3238c | 1094 | } // end if( spi_slave.receive() ) |
lorcansmith | 0:2a53a4c3238c | 1095 | if ( (net_addrs_chng == 2) || (net_addrs_chng == 1) ) |
lorcansmith | 0:2a53a4c3238c | 1096 | { // v0.93: address changed in 3000 CPU |
lorcansmith | 0:2a53a4c3238c | 1097 | copy_net_addresses_from( fsvr.net_address_ptr() ); |
lorcansmith | 0:2a53a4c3238c | 1098 | copy_trap_host_address( fsvr.trap_host_ptr() ); |
lorcansmith | 0:2a53a4c3238c | 1099 | write_addrs_to_file(); |
lorcansmith | 0:2a53a4c3238c | 1100 | } |
lorcansmith | 0:2a53a4c3238c | 1101 | if ( net_addrs_set ) |
lorcansmith | 0:2a53a4c3238c | 1102 | { // v0.99: address changed from SNMP i/f |
lorcansmith | 0:2a53a4c3238c | 1103 | write_addrs_to_file(); |
lorcansmith | 0:2a53a4c3238c | 1104 | net_addrs_set = false; |
lorcansmith | 0:2a53a4c3238c | 1105 | } |
lorcansmith | 0:2a53a4c3238c | 1106 | if ( alarm_str_set ) |
lorcansmith | 0:2a53a4c3238c | 1107 | { |
lorcansmith | 0:2a53a4c3238c | 1108 | write_alarms_to_file(); |
lorcansmith | 0:2a53a4c3238c | 1109 | alarm_str_set = false; |
lorcansmith | 0:2a53a4c3238c | 1110 | } |
lorcansmith | 0:2a53a4c3238c | 1111 | } // end while ( true ) |
lorcansmith | 0:2a53a4c3238c | 1112 | |
lorcansmith | 0:2a53a4c3238c | 1113 | } // else Ethernet Setup OK |
lorcansmith | 0:2a53a4c3238c | 1114 | return 0; |
lorcansmith | 0:2a53a4c3238c | 1115 | } |