release/2.1.5

1 files changed, 611 insertions, 0 deletions

diff --git a/release/sysinstall/apache.c b/release/sysinstall/apache.c
new file mode 100644
index 0000000000000..debf7a502232c
--- /dev/null
+++ b/release/sysinstall/apache.c
@@ -0,0 +1,611 @@
+/*
+ * The new sysinstall program.
+ *
+ * This is probably the last program in the `sysinstall' line - the next
+ * generation being essentially a complete rewrite.
+ *
+ * $Id: apache.c,v 1.24 1996/06/15 17:58:49 jkh Exp $
+ *
+ * Copyright (c) 1995
+ *	Coranth Gryphon.  All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer,
+ *    verbatim and that no modifications are made prior to this
+ *    point in the file.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ *
+ * THIS SOFTWARE IS PROVIDED BY CORANTH GRYPHON ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL CORANTH GRYPHON OR HIS PETS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, LIFE OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
+ *
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <unistd.h>
+#include <sys/param.h>
+#include <string.h>
+#include <dialog.h>
+#include "ui_objects.h"
+#include "dir.h"
+#include "dialog.priv.h"
+#include "colors.h"
+#include "sysinstall.h"
+
+
+#define APACHE_HELPFILE "apache"
+#define APACHE_PACKAGE  "apache-1.1.1"
+#define FREEBSD_GIF	"http://www.freebsd.org/gifs/powerlogo.gif"
+
+/* These change if the package uses different defaults */
+
+#define DEFAULT_USER	"bin"
+#define DEFAULT_GROUP	"bin"
+#define WELCOME_FILE	"index.html"
+#define USER_HOMEDIR	"public_html"
+
+#define APACHE_BASE	"/usr/local/www"
+#define DATA_SUBDIR	"data"
+#define CONFIG_SUBDIR	"server/conf"
+
+#define LOGS_SUBDIR	"/var/log"
+#define ACCESS_LOGNAME	"httpd.access"
+#define ERROR_LOGNAME	"httpd.error"
+
+/* Set up the structure to hold configuration information */
+/* Note that this is only what we could fit onto the one screen */
+
+typedef struct {
+    char docroot[128];             /* DocumentRoot */
+    char userdir[128];             /* UserDir */
+    char welcome[32];              /* Welcome Doc */
+    char email[64];                /* ServerAdmin */
+    char hostname[64];             /* ServerName */
+    char logdir[64];		   /* Where to put Logs */
+    char accesslog[32];	   	   /* access_log */
+    char errorlog[32];		   /* error_log */
+    char defuser[16];		   /* default user id */
+    char defgroup[16];		   /* default group id */
+} ApacheConf;
+
+static ApacheConf tconf;
+
+#define APACHE_DOCROOT_LEN      128
+#define APACHE_USERDIR_LEN      128
+#define APACHE_WELCOME_LEN       32
+#define APACHE_EMAIL_LEN         64
+#define APACHE_HOSTNAME_LEN      64
+#define APACHE_LOGDIR_LEN        64
+#define APACHE_ACCESSLOG_LEN     32
+#define APACHE_ERRORLOG_LEN      32
+#define APACHE_DEFUSER_LEN       16
+#define APACHE_DEFGROUP_LEN      16
+
+static int      okbutton, cancelbutton;
+
+/* What the screen size is meant to be */
+#define APACHE_DIALOG_Y         0
+#define APACHE_DIALOG_X         0
+#define APACHE_DIALOG_WIDTH     COLS
+#define APACHE_DIALOG_HEIGHT    LINES - 2
+
+/* The screen layout structure */
+typedef struct _layout {
+    int         y;              /* x & Y co-ordinates */
+    int         x;
+    int         len;            /* The size of the dialog on the screen */
+    int         maxlen;         /* How much the user can type in ... */
+    char        *prompt;        /* The string for the prompt */
+    char        *help;          /* The display for the help line */
+    void        *var;           /* The var to set when this changes */
+    int         type;           /* The type of the dialog to create */
+    void        *obj;           /* The obj pointer returned by libdialog */
+} Layout;
+
+static Layout layout[] = {
+    { 1, 2, 30, HOSTNAME_FIELD_LEN - 1,
+      "Host Name:",
+      "What name to report this host as to client browsers",
+      tconf.hostname, STRINGOBJ, NULL },
+#define LAYOUT_HOSTNAME 0
+    
+    { 1, 40, 32, APACHE_EMAIL_LEN - 1,
+      "Email Address:",
+      "The email address of the site maintainer, e.g. webmaster@bar.com",
+      tconf.email, STRINGOBJ, NULL },
+#define LAYOUT_EMAIL    1
+    
+    { 5, 5, 20, APACHE_WELCOME_LEN - 1,
+      "Default Document:",
+      "The name of the default document found in each directory",
+      tconf.welcome, STRINGOBJ, NULL },
+#define LAYOUT_WELCOME           2
+    
+    { 5, 40, 14, APACHE_DEFUSER_LEN - 1,
+      "Default UserID:", "Default UID for access to web pages",
+      tconf.defuser, STRINGOBJ, NULL },
+#define LAYOUT_DEFUSER          3
+    
+    { 5, 60, 14, APACHE_DEFGROUP_LEN - 1,
+      "Default Group ID:", "Default GID for access to web pages",
+      tconf.defgroup, STRINGOBJ, NULL },
+#define LAYOUT_DEFGROUP          4
+    
+    { 10, 4, 36, APACHE_DOCROOT_LEN - 1,
+      "Root Document Path:",
+      "The top directory that holds the system web pages",
+      tconf.docroot, STRINGOBJ, NULL },
+#define LAYOUT_DOCROOT          5
+    
+    { 10, 50, 14, APACHE_USERDIR_LEN - 1,
+      "User Directory:",
+      "Personal sub-directory that holds users' web pages (eg. ~/Web)",
+      tconf.userdir, STRINGOBJ, NULL },
+#define LAYOUT_USERDIR          6
+    
+    { 14, 4, 28, APACHE_LOGDIR_LEN - 1,
+      "Log Dir:", "Directory to put httpd log files",
+      tconf.logdir, STRINGOBJ, NULL },
+#define LAYOUT_LOGDIR           7
+    
+    { 14, 38, 16, APACHE_ACCESSLOG_LEN - 1,
+      "Access Log:",  "Name of log file to report access",
+      tconf.accesslog, STRINGOBJ, NULL },
+#define LAYOUT_ACCESSLOG    8
+    
+    { 14, 60, 16, APACHE_ERRORLOG_LEN - 1,
+      "Error Log:",  "Name of log file to report errors",
+      tconf.errorlog, STRINGOBJ, NULL },
+#define LAYOUT_ERRORLOG   9
+    
+    { 19, 15, 0, 0,
+      "OK", "Select this if you are happy with these settings",
+      &okbutton, BUTTONOBJ, NULL },
+#define LAYOUT_OKBUTTON         10
+    
+    { 19, 45, 0, 0,
+      "CANCEL", "Select this if you wish to cancel this screen",
+      &cancelbutton, BUTTONOBJ, NULL },
+#define LAYOUT_CANCELBUTTON     11
+    { NULL },
+};
+
+/* This is it - how to get Apache setup values */
+static int
+apacheOpenDialog(void)
+{
+    WINDOW              *ds_win;
+    ComposeObj          *obj = NULL;
+    ComposeObj          *first, *last;
+    int                 n=0, quit=FALSE, cancel=FALSE, ret;
+    int                 max;
+    char                *tmp;
+    char                help[FILENAME_MAX];
+    char                title[80];
+    
+    /* We need a curses window */
+    ds_win = newwin(LINES, COLS, 0, 0);
+    if (ds_win == 0)
+    {
+        beep();
+        msgConfirm("Cannot open apache dialog window!!");
+        return(DITEM_SUCCESS);
+    }
+    
+    /* Say where our help comes from */
+    systemHelpFile(APACHE_HELPFILE, help);
+    use_helpfile(help);
+    
+    /* Setup a nice screen for us to splat stuff onto */
+    draw_box(ds_win, APACHE_DIALOG_Y, APACHE_DIALOG_X, APACHE_DIALOG_HEIGHT, APACHE_DIALOG_WIDTH, dialog_attr, border_attr);
+    wattrset(ds_win, dialog_attr);
+    mvwaddstr(ds_win, APACHE_DIALOG_Y, APACHE_DIALOG_X + 20, " Apache HTTPD Configuration ");
+    
+    draw_box(ds_win, APACHE_DIALOG_Y + 9, APACHE_DIALOG_X + 1, APACHE_DIALOG_HEIGHT - 13, APACHE_DIALOG_WIDTH - 2,
+             dialog_attr, border_attr);
+    wattrset(ds_win, dialog_attr);
+    sprintf(title, " Path Configuration ");
+    mvwaddstr(ds_win, APACHE_DIALOG_Y + 9, APACHE_DIALOG_X + 22, title);
+    
+    /** Initialize the config Data Structure **/
+    
+    bzero(&tconf, sizeof(tconf));
+    
+    tmp = variable_get(VAR_DOMAINNAME);
+    if (tmp) {
+        sprintf(tconf.email, "webmaster@%s", tmp);
+        sprintf(tconf.hostname, "www.%s", tmp);
+    }
+    
+    strcpy(tconf.defuser, DEFAULT_USER);
+    strcpy(tconf.defgroup, DEFAULT_GROUP);
+    
+    strcpy(tconf.userdir, USER_HOMEDIR);
+    strcpy(tconf.welcome, WELCOME_FILE);
+    
+    strcpy(tconf.logdir, LOGS_SUBDIR);
+    strcpy(tconf.accesslog, ACCESS_LOGNAME);
+    strcpy(tconf.errorlog, ERROR_LOGNAME);
+    
+    sprintf(tconf.docroot, "%s/%s", APACHE_BASE,DATA_SUBDIR);
+    
+    /* Loop over the layout list, create the objects, and add them
+       onto the chain of objects that dialog uses for traversal*/
+    
+    n = 0;
+    
+#define lt layout[n]
+    
+    while (lt.help != NULL) {
+        switch (lt.type) {
+        case STRINGOBJ:
+            lt.obj = NewStringObj(ds_win, lt.prompt, lt.var,
+				  lt.y + APACHE_DIALOG_Y, lt.x + APACHE_DIALOG_X,
+				  lt.len, lt.maxlen);
+            break;
+	    
+        case BUTTONOBJ:
+            lt.obj = NewButtonObj(ds_win, lt.prompt, lt.var,
+				  lt.y + APACHE_DIALOG_Y, lt.x + APACHE_DIALOG_X);
+            break;
+	    
+        default:
+            msgFatal("Don't support this object yet!");
+        }
+        AddObj(&obj, lt.type, (void *) lt.obj);
+        n++;
+    }
+    max = n - 1;
+    
+    /* Find the last object we can traverse to */
+    last = obj;
+    while (last->next)
+        last = last->next;
+    
+    /* Find the first object in the list */
+    first = obj;
+    while (first->prev)
+        first = first->prev;
+    
+    /* Some more initialisation before we go into the main input loop */
+    n = 0;
+    cancelbutton = 0;
+    cancel = FALSE;
+    okbutton = 0;
+    
+    /* Incoming user data - DUCK! */
+    while (!quit) {
+        char help_line[80];
+        int i, len = strlen(lt.help);
+	
+        /* Display the help line at the bottom of the screen */
+        for (i = 0; i < 79; i++)
+            help_line[i] = (i < len) ? lt.help[i] : ' ';
+	    help_line[i] = '\0';
+	    use_helpline(help_line);
+	    display_helpline(ds_win, LINES - 1, COLS - 1);
+	    
+	    /* Ask for libdialog to do its stuff */
+	    ret = PollObj(&obj);
+	    
+	    /* We are in the Hostname field - calculate the e-mail addr */
+	    if (n == LAYOUT_HOSTNAME) {
+		if ((tmp = index(tconf.hostname, '.')) != NULL) {
+		    sprintf(tconf.email,"webmaster@%s",tmp+1);
+		    RefreshStringObj(layout[LAYOUT_EMAIL].obj);
+		}
+	    }
+	    
+	    /* Handle special case stuff that libdialog misses. Sigh */
+	    switch (ret) {
+		/* Bail out */
+	    case SEL_ESC:
+		quit = TRUE, cancel=TRUE;
+		break;
+		
+		/* This doesn't work for list dialogs. Oh well. Perhaps
+		   should special case the move from the OK button ``up''
+		   to make it go to the interface list, but then it gets
+		   awkward for the user to go back and correct screw up's
+		   in the per-interface section */
+		
+	    case KEY_UP:
+		if (obj->prev !=NULL ) {
+		    obj = obj->prev;
+		    --n;
+		} else {
+		    obj = last;
+		    n = max;
+		}
+		break;
+		
+	    case KEY_DOWN:
+		if (obj->next != NULL) {
+		    obj = obj->next;
+		    ++n;
+		} else {
+		    obj = first;
+		    n = 0;
+		}
+		break;
+		
+	    case SEL_TAB:
+		if (n < max)
+		    ++n;
+		else
+		    n = 0;
+		break;
+		
+		/* The user has pressed enter over a button object */
+	    case SEL_BUTTON:
+		quit = TRUE;
+		if (cancelbutton)
+		    cancel = TRUE;
+		break;
+		
+		/* Generic CR handler */
+	    case SEL_CR:
+		if (n < max)
+		    ++n;
+		else
+		    n = 0;
+		break;
+		
+	    case SEL_BACKTAB:
+		if (n)
+		    --n;
+		else
+		    n = max;
+		break;
+		
+	    case KEY_F(1):
+		display_helpfile();
+	    
+            /* They tried some key combination we don't support - tell them! */
+	    default:
+		beep();
+	    }
+	    
+    }
+    
+    /* Clear this crap off the screen */
+    dialog_clear();
+    refresh();
+    use_helpfile(NULL);
+    
+    if (cancel)
+	return DITEM_FAILURE | DITEM_RESTORE;
+    return DITEM_SUCCESS | DITEM_RESTORE;
+}
+
+int
+configApache(dialogMenuItem *self)
+{
+    int i;
+    char company[64], file[128];
+    char *tptr;
+    FILE *fptr;
+    
+    /* Be optimistic */
+    i = DITEM_SUCCESS;
+
+    dialog_clear();
+    msgConfirm("Since you elected to install the WEB server, we'll now add the\n"
+	       "Apache HTTPD package and set up a few configuration files.");
+    i = package_add(APACHE_PACKAGE);
+    if (DITEM_STATUS(i) != DITEM_SUCCESS) {
+	msgConfirm("Hmmmmm.  Looks like we weren't able to fetch the Apache WEB server\n"
+		   "package.  You may wish to fetch and configure it by hand by looking\n"
+		   "in /usr/ports/net/apache (in the ports collection) or looking for the\n"
+		   "precompiled apache package in packages/networking/%s.", APACHE_PACKAGE);
+        return i | DITEM_RESTORE;
+    }
+
+    dialog_clear();
+    i = apacheOpenDialog();
+    if (DITEM_STATUS(i) != DITEM_SUCCESS) {
+	msgConfirm("Configuration of the Apache WEB server was cancelled per\n"
+		   "user request.");
+	return i;
+    }
+    /*** Fix defaults for invalid value ***/
+    if (!tconf.logdir[0])
+	strcpy(tconf.logdir, LOGS_SUBDIR);
+    if (!tconf.accesslog[0])
+	strcpy(tconf.accesslog, ACCESS_LOGNAME);
+    if (!tconf.errorlog[0])
+	strcpy(tconf.errorlog, ERROR_LOGNAME);
+    
+    if (!tconf.welcome[0])
+	strcpy(tconf.welcome, WELCOME_FILE);
+    if (!tconf.userdir[0])
+	strcpy(tconf.userdir, USER_HOMEDIR);
+    
+    if (!tconf.defuser[0])
+	strcpy(tconf.defuser, DEFAULT_USER);
+    if (!tconf.defgroup[0])
+	strcpy(tconf.defgroup, DEFAULT_GROUP);
+    
+    /*** If the user did not specify a directory, use default ***/
+    
+    if (tconf.docroot[strlen(tconf.docroot) - 1] == '/')
+	tconf.docroot[strlen(tconf.docroot) - 1] = '\0';
+    
+    if (!tconf.docroot[0])
+	sprintf(tconf.docroot, "%s/%s", APACHE_BASE, DATA_SUBDIR);
+    
+    /*** If DocRoot does not exist, create it ***/
+    
+    if (!directory_exists(tconf.docroot))
+	vsystem("mkdir -p %s", tconf.docroot);
+    
+    if (directory_exists(tconf.docroot)) {
+	sprintf(file, "%s/%s", tconf.docroot, tconf.welcome);
+	if (!file_readable(file)) {
+	    tptr = msgGetInput(NULL, "What is your company name?");
+	    if (tptr && tptr[0])
+		strcpy(company, tptr);
+	    else
+		strcpy(company, "our Web Page");
+	    
+	    msgNotify("Creating sample web page...");
+	    fptr = fopen(file,"w");
+	    if (fptr) {
+		fprintf(fptr, "<CENTER>\n<TITLE>Welcome Page</TITLE>\n");
+		fprintf(fptr, "<H1>Welcome to %s </H1>\n</CENTER>\n",company);
+		fprintf(fptr, "<P><HR SIZE=4>\n<CENTER>\n");
+		fprintf(fptr, "<A HREF=\"http://www.FreeBSD.org/What\">\n");
+		fprintf(fptr, "<IMG SRC=\"%s\" ALIGN=CENTER BORDER=0 ", FREEBSD_GIF);
+		fprintf(fptr, " ALT=\"Powered by FreeBSD\"></A>\n");
+		if (!tconf.email[0]) {
+		    if ((tptr = variable_get(VAR_DOMAINNAME)))
+			sprintf(tconf.email, "root@%s", tptr);
+		}
+		if (tconf.email[0]) {
+		    fprintf(fptr, "<ADDRESS><H4>\n");
+		    fprintf(fptr, "    For questions or comments, please send mail to:\n");
+		    fprintf(fptr, "        <A HREF=\"mailto:%s\">%s</A>\n",
+			    tconf.email, tconf.email);
+		    fprintf(fptr, "</H4></ADDRESS>\n");
+		}
+		fprintf(fptr, "</CENTER>\n\n");
+		fclose(fptr);
+	    }
+	    else {
+		msgConfirm("Unable to create sample Web Page.");
+		i = DITEM_FAILURE;
+	    }
+	}
+    }
+    else {
+	msgConfirm("Unable to create Document Root Directory.");
+	i = DITEM_FAILURE;
+    }
+    
+    msgNotify("Writing configuration files....");
+    
+    (void)vsystem("mkdir -p %s/%s", APACHE_BASE, CONFIG_SUBDIR);
+    sprintf(file, "%s/%s/access.conf", APACHE_BASE, CONFIG_SUBDIR);
+    if (file_readable(file))
+	vsystem("mv -f %s %s.ORIG", file, file);
+    
+    fptr = fopen(file,"w");
+    if (fptr) {
+	fprintf(fptr, "<Directory %s/cgi-bin>\n", APACHE_BASE);
+	fprintf(fptr, "Options Indexes FollowSymLinks\n");
+	fprintf(fptr, "</Directory>\n");
+	fprintf(fptr, "\n");
+	fprintf(fptr, "<Directory %s>\n", tconf.docroot);
+	fprintf(fptr, "Options Indexes FollowSymLinks\n");
+	fprintf(fptr, "AllowOverride All\n");
+	fprintf(fptr, "</Directory>\n");
+	fprintf(fptr, "\n");
+	fclose(fptr);
+    }
+    else {
+	msgConfirm("Could not create %s",file);
+	i = DITEM_FAILURE;
+    }
+    
+    sprintf(file, "%s/%s/httpd.conf", APACHE_BASE, CONFIG_SUBDIR);
+    if (file_readable(file))
+	vsystem("mv -f %s %s.ORIG", file, file);
+    
+    fptr = fopen(file,"w");
+    if (fptr) {
+	fprintf(fptr, "ServerType standalone\n");
+	fprintf(fptr, "Port 80\n");
+	fprintf(fptr, "TimeOut 400\n");
+	fprintf(fptr, "\n");
+	fprintf(fptr, "ErrorLog %s/%s\n", LOGS_SUBDIR, ERROR_LOGNAME);
+	fprintf(fptr, "TransferLog %s/%s\n", LOGS_SUBDIR, ACCESS_LOGNAME);
+	fprintf(fptr, "PidFile /var/run/httpd.pid\n");
+	fprintf(fptr, "\n");
+	fprintf(fptr, "StartServers 5\n");
+	fprintf(fptr, "MinSpareServers 5\n");
+	fprintf(fptr, "MaxSpareServers 10\n");
+	fprintf(fptr, "MaxRequestsPerChild 30\n");
+	fprintf(fptr, "MaxClients 150\n");
+	fprintf(fptr, "\n");
+	fprintf(fptr, "User %s\n",tconf.defuser);
+	fprintf(fptr, "Group %s\n",tconf.defgroup);
+	fprintf(fptr, "\n");
+	
+	if (tconf.email[0])
+	    fprintf(fptr, "ServerAdmin %s\n", tconf.email);
+	if (tconf.hostname[0])
+	    fprintf(fptr, "ServerName %s\n", tconf.hostname);
+	
+	fclose(fptr);
+    }
+    else {
+	msgConfirm("Could not create %s",file);
+	i = DITEM_FAILURE;
+    }
+    
+    sprintf(file, "%s/%s/srm.conf", APACHE_BASE, CONFIG_SUBDIR);
+    if (file_readable(file))
+	vsystem("mv -f %s %s.ORIG", file, file);
+    fptr = fopen(file,"w");
+    if (fptr) {
+	fprintf(fptr, "FancyIndexing on\n");
+	fprintf(fptr, "DefaultType text/plain\n");
+	fprintf(fptr, "IndexIgnore */.??* *~ *# */HEADER* */README* */RCS\n");
+	fprintf(fptr, "HeaderName HEADER\n");
+	fprintf(fptr, "ReadmeName README\n");
+	fprintf(fptr, "AccessFileName .htaccess\n");
+	fprintf(fptr, "\n");
+	fprintf(fptr, "AddEncoding x-compress Z\n");
+	fprintf(fptr, "AddEncoding x-gzip gz\n");
+	fprintf(fptr, "DefaultIcon /icons/unknown.gif\n");
+	fprintf(fptr, "\n");
+	fprintf(fptr, "AddIconByEncoding (CMP,/icons/compressed.gif) x-compress x-gzip\n");
+	fprintf(fptr, "AddIconByType (TXT,/icons/text.gif) text/*\n");
+	fprintf(fptr, "AddIconByType (IMG,/icons/image2.gif) image/*\n");
+	fprintf(fptr, "AddIconByType (SND,/icons/sound2.gif) audio/*\n");
+	fprintf(fptr, "AddIconByType (VID,/icons/movie.gif) video/*\n");
+	fprintf(fptr, "\n");
+	
+	fprintf(fptr, "AddIcon /icons/text.gif .ps .shtml\n");
+	fprintf(fptr, "AddIcon /icons/movie.gif .mpg .qt\n");
+	fprintf(fptr, "AddIcon /icons/binary.gif .bin\n");
+	fprintf(fptr, "AddIcon /icons/burst.gif .wrl\n");
+	fprintf(fptr, "AddIcon /icons/binhex.gif .hqx .sit\n");
+	fprintf(fptr, "AddIcon /icons/uu.gif .uu\n");
+	fprintf(fptr, "AddIcon /icons/tar.gif .tar\n");
+	fprintf(fptr, "AddIcon /icons/back.gif ..\n");
+	fprintf(fptr, "AddIcon /icons/dir.gif ^^DIRECTORY^^\n");
+	fprintf(fptr, "AddIcon /icons/blank.gif ^^BLANKICON^^\n");
+	fprintf(fptr, "\n");
+	
+	fprintf(fptr, "ScriptAlias /cgi_bin/ %s/cgi_bin/\n",APACHE_BASE);
+	fprintf(fptr, "Alias /icons/ %s/icons/\n",APACHE_BASE);
+	fprintf(fptr, "DocumentRoot %s\n",tconf.docroot);
+	fprintf(fptr, "UserDir %s\n", tconf.userdir);
+	fprintf(fptr, "DirectoryIndex %s\n", tconf.welcome);
+	fprintf(fptr, "\n");
+	
+	fclose(fptr);
+    }
+    else {
+	msgConfirm("Could not create %s",file);
+	i = DITEM_FAILURE;
+    }
+    if (DITEM_STATUS(i) == DITEM_SUCCESS)
+	variable_set2("apache_httpd", "YES");
+    return i | DITEM_RESTORE;
+}