1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
|
/****************************************************************************
**
** Copyright (C) 1992-2008 Trolltech ASA. All rights reserved.
**
** This file is part of an example program for TQt. This example
** program may be used, distributed and modified without limitation.
**
*****************************************************************************/
#include <stdlib.h>
#include <qsocket.h>
#include <qregexp.h>
#include <qserversocket.h>
#include <qapplication.h>
#include <qmainwindow.h>
#include <qtextstream.h>
#include <qvbox.h>
#include <qlabel.h>
#include <qtextview.h>
#include <qpushbutton.h>
// HttpDaemon is the the class that implements the simple HTTP server.
class HttpDaemon : public TQServerSocket
{
Q_OBJECT
public:
HttpDaemon( TQObject* parent=0 ) :
TQServerSocket(8080,1,parent)
{
if ( !ok() ) {
qWarning("Failed to bind to port 8080");
exit( 1 );
}
}
void newConnection( int socket )
{
// When a new client connects, the server constructs a TQSocket and all
// communication with the client is done over this TQSocket. TQSocket
// works asynchronouslyl, this means that all the communication is done
// in the two slots readClient() and discardClient().
TQSocket* s = new TQSocket( this );
connect( s, SIGNAL(readyRead()), this, SLOT(readClient()) );
connect( s, SIGNAL(delayedCloseFinished()), this, SLOT(discardClient()) );
s->setSocket( socket );
emit newConnect();
}
signals:
void newConnect();
void endConnect();
void wroteToClient();
private slots:
void readClient()
{
// This slot is called when the client sent data to the server. The
// server looks if it was a get request and sends a very simple HTML
// document back.
TQSocket* socket = (TQSocket*)sender();
if ( socket->canReadLine() ) {
TQStringList tokens = TQStringList::split( TQRegExp("[ \r\n][ \r\n]*"), socket->readLine() );
if ( tokens[0] == "GET" ) {
TQTextStream os( socket );
os.setEncoding( TQTextStream::UnicodeUTF8 );
os << "HTTP/1.0 200 Ok\r\n"
"Content-Type: text/html; charset=\"utf-8\"\r\n"
"\r\n"
"<h1>Nothing to see here</h1>\n";
socket->close();
emit wroteToClient();
}
}
}
void discardClient()
{
TQSocket* socket = (TQSocket*)sender();
delete socket;
emit endConnect();
}
};
// HttpInfo provides a simple graphical user interface to the server and shows
// the actions of the server.
class HttpInfo : public TQVBox
{
Q_OBJECT
public:
HttpInfo()
{
HttpDaemon *httpd = new HttpDaemon( this );
TQString itext = TQString(
"This is a small httpd example.\n"
"You can connect with your\n"
"web browser to port %1"
).arg( httpd->port() );
TQLabel *lb = new TQLabel( itext, this );
lb->setAlignment( AlignHCenter );
infoText = new TQTextView( this );
TQPushButton *quit = new TQPushButton( "quit" , this );
connect( httpd, SIGNAL(newConnect()), SLOT(newConnect()) );
connect( httpd, SIGNAL(endConnect()), SLOT(endConnect()) );
connect( httpd, SIGNAL(wroteToClient()), SLOT(wroteToClient()) );
connect( quit, SIGNAL(pressed()), qApp, SLOT(quit()) );
}
~HttpInfo()
{
}
private slots:
void newConnect()
{
infoText->append( "New connection" );
}
void endConnect()
{
infoText->append( "Connection closed\n\n" );
}
void wroteToClient()
{
infoText->append( "Wrote to client" );
}
private:
TQTextView *infoText;
};
int main( int argc, char** argv )
{
TQApplication app( argc, argv );
HttpInfo info;
app.setMainWidget( &info );
info.show();
return app.exec();
}
#include "httpd.moc"
|
