]> granicus.if.org Git - apache/blobdiff - support/htdigest.c
Update the copyright year in all .c, .h and .xml files
[apache] / support / htdigest.c
index 195e24130441c8eb389a2182cc69e9ac01e1a264..739ca90fceadfc330a1bf2a8ca37915011fe08b6 100644 (file)
@@ -1,55 +1,17 @@
-/* ====================================================================
- * The Apache Software License, Version 1.1
+/* Copyright 1999-2006 The Apache Software Foundation or its licensors, as
+ * applicable.
  *
- * Copyright (c) 2000 The Apache Software Foundation.  All rights
- * reserved.
+ * Licensed under the Apache License, Version 2.0 (the "License");
+ * you may not use this file except in compliance with the License.
+ * You may obtain a copy of the License at
  *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
+ *     http://www.apache.org/licenses/LICENSE-2.0
  *
- * 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.
- *
- * 3. The end-user documentation included with the redistribution,
- *    if any, must include the following acknowledgment:
- *       "This product includes software developed by the
- *        Apache Software Foundation (http://www.apache.org/)."
- *    Alternately, this acknowledgment may appear in the software itself,
- *    if and wherever such third-party acknowledgments normally appear.
- *
- * 4. The names "Apache" and "Apache Software Foundation" must
- *    not be used to endorse or promote products derived from this
- *    software without prior written permission. For written
- *    permission, please contact apache@apache.org.
- *
- * 5. Products derived from this software may not be called "Apache",
- *    nor may "Apache" appear in their name, without prior written
- *    permission of the Apache Software Foundation.
- *
- * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESSED 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 APACHE SOFTWARE FOUNDATION OR
- * ITS 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 software consists of voluntary contributions made by many
- * individuals on behalf of the Apache Software Foundation.  For more
- * information on the Apache Software Foundation, please see
- * <http://www.apache.org/>.
+ * Unless required by applicable law or agreed to in writing, software
+ * distributed under the License is distributed on an "AS IS" BASIS,
+ * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ * See the License for the specific language governing permissions and
+ * limitations under the License.
  */
 
 /******************************************************************************
  * by Alexei Kosut, based on htpasswd.c, by Rob McCool
  */
 
-#include "apr_lib.h"
+#include "apr.h"
+#include "apr_file_io.h"
 #include "apr_md5.h"
+#include "apr_lib.h"            /* for apr_getpass() */
+#include "apr_general.h"
+#include "apr_signal.h"
+#include "apr_strings.h"        /* for apr_pstrdup() */
 
-#ifdef HAVE_SYS_TYPES_H
- #include <sys/types.h>
-#endif
+#define APR_WANT_STDIO
+#define APR_WANT_STRFUNC
+#include "apr_want.h"
 
-#ifdef HAVE_SYS_SIGNAL_H
-#include <sys/signal.h>
+#if APR_HAVE_SYS_TYPES_H
+#include <sys/types.h>
 #endif
-
-#ifdef HAVE_SIGNAL_H
-#include <signal.h>
-#endif
-
+#if APR_HAVE_STDLIB_H
 #include <stdlib.h>
+#endif
 
 #ifdef WIN32
 #include <conio.h>
 #endif
 
-#if 'A' == 0xC1
-#define CHARSET_EBCDIC
-#endif
 
-#ifdef CHARSET_EBCDIC
+#if APR_CHARSET_EBCDIC
 #define LF '\n'
 #define CR '\r'
 #else
 #define LF 10
 #define CR 13
-#endif /* CHARSET_EBCDIC */
+#endif /* APR_CHARSET_EBCDIC */
 
 #define MAX_STRING_LEN 256
 
-char *tn;
+apr_file_t *tfp = NULL;
+apr_file_t *errfile;
 apr_pool_t *cntxt;
-#ifdef CHARSET_EBCDIC
+#if APR_CHARSET_EBCDIC
 apr_xlate_t *to_ascii;
 #endif
 
