blob: 1b560ff03c9ea762cffa44c29fa282a0dbd40635 (
plain)
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
|
#ifdef HAVE_CONFIG_H
#include "config.h"
#endif
#include "BString.h"
#include "Action.h"
#include "HttpServ.h"
#include "gettext.h"
Action * Action::start = 0;
static int counter = 0;
static String genurl(const String & u) {
if (u.strlen()) {
return u;
} else {
// Si l'url passée en paramètre est vide, on génère une URL
// sous la forme TmpXXXX où XXXX est une valeur qui s'incrémente.
return String("Tmp") + (counter++);
}
}
Action::Action(const String & u) : next(start), prev(0), URL(genurl(u)), hastoclean(false), accessed(false) {
start = this;
if (next) next->prev = this;
}
Action::~Action() {
if (start == this) {
start = next;
}
if (next) next->prev = prev;
if (prev) prev->next = next;
}
Action * Action::Look4URL(const String & URL) {
Action * p;
// cerr << "Looking for " << URL << endl;
for (p = start; p; p = p->next) {
// cerr << "p->GetURL() = " << p->GetURL() << endl;
if (!p->GetURL().strlen()) {
// Si l'action que l'on vient de tester n'a pas d'URL, elle ne sert à rien.
// On l'efface donc de notre liste. GetURL renvoie une chaine vide si l'action
// était déclarée en mode CleanUp, puis a été accédée.
delete p;
} else {
if (URL == p->GetURL()) return p;
}
}
return 0;
}
/*
* Voici la skin principale. Elle nécessite un fichier 'grain.png' dans le répertoire datas
* et un fichier 'style.css' (fournis)
*/
void Action::SendHead(Handle * h) {
(*h) << "<HTML><HEAD><TITLE>" << GetTitle() << "</TITLE>" << endnl <<
"<META http-equiv=\"Content-Style-Type\" content=\"text/css\">" << endnl <<
"<LINK REL=STYLESHEET HREF=\"/image/style.css\" TYPE=\"text/css\">" << endnl <<
"</HEAD><BODY BGCOLOR=\"#aaaaaa\" BACKGROUND=\"/image/grain.png\">" << endnl <<
"<center><TABLE WIDTH=\"50%\" BORDER=3 cellspacing=1 BGCOLOR=\"#ffffff\"><TR><TD>" << endnl <<
"<center><b><h1>" << GetTitle() << "</h1></b></center></TD></TR></TABLE><P>" << endnl <<
"<TABLE WIDTH=\"80%\" BORDER=2 cellspacing=1 BGCOLOR=\"#ffffff\"><TR><TD>" << endnl;
}
void Action::SendFoot(Handle * h) {
(*h) << "</TABLE></TD></TR></BODY></HTML>" << endnl;
}
String Action::GetURL(void) {
// Comme décrit plus haut, il faut renvoyer la chaîne vide si l'action est en
// mode CleanUp et a été lue.
return (hastoclean && accessed) ? "" : URL;
}
void Action::CleanUp(void) {
hastoclean = true;
}
void Action::Accessed(void) {
accessed = true;
}
void Action::ShowButton(Handle * h, const String & l, const String & u) {
(*h) << "<CENTER><FORM METHOD=\"POST\" ACTION=\"/bin/" << u << "\">" << endnl <<
"<INPUT TYPE=\"SUBMIT\" VALUE=\"" << l << "\">" << endnl
<< "</FORM></CENTER>" << endnl;
}
|
