upload http

[bottlenecks.git] / rubbos / app / httpd-2.0.64 / test / cls.c

diff --git a/rubbos/app/httpd-2.0.64/test/cls.c b/rubbos/app/httpd-2.0.64/test/cls.c
new file mode 100644 (file)
index 0000000..bb0a85d
--- /dev/null
+++ b/rubbos/app/httpd-2.0.64/test/cls.c
@@ -0,0 +1,182 @@
+/* Licensed to the Apache Software Foundation (ASF) under one or more
+ * contributor license agreements.  See the NOTICE file distributed with
+ * this work for additional information regarding copyright ownership.
+ * The ASF licenses this file to You 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
+ *
+ *     http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * 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.
+ */
+
+#include <ctype.h>
+#include <dirent.h>
+#include <stdio.h>
+#include <string.h>
+#include <time.h>
+
+/*
+ * Compare a string to a mask
+ * Mask characters:
+ *   @ - uppercase letter
+ *   # - lowercase letter
+ *   & - hex digit
+ *   # - digit
+ *   * - swallow remaining characters 
+ *  <x> - exact match for any other character
+ */
+static int checkmask(const char *data, const char *mask)
+{
+    int i, ch, d;
+
+    for (i = 0; mask[i] != '\0' && mask[i] != '*'; i++) {
+       ch = mask[i];
+       d = data[i];
+       if (ch == '@') {
+           if (!isupper(d))
+               return 0;
+       }
+       else if (ch == '$') {
+           if (!islower(d))
+               return 0;
+       }
+       else if (ch == '#') {
+           if (!isdigit(d))
+               return 0;
+       }
+       else if (ch == '&') {
+           if (!isxdigit(d))
+               return 0;
+       }
+       else if (ch != d)
+           return 0;
+    }
+
+    if (mask[i] == '*')
+       return 1;
+    else
+       return (data[i] == '\0');
+}
+
+/*
+ * Converts 8 hex digits to a time integer
+ */
+static int hex2sec(const char *x)
+{
+    int i, ch;
+    unsigned int j;
+
+    for (i = 0, j = 0; i < 8; i++) {
+       ch = x[i];
+       j <<= 4;
+       if (isdigit(ch))
+           j |= ch - '0';
+       else if (isupper(ch))
+           j |= ch - ('A' - 10);
+       else
+           j |= ch - ('a' - 10);
+    }
+    if (j == 0xffffffff)
+       return -1;              /* so that it works with 8-byte ints */
+    else
+       return j;
+}
+
+int main(int argc, char **argv)
+{
+    int i, ver;
+    DIR *d;
+    struct dirent *e;
+    const char *s;
+    FILE *fp;
+    char path[FILENAME_MAX + 1];
+    char line[1035];
+    time_t date, lmod, expire;
+    unsigned int len;
+    struct tm ts;
+    char sdate[30], slmod[30], sexpire[30];
+    const char time_format[] = "%e %b %Y %R";
+
+    if (argc != 2) {
+       printf("Usage: cls directory\n");
+       exit(0);
+    }
+
+    d = opendir(argv[1]);
+    if (d == NULL) {
+       perror("opendir");
+       exit(1);
+    }
+
+    for (;;) {
+       e = readdir(d);
+       if (e == NULL)
+           break;
+       s = e->d_name;
+       if (s[0] == '.' || s[0] == '#')
+           continue;
+       sprintf(path, "%s/%s", argv[1], s);
+       fp = fopen(path, "r");
+       if (fp == NULL) {
+           perror("fopen");
+           continue;
+       }
+       if (fgets(line, 1034, fp) == NULL) {
+           perror("fgets");
+           fclose(fp);
+           continue;
+       }
+       if (!checkmask(line, "&&&&&&&& &&&&&&&& &&&&&&&& &&&&&&&& &&&&&&&&\n")) {
+           fprintf(stderr, "Bad cache file\n");
+           fclose(fp);
+           continue;
+       }
+       date = hex2sec(line);
+       lmod = hex2sec(line + 9);
+       expire = hex2sec(line + 18);
+       ver = hex2sec(line + 27);
+       len = hex2sec(line + 35);
+       if (fgets(line, 1034, fp) == NULL) {
+           perror("fgets");
+           fclose(fp);
+           continue;
+       }
+       fclose(fp);
+       i = strlen(line);
+       if (strncmp(line, "X-URL: ", 7) != 0 || line[i - 1] != '\n') {
+           fprintf(stderr, "Bad cache file\n");
+           continue;
+       }
+       line[i - 1] = '\0';
+       if (date != -1) {
+           ts = *gmtime(&date);
+           strftime(sdate, 30, time_format, &ts);
+       }
+       else
+           strcpy(sdate, "-");
+
+       if (lmod != -1) {
+           ts = *gmtime(&lmod);
+           strftime(slmod, 30, time_format, &ts);
+       }
+       else
+           strcpy(slmod, "-");
+
+       if (expire != -1) {
+           ts = *gmtime(&expire);
+           strftime(sexpire, 30, time_format, &ts);
+       }
+       else
+           strcpy(sexpire, "-");
+
+       printf("%s: %d; %s  %s  %s\n", line + 7, ver, sdate, slmod, sexpire);
+    }
+
+    closedir(d);
+    return 0;
+}