int main(void) {
static uint8_t buffer[BufferSize + 1];
int8_t i;
uint8_t message[4] = { 0, 0, CID, P2CID };
uint16_t received;
snesIO port0 = 0xffff, port1 = 0xffff;
// Initialise basic I/O.
initLed();
initInput();
initOutput();
// Switched mode: B + Y.
port0 = recvInput();
if (port0 == 0xfffc) {
switchedMode = Enabled;
ledSignal(5);
}
ledOnRed();
// Initialise network interface.
enc28j60Init(mymac);
_delay_ms(100);
// Magjack leds configuration, see enc28j60 datasheet, page 11
// LEDB=yellow LEDA=green
// 0x476 is PHLCON LEDA=links status, LEDB=receive/transmit
// enc28j60PhyWrite(PHLCON,0b0000 0100 0111 01 10);
enc28j60PhyWrite(PHLCON, 0x476);
_delay_ms(100);
// Get the initial IP via DHCP and configure network.
init_mac(mymac);
while (i != 1) {
received = enc28j60PacketReceive(BufferSize, buffer);
buffer[BufferSize] = '\0';
i = packetloop_dhcp_initial_ip_assignment(buffer, received, mymac[5]);
}
dhcp_get_my_ip(myip, netmask, gwip);
client_ifconfig(myip, netmask);
// Resolve MAC address from server IP.
if (route_via_gw(serverip)) // Must be routed via gateway.
get_mac_with_arp(gwip, TransNumGwmac, &arpresolverResultCallback);
else // Server is on local network.
get_mac_with_arp(serverip, TransNumGwmac, &arpresolverResultCallback);
while (get_mac_with_arp_wait()) {
received = enc28j60PacketReceive(BufferSize, buffer);
// Call packetloop to process ARP reply.
packetloop_arp_icmp_tcp(buffer, received);
}
// Lookup DNS of the server hostname.
while (dnslkup_haveanswer() != 1) {
uint16_t tmp;
received = enc28j60PacketReceive(BufferSize, buffer);
tmp = packetloop_arp_icmp_tcp(buffer, received);
if (received == 0) {
if (!enc28j60linkup()) continue;
dnslkup_request(buffer, ServerVHost, gwmac);
_delay_ms(100);
continue;
}
if (tmp == 0)
udp_client_check_for_dns_answer(buffer, received);
}
dnslkup_get_ip(serverip);
ledOnGreen(); // Connected.
while (1) { // Main loop start.
received = enc28j60PacketReceive(BufferSize, buffer);
// Software reset: L + R + Select + Start.
if (port0 == 0xf3f3) reset();
// Do something while no packet in queue.
if (received == 0) {
port0 = recvInput();
// Prepare message and send it to the server.
for (i = 0; i < 8; i++) { // Lo-Byte.
char *c = message;
*c = port0 & (1 << i)
? *c | (1 << i)
: *c & ~(1 << i);
}
for (i = 0; i < 8; i++) { // Hi-Byte.
char *c = message + 1;
*c = port0 & (1 << i + 8)
? *c | (1 << i)
: *c & ~(1 << i);
}
send_udp(buffer, message, sizeof(message), 57351, serverip, 57350, gwmac);
// Send controller data to SNES.
if (switchedMode == Disabled)
sendOutput(port0, port1);
else
sendOutput(port1, port0);
continue;
}
// Answer to ARP requests.
if (eth_type_is_arp_and_my_ip(buffer, received)) {
make_arp_answer_from_request(buffer, received);
continue;
}
// Check if IP packets (ICMP or UDP) are for us.
if (eth_type_is_ip_and_my_ip(buffer, received) == 0)
continue;
// Answer ping with pong.
if (
buffer[IP_PROTO_P] == IP_PROTO_ICMP_V &&
buffer[ICMP_TYPE_P] == ICMP_TYPE_ECHOREQUEST_V) {
make_echo_reply_from_request(buffer, received);
continue;
}
// Listen for UDP packets on port 57351 (0xe007) and process
// received data.
if (
buffer[IP_PROTO_P] == IP_PROTO_UDP_V &&
buffer[UDP_DST_PORT_H_P] == 0xe0 &&
buffer[UDP_DST_PORT_L_P] == 0x07) {
for (i = 0; i < 8; i++) {
uint16_t *c = &port1;
*c = buffer[UDP_DATA_P] & (1 << i)
? *c | (1 << i)
: *c & ~(1 << i);
}
for (i = 0; i < 8; i++) {
uint16_t *c = &port1;
*c = buffer[UDP_DATA_P + 1] & (1 << i)
? *c | (1 << i + 8)
: *c & ~(1 << i + 8);
}
}
} // Main loop end.
return (0);
}
/*---------------------------------------------------------------------------*/
int main(void)
{
uint16_t rval;
/* init hardware layer */
init_hci();
timer1_init();
init_serial();
sei();
led1_high();
led2_high();
/* init protothreads */
PT_INIT(&blink_pt);
PT_INIT(&nrf24_pt);
PT_INIT(&www_client_pt);
PT_INIT(&www_server_pt);
PT_INIT(&udp_server_pt);
PT_INIT(&coap_server_pt);
PT_INIT(&temperature_pt);
PT_INIT(&udp_broadcast_pt);
/* greeting message */
dbg(PSTR("> Hello World!\r\n"));
/* init the ethernet chip */
enc28j60Init(mymac);
enc28j60PhyWrite(PHLCON,0x476);
/* get automatic IP */
rval=0;
init_mac(mymac);
while(rval==0)
{
plen=enc28j60PacketReceive(BUFFER_SIZE, buf);
rval=packetloop_dhcp_initial_ip_assignment(buf,plen,mymac[5]);
}
dhcp_get_my_ip(myip,netmask,gwip);
client_ifconfig(myip,netmask);
/* learn the MAC address of the gateway */
get_mac_with_arp(gwip,0,&arpresolver_result_callback);
while(get_mac_with_arp_wait())
{
plen=enc28j60PacketReceive(BUFFER_SIZE, buf);
packetloop_arp_icmp_tcp(buf,plen);
}
/* set WWW server port */
www_server_port(MYWWWPORT);
dbg(PSTR("> System is ready.\r\n"));
led1_low();
led2_low();
/* main loop */
while(1)
{
if(enc28j60linkup())
{
/* poll hardware ethernet buffer */
plen = enc28j60PacketReceive(BUFFER_SIZE,buf);
/* terminate the buffer */
buf[BUFFER_SIZE]='\0';
/* handle DHCP messages if neccessary */
plen = packetloop_dhcp_renewhandler(buf,plen);
/* handle and analyse the packet slightly */
dat_p = packetloop_arp_icmp_tcp(buf,plen);
if( dat_p == 0)
{
udp_client_check_for_dns_answer(buf,plen);
}
new_packet = 0xFF;
PT_SCHEDULE(blink_thread(&blink_pt));
PT_SCHEDULE(nrf24_thread(&nrf24_pt));
PT_SCHEDULE(www_server_thread(&www_server_pt));
PT_SCHEDULE(udp_server_thread(&udp_server_pt));
PT_SCHEDULE(www_client_thread(&www_client_pt));
PT_SCHEDULE(coap_server_thread(&coap_server_pt));
PT_SCHEDULE(temperature_thread(&temperature_pt));
PT_SCHEDULE(udp_broadcast_thread(&udp_broadcast_pt));
}
}
return 0;
}
