/****************************************************************************

**

** Copyright (C) 2009 Nokia Corporation and/or its subsidiary(-ies).

** All rights reserved.

** Contact: Nokia Corporation (qt-info@nokia.com)

**

** This file is part of the examples of the Qt Toolkit.

**

** $QT_BEGIN_LICENSE:LGPL$

** No Commercial Usage

** This file contains pre-release code and may not be distributed.

** You may use this file in accordance with the terms and conditions

** contained in the Technology Preview License Agreement accompanying

** this package.

**

** GNU Lesser General Public License Usage

** Alternatively, this file may be used under the terms of the GNU Lesser

** General Public License version 2.1 as published by the Free Software

** Foundation and appearing in the file LICENSE.LGPL included in the

** packaging of this file.  Please review the following information to

** ensure the GNU Lesser General Public License version 2.1 requirements

** will be met: http://www.gnu.org/licenses/old-licenses/lgpl-2.1.html.

**

** In addition, as a special exception, Nokia gives you certain additional

** rights.  These rights are described in the Nokia Qt LGPL Exception

** version 1.1, included in the file LGPL_EXCEPTION.txt in this package.

**

** If you have questions regarding the use of this file, please contact

** Nokia at qt-info@nokia.com.

**

**

**

**

**

**

**

**

** $QT_END_LICENSE$

**

****************************************************************************/

#include <QTcpServer>

#include <QTcpSocket>

#include "BrowserWindow.h"

#include "httpserver.h"

#define HTTP_PORT 80

httpServer::httpServer( QObject *parent  )

         : QTcpServer( parent )

{

    httpSocket = NULL;

    tcpServer = new QTcpServer( /* this */ );

    not_done = true;

    bool result = tcpServer->listen(QHostAddress::Any, HTTP_PORT );

    if ( !result )

    {

        delete tcpServer;

        close();

        not_done = false;

        return;

    }

    connect(tcpServer, SIGNAL(newConnection()), this, SLOT(handleNewConnection()));

}

httpServer::~httpServer()

{

    if ( httpSocket )

    {

        httpSocket->disconnect(SIGNAL(readyRead()));

        httpSocket->disconnect(SIGNAL(error(QAbstractSocket::SocketError)));

        httpSocket->close();

        httpSocket->abort();

        httpSocket->deleteLater();

        httpSocket = NULL;

    }

}

bool httpServer::isDone()

{

    return not_done;

}

void httpServer::handleNewConnection()

{

    QTcpSocket *clientConnection = tcpServer->nextPendingConnection();

    clientConnection->setTextModeEnabled(true);

    if ( !httpSocket )

    {

        httpSocket = clientConnection;

        connect( httpSocket,

            SIGNAL(readyRead()),

            this,

            SLOT(readConnection()));

        connect(httpSocket, SIGNAL(error(QAbstractSocket::SocketError)),

             this, SLOT(displayConnectionError(QAbstractSocket::SocketError)));

    }

    else

    {

        // We already are busy with open connection?!

        // qDebug() << "Server busy.\n";

        clientConnection->disconnectFromHost();

    }

}

void httpServer::displayConnectionError(QAbstractSocket::SocketError /* socketError */ )

{

    httpSocket->disconnect(SIGNAL(readyRead()));

    httpSocket->disconnect(SIGNAL(error(QAbstractSocket::SocketError)));

    httpSocket->close();

    httpSocket->abort();

    httpSocket->deleteLater();

    httpSocket = NULL;

}

void httpServer::readConnection()

{

    while (httpSocket->canReadLine())

    {

        char buf[256];

        qint64 lineLength = httpSocket->readLine(buf, sizeof(buf));

        if (lineLength != -1)

        {

            QString tmpCommand(buf);

            tmpCommand = tmpCommand.simplified();

            // qDebug() << "Received: '" << buf << "'\n";

            if ( tmpCommand.left(4) == QString("GET ") )

            {

                qDebug() << "QTESTWEB: Received GET:" << buf << "\n";

		            // Craft and send a response

				        QString answer("HTTP/1.x 200 OK\nDate: Tue, 06 Jul 2004 17:59:22 GMT\n");

				        answer.append("Expires: Thu, 01 Jan 1970 00:00:00 GMT\n");

				        answer.append("Cache-Control: private, must-revalidate\n");

				        answer.append("Via: 1.0 cthulhu\n");

				        answer.append("Server: Apache/1.3.29 (Unix) PHP/4.3.4\n");

				        answer.append("X-Powered-By: PHP/4.3.4\n");

				        answer.append("Set-Cookie: fiwikiSession=a8015bd32eee4e5bd46fd83aea40f159; path=/\n");

				        answer.append("Vary: Accept-Encoding,Cookie\n");

				        answer.append("Content-Language: fi\n");

				        answer.append("Content-Type: text/html; charset=utf-8\n");

				        answer.append("X-Cache: MISS from wikipedia.org\n");

				        answer.append("Transfer-Encoding: chunked\n");

				        answer.append("Connection: keep-alive\n");

				        httpSocket->write(qPrintable(answer));

				        QString content("<HTML><HEAD><TITLE>Example Page</TITLE></HEAD>\n");

				        content.append("<body><p>Empty page sent by test server.</p></BODY></HTML>");

				        httpSocket->write(qPrintable(content));            

				        httpSocket->flush();

						    QTest::qWait(200);

				        not_done = false;

            }

/*

            else

            {

                qDebug() << "Received unknown:" << buf << "\n";

            }

*/            

        }

    }

}