Subversion Repositories tcp_socket

////////////////////////////////////////////////////////////////////////////////

//

//  CHIPS-2.0  HTTP

//

//  :Author: Jonathan P Dawson

//  :Date: 17/10/2013

//  :email: chips@jondawson.org.uk

//  :license: MIT

//  :Copyright: Copyright (C) Jonathan P Dawson 2013

//

//  Constuct an HTTP response for simple web app.

//

////////////////////////////////////////////////////////////////////////////////

unsigned socket_high = 1;

unsigned socket_data;

void socket_put_char(char x){

        if(socket_high){

                socket_high = 0;

                socket_data = x << 8;

        } else {

                socket_high = 1;

                socket_data |= x & 0xff;

                put_socket(socket_data);

        }

}

void socket_flush(){

        if(!socket_high) put_socket(socket_data);

        socket_high = 1;

}

void socket_put_string(unsigned string[]){

        unsigned i;

        while(string[i]){

                socket_put_char(string[i]);

                i++;

        }

}

void socket_put_decimal(unsigned value){

        unsigned digit_0 = 0;

        unsigned digit_1 = 0;

        unsigned digit_2 = 0;

        unsigned digit_3 = 0;

        unsigned digit_4 = 0;

        unsigned significant = 0;

        while(value >= 10000){

                digit_4++;

                value -= 10000;

        }

        if(digit_4 | significant){

                socket_put_char(0x30 | digit_4);

                significant = 1;

        }

        while(value >= 1000){

                digit_3++;

                value -= 1000;

        }

        if(digit_3 | significant) {

                socket_put_char(0x30 | digit_3);

                significant = 1;

        }

        while(value >= 100){

                digit_2++;

                value -= 100;

        }

        if(digit_2 | significant){

                socket_put_char(0x30 | digit_2);

                significant = 1;

        }

        while(value >= 10){

                digit_1++;

                value -= 10;

        }

        if(digit_1 | significant){

                socket_put_char(0x30 | digit_1);

                significant = 1;

        }

        while(value >= 1){

                digit_0++;

                value -= 1;

        }

        socket_put_char(0x30 | digit_0);

}

void HTTP_Not_Found(){

        unsigned header_length;

        unsigned header[] =

"HTTP/1.1 404 Not Found\r\n\

Date: Thu Oct 31 19:16:00 2013\r\n\

Server: chips-web/0.0\r\n\

Content-Type: text/html\r\n\

Content-Length: 0\r\n\r\n";

        //count header length

        header_length = 0;

        while(header[header_length]) header_length++;

        put_socket(header_length);

        socket_put_string(header);

        socket_flush();

}

void HTTP_OK(int body[]){

        unsigned header_length;

        unsigned body_length;

        unsigned length, index, packet_count;

        unsigned header[] =

"HTTP/1.1 200 OK\r\n\

Date: Thu Oct 31 19:16:00 2013\r\n\

Server: chips-web/0.0\r\n\

Content-Type: text/html\r\n\

Content-Length: ";

        //count body length

        body_length = 0;

        while(body[body_length]) body_length++;

        //count header length

        header_length = 0;

        while(header[header_length]) header_length++;

        //count total length

        length = header_length + 5;

        //header length depends on body length

        if(body_length > 9) length++;

        if(body_length > 99) length++;

        if(body_length > 999) length++;

        //Send length to server

        put_socket(length);

        //Send header to server

        socket_put_string(header);

        socket_put_decimal(body_length);

        socket_put_string("\r\n\r\n");

        socket_flush();

        length = body_length;

        index = 0;

        packet_count = 0;

        while(length >= 1046){

                length -= 1046;

                put_socket(1046);

                for(packet_count=0; packet_count<1046; packet_count++){

                        socket_put_char(body[index]);

                        index++;

                }

                socket_flush();

        }

        put_socket(length);

        for(packet_count=0; packet_count<length; packet_count++){

                socket_put_char(body[index]);

                index++;

        }

        socket_flush();

}