- wc_printf("<td class=\"");
- if (!strcmp(tab, "access")) {
- wc_printf(" tab_cell_label\">");
- wc_printf(_("Access controls"));
- }
- else {
- wc_printf(" tab_cell_edit\"><a href=\"display_editroom?tab=access\">");
- wc_printf(_("Access controls"));
- wc_printf("</a>");
- }
- wc_printf("</td>\n");
- wc_printf("<td> </td>\n");
-
- wc_printf("<td class=\"");
- if (!strcmp(tab, "sharing")) {
- wc_printf(" tab_cell_label\">");
- wc_printf(_("Sharing"));
- }
- else {
- wc_printf(" tab_cell_edit\"><a href=\"display_editroom?tab=sharing\">");
- wc_printf(_("Sharing"));
- wc_printf("</a>");
- }
- wc_printf("</td>\n");
- wc_printf("<td> </td>\n");
-
- wc_printf("<td class=\"");
- if (!strcmp(tab, "listserv")) {
- wc_printf(" tab_cell_label\">");
- wc_printf(_("Mailing list service"));
- }
- else {
- wc_printf("< tab_cell_edit\"><a href=\"display_editroom?tab=listserv\">");
- wc_printf(_("Mailing list service"));
- wc_printf("</a>");
- }
- wc_printf("</td>\n");
- wc_printf("<td> </td>\n");
-
- }
-
- wc_printf("<td class=\"");
- if (!strcmp(tab, "feeds")) {
- wc_printf(" tab_cell_label\">");
- wc_printf(_("Remote retrieval"));
- }
- else {
- wc_printf("< tab_cell_edit\"><a href=\"display_editroom?tab=feeds\">");
- wc_printf(_("Remote retrieval"));
- wc_printf("</a>");
- }
- wc_printf("</td>\n");
- wc_printf("<td> </td>\n");
-
- wc_printf("</tr></table>\n");
- wc_printf("</div>\n");
- /* end tabbed dialog */
-
- wc_printf("<script type=\"text/javascript\">"
- " Nifty(\"table#AdminTabs td\", \"small transparent top\");"
- "</script>"
- );
-
- /* begin content of whatever tab is open now */
-
- if (!strcmp(tab, "admin")) {
- wc_printf("<div class=\"tabcontent\">");
- wc_printf("<ul>"
- "<li><a href=\"delete_room\" "
- "onClick=\"return confirm('");
- wc_printf(_("Are you sure you want to delete this room?"));
- wc_printf("');\">\n");
- wc_printf(_("Delete this room"));
- wc_printf("</a>\n"
- "<li><a href=\"display_editroompic?which_room=");
- urlescputs(ChrPtr(WC->CurRoom.name));
- wc_printf("\">\n");
- wc_printf(_("Set or change the icon for this room's banner"));
- wc_printf("</a>\n"
- "<li><a href=\"display_editinfo\">\n");
- wc_printf(_("Edit this room's Info file"));
- wc_printf("</a>\n"
- "</ul>");
- wc_printf("</div>");
- }
-
- if (!strcmp(tab, "config")) {
- wc_printf("<div class=\"tabcontent\">");
- serv_puts("GETR");
- serv_getln(buf, sizeof buf);
-
- if (!strncmp(buf, "550", 3)) {
- wc_printf("<br><br><div align=center>%s</div><br><br>\n",
- _("Higher access is required to access this function.")
- );
- }
- else if (buf[0] != '2') {
- wc_printf("<br><br><div align=center>%s</div><br><br>\n", &buf[4]);
- }
- else {
- extract_token(er_name, &buf[4], 0, '|', sizeof er_name);
- extract_token(er_password, &buf[4], 1, '|', sizeof er_password);
- extract_token(er_dirname, &buf[4], 2, '|', sizeof er_dirname);
- er_flags = extract_int(&buf[4], 3);
- er_floor = extract_int(&buf[4], 4);
- er_flags2 = extract_int(&buf[4], 7);
-
- wc_printf("<form method=\"POST\" action=\"editroom\">\n");
- wc_printf("<input type=\"hidden\" name=\"nonce\" value=\"%d\">\n", WC->nonce);
-
- wc_printf("<ul><li>");
- wc_printf(_("Name of room: "));
- wc_printf("<input type=\"text\" NAME=\"er_name\" VALUE=\"%s\" MAXLENGTH=\""ULONG_FMT"\">\n",
- er_name,
- (sizeof(er_name)-1)
- );
-
- wc_printf("<li>");
- wc_printf(_("Resides on floor: "));
- wc_printf("<select NAME=\"er_floor\" SIZE=\"1\"");
- if (er_flags & QR_MAILBOX)
- wc_printf("disabled >\n");
- for (i = 0; i < 128; ++i)
- if (!IsEmptyStr(floorlist[i])) {
- wc_printf("<OPTION ");
- if (i == er_floor )
- wc_printf("SELECTED ");
- wc_printf("VALUE=\"%d\">", i);
- escputs(floorlist[i]);
- wc_printf("</OPTION>\n");
- }
- wc_printf("</select>\n");
-
- wc_printf("<li>");
- wc_printf(_("Type of room:"));
- wc_printf("<ul>\n");
-
- wc_printf("<li><input type=\"radio\" NAME=\"type\" VALUE=\"public\" ");
- if ((er_flags & (QR_PRIVATE + QR_MAILBOX)) == 0)
- wc_printf("CHECKED ");
- wc_printf("OnChange=\""
- " if (this.form.type[0].checked == true) { "
- " this.form.er_floor.disabled = false; "
- " } "
- "\"> ");
- wc_printf(_("Public (automatically appears to everyone)"));
- wc_printf("\n");
-
- wc_printf("<li><input type=\"radio\" NAME=\"type\" VALUE=\"hidden\" ");
- if ((er_flags & QR_PRIVATE) &&
- (er_flags & QR_GUESSNAME))
- wc_printf("CHECKED ");
- wc_printf(" OnChange=\""
- " if (this.form.type[1].checked == true) { "
- " this.form.er_floor.disabled = false; "
- " } "
- "\"> ");
- wc_printf(_("Private - hidden (accessible to anyone who knows its name)"));
-
- wc_printf("\n<li><input type=\"radio\" NAME=\"type\" VALUE=\"passworded\" ");
- if ((er_flags & QR_PRIVATE) &&
- (er_flags & QR_PASSWORDED))
- wc_printf("CHECKED ");
- wc_printf(" OnChange=\""
- " if (this.form.type[2].checked == true) { "
- " this.form.er_floor.disabled = false; "
- " } "
- "\"> ");
- wc_printf(_("Private - require password: "));
- wc_printf("\n<input type=\"text\" NAME=\"er_password\" VALUE=\"%s\" MAXLENGTH=\"9\">\n",
- er_password);
-
- wc_printf("<li><input type=\"radio\" NAME=\"type\" VALUE=\"invonly\" ");
- if ((er_flags & QR_PRIVATE)
- && ((er_flags & QR_GUESSNAME) == 0)
- && ((er_flags & QR_PASSWORDED) == 0))
- wc_printf("CHECKED ");
- wc_printf(" OnChange=\""
- " if (this.form.type[3].checked == true) { "
- " this.form.er_floor.disabled = false; "
- " } "
- "\"> ");
- wc_printf(_("Private - invitation only"));
-
- wc_printf("\n<li><input type=\"radio\" NAME=\"type\" VALUE=\"personal\" ");
- if (er_flags & QR_MAILBOX)
- wc_printf("CHECKED ");
- wc_printf (" OnChange=\""
- " if (this.form.type[4].checked == true) { "
- " this.form.er_floor.disabled = true; "
- " } "
- "\"> ");
- wc_printf(_("Personal (mailbox for you only)"));
-
- wc_printf("\n<li><input type=\"checkbox\" NAME=\"bump\" VALUE=\"yes\" ");
- wc_printf("> ");
- wc_printf(_("If private, cause current users to forget room"));
-
- wc_printf("\n</ul>\n");
-
- wc_printf("<li><input type=\"checkbox\" NAME=\"prefonly\" VALUE=\"yes\" ");
- if (er_flags & QR_PREFONLY)
- wc_printf("CHECKED ");
- wc_printf("> ");
- wc_printf(_("Preferred users only"));
-
- wc_printf("\n<li><input type=\"checkbox\" NAME=\"readonly\" VALUE=\"yes\" ");
- if (er_flags & QR_READONLY)
- wc_printf("CHECKED ");
- wc_printf("> ");
- wc_printf(_("Read-only room"));
-
- wc_printf("\n<li><input type=\"checkbox\" NAME=\"collabdel\" VALUE=\"yes\" ");
- if (er_flags2 & QR2_COLLABDEL)
- wc_printf("CHECKED ");
- wc_printf("> ");
- wc_printf(_("All users allowed to post may also delete messages"));
-
- /** directory stuff */
- wc_printf("\n<li><input type=\"checkbox\" NAME=\"directory\" VALUE=\"yes\" ");
- if (er_flags & QR_DIRECTORY)
- wc_printf("CHECKED ");
- wc_printf("> ");
- wc_printf(_("File directory room"));
-
- wc_printf("\n<ul><li>");
- wc_printf(_("Directory name: "));
- wc_printf("<input type=\"text\" NAME=\"er_dirname\" VALUE=\"%s\" MAXLENGTH=\"14\">\n",
- er_dirname);
-
- wc_printf("<li><input type=\"checkbox\" NAME=\"ulallowed\" VALUE=\"yes\" ");
- if (er_flags & QR_UPLOAD)
- wc_printf("CHECKED ");
- wc_printf("> ");
- wc_printf(_("Uploading allowed"));
-
- wc_printf("\n<li><input type=\"checkbox\" NAME=\"dlallowed\" VALUE=\"yes\" ");
- if (er_flags & QR_DOWNLOAD)
- wc_printf("CHECKED ");
- wc_printf("> ");
- wc_printf(_("Downloading allowed"));
-
- wc_printf("\n<li><input type=\"checkbox\" NAME=\"visdir\" VALUE=\"yes\" ");
- if (er_flags & QR_VISDIR)
- wc_printf("CHECKED ");
- wc_printf("> ");
- wc_printf(_("Visible directory"));
- wc_printf("</ul>\n");
-
- /** end of directory stuff */
-
- wc_printf("<li><input type=\"checkbox\" NAME=\"network\" VALUE=\"yes\" ");
- if (er_flags & QR_NETWORK)
- wc_printf("CHECKED ");
- wc_printf("> ");
- wc_printf(_("Network shared room"));
-
- wc_printf("\n<li><input type=\"checkbox\" NAME=\"permanent\" VALUE=\"yes\" ");
- if (er_flags & QR_PERMANENT)
- wc_printf("CHECKED ");
- wc_printf("> ");
- wc_printf(_("Permanent (does not auto-purge)"));
-
- wc_printf("\n<li><input type=\"checkbox\" NAME=\"subjectreq\" VALUE=\"yes\" ");
- if (er_flags2 & QR2_SUBJECTREQ)
- wc_printf("CHECKED ");
- wc_printf("> ");
- wc_printf(_("Subject Required (Force users to specify a message subject)"));
-
- /** start of anon options */
-
- wc_printf("\n<li>");
- wc_printf(_("Anonymous messages"));
- wc_printf("<ul>\n");
-
- wc_printf("<li><input type=\"radio\" NAME=\"anon\" VALUE=\"no\" ");
- if (((er_flags & QR_ANONONLY) == 0)
- && ((er_flags & QR_ANONOPT) == 0))
- wc_printf("CHECKED ");
- wc_printf("> ");
- wc_printf(_("No anonymous messages"));
-
- wc_printf("\n<li><input type=\"radio\" NAME=\"anon\" VALUE=\"anononly\" ");
- if (er_flags & QR_ANONONLY)
- wc_printf("CHECKED ");
- wc_printf("> ");
- wc_printf(_("All messages are anonymous"));
-
- wc_printf("\n<li><input type=\"radio\" NAME=\"anon\" VALUE=\"anon2\" ");
- if (er_flags & QR_ANONOPT)
- wc_printf("CHECKED ");
- wc_printf("> ");
- wc_printf(_("Prompt user when entering messages"));
- wc_printf("</ul>\n");
-
- /* end of anon options */
-
- wc_printf("<li>");
- wc_printf(_("Room aide: "));
- serv_puts("GETA");
- serv_getln(buf, sizeof buf);
- if (buf[0] != '2') {
- wc_printf("<em>%s</em>\n", &buf[4]);
- } else {
- extract_token(er_roomaide, &buf[4], 0, '|', sizeof er_roomaide);
- wc_printf("<input type=\"text\" NAME=\"er_roomaide\" VALUE=\"%s\" MAXLENGTH=\"25\">\n", er_roomaide);
- }
-
- wc_printf("</ul><CENTER>\n");
- wc_printf("<input type=\"hidden\" NAME=\"tab\" VALUE=\"config\">\n"
- "<input type=\"submit\" NAME=\"ok_button\" VALUE=\"%s\">"
- " "
- "<input type=\"submit\" NAME=\"cancel_button\" VALUE=\"%s\">"
- "</CENTER>\n",
- _("Save changes"),
- _("Cancel")
- );
- }
- wc_printf("</div>");
- }
-
-
- /* Sharing the room with other Citadel nodes... */
- if (!strcmp(tab, "sharing")) {
- wc_printf("<div class=\"tabcontent\">");
-
- shared_with = strdup("");
- not_shared_with = strdup("");
-
- /** Learn the current configuration */
- serv_puts("CONF getsys|application/x-citadel-ignet-config");
- serv_getln(buf, sizeof buf);
- if (buf[0]=='1') while (serv_getln(buf, sizeof buf), strcmp(buf, "000")) {
- extract_token(node, buf, 0, '|', sizeof node);
- not_shared_with = realloc(not_shared_with,
- strlen(not_shared_with) + 32);
- strcat(not_shared_with, node);
- strcat(not_shared_with, "\n");
- }
-
- serv_puts("GNET");
- serv_getln(buf, sizeof buf);
- if (buf[0]=='1') while (serv_getln(buf, sizeof buf), strcmp(buf, "000")) {
- extract_token(cmd, buf, 0, '|', sizeof cmd);
- extract_token(node, buf, 1, '|', sizeof node);
- extract_token(remote_room, buf, 2, '|', sizeof remote_room);
- if (!strcasecmp(cmd, "ignet_push_share")) {
- shared_with = realloc(shared_with,
- strlen(shared_with) + 32);
- strcat(shared_with, node);
- if (!IsEmptyStr(remote_room)) {
- strcat(shared_with, "|");
- strcat(shared_with, remote_room);
- }
- strcat(shared_with, "\n");
- }
- }
-
- for (i=0; i<num_tokens(shared_with, '\n'); ++i) {
- extract_token(buf, shared_with, i, '\n', sizeof buf);
- extract_token(node, buf, 0, '|', sizeof node);
- for (j=0; j<num_tokens(not_shared_with, '\n'); ++j) {
- extract_token(cmd, not_shared_with, j, '\n', sizeof cmd);
- if (!strcasecmp(node, cmd)) {
- remove_token(not_shared_with, j, '\n');
- }
- }
- }
-
- /* Display the stuff */
- wc_printf("<CENTER><br />"
- "<table border=1 cellpadding=5><tr>"
- "<td><B><I>");
- wc_printf(_("Shared with"));
- wc_printf("</I></B></td>"
- "<td><B><I>");
- wc_printf(_("Not shared with"));
- wc_printf("</I></B></td></tr>\n"
- "<tr><td VALIGN=TOP>\n");
-
- wc_printf("<table border=0 cellpadding=5><tr class=\"tab_cell\"><td>");
- wc_printf(_("Remote node name"));
- wc_printf("</td><td>");
- wc_printf(_("Remote room name"));
- wc_printf("</td><td>");
- wc_printf(_("Actions"));
- wc_printf("</td></tr>\n");
-
- for (i=0; i<num_tokens(shared_with, '\n'); ++i) {
- extract_token(buf, shared_with, i, '\n', sizeof buf);
- extract_token(node, buf, 0, '|', sizeof node);
- extract_token(remote_room, buf, 1, '|', sizeof remote_room);
- if (!IsEmptyStr(node)) {
- wc_printf("<form method=\"POST\" action=\"netedit\">");
- wc_printf("<input type=\"hidden\" name=\"nonce\" value=\"%d\">\n", WC->nonce);
- wc_printf("<tr><td>%s</td>\n", node);
-
- wc_printf("<td>");
- if (!IsEmptyStr(remote_room)) {
- escputs(remote_room);
- }
- wc_printf("</td>");
-
- wc_printf("<td>");
-
- wc_printf("<input type=\"hidden\" NAME=\"line\" "
- "VALUE=\"ignet_push_share|");
- urlescputs(node);
- if (!IsEmptyStr(remote_room)) {
- wc_printf("|");
- urlescputs(remote_room);
- }
- wc_printf("\">");
- wc_printf("<input type=\"hidden\" NAME=\"tab\" VALUE=\"sharing\">\n");
- wc_printf("<input type=\"hidden\" NAME=\"cmd\" VALUE=\"remove\">\n");
- wc_printf("<input type=\"submit\" "
- "NAME=\"unshare_button\" VALUE=\"%s\">", _("Unshare"));
- wc_printf("</td></tr></form>\n");
- }
- }
-
- wc_printf("</table>\n");
- wc_printf("</td><td VALIGN=TOP>\n");
- wc_printf("<table border=0 cellpadding=5><tr class=\"tab_cell\"><td>");
- wc_printf(_("Remote node name"));
- wc_printf("</td><td>");
- wc_printf(_("Remote room name"));
- wc_printf("</td><td>");
- wc_printf(_("Actions"));
- wc_printf("</td></tr>\n");
-
- for (i=0; i<num_tokens(not_shared_with, '\n'); ++i) {
- extract_token(node, not_shared_with, i, '\n', sizeof node);
- if (!IsEmptyStr(node)) {
- wc_printf("<form method=\"POST\" action=\"netedit\">");
- wc_printf("<input type=\"hidden\" name=\"nonce\" value=\"%d\">\n", WC->nonce);
- wc_printf("<tr><td>");
- escputs(node);
- wc_printf("</td><td>"
- "<input type=\"INPUT\" "
- "NAME=\"suffix\" "
- "MAXLENGTH=128>"
- "</td><td>");
- wc_printf("<input type=\"hidden\" "
- "NAME=\"line\" "
- "VALUE=\"ignet_push_share|");
- urlescputs(node);
- wc_printf("|\">");
- wc_printf("<input type=\"hidden\" NAME=\"tab\" "
- "VALUE=\"sharing\">\n");
- wc_printf("<input type=\"hidden\" NAME=\"cmd\" "
- "VALUE=\"add\">\n");
- wc_printf("<input type=\"submit\" "
- "NAME=\"add_button\" VALUE=\"%s\">", _("Share"));
- wc_printf("</td></tr></form>\n");
- }
- }
-
- wc_printf("</table>\n");
- wc_printf("</td></tr>"
- "</table></CENTER><br />\n"
- "<I><B>%s</B><ul><li>", _("Notes:"));
- wc_printf(_("When sharing a room, "
- "it must be shared from both ends. Adding a node to "
- "the 'shared' list sends messages out, but in order to"
- " receive messages, the other nodes must be configured"
- " to send messages out to your system as well. "
- "<li>If the remote room name is blank, it is assumed "
- "that the room name is identical on the remote node."
- "<li>If the remote room name is different, the remote "
- "node must also configure the name of the room here."
- "</ul></I><br />\n"
- ));
-
- wc_printf("</div>");
- }
-
- if (not_shared_with != NULL)
- free (not_shared_with);
-
- /* Mailing list management */
- if (!strcmp(tab, "listserv")) {
- room_states RoomFlags;
- wc_printf("<div class=\"tabcontent\">");
-
- wc_printf("<br /><center>"
- "<table BORDER=0 WIDTH=100%% CELLPADDING=5>"
- "<tr><td VALIGN=TOP>");
-
- wc_printf(_("<i>The contents of this room are being "
- "mailed <b>as individual messages</b> "
- "to the following list recipients:"
- "</i><br /><br />\n"));
-
- serv_puts("GNET");
- serv_getln(buf, sizeof buf);
- if (buf[0]=='1') while (serv_getln(buf, sizeof buf), strcmp(buf, "000")) {
- extract_token(cmd, buf, 0, '|', sizeof cmd);
- if (!strcasecmp(cmd, "listrecp")) {
- extract_token(recp, buf, 1, '|', sizeof recp);
-
- escputs(recp);
- wc_printf(" <a href=\"netedit?cmd=remove?tab=listserv?line=listrecp|");
- urlescputs(recp);
- wc_printf("\">");
- wc_printf(_("(remove)"));
- wc_printf("</A><br />");
- }
- }
- wc_printf("<br /><form method=\"POST\" action=\"netedit\">\n"
- "<input type=\"hidden\" NAME=\"tab\" VALUE=\"listserv\">\n"
- "<input type=\"hidden\" NAME=\"prefix\" VALUE=\"listrecp|\">\n");
- wc_printf("<input type=\"hidden\" name=\"nonce\" value=\"%d\">\n", WC->nonce);
- wc_printf("<input type=\"text\" id=\"add_as_listrecp\" NAME=\"line\">\n");
- wc_printf("<input type=\"submit\" NAME=\"add_button\" VALUE=\"%s\">", _("Add"));
- wc_printf("</form>\n");
-
- wc_printf("</td><td VALIGN=TOP>\n");
-
- wc_printf(_("<i>The contents of this room are being "
- "mailed <b>in digest form</b> "
- "to the following list recipients:"
- "</i><br /><br />\n"));
-
- serv_puts("GNET");
- serv_getln(buf, sizeof buf);
- if (buf[0]=='1') while (serv_getln(buf, sizeof buf), strcmp(buf, "000")) {
- extract_token(cmd, buf, 0, '|', sizeof cmd);
- if (!strcasecmp(cmd, "digestrecp")) {
- extract_token(recp, buf, 1, '|', sizeof recp);
-
- escputs(recp);
- wc_printf(" <a href=\"netedit?cmd=remove?tab=listserv?line="
- "digestrecp|");
- urlescputs(recp);
- wc_printf("\">");
- wc_printf(_("(remove)"));
- wc_printf("</A><br />");
- }
- }
- wc_printf("<br /><form method=\"POST\" action=\"netedit\">\n"
- "<input type=\"hidden\" NAME=\"tab\" VALUE=\"listserv\">\n"
- "<input type=\"hidden\" NAME=\"prefix\" VALUE=\"digestrecp|\">\n");
- wc_printf("<input type=\"hidden\" name=\"nonce\" value=\"%d\">\n", WC->nonce);
- wc_printf("<input type=\"text\" id=\"add_as_digestrecp\" NAME=\"line\">\n");
- wc_printf("<input type=\"submit\" NAME=\"add_button\" VALUE=\"%s\">", _("Add"));
- wc_printf("</form>\n");
-
- wc_printf("</td></tr></table>\n");
-
- /** Pop open an address book -- begin **/
- wc_printf("<div align=right>"
- "<a href=\"javascript:PopOpenAddressBook('add_as_listrecp|%s|add_as_digestrecp|%s');\" "
- "title=\"%s\">"
- "<img align=middle border=0 width=24 height=24 src=\"static/viewcontacts_24x.gif\">"
- " %s</a>"
- "</div>",
- _("List"),
- _("Digest"),
- _("Add recipients from Contacts or other address books"),
- _("Add recipients from Contacts or other address books")
- );
- /* Pop open an address book -- end **/
-
- wc_printf("<br />\n<form method=\"GET\" action=\"toggle_self_service\">\n");
-
- get_roomflags (&RoomFlags);
-
- /* Self Service subscription? */
- wc_printf("<table><tr><td>\n");
- wc_printf(_("Allow self-service subscribe/unsubscribe requests."));
- wc_printf("</td><td><input type=\"checkbox\" name=\"QR2_SelfList\" value=\"yes\" %s></td></tr>\n"
- " <tr><td colspan=\"2\">\n",
- (is_selflist(&RoomFlags))?"checked":"");
- wc_printf(_("The URL for subscribe/unsubscribe is: "));
- wc_printf("<TT>%s://%s/listsub</TT></td></tr>\n",
- (is_https ? "https" : "http"),
- ChrPtr(WC->Hdr->HR.http_host));
- /* Public posting? */
- wc_printf("<tr><td>");
- wc_printf(_("Allow non-subscribers to mail to this room."));
- wc_printf("</td><td><input type=\"checkbox\" name=\"QR2_SubsOnly\" value=\"yes\" %s></td></tr>\n",
- (is_publiclist(&RoomFlags))?"checked":"");
-
- /* Moderated List? */
- wc_printf("<tr><td>");
- wc_printf(_("Room post publication needs Aide permission."));
- wc_printf("</td><td><input type=\"checkbox\" name=\"QR2_Moderated\" value=\"yes\" %s></td></tr>\n",
- (is_moderatedlist(&RoomFlags))?"checked":"");
-
-
- wc_printf("<tr><td colspan=\"2\" align=\"center\">"
- "<input type=\"submit\" NAME=\"add_button\" VALUE=\"%s\"></td></tr>", _("Save changes"));
- wc_printf("</table></form>");
-
-
- wc_printf("</CENTER>\n");
- wc_printf("</div>");
- }
-
-
- /* Configuration of The Dreaded Auto-Purger */
- if (!strcmp(tab, "expire")) {
- wc_printf("<div class=\"tabcontent\">");
-
- serv_puts("GPEX room");
- serv_getln(buf, sizeof buf);
- if (!strncmp(buf, "550", 3)) {
- wc_printf("<br><br><div align=center>%s</div><br><br>\n",
- _("Higher access is required to access this function.")
- );
- }
- else if (buf[0] != '2') {
- wc_printf("<br><br><div align=center>%s</div><br><br>\n", &buf[4]);
- }
- else {
- roompolicy = extract_int(&buf[4], 0);
- roomvalue = extract_int(&buf[4], 1);
-
- serv_puts("GPEX floor");
- serv_getln(buf, sizeof buf);
- if (buf[0] == '2') {
- floorpolicy = extract_int(&buf[4], 0);
- floorvalue = extract_int(&buf[4], 1);
- }
-
- wc_printf("<br /><form method=\"POST\" action=\"set_room_policy\">\n");
- wc_printf("<input type=\"hidden\" name=\"nonce\" value=\"%d\">\n", WC->nonce);
- wc_printf("<table border=0 cellspacing=5>\n");
- wc_printf("<tr><td>");
- wc_printf(_("Message expire policy for this room"));
- wc_printf("<br />(");
- escputs(ChrPtr(WC->CurRoom.name));
- wc_printf(")</td><td>");
- wc_printf("<input type=\"radio\" NAME=\"roompolicy\" VALUE=\"0\" %s>",
- ((roompolicy == 0) ? "CHECKED" : "") );
- wc_printf(_("Use the default policy for this floor"));
- wc_printf("<br />\n");
- wc_printf("<input type=\"radio\" NAME=\"roompolicy\" VALUE=\"1\" %s>",
- ((roompolicy == 1) ? "CHECKED" : "") );
- wc_printf(_("Never automatically expire messages"));
- wc_printf("<br />\n");
- wc_printf("<input type=\"radio\" NAME=\"roompolicy\" VALUE=\"2\" %s>",
- ((roompolicy == 2) ? "CHECKED" : "") );
- wc_printf(_("Expire by message count"));
- wc_printf("<br />\n");
- wc_printf("<input type=\"radio\" NAME=\"roompolicy\" VALUE=\"3\" %s>",
- ((roompolicy == 3) ? "CHECKED" : "") );
- wc_printf(_("Expire by message age"));
- wc_printf("<br />");
- wc_printf(_("Number of messages or days: "));
- wc_printf("<input type=\"text\" NAME=\"roomvalue\" MAXLENGTH=\"5\" VALUE=\"%d\">", roomvalue);
- wc_printf("</td></tr>\n");
-
- if (WC->axlevel >= 6) {
- wc_printf("<tr><td COLSPAN=2><hr /></td></tr>\n");
- wc_printf("<tr><td>");
- wc_printf(_("Message expire policy for this floor"));
- wc_printf("<br />(");
- escputs(floorlist[WC->CurRoom.floorid]);
- wc_printf(")</td><td>");
- wc_printf("<input type=\"radio\" NAME=\"floorpolicy\" VALUE=\"0\" %s>",
- ((floorpolicy == 0) ? "CHECKED" : "") );
- wc_printf(_("Use the system default"));
- wc_printf("<br />\n");
- wc_printf("<input type=\"radio\" NAME=\"floorpolicy\" VALUE=\"1\" %s>",
- ((floorpolicy == 1) ? "CHECKED" : "") );
- wc_printf(_("Never automatically expire messages"));
- wc_printf("<br />\n");
- wc_printf("<input type=\"radio\" NAME=\"floorpolicy\" VALUE=\"2\" %s>",
- ((floorpolicy == 2) ? "CHECKED" : "") );
- wc_printf(_("Expire by message count"));
- wc_printf("<br />\n");
- wc_printf("<input type=\"radio\" NAME=\"floorpolicy\" VALUE=\"3\" %s>",
- ((floorpolicy == 3) ? "CHECKED" : "") );
- wc_printf(_("Expire by message age"));
- wc_printf("<br />");
- wc_printf(_("Number of messages or days: "));
- wc_printf("<input type=\"text\" NAME=\"floorvalue\" MAXLENGTH=\"5\" VALUE=\"%d\">",
- floorvalue);
- }
-
- wc_printf("<CENTER>\n");
- wc_printf("<tr><td COLSPAN=2><hr /><CENTER>\n");
- wc_printf("<input type=\"submit\" NAME=\"ok_button\" VALUE=\"%s\">", _("Save changes"));
- wc_printf(" ");
- wc_printf("<input type=\"submit\" NAME=\"cancel_button\" VALUE=\"%s\">", _("Cancel"));
- wc_printf("</CENTER></td><tr>\n");
-
- wc_printf("</table>\n"
- "<input type=\"hidden\" NAME=\"tab\" VALUE=\"expire\">\n"
- "</form>\n"
- );
- }
-
- wc_printf("</div>");
- }