File content as of revision 8:22eb078985b1:

// Twitter Mbed with Gain Span WiFi
// 
// coded by Kazushi Mukaiyama (http://www.kazushi.info/)
// refer to gs fan's notebook (http://mbed.org/users/gsfan/notebook/gainspan_wifi/)
// refer to GingaX's notebook (http://www31.atwiki.jp/gingax/pages/63.html)

#include "mbed.h"
#include "PowerControl/PowerControl.h"
#include "PowerControl/EthernetPowerControl.h"
#include "GSwifi.h"
#include "sjis_utf16.h"
#include "s_Lcd.h"

#define countof(x) ( sizeof(x) / sizeof(x[0]) )

#define SECURE GSSEC_WPA_PSK
#define SSID "WIFISSID"
#define PASS "abcdef1234"

#define HTTP_HOST "api.supertweet.net" // SuperTweet.net
//#define HTTP_URI "/1.1/statuses/show.json?id=281639966776369152"
#define HTTP_URI "/1.1/statuses/user_timeline.json?screen_name=pla3c&count=1"
#define HTTP_USER "user"
#define HTTP_PASS "pass"
#define INTERVAL_SEC 60.0

//#define _DEBUG

GSwifi gs(p13, p14); // TX, RX (no flow control)
DigitalOut led1(LED1), led2(LED2);
#ifdef _DEBUG
    Serial pc(USBTX, USBRX);
#endif

unsigned char kstatus = 0;
bool estate = false;
unsigned char unibuf[4];

unsigned short convert(unsigned short utf){
    unsigned short sjis = NULL; 
    for(int i=0; i<countof(sjis2utf16)/2; i++){
        if(utf==sjis2utf16[i*2+1]){
            sjis = sjis2utf16[i*2];
            break;
        }
    }
    return sjis;
}

void drawChar(unsigned char c){
    if(estate && kstatus==4){ // 1st digit of utf-16
        unibuf[3] = c;
        char *endptr;
        unsigned short code = convert(strtol((char*)unibuf, &endptr, 16));
        //kanji_init();
        color(0xffff);
        k_puts(code);
        //kanji_end();
#ifdef _DEBUG
        pc.printf("%s, %x\r\n", unibuf, code);
#endif
        kstatus = 0;
        estate = false;
    } else if(estate && kstatus==3){ // 2nd digit of utf-16
        unibuf[2] = c;
        kstatus = 4;
    } else if(estate && kstatus==2){ // 3rd digit of utf-16
        unibuf[1] = c;
        kstatus = 3;
    } else if(estate && kstatus==1){ // 4th digit of utf-16
        unibuf[0] = c;
        kstatus = 2;
    } else if(estate && c=='u'){
        kstatus = 1;
    } else if(estate && !c=='u'){
        drawc(c);
        kstatus = 0;
        estate = false;
    } else if(c=='\\'){ // escape code
        estate = true;
    } else { // 4x8font
        drawc(c);
    }
}

void drawString(const unsigned char *s){
    unsigned char c;
    while((c = *s++) != '\0') drawChar(c);
}

int connect(){
    IpAddr ipaddr, netmask, gateway, nameserver;
    
    //gs.command("AT&F", GSRES_NORMAL);
    
    if (gs.connect(SECURE, SSID, PASS, 1, 5)) {
        drawString("WiFi connection error"); newline();
#ifdef _DEBUG
        pc.printf("WiFi connection error\r\n");
#endif
        return -1;
    }
    
    gs.getAddress(ipaddr, netmask, gateway, nameserver);
    if(nameserver.isNull()) {
        nameserver = IpAddr(192,168,1,1);
        gs.setAddress(ipaddr, netmask, gateway, nameserver);
        gs.getAddress(ipaddr, netmask, gateway, nameserver);
    }
#ifdef _DEBUG
    pc.printf("ip %d.%d.%d.%d\r\n", ipaddr[0], ipaddr[1], ipaddr[2], ipaddr[3]);
    pc.printf("gw %d.%d.%d.%d\r\n", gateway[0], gateway[1], gateway[2], gateway[3]);
    pc.printf("ns %d.%d.%d.%d\r\n", nameserver[0], nameserver[1], nameserver[2], nameserver[3]);
#endif
    char localip[20];
    sprintf(localip, "ip %d.%d.%d.%d", ipaddr[0], ipaddr[1], ipaddr[2], ipaddr[3]);
    drawString((unsigned char*)localip); newline();
    sprintf(localip, "gw %d.%d.%d.%d", gateway[0], gateway[1], gateway[2], gateway[3]);
    drawString((unsigned char*)localip); newline();
    sprintf(localip, "ns %d.%d.%d.%d", nameserver[0], nameserver[1], nameserver[2], nameserver[3]);
    drawString((unsigned char*)localip); newline();
    
    delete [] localip;
    
    return 0;
}

void onGsReceive (int cid, int len) {
    int i;
    char buf[GS_DATA_SIZE + 1];
    
    led2 = 1;
    i = gs.recv(cid, buf, len);
    buf[i] = 0;
    
    // parse buffer    
    char* c = strtok(buf, "\r\n");
    if(strcmp(c, "200 OK")==0){
        while(c!=NULL){
            c = strtok(NULL, "\"");
            char key[4];
            sprintf(key, "%.4s", c);
            if(strcmp(key, "text")==0){
                c = strtok(NULL, "\"");
                c = strtok(NULL, "\"");
#ifdef _DEBUG
                pc.printf("%s\r\n", c);
#endif
                color(0x001f);
                cls();
                color(0xffff);
                //c = strtok(c, "@");
                drawString((unsigned char*)c); newline();
                //c = strtok(NULL, "@");
                //drawString((unsigned char*)c); newline();
                break;
            }
        }
    }
    
    led2 = 0;
    
    //delete [] buf;
}

int main() {
    int r;
    char* msg;
    Host host;
    led1 = 0;
    
    PHY_PowerDown();
    Peripheral_PowerDown(0x7D7F6FE1);    
    gs.setBaud(115200);
#ifdef _DEBUG
    pc.baud(115200);
#endif
    
    s_Lcdinit();
    
    color(0x001f);
    cls();
    color(0xffff);

    msg = "connect";
    drawString((unsigned char*)msg); newline();
    r = connect();
    if(r<0){
        NVIC_SystemReset();
    }
    
    msg = "start twitter";
    drawString((unsigned char*)msg); newline();
    
    host.setName(HTTP_HOST);

    while(1) {
        led1 = !led1; wait_ms(500); led1 = !led1; // blink
        
        r = gs.httpGet(host, HTTP_URI, HTTP_USER, HTTP_PASS, 0, &onGsReceive);
        gs.poll();       
        if (!gs.isConnected(r)) {
            color(0x001f);
            cls();
            msg = "reconnect";
            drawString((unsigned char*)msg); newline();
            wait_ms(5);
            r = gs.disconnect();
            r = connect();
        }

        wait(INTERVAL_SEC);
   }
   
}