thttpd/extras/makeweb.c

/* makeweb.c - let a user create a web subdirectory
**
** Copyright © 1995 by Jef Poskanzer <jef@acme.com>.
** 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.
** 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 THE AUTHOR AND CONTRIBUTORS ``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 THE AUTHOR OR CONTRIBUTORS 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, 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.
*/

/* This is intended to be installed setgid to a group that has
** write access to the system web directory.  It allows any user
** to create a subdirectory there.  It also makes a symbolic link
** in the user's home directory pointing at the new web subdir.
*/


#include "../config.h"

#include <stdio.h>
#include <string.h>
#include <pwd.h>
#include <errno.h>
#include <unistd.h>
#include <sys/types.h>
#include <sys/stat.h>


#define LINK "public_html"

static char* argv0;


static void
check_room( int size, int len )
    {
    if ( len > size )
        {
        (void) fprintf( stderr, "%s: internal error, out of room\n", argv0 );
        exit( 1 );
        }
    }


static void
end_with_slash( char* str )
    {
    if ( str[strlen( str ) - 1] != '/' )
        (void) strcat( str, "/" );
    }


static void
check_dir( char* dirname, uid_t uid, gid_t gid )
    {
    struct stat sb;

    /* Check the directory. */
    if ( stat( dirname, &sb ) < 0 )
        {
        if ( errno != ENOENT )
            {
            perror( dirname );
            exit( 1 );
            }
        /* Doesn't exist.  Try to make it. */
        if ( mkdir( dirname, 0755 ) < 0 )
            {
            if ( errno == ENOENT )
                (void) printf( "\
Some part of the path %s does not exist.\n\
This is probably a configuration error.\n", dirname );
            else
                perror( dirname );
            exit( 1 );
            }
        (void) printf( "Created web directory %s\n", dirname );
        /* Try to change the group of the new dir to the user's group. */
        (void) chown( dirname, -1, gid );
        }
    else
        {
        /* The directory already exists.  Well, check that it is in
        ** fact a directory.
        */
        if ( ! S_ISDIR( sb.st_mode ) )
            {
            (void) printf(
                "%s already exists but is not a directory!\n", dirname );
            exit( 1 );
            }
        if ( sb.st_uid != uid )
            {
            (void) printf(
                "%s already exists but you don't own it!\n", dirname );
            exit( 1 );
            }
        (void) printf( "Web directory %s already existed.\n", dirname );
        }
    }


int
main( int argc, char** argv )
    {
    char* webdir;
    char* prefix;
    struct passwd* pwd;
    char* username;
    char* homedir;
    char dirname[5000];
    char linkname[5000];
    char linkbuf[5000];
    struct stat sb;

    argv0 = argv[0];
    if ( argc != 1 )
        {
        (void) fprintf( stderr, "usage:  %s\n", argv0 );
        exit( 1 );
        }

    pwd = getpwuid( getuid() );
    if ( pwd == (struct passwd*) 0 )
        {
        (void) fprintf( stderr, "%s: can't find your username\n", argv0 );
        exit( 1 );
        }
    username = pwd->pw_name;
    homedir = pwd->pw_dir;

#ifdef TILDE_MAP_2

    /* All we have to do for the TILDE_MAP_2 case is make sure there's
    ** a public_html subdirectory.
    */
    check_room(
        sizeof(dirname), strlen( homedir ) + strlen( TILDE_MAP_2 ) + 2 );
    (void) strcpy( dirname, homedir );
    end_with_slash( dirname );
    (void) strcat( dirname, TILDE_MAP_2 );

    check_dir( dirname, pwd->pw_uid, pwd->pw_gid );

#else /* TILDE_MAP_2 */

    /* Gather the pieces. */
    webdir = WEBDIR;
#ifdef TILDE_MAP_1
    prefix = TILDE_MAP_1;
#else /* TILDE_MAP_1 */
    prefix = "";
#endif /* TILDE_MAP_1 */

    /* Assemble the directory name.  Be paranoid cause we're sgid. */
    check_room(
        sizeof(dirname),
        strlen( webdir ) + strlen( prefix ) + strlen( username ) + 3 );
    (void) strcpy( dirname, webdir );
    end_with_slash( dirname );
    if ( strlen( prefix ) != 0 )
        {
        (void) strcat( dirname, prefix );
        end_with_slash( dirname );
        }
    (void) strcat( dirname, username );

    /* Assemble the link name. */
    check_room( sizeof(linkname), strlen( homedir ) + strlen( LINK ) + 2 );
    (void) strcpy( linkname, homedir );
    end_with_slash( linkname );
    (void) strcat( linkname, LINK );

    check_dir( dirname, pwd->pw_uid, pwd->pw_gid );

    /* Check the symlink. */
    try_link_again: ;
    if ( lstat( linkname, &sb ) < 0 )
        {
        if ( errno != ENOENT )
            {
            perror( linkname );
            exit( 1 );
            }
        /* Doesn't exist.  Try to make it. */
        if ( symlink( dirname, linkname ) < 0 )
            {
            if ( errno == ENOENT )
                (void) printf( "\
Some part of the path %s does not exist.\n\
This is probably a configuration error.\n", linkname );
            else
                perror( linkname );
            exit( 1 );
            }
        (void) printf( "Created symbolic link %s\n", linkname );
        }
    else
        {
        /* The link already exists.  Well, check that it is in
        ** fact a link.
        */
        if ( ! S_ISLNK( sb.st_mode ) )
            {
            (void) printf( "\
%s already exists but is not a\n\
symbolic link!  Perhaps you have a real web subdirectory in your\n\
home dir from a previous web server configuration?  You may have\n\
to rename it, run %s again, and then copy in the old\n\
contents.\n", linkname, argv0 );
            exit( 1 );
            }
        /* Check the existing link's contents. */
        if ( readlink( linkname, linkbuf, sizeof(linkbuf) ) < 0 )
            {
            perror( linkname );
            exit( 1 );
            }
        if ( strcmp( dirname, linkbuf ) == 0 )
            (void) printf( "Symbolic link %s already existed.\n", linkname );
        else
            {
            (void) printf( "\
Symbolic link %s already existed\n\
but it points to the wrong place!  Attempting to remove and\n\
recreate it.\n", linkname );
            if ( unlink( linkname ) < 0 )
                {
                perror( linkname );
                exit( 1 );
                }
            goto try_link_again;
            }
        }
#endif /* TILDE_MAP_2 */

    exit( 0 );
    }
