[157] | 1 | /**********************************************************************
|
---|
| 2 | *
|
---|
| 3 | * statusaction.cpp --
|
---|
| 4 | * Copyright (C) 1999 The New Zealand Digital Library Project
|
---|
| 5 | *
|
---|
| 6 | * PUT COPYRIGHT NOTICE HERE
|
---|
| 7 | *
|
---|
| 8 | * $Id: statusaction.cpp 197 1999-03-09 21:00:48Z rjmcnab $
|
---|
| 9 | *
|
---|
| 10 | *********************************************************************/
|
---|
| 11 |
|
---|
| 12 | /*
|
---|
| 13 | $Log$
|
---|
[197] | 14 | Revision 1.7 1999/03/09 21:00:47 rjmcnab
|
---|
| 15 | Reorganised the statusaction, added more functions to comtypes.
|
---|
| 16 |
|
---|
[172] | 17 | Revision 1.6 1999/02/25 21:59:02 rjmcnab
|
---|
| 18 |
|
---|
| 19 | Merged sources.
|
---|
| 20 |
|
---|
[165] | 21 | Revision 1.5 1999/02/21 22:33:58 rjmcnab
|
---|
| 22 |
|
---|
| 23 | Lots of stuff :-)
|
---|
| 24 |
|
---|
[160] | 25 | Revision 1.4 1999/02/12 02:40:18 sjboddie
|
---|
| 26 |
|
---|
| 27 | Added page action
|
---|
| 28 |
|
---|
[159] | 29 | Revision 1.3 1999/02/11 23:07:00 sjboddie
|
---|
| 30 |
|
---|
| 31 | extended the status action
|
---|
| 32 |
|
---|
[158] | 33 | Revision 1.2 1999/02/11 01:24:06 rjmcnab
|
---|
| 34 |
|
---|
| 35 | Fixed a few compiler warnings.
|
---|
| 36 |
|
---|
[157] | 37 | Revision 1.1 1999/02/11 01:01:27 rjmcnab
|
---|
| 38 |
|
---|
| 39 | Initial revision.
|
---|
| 40 |
|
---|
| 41 | */
|
---|
| 42 |
|
---|
| 43 |
|
---|
| 44 | #include "statusaction.h"
|
---|
[159] | 45 | #include <assert.h>
|
---|
[157] | 46 |
|
---|
| 47 |
|
---|
[197] | 48 | void statusaction::output_generalinfo (cgiargsclass &/*args*/, displayclass &/*disp*/,
|
---|
| 49 | outconvertclass &outconvert,
|
---|
| 50 | ostream &textout, ostream &/*logout*/) {
|
---|
| 51 | const recptconf &rcinfo = recpt->get_configinfo ();
|
---|
| 52 |
|
---|
| 53 | textout << outconvert << "<table>\n";
|
---|
| 54 | textout << outconvert << "<tr valign=top><th>gsdlhome</th><td>\"" << rcinfo.gsdlhome
|
---|
| 55 | << "\"</td></tr>\n";
|
---|
| 56 | textout << outconvert << "<tr valign=top><th>collection</th><td>\"" << rcinfo.collection
|
---|
| 57 | << "\"</td></tr>\n";
|
---|
| 58 | textout << outconvert << "<tr valign=top><th>collectdir</th><td>\"" << rcinfo.collectdir
|
---|
| 59 | << "\"</td></tr>\n";
|
---|
| 60 | textout << outconvert << "<tr valign=top><th>httpimg</th><td>\"" << rcinfo.httpimg
|
---|
| 61 | << "\"</td></tr>\n";
|
---|
| 62 | textout << outconvert << "<tr valign=top><th>gwcgi</th><td>\"" << rcinfo.gwcgi
|
---|
| 63 | << "\"</td></tr>\n";
|
---|
| 64 |
|
---|
| 65 |
|
---|
| 66 | // macrofiles
|
---|
| 67 | textout << outconvert << "<tr valign=top><th>macrofiles</th><td>";
|
---|
| 68 | text_tarray::const_iterator macrohere = rcinfo.macrofiles.begin ();
|
---|
| 69 | text_tarray::const_iterator macroend = rcinfo.macrofiles.end ();
|
---|
| 70 | bool macrofirst = true;
|
---|
| 71 | while (macrohere != macroend) {
|
---|
| 72 | if (!macrofirst) textout << outconvert << ", ";
|
---|
| 73 | macrofirst = false;
|
---|
| 74 | textout << outconvert << "\"" << *macrohere << "\"";
|
---|
| 75 | macrohere++;
|
---|
| 76 | }
|
---|
| 77 | textout << outconvert << "</td></tr>\n";
|
---|
| 78 |
|
---|
| 79 | // saveconf
|
---|
| 80 | textout << outconvert << "<tr valign=top><th>saveconf</th><td>\"" << rcinfo.saveconf
|
---|
| 81 | << "\"</td></tr>\n";
|
---|
| 82 |
|
---|
| 83 | // arguments
|
---|
| 84 | cgiargsinfoclass *rcargsinfo = recpt->get_cgiargsinfo_ptr ();
|
---|
| 85 | if (rcargsinfo != NULL) {
|
---|
| 86 | textout << outconvert << "<tr valign=top><th>arguments</th><td>";
|
---|
| 87 |
|
---|
| 88 | cgiargsinfoclass::const_iterator argsinfohere = rcargsinfo->begin ();
|
---|
| 89 | cgiargsinfoclass::const_iterator argsinfoend = rcargsinfo->end ();
|
---|
| 90 | bool argsinfofirst = true;
|
---|
| 91 | while (argsinfohere != argsinfoend) {
|
---|
| 92 | if (!argsinfofirst) textout << outconvert << ", ";
|
---|
| 93 | argsinfofirst = false;
|
---|
| 94 | textout << outconvert << "\"" << (*argsinfohere).second.shortname << "\"";
|
---|
| 95 | argsinfohere++;
|
---|
| 96 | }
|
---|
| 97 |
|
---|
| 98 | textout << outconvert << "</td></tr>\n";
|
---|
| 99 | }
|
---|
| 100 |
|
---|
| 101 | // actions
|
---|
| 102 | actionmapclass *actions = recpt->get_actionmap_ptr();
|
---|
| 103 | if (actions != NULL) {
|
---|
| 104 | textout << outconvert << "<tr valign=top><th>actions</th><td>";
|
---|
| 105 |
|
---|
| 106 | actionptrmap::iterator actionshere = actions->begin ();
|
---|
| 107 | actionptrmap::iterator actionsend = actions->end ();
|
---|
| 108 | bool actionsfirst = true;
|
---|
| 109 | while (actionshere != actionsend) {
|
---|
| 110 | if (!actionsfirst) textout << outconvert << ", ";
|
---|
| 111 | actionsfirst = false;
|
---|
| 112 | assert ((*actionshere).second.a != NULL);
|
---|
| 113 | if ((*actionshere).second.a != NULL) {
|
---|
| 114 | textout << outconvert << "\"" << (*actionshere).second.a->get_action_name() << "\"";
|
---|
| 115 | }
|
---|
| 116 | actionshere++;
|
---|
| 117 | }
|
---|
| 118 |
|
---|
| 119 | textout << outconvert << "</td></tr>\n";
|
---|
| 120 | }
|
---|
| 121 |
|
---|
| 122 | // protocols
|
---|
| 123 | recptprotolistclass *protocols = recpt->get_recptprotolist_ptr ();
|
---|
| 124 | if (protocols != NULL) {
|
---|
| 125 | textout << outconvert << "<tr valign=top><th>protocols</th><td>";
|
---|
| 126 |
|
---|
| 127 | recptprotolistclass::iterator protohere = protocols->begin ();
|
---|
| 128 | recptprotolistclass::iterator protoend = protocols->end ();
|
---|
| 129 | bool protofirst = true;
|
---|
| 130 | while (protohere != protoend) {
|
---|
| 131 | if (!protofirst) textout << outconvert << ", ";
|
---|
| 132 | protofirst = false;
|
---|
| 133 | if ((*protohere).p != NULL) {
|
---|
| 134 | textout << outconvert << "\"" << (*protohere).p->get_protocol_name() << "\"";
|
---|
| 135 | }
|
---|
| 136 | protohere++;
|
---|
| 137 | }
|
---|
| 138 |
|
---|
| 139 | textout << outconvert << "</td></tr>\n";
|
---|
| 140 | }
|
---|
| 141 |
|
---|
| 142 | // converters
|
---|
| 143 | convertinfoclass *converters = recpt->get_convertinfo_ptr ();
|
---|
| 144 | if (converters != NULL) {
|
---|
| 145 | textout << outconvert << "<tr valign=top><th>converters</th><td>";
|
---|
| 146 |
|
---|
| 147 | convertinfoclass::iterator converthere = converters->begin ();
|
---|
| 148 | convertinfoclass::iterator convertend = converters->end ();
|
---|
| 149 | bool convertfirst = true;
|
---|
| 150 | while (converthere != convertend) {
|
---|
| 151 | if (!convertfirst) textout << outconvert << ", ";
|
---|
| 152 | convertfirst = false;
|
---|
| 153 | textout << outconvert << "\"" << (*converthere).second.name << "\"";
|
---|
| 154 | converthere++;
|
---|
| 155 | }
|
---|
| 156 |
|
---|
| 157 | textout << outconvert << "</td></tr>\n";
|
---|
| 158 | }
|
---|
| 159 |
|
---|
| 160 |
|
---|
| 161 | textout << outconvert
|
---|
| 162 | << "</table>\n";
|
---|
[157] | 163 | }
|
---|
| 164 |
|
---|
[197] | 165 | void statusaction::output_argumentinfo (cgiargsclass &args, displayclass &/*disp*/,
|
---|
| 166 | outconvertclass &outconvert,
|
---|
| 167 | ostream &textout, ostream &/*logout*/) {
|
---|
| 168 | cgiargsinfoclass *rcargsinfo = recpt->get_cgiargsinfo_ptr ();
|
---|
[157] | 169 |
|
---|
[197] | 170 | textout << outconvert
|
---|
| 171 | << "<h2>Argument information</h2>\n"
|
---|
| 172 | << "<table>";
|
---|
[157] | 173 |
|
---|
[197] | 174 | // argument information
|
---|
| 175 | textout << outconvert << "<tr valign=top><th>short name</th><th>long name</th>"
|
---|
| 176 | << "<th>multiple char?</th>"
|
---|
| 177 | << "<th>default</th><th>default status</th><th>saved args</th>"
|
---|
| 178 | << "<th>current value</th></tr>\n";
|
---|
| 179 |
|
---|
| 180 | cgiargsclass::const_iterator argshere = args.begin();
|
---|
| 181 | cgiargsclass::const_iterator argsend = args.end();
|
---|
| 182 | cgiarginfo *ainfo;
|
---|
| 183 |
|
---|
| 184 | while (argshere != argsend) {
|
---|
| 185 | const text_t &aname = (*argshere).first;
|
---|
| 186 | textout << outconvert
|
---|
| 187 | << "<tr valign=top><td>" << aname << "</td>\n";
|
---|
[157] | 188 |
|
---|
[197] | 189 | if ((rcargsinfo != NULL) &&
|
---|
| 190 | ((ainfo=rcargsinfo->getarginfo(aname)) != NULL)) {
|
---|
| 191 | textout << outconvert << "<td>" << ainfo->longname << "</td>\n";
|
---|
| 192 | if (ainfo->multiplechar) textout << outconvert << "<td>yes</td>\n";
|
---|
| 193 | else textout << outconvert << "<td>no</td>\n";
|
---|
| 194 | textout << outconvert << "<td>" << ainfo->argdefault << "</td>\n";
|
---|
| 195 | switch (ainfo->defaultstatus) {
|
---|
| 196 | case cgiarginfo::none: textout << outconvert << "<td>none</td>\n"; break;
|
---|
| 197 | case cgiarginfo::weak: textout << outconvert << "<td>weak</td>\n"; break;
|
---|
| 198 | case cgiarginfo::good: textout << outconvert << "<td>good</td>\n"; break;
|
---|
| 199 | case cgiarginfo::config: textout << outconvert << "<td>config</td>\n"; break;
|
---|
| 200 | case cgiarginfo::imperative: textout << outconvert << "<td>imperative</td>\n"; break;
|
---|
| 201 | }
|
---|
| 202 | switch (ainfo->savedarginfo) {
|
---|
| 203 | case cgiarginfo::mustnot: textout << outconvert << "<td>mustnot</td>\n"; break;
|
---|
| 204 | case cgiarginfo::can: textout << outconvert << "<td>can</td>\n"; break;
|
---|
| 205 | case cgiarginfo::must: textout << outconvert << "<td>must</td>\n"; break;
|
---|
| 206 | }
|
---|
[157] | 207 | } else {
|
---|
[197] | 208 | textout << outconvert << "<td colspan=5></td>\n";
|
---|
| 209 | }
|
---|
| 210 |
|
---|
| 211 | textout << outconvert << "<td>\"" << (*argshere).second << "\"</td></tr>\n";
|
---|
| 212 |
|
---|
| 213 | argshere ++;
|
---|
| 214 | }
|
---|
| 215 |
|
---|
| 216 | textout << outconvert
|
---|
| 217 | << "</table>\n";
|
---|
| 218 | }
|
---|
[165] | 219 |
|
---|
[197] | 220 | void statusaction::output_actioninfo (cgiargsclass &/*args*/, displayclass &/*disp*/,
|
---|
| 221 | outconvertclass &outconvert,
|
---|
| 222 | ostream &textout, ostream &/*logout*/) {
|
---|
| 223 | actionmapclass *actions = recpt->get_actionmap_ptr();
|
---|
[157] | 224 |
|
---|
[197] | 225 | textout << outconvert
|
---|
| 226 | << "<h2>Action information</h2>\n"
|
---|
| 227 | << "<table>";
|
---|
[165] | 228 |
|
---|
[197] | 229 | // action information
|
---|
| 230 | if (actions != NULL) {
|
---|
| 231 | textout << outconvert
|
---|
| 232 | << "<tr><th>action name</th><th>cgi arguments</th></tr>\n";
|
---|
| 233 |
|
---|
| 234 | actionptrmap::iterator actionshere = actions->begin ();
|
---|
| 235 | actionptrmap::iterator actionsend = actions->end ();
|
---|
| 236 | while (actionshere != actionsend) {
|
---|
| 237 | assert ((*actionshere).second.a != NULL);
|
---|
| 238 | if ((*actionshere).second.a != NULL) {
|
---|
| 239 | textout << outconvert
|
---|
| 240 | << "<tr><td>" << (*actionshere).second.a->get_action_name()
|
---|
| 241 | << "</td><td>";
|
---|
| 242 |
|
---|
| 243 | cgiargsinfoclass argsinfo = (*actionshere).second.a->getargsinfo();
|
---|
| 244 | cgiargsinfoclass::const_iterator argsinfohere = argsinfo.begin ();
|
---|
| 245 | cgiargsinfoclass::const_iterator argsinfoend = argsinfo.end ();
|
---|
| 246 | bool aifirst = true;
|
---|
[165] | 247 | while (argsinfohere != argsinfoend) {
|
---|
[197] | 248 | if (!aifirst) textout << outconvert << ", ";
|
---|
| 249 | aifirst = false;
|
---|
| 250 | textout << outconvert << (*argsinfohere).second.shortname;
|
---|
[165] | 251 | argsinfohere++;
|
---|
| 252 | }
|
---|
| 253 |
|
---|
| 254 | textout << outconvert << "</td></tr>\n";
|
---|
| 255 | }
|
---|
[197] | 256 | actionshere++;
|
---|
| 257 | }
|
---|
| 258 | }
|
---|
| 259 |
|
---|
| 260 | textout << outconvert << "</table>\n";
|
---|
| 261 | }
|
---|
[165] | 262 |
|
---|
[197] | 263 | void statusaction::output_protocolinfo (cgiargsclass &/*args*/, displayclass &/*disp*/,
|
---|
| 264 | outconvertclass &/*outconvert*/,
|
---|
| 265 | ostream &/*textout*/, ostream &/*logout*/) {
|
---|
| 266 | }
|
---|
[165] | 267 |
|
---|
[197] | 268 | void statusaction::output_collectioninfo (cgiargsclass &/*args*/, displayclass &/*disp*/,
|
---|
| 269 | outconvertclass &/*outconvert*/,
|
---|
| 270 | ostream &/*textout*/, ostream &/*logout*/) {
|
---|
| 271 | }
|
---|
[165] | 272 |
|
---|
[197] | 273 | void statusaction::output_initlog (cgiargsclass &/*args*/, displayclass &/*disp*/,
|
---|
| 274 | outconvertclass &outconvert,
|
---|
| 275 | ostream &textout, ostream &/*logout*/) {
|
---|
[159] | 276 | ifstream initin (GSDL_GSDLHOME "/etc/initout.txt");
|
---|
| 277 | if (initin) {
|
---|
| 278 | textout << outconvert << "<p>The initialisation error log, " GSDL_GSDLHOME "/etc/initout.txt, contains the\n";
|
---|
| 279 | textout << outconvert << "following information:\n\n";
|
---|
| 280 | text_t errorpage = "<p><pre>\n";
|
---|
[197] | 281 |
|
---|
[159] | 282 | char c;
|
---|
| 283 | initin.get(c);
|
---|
| 284 | while (!initin.eof ()) {
|
---|
| 285 | errorpage.push_back(c);
|
---|
| 286 | initin.get(c);
|
---|
| 287 | }
|
---|
| 288 |
|
---|
| 289 | errorpage += "</pre>\n";
|
---|
| 290 | initin.close();
|
---|
| 291 | textout << outconvert << errorpage;
|
---|
[197] | 292 |
|
---|
[159] | 293 | } else {
|
---|
| 294 | textout << outconvert << "Couldn't read initialisation error log, " GSDL_GSDLHOME "/etc/initout.txt.\n";
|
---|
| 295 | }
|
---|
[197] | 296 | }
|
---|
[159] | 297 |
|
---|
[197] | 298 | void statusaction::output_errorlog (cgiargsclass &/*args*/, displayclass &/*disp*/,
|
---|
| 299 | outconvertclass &outconvert,
|
---|
| 300 | ostream &textout, ostream &/*logout*/) {
|
---|
[160] | 301 | ifstream errin (GSDL_GSDLHOME "/etc/errout.txt");
|
---|
[197] | 302 | if (errin) {
|
---|
[160] | 303 | textout << outconvert << "<p>The error log, " GSDL_GSDLHOME "/etc/errout.txt, contains the\n";
|
---|
| 304 | textout << outconvert << "following information:\n\n";
|
---|
| 305 | text_t errorpage = "<p><pre>\n";
|
---|
| 306 |
|
---|
| 307 | char c;
|
---|
| 308 | errin.get(c);
|
---|
| 309 | while (!errin.eof ()) {
|
---|
| 310 | errorpage.push_back(c);
|
---|
| 311 | errin.get(c);
|
---|
| 312 | }
|
---|
| 313 |
|
---|
| 314 | errorpage += "</pre>\n";
|
---|
| 315 | errin.close();
|
---|
| 316 | textout << outconvert << errorpage;
|
---|
| 317 |
|
---|
| 318 | } else {
|
---|
| 319 | textout << outconvert << "Couldn't read error log, " GSDL_GSDLHOME "/etc/errout.txt.\n";
|
---|
| 320 | }
|
---|
[197] | 321 | }
|
---|
[160] | 322 |
|
---|
[197] | 323 |
|
---|
| 324 | statusaction::statusaction () {
|
---|
| 325 | disabled = true;
|
---|
| 326 | recpt = NULL;
|
---|
| 327 |
|
---|
| 328 | // this action uses cgi variable "a"
|
---|
| 329 | cgiarginfo arg_ainfo;
|
---|
| 330 | arg_ainfo.shortname = "a";
|
---|
| 331 | arg_ainfo.longname = "action";
|
---|
| 332 | arg_ainfo.multiplechar = true;
|
---|
| 333 | arg_ainfo.defaultstatus = cgiarginfo::weak;
|
---|
| 334 | arg_ainfo.argdefault = "status";
|
---|
| 335 | arg_ainfo.savedarginfo = cgiarginfo::must;
|
---|
| 336 |
|
---|
| 337 | argsinfo.addarginfo (NULL, arg_ainfo);
|
---|
| 338 | }
|
---|
| 339 |
|
---|
| 340 | statusaction::~statusaction () {
|
---|
| 341 | }
|
---|
| 342 |
|
---|
| 343 | bool statusaction::check_cgiargs (cgiargsclass &/*args*/, ostream &/*logout*/) {
|
---|
| 344 | // don't want to check anything yet.
|
---|
| 345 | return true;
|
---|
| 346 | }
|
---|
| 347 |
|
---|
| 348 | void statusaction::get_cgihead_info (cgiargsclass &/*args*/, response_t &response,
|
---|
| 349 | text_t &response_data, ostream &/*logout*/) {
|
---|
| 350 | response = content;
|
---|
| 351 | response_data = "text/html";
|
---|
| 352 | }
|
---|
| 353 |
|
---|
| 354 | bool statusaction::do_action (cgiargsclass &args, recptproto */*collectproto*/,
|
---|
| 355 | displayclass &disp, outconvertclass &outconvert,
|
---|
| 356 | ostream &textout, ostream &logout) {
|
---|
| 357 | textout << outconvert << "<html>\n";
|
---|
| 358 | textout << outconvert << "<head>\n";
|
---|
| 359 | textout << outconvert << "<title>Status</title>\n";
|
---|
| 360 | textout << outconvert << "</head>\n";
|
---|
| 361 | textout << outconvert << "<body bgcolor=\"#ffffff\" text=\"#000000\" link=\"#006666\" "
|
---|
| 362 | << "alink=\"#cc9900\" vlink=\"#666633\">\n";
|
---|
| 363 |
|
---|
| 364 | textout << outconvert << disp << "<img src=\"_httpimg_/gsdl.gif\"><br>\n";
|
---|
| 365 |
|
---|
| 366 | if (disabled) textout << outconvert << "<h2>Status disabled</h2>\n";
|
---|
| 367 | else {
|
---|
| 368 | textout << outconvert << "<h2>General information</h2>\n";
|
---|
| 369 |
|
---|
| 370 | if (recpt == NULL) {
|
---|
| 371 | textout << outconvert << "The status action does not contain information\n";
|
---|
| 372 | textout << outconvert << "about any receptionists. The method set_receptionist\n";
|
---|
| 373 | textout << outconvert << "was probably not called from the module which instantiated\n";
|
---|
| 374 | textout << outconvert << "this action.\n";
|
---|
| 375 |
|
---|
| 376 | } else {
|
---|
| 377 | output_generalinfo (args, disp, outconvert, textout, logout);
|
---|
| 378 | textout << outconvert << "<hr>\n";
|
---|
| 379 |
|
---|
| 380 | output_argumentinfo (args, disp, outconvert, textout, logout);
|
---|
| 381 | textout << outconvert << "<hr>\n";
|
---|
| 382 |
|
---|
| 383 | output_actioninfo (args, disp, outconvert, textout, logout);
|
---|
| 384 | textout << outconvert << "<hr>\n";
|
---|
| 385 |
|
---|
| 386 | output_initlog (args, disp, outconvert, textout, logout);
|
---|
| 387 | textout << outconvert << "<hr>\n";
|
---|
| 388 |
|
---|
| 389 | output_errorlog (args, disp, outconvert, textout, logout);
|
---|
| 390 | textout << outconvert << "<hr>\n";
|
---|
| 391 | }
|
---|
| 392 | }
|
---|
| 393 |
|
---|
| 394 |
|
---|
[157] | 395 | textout << outconvert << "</body>\n";
|
---|
| 396 | textout << outconvert << "</html>\n";
|
---|
| 397 |
|
---|
| 398 | return true;
|
---|
| 399 | }
|
---|
| 400 |
|
---|
| 401 | void statusaction::configure (const text_t &key, const text_tarray &cfgline) {
|
---|
| 402 | if ((key == "status") && (cfgline.size() == 1) &&
|
---|
| 403 | (cfgline[0] == "true" || cfgline[0] == "on" || cfgline[0] == "enabled")) {
|
---|
| 404 | disabled = false;
|
---|
| 405 | } else {
|
---|
| 406 | // call the parent class to deal with the things which
|
---|
| 407 | // are not dealt with here
|
---|
| 408 | action::configure (key, cfgline);
|
---|
| 409 | }
|
---|
| 410 | }
|
---|