+static void cleanup_tempfile_and_exit(int rc)
+{
+    if (tfp) {
+        apr_file_close(tfp);
+    }
+    exit(rc);
+}
+
 static void getword(char *word, char *line, char stop)
 {
     int x = 0, y;
 
     for (x = 0; ((line[x]) && (line[x] != stop)); x++)
-       word[x] = line[x];
+        word[x] = line[x];
 
     word[x] = '\0';
     if (line[x])
-       ++x;
+        ++x;
     y = 0;
 
     while ((line[y++] = line[x++]));
 }
 
-static int getline(char *s, int n, apr_file_t *f)
+static int get_line(char *s, int n, apr_file_t *f)
 {
     register int i = 0;
     char ch;
+    apr_status_t rv = APR_EINVAL;
 
-    while (1) {
-       apr_getc(&ch, f);
-            s[i] = ch;
-
-       if (s[i] == CR)
-           apr_getc(&ch, f);
-            s[i] = ch;
-
-       if ((s[i] == 0x4) || (s[i] == LF) || (i == (n - 1))) {
-           s[i] = '\0';
-            if (apr_eof(f) == APR_EOF) {
-                return 1;
-            }
-            return 0;
-       }
-       ++i;
+    while (i < (n - 1) &&
+           ((rv = apr_file_getc(&ch, f)) == APR_SUCCESS) && (ch != '\n')) {
+        s[i++] = ch;
     }
+    if (ch == '\n')
+        s[i++] = ch;
+    s[i] = '\0';
+
+    if (rv != APR_SUCCESS)
+        return 1;
+
+    return 0;
 }
 
 static void putline(apr_file_t *f, char *l)
@@ -149,12 +115,11 @@ static void putline(apr_file_t *f, char *l)
     int x;
 
     for (x = 0; l[x]; x++)
-       apr_putc(l[x], f);
-    apr_putc('\n', f);
+        apr_file_putc(l[x], f);
 }
 
 
