1 /* Copyright 1999-2004 The Apache Software Foundation
3 * Licensed under the Apache License, Version 2.0 (the "License");
4 * you may not use this file except in compliance with the License.
5 * You may obtain a copy of the License at
7 * http://www.apache.org/licenses/LICENSE-2.0
9 * Unless required by applicable law or agreed to in writing, software
10 * distributed under the License is distributed on an "AS IS" BASIS,
11 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
12 * See the License for the specific language governing permissions and
13 * limitations under the License.
16 /******************************************************************************
17 ******************************************************************************
18 * NOTE! This program is not safe as a setuid executable! Do not make it
20 ******************************************************************************
21 *****************************************************************************/
23 * htdigest.c: simple program for manipulating digest passwd file for Apache
25 * by Alexei Kosut, based on htpasswd.c, by Rob McCool
29 #include "apr_file_io.h"
31 #include "apr_lib.h" /* for apr_getpass() */
32 #include "apr_general.h"
33 #include "apr_signal.h"
34 #include "apr_strings.h" /* for apr_pstrdup() */
36 #define APR_WANT_STDIO
37 #define APR_WANT_STRFUNC
40 #if APR_HAVE_SYS_TYPES_H
41 #include <sys/types.h>
52 #if APR_CHARSET_EBCDIC
58 #endif /* APR_CHARSET_EBCDIC */
60 #define MAX_STRING_LEN 256
62 apr_file_t *tfp = NULL;
65 #if APR_CHARSET_EBCDIC
66 apr_xlate_t *to_ascii;
69 static void cleanup_tempfile_and_exit(int rc)
77 static void getword(char *word, char *line, char stop)
81 for (x = 0; ((line[x]) && (line[x] != stop)); x++)
89 while ((line[y++] = line[x++]));
92 static int get_line(char *s, int n, apr_file_t *f)
96 apr_status_t rv = APR_EINVAL;
99 ((rv = apr_file_getc(&ch, f)) == APR_SUCCESS) && (ch != '\n')) {
106 if (rv != APR_SUCCESS)
112 static void putline(apr_file_t *f, char *l)
116 for (x = 0; l[x]; x++)
117 apr_file_putc(l[x], f);
121 static void add_password(const char *user, const char *realm, apr_file_t *f)
124 apr_md5_ctx_t context;
125 unsigned char digest[16];
126 char string[MAX_STRING_LEN];
127 char pwin[MAX_STRING_LEN];
128 char pwv[MAX_STRING_LEN];
130 apr_size_t len = sizeof(pwin);
132 if (apr_password_get("New password: ", pwin, &len) != APR_SUCCESS) {
133 apr_file_printf(errfile, "password too long");
134 cleanup_tempfile_and_exit(5);
137 apr_password_get("Re-type new password: ", pwv, &len);
138 if (strcmp(pwin, pwv) != 0) {
139 apr_file_printf(errfile, "They don't match, sorry.\n");
140 cleanup_tempfile_and_exit(1);
143 apr_file_printf(f, "%s:%s:", user, realm);
146 sprintf(string, "%s:%s:%s", user, realm, pw);
148 apr_md5_init(&context);
149 #if APR_CHARSET_EBCDIC
150 apr_md5_set_xlate(&context, to_ascii);
152 apr_md5_update(&context, (unsigned char *) string, strlen(string));
153 apr_md5_final(digest, &context);
155 for (i = 0; i < 16; i++)
156 apr_file_printf(f, "%02x", digest[i]);
158 apr_file_printf(f, "\n");
161 static void usage(void)
163 apr_file_printf(errfile, "Usage: htdigest [-c] passwordfile realm username\n");
164 apr_file_printf(errfile, "The -c flag creates a new file.\n");
168 static void interrupted(void)
170 apr_file_printf(errfile, "Interrupted.\n");
171 cleanup_tempfile_and_exit(1);
174 static void terminate(void)
182 int main(int argc, const char * const argv[])
186 char tn[] = "htdigest.tmp.XXXXXX";
188 char user[MAX_STRING_LEN];
189 char realm[MAX_STRING_LEN];
190 char line[MAX_STRING_LEN];
191 char l[MAX_STRING_LEN];
192 char w[MAX_STRING_LEN];
193 char x[MAX_STRING_LEN];
196 apr_app_initialize(&argc, &argv, NULL);
198 apr_pool_create(&cntxt, NULL);
199 apr_file_open_stderr(&errfile, cntxt);
201 #if APR_CHARSET_EBCDIC
202 rv = apr_xlate_open(&to_ascii, "ISO8859-1", APR_DEFAULT_CHARSET, cntxt);
204 apr_file_printf(errfile, "apr_xlate_open(): %s (%d)\n",
205 apr_strerror(rv, line, sizeof(line)), rv);
210 apr_signal(SIGINT, (void (*)(int)) interrupted);
212 if (strcmp(argv[1], "-c"))
214 rv = apr_file_open(&f, argv[2], APR_WRITE | APR_CREATE, -1, cntxt);
215 if (rv != APR_SUCCESS) {
218 apr_file_printf(errfile, "Could not open passwd file %s for writing: %s\n",
220 apr_strerror(rv, errmsg, sizeof errmsg));
223 apr_file_printf(errfile, "Adding password for %s in realm %s.\n",
225 add_password(argv[4], argv[3], f);
232 if (apr_temp_dir_get((const char**)&dirname, cntxt) != APR_SUCCESS) {
233 apr_file_printf(errfile, "%s: could not determine temp dir\n",
237 dirname = apr_psprintf(cntxt, "%s/%s", dirname, tn);
239 if (apr_file_mktemp(&tfp, dirname, 0, cntxt) != APR_SUCCESS) {
240 apr_file_printf(errfile, "Could not open temp file %s.\n", dirname);
244 if (apr_file_open(&f, argv[1], APR_READ, -1, cntxt) != APR_SUCCESS) {
245 apr_file_printf(errfile,
246 "Could not open passwd file %s for reading.\n", argv[1]);
247 apr_file_printf(errfile, "Use -c option to create new one.\n");
248 cleanup_tempfile_and_exit(1);
250 apr_cpystrn(user, argv[3], sizeof(user));
251 apr_cpystrn(realm, argv[2], sizeof(realm));
254 while (!(get_line(line, MAX_STRING_LEN, f))) {
255 if (found || (line[0] == '#') || (!line[0])) {
262 if (strcmp(user, w) || strcmp(realm, x)) {
267 apr_file_printf(errfile, "Changing password for user %s in realm %s\n",
269 add_password(user, realm, tfp);
274 apr_file_printf(errfile, "Adding user %s in realm %s\n", user, realm);
275 add_password(user, realm, tfp);
279 /* The temporary file has all the data, just copy it to the new location.
281 if (apr_file_copy(dirname, argv[1], APR_FILE_SOURCE_PERMS, cntxt) !=
283 apr_file_printf(errfile, "%s: unable to update file %s\n",