Revision:	1.1
Committed:	Mon Jun 18 21:11:58 2001 UTC (25 years, 3 months ago) by root
Content type:	text/plain
Branch:	MAIN
CVS Tags:	mp_j, dp_j, cp_j, HEAD
Branch point for:	connpatch, dirpatch, mmapppatch
Log Message:	* empty log message *
#	Content
1	/* makeweb.c - let a user create a web subdirectory
2	**
3	** Copyright © 1995 by Jef Poskanzer <jef@acme.com>.
4	** All rights reserved.
5	**
6	** Redistribution and use in source and binary forms, with or without
7	** modification, are permitted provided that the following conditions
8	** are met:
9	** 1. Redistributions of source code must retain the above copyright
10	** notice, this list of conditions and the following disclaimer.
11	** 2. Redistributions in binary form must reproduce the above copyright
12	** notice, this list of conditions and the following disclaimer in the
13	** documentation and/or other materials provided with the distribution.
14	**
15	** THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16	** ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17	** IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18	** ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19	** FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20	** DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21	** OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22	** HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23	** LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24	** OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25	** SUCH DAMAGE.
26	*/
27
28	/* This is intended to be installed setgid to a group that has
29	** write access to the system web directory. It allows any user
30	** to create a subdirectory there. It also makes a symbolic link
31	** in the user's home directory pointing at the new web subdir.
32	*/
33
34
35	#include "../config.h"
36
37	#include <stdio.h>
38	#include <string.h>
39	#include <pwd.h>
40	#include <errno.h>
41	#include <unistd.h>
42	#include <sys/types.h>
43	#include <sys/stat.h>
44
45
46	#define LINK "public_html"
47
48	static char* argv0;
49
50
51	static void
52	check_room( int size, int len )
53	{
54	if ( len > size )
55	{
56	(void) fprintf( stderr, "%s: internal error, out of room\n", argv0 );
57	exit( 1 );
58	}
59	}
60
61
62	static void
63	end_with_slash( char* str )
64	{
65	if ( str[strlen( str ) - 1] != '/' )
66	(void) strcat( str, "/" );
67	}
68
69
70	static void
71	check_dir( char* dirname, uid_t uid, gid_t gid )
72	{
73	struct stat sb;
74
75	/* Check the directory. */
76	if ( stat( dirname, &sb ) < 0 )
77	{
78	if ( errno != ENOENT )
79	{
80	perror( dirname );
81	exit( 1 );
82	}
83	/* Doesn't exist. Try to make it. */
84	if ( mkdir( dirname, 0755 ) < 0 )
85	{
86	if ( errno == ENOENT )
87	(void) printf( "\
88	Some part of the path %s does not exist.\n\
89	This is probably a configuration error.\n", dirname );
90	else
91	perror( dirname );
92	exit( 1 );
93	}
94	(void) printf( "Created web directory %s\n", dirname );
95	/* Try to change the group of the new dir to the user's group. */
96	(void) chown( dirname, -1, gid );
97	}
98	else
99	{
100	/* The directory already exists. Well, check that it is in
101	** fact a directory.
102	*/
103	if ( ! S_ISDIR( sb.st_mode ) )
104	{
105	(void) printf(
106	"%s already exists but is not a directory!\n", dirname );
107	exit( 1 );
108	}
109	if ( sb.st_uid != uid )
110	{
111	(void) printf(
112	"%s already exists but you don't own it!\n", dirname );
113	exit( 1 );
114	}
115	(void) printf( "Web directory %s already existed.\n", dirname );
116	}
117	}
118
119
120	int
121	main( int argc, char** argv )
122	{
123	char* webdir;
124	char* prefix;
125	struct passwd* pwd;
126	char* username;
127	char* homedir;
128	char dirname[5000];
129	char linkname[5000];
130	char linkbuf[5000];
131	struct stat sb;
132
133	argv0 = argv[0];
134	if ( argc != 1 )
135	{
136	(void) fprintf( stderr, "usage: %s\n", argv0 );
137	exit( 1 );
138	}
139
140	pwd = getpwuid( getuid() );
141	if ( pwd == (struct passwd*) 0 )
142	{
143	(void) fprintf( stderr, "%s: can't find your username\n", argv0 );
144	exit( 1 );
145	}
146	username = pwd->pw_name;
147	homedir = pwd->pw_dir;
148
149	#ifdef TILDE_MAP_2
150
151	/* All we have to do for the TILDE_MAP_2 case is make sure there's
152	** a public_html subdirectory.
153	*/
154	check_room(
155	sizeof(dirname), strlen( homedir ) + strlen( TILDE_MAP_2 ) + 2 );
156	(void) strcpy( dirname, homedir );
157	end_with_slash( dirname );
158	(void) strcat( dirname, TILDE_MAP_2 );
159
160	check_dir( dirname, pwd->pw_uid, pwd->pw_gid );
161
162	#else /* TILDE_MAP_2 */
163
164	/* Gather the pieces. */
165	webdir = WEBDIR;
166	#ifdef TILDE_MAP_1
167	prefix = TILDE_MAP_1;
168	#else /* TILDE_MAP_1 */
169	prefix = "";
170	#endif /* TILDE_MAP_1 */
171
172	/* Assemble the directory name. Be paranoid cause we're sgid. */
173	check_room(
174	sizeof(dirname),
175	strlen( webdir ) + strlen( prefix ) + strlen( username ) + 3 );
176	(void) strcpy( dirname, webdir );
177	end_with_slash( dirname );
178	if ( strlen( prefix ) != 0 )
179	{
180	(void) strcat( dirname, prefix );
181	end_with_slash( dirname );
182	}
183	(void) strcat( dirname, username );
184
185	/* Assemble the link name. */
186	check_room( sizeof(linkname), strlen( homedir ) + strlen( LINK ) + 2 );
187	(void) strcpy( linkname, homedir );
188	end_with_slash( linkname );
189	(void) strcat( linkname, LINK );
190
191	check_dir( dirname, pwd->pw_uid, pwd->pw_gid );
192
193	/* Check the symlink. */
194	try_link_again: ;
195	if ( lstat( linkname, &sb ) < 0 )
196	{
197	if ( errno != ENOENT )
198	{
199	perror( linkname );
200	exit( 1 );
201	}
202	/* Doesn't exist. Try to make it. */
203	if ( symlink( dirname, linkname ) < 0 )
204	{
205	if ( errno == ENOENT )
206	(void) printf( "\
207	Some part of the path %s does not exist.\n\
208	This is probably a configuration error.\n", linkname );
209	else
210	perror( linkname );
211	exit( 1 );
212	}
213	(void) printf( "Created symbolic link %s\n", linkname );
214	}
215	else
216	{
217	/* The link already exists. Well, check that it is in
218	** fact a link.
219	*/
220	if ( ! S_ISLNK( sb.st_mode ) )
221	{
222	(void) printf( "\
223	%s already exists but is not a\n\
224	symbolic link! Perhaps you have a real web subdirectory in your\n\
225	home dir from a previous web server configuration? You may have\n\
226	to rename it, run %s again, and then copy in the old\n\
227	contents.\n", linkname, argv0 );
228	exit( 1 );
229	}
230	/* Check the existing link's contents. */
231	if ( readlink( linkname, linkbuf, sizeof(linkbuf) ) < 0 )
232	{
233	perror( linkname );
234	exit( 1 );
235	}
236	if ( strcmp( dirname, linkbuf ) == 0 )
237	(void) printf( "Symbolic link %s already existed.\n", linkname );
238	else
239	{
240	(void) printf( "\
241	Symbolic link %s already existed\n\
242	but it points to the wrong place! Attempting to remove and\n\
243	recreate it.\n", linkname );
244	if ( unlink( linkname ) < 0 )
245	{
246	perror( linkname );
247	exit( 1 );
248	}
249	goto try_link_again;
250	}
251	}
252	#endif /* TILDE_MAP_2 */
253
254	exit( 0 );
255	}