-static void add_password(char *user, char *realm, apr_file_t *f)
+static void add_password(const char *user, const char *realm, apr_file_t *f)
 {
     char *pw;
     apr_md5_ctx_t context;
@@ -163,151 +128,164 @@ static void add_password(char *user, char *realm, apr_file_t *f)
     char pwin[MAX_STRING_LEN];
     char pwv[MAX_STRING_LEN];
     unsigned int i;
-    size_t len = sizeof(pwin);
+    apr_size_t len = sizeof(pwin);
 
-    if (apr_getpass("New password: ", pwin, &len) != APR_SUCCESS) {
-       fprintf(stderr, "password too long");
-       exit(5);
+    if (apr_password_get("New password: ", pwin, &len) != APR_SUCCESS) {
+        apr_file_printf(errfile, "password too long");
+        cleanup_tempfile_and_exit(5);
     }
     len = sizeof(pwin);
-    apr_getpass("Re-type new password: ", pwv, &len);
+    apr_password_get("Re-type new password: ", pwv, &len);
     if (strcmp(pwin, pwv) != 0) {
-       fprintf(stderr, "They don't match, sorry.\n");
-       if (tn) {
-           apr_remove_file(tn, cntxt);
-       }
-       exit(1);
+        apr_file_printf(errfile, "They don't match, sorry.\n");
+        cleanup_tempfile_and_exit(1);
     }
     pw = pwin;
-    apr_fprintf(f, "%s:%s:", user, realm);
+    apr_file_printf(f, "%s:%s:", user, realm);
 
     /* Do MD5 stuff */
     sprintf(string, "%s:%s:%s", user, realm, pw);
 
-    apr_MD5Init(&context);
-#ifdef CHARSET_EBCDIC
-    ap_MD5SetXlate(&context, to_ascii);
+    apr_md5_init(&context);
+#if APR_CHARSET_EBCDIC
+    apr_md5_set_xlate(&context, to_ascii);
 #endif
-    apr_MD5Update(&context, (unsigned char *) string, strlen(string));
-    apr_MD5Final(digest, &context);
+    apr_md5_update(&context, (unsigned char *) string, strlen(string));
+    apr_md5_final(digest, &context);
 
     for (i = 0; i < 16; i++)
-       apr_fprintf(f, "%02x", digest[i]);
+        apr_file_printf(f, "%02x", digest[i]);
 
-    apr_fprintf(f, "\n");
+    apr_file_printf(f, "\n");
 }
 
 static void usage(void)
 {
-    fprintf(stderr, "Usage: htdigest [-c] passwordfile realm username\n");
-    fprintf(stderr, "The -c flag creates a new file.\n");
+    apr_file_printf(errfile, "Usage: htdigest [-c] passwordfile realm username\n");
+    apr_file_printf(errfile, "The -c flag creates a new file.\n");
     exit(1);
 }
 
 static void interrupted(void)
 {
-    fprintf(stderr, "Interrupted.\n");
-    if (tn)
-       apr_remove_file(tn, cntxt);
-    exit(1);
+    apr_file_printf(errfile, "Interrupted.\n");
+    cleanup_tempfile_and_exit(1);
+}
+
+static void terminate(void)
+{
+    apr_terminate();
+#ifdef NETWARE
+    pressanykey();
+#endif
 }
 
-int main(int argc, char *argv[])
+int main(int argc, const char * const argv[])
 {
-    apr_file_t *tfp = NULL, *f;
+    apr_file_t *f;
     apr_status_t rv;
+    char tn[] = "htdigest.tmp.XXXXXX";
+    char *dirname;
     char user[MAX_STRING_LEN];
     char realm[MAX_STRING_LEN];
     char line[MAX_STRING_LEN];
     char l[MAX_STRING_LEN];
     char w[MAX_STRING_LEN];
     char x[MAX_STRING_LEN];
-    char command[MAX_STRING_LEN];
     int found;
-   
-    rv = apr_initialize();
-    if (rv) {
-        fprintf(stderr, "apr_initialize(): %s (%d)\n",
-                apr_strerror(rv, line, sizeof(line)), rv);
-        exit(1);
-    }
-    atexit(apr_terminate); 
-    apr_create_pool(&cntxt, NULL);
 
-#ifdef CHARSET_EBCDIC
-    rv = ap_xlate_open(&to_ascii, "ISO8859-1", APR_DEFAULT_CHARSET, cntxt);
+    apr_app_initialize(&argc, &argv, NULL);
+    atexit(terminate);
+    apr_pool_create(&cntxt, NULL);
+    apr_file_open_stderr(&errfile, cntxt);
+
+#if APR_CHARSET_EBCDIC
+    rv = apr_xlate_open(&to_ascii, "ISO-8859-1", APR_DEFAULT_CHARSET, cntxt);
     if (rv) {
-        fprintf(stderr, "ap_xlate_open(): %s (%d)\n",
+        apr_file_printf(errfile, "apr_xlate_open(): %s (%d)\n",
                 apr_strerror(rv, line, sizeof(line)), rv);
         exit(1);
     }
 #endif
-    
-    tn = NULL;
+
     apr_signal(SIGINT, (void (*)(int)) interrupted);
     if (argc == 5) {
-       if (strcmp(argv[1], "-c"))
-           usage();
-       if (apr_open(&tfp, argv[2], APR_WRITE | APR_CREATE, -1, cntxt) != APR_SUCCESS) {
-           fprintf(stderr, "Could not open passwd file %s for writing.\n",
-                   argv[2]);
-           perror("apr_open");
-           exit(1);
-       }
-       printf("Adding password for %s in realm %s.\n", argv[4], argv[3]);
-       add_password(argv[4], argv[3], tfp);
-       apr_close(tfp);
-       exit(0);
+        if (strcmp(argv[1], "-c"))
+            usage();
+        rv = apr_file_open(&f, argv[2], APR_WRITE | APR_CREATE,
+                           APR_OS_DEFAULT, cntxt);
+        if (rv != APR_SUCCESS) {
+            char errmsg[120];
+
+            apr_file_printf(errfile, "Could not open passwd file %s for writing: %s\n",
+                    argv[2],
+                    apr_strerror(rv, errmsg, sizeof errmsg));
+            exit(1);
+        }
+        apr_file_printf(errfile, "Adding password for %s in realm %s.\n",
+                    argv[4], argv[3]);
+        add_password(argv[4], argv[3], f);
+        apr_file_close(f);
+        exit(0);
     }
     else if (argc != 4)
-       usage();
+        usage();
 
-    tn = tmpnam(NULL);
-    if (apr_open(&tfp, tn, APR_WRITE | APR_CREATE, -1, cntxt)!= APR_SUCCESS) {
-       fprintf(stderr, "Could not open temp file.\n");
-       exit(1);
+    if (apr_temp_dir_get((const char**)&dirname, cntxt) != APR_SUCCESS) {
+        apr_file_printf(errfile, "%s: could not determine temp dir\n",
+                        argv[0]);
+        exit(1);
+    }
+    dirname = apr_psprintf(cntxt, "%s/%s", dirname, tn);
+
+    if (apr_file_mktemp(&tfp, dirname, 0, cntxt) != APR_SUCCESS) {
+        apr_file_printf(errfile, "Could not open temp file %s.\n", dirname);
+        exit(1);
     }
 
-    if (apr_open(&f, argv[1], APR_READ, -1, cntxt) != APR_SUCCESS) {
-       fprintf(stderr,
-               "Could not open passwd file %s for reading.\n", argv[1]);
-       fprintf(stderr, "Use -c option to create new one.\n");
-       exit(1);
+    if (apr_file_open(&f, argv[1], APR_READ, APR_OS_DEFAULT, cntxt) != APR_SUCCESS) {
+        apr_file_printf(errfile,
+                "Could not open passwd file %s for reading.\n", argv[1]);
+        apr_file_printf(errfile, "Use -c option to create new one.\n");
+        cleanup_tempfile_and_exit(1);
     }
-    strcpy(user, argv[3]);
-    strcpy(realm, argv[2]);
+    apr_cpystrn(user, argv[3], sizeof(user));
+    apr_cpystrn(realm, argv[2], sizeof(realm));
 
     found = 0;
-    while (!(getline(line, MAX_STRING_LEN, f))) {
-       if (found || (line[0] == '#') || (!line[0])) {
-           putline(tfp, line);
-           continue;
-       }
-       strcpy(l, line);
-       getword(w, l, ':');
-       getword(x, l, ':');
-       if (strcmp(user, w) || strcmp(realm, x)) {
-           putline(tfp, line);
-           continue;
-       }
-       else {
-           printf("Changing password for user %s in realm %s\n", user, realm);
-           add_password(user, realm, tfp);
-           found = 1;
-       }
+    while (!(get_line(line, MAX_STRING_LEN, f))) {
+        if (found || (line[0] == '#') || (!line[0])) {
+            putline(tfp, line);
+            continue;
+        }
+        strcpy(l, line);
+        getword(w, l, ':');
+        getword(x, l, ':');
+        if (strcmp(user, w) || strcmp(realm, x)) {
+            putline(tfp, line);
+            continue;
+        }
+        else {
+            apr_file_printf(errfile, "Changing password for user %s in realm %s\n",
+                    user, realm);
+            add_password(user, realm, tfp);
+            found = 1;
+        }
     }
     if (!found) {
-       printf("Adding user %s in realm %s\n", user, realm);
-       add_password(user, realm, tfp);
+        apr_file_printf(errfile, "Adding user %s in realm %s\n", user, realm);
+        add_password(user, realm, tfp);
     }
-    apr_close(f);
-    apr_close(tfp);
-#if defined(OS2) || defined(WIN32)
-    sprintf(command, "copy \"%s\" \"%s\"", tn, argv[1]);
-#else
-    sprintf(command, "cp %s %s", tn, argv[1]);
-#endif
-    system(command);
-    apr_remove_file(tn, cntxt);
+    apr_file_close(f);
+
+    /* The temporary file has all the data, just copy it to the new location.
+     */
+    if (apr_file_copy(dirname, argv[1], APR_FILE_SOURCE_PERMS, cntxt) !=
+                APR_SUCCESS) {
+        apr_file_printf(errfile, "%s: unable to update file %s\n",
+                        argv[0], argv[1]);
+    }
+    apr_file_close(tfp);
+
     return 0;
 }