]> The Tcpdump Group git mirrors - tcpdump/blobdiff - smbutil.c
CI: Add warning exemptions for Sun C (suncc-5.14) on Solaris 10
[tcpdump] / smbutil.c
index 23c59ab25f55e4f3c2c44aba12a797fe7cdf706a..edc3024f5d47aaf8cc23868764fcc44364a2e92f 100644 (file)
--- a/smbutil.c
+++ b/smbutil.c
@@ -6,9 +6,7 @@
  * or later
  */
 
-#ifdef HAVE_CONFIG_H
 #include <config.h>
-#endif
 
 #include "netdissect-stdinc.h"
 
@@ -37,43 +35,38 @@ smb_reset(void)
 }
 
 /*
- * interpret a 32 bit dos packed date/time to some parameters
- */
-static void
-interpret_dos_date(uint32_t date, struct tm *tp)
-{
-    uint32_t p0, p1, p2, p3;
-
-    p0 = date & 0xFF;
-    p1 = ((date & 0xFF00) >> 8) & 0xFF;
-    p2 = ((date & 0xFF0000) >> 16) & 0xFF;
-    p3 = ((date & 0xFF000000) >> 24) & 0xFF;
-
-    tp->tm_sec = 2 * (p0 & 0x1F);
-    tp->tm_min = ((p0 >> 5) & 0xFF) + ((p1 & 0x7) << 3);
-    tp->tm_hour = (p1 >> 3) & 0xFF;
-    tp->tm_mday = (p2 & 0x1F);
-    tp->tm_mon = ((p2 >> 5) & 0xFF) + ((p3 & 0x1) << 3) - 1;
-    tp->tm_year = ((p3 >> 1) & 0xFF) + 80;
-}
-
-/*
- * common portion:
- * create a unix date from a dos date
+ * create a UNIX time_t from a 32-bit DOS packetd date/time, with
+ * the DOS date/time assumed to be local time in *our* location.
  */
 static time_t
 int_unix_date(uint32_t dos_date)
 {
+    uint32_t p0, p1, p2, p3;
     struct tm t;
 
     if (dos_date == 0)
        return(0);
 
-    interpret_dos_date(dos_date, &t);
-    t.tm_wday = 1;
-    t.tm_yday = 1;
-    t.tm_isdst = 0;
-
+    p0 = dos_date & 0xFF;
+    p1 = ((dos_date & 0xFF00) >> 8) & 0xFF;
+    p2 = ((dos_date & 0xFF0000) >> 16) & 0xFF;
+    p3 = ((dos_date & 0xFF000000) >> 24) & 0xFF;
+
+    t.tm_sec = 2 * (p0 & 0x1F);
+    t.tm_min = ((p0 >> 5) & 0xFF) + ((p1 & 0x7) << 3);
+    t.tm_hour = (p1 >> 3) & 0xFF;
+    t.tm_mday = (p2 & 0x1F);
+    t.tm_mon = ((p2 >> 5) & 0xFF) + ((p3 & 0x1) << 3) - 1;
+    t.tm_year = ((p3 >> 1) & 0xFF) + 80;
+
+    t.tm_wday = 1;     /* XXX - should not affect the result; why 1? */
+    t.tm_yday = 1;     /* XXX - should not affect the result; why 1? */
+    t.tm_isdst = 0;    /* XXX - should be -1, to handle DST? */
+
+    /*
+     * XXX - if tm_year is 2038 or later, this might not fit in a
+     * 32-bit time_t.
+     */
     return (mktime(&t));
 }
 
@@ -105,31 +98,38 @@ make_unix_date2(netdissect_options *ndo, const u_char *date_ptr)
     return int_unix_date(x2);
 }
 
+/* Delta between the NT FILETIME epoch and the POSIX epoch. */
+#define FILETIME_TO_POSIX_DELTA INT64_C(11644473600)
+
 /*
- * interpret an 8 byte "filetime" structure to a time_t
+ * interpret an 8 byte NT FILETIME structure to a time_t
  * It's originally in "100ns units since jan 1st 1601"
  */
 static time_t
-interpret_long_date(netdissect_options *ndo, const u_char *p)
+interpret_filetime(netdissect_options *ndo, const u_char *p)
 {
-    double d;
-    time_t ret;
-
-    /* this gives us seconds since jan 1st 1601 (approx) */
-    d = (GET_LE_U_4(p + 4) * 256.0 + GET_U_1(p + 3)) * (1.0e-7 * (1 << 24));
-
-    /* now adjust by 369 years to make the secs since 1970 */
-    d -= 369.0 * 365.25 * 24 * 60 * 60;
-
-    /* and a fudge factor as we got it wrong by a few days */
-    d += (3 * 24 * 60 * 60 + 6 * 60 * 60 + 2);
-
-    if (d < 0)
-       return(0);
-
-    ret = (time_t)d;
-
-    return(ret);
+    int64_t ret;
+    time_t ret_time_t;
+
+    /*
+     * Fetch a FILETIME structure; the first 4 bytes are the low-order
+     * 32 bits of a 64-bit count of 100ns units since 1601-01-01
+     * at some specific time, and the next 4 bytes are the high-order
+     * 32 bits of that count.
+     */
+    ret = (int64_t)(((uint64_t)GET_LE_U_4(p + 4) << 32) + (uint64_t)GET_LE_U_4(p));
+
+    /* Now convert from FILETIME to POSIX time. */
+    ret += FILETIME_TO_POSIX_DELTA;
+
+    ret_time_t = (time_t)ret;
+    if (ret_time_t != ret) {
+        /*
+         * It doesn't fit in a time_t.  Return 0, as an error indication.
+         */
+        return(0);
+    }
+    return(ret_time_t);
 }
 
 /*
@@ -145,7 +145,6 @@ name_interpret(netdissect_options *ndo,
 
     if (in >= maxbuf)
        return(-1);     /* name goes past the end of the buffer */
-    ND_TCHECK_1(in);
     len = GET_U_1(in) / 2;
     in++;
 
@@ -190,7 +189,6 @@ name_ptr(netdissect_options *ndo,
     p = buf + ofs;
     if (p >= maxbuf)
        return(NULL);   /* name goes past the end of the buffer */
-    ND_TCHECK_1(p);
 
     c = GET_U_1(p);
 
@@ -244,32 +242,21 @@ name_len(netdissect_options *ndo,
 
     if (s >= maxbuf)
        return(-1);     /* name goes past the end of the buffer */
-    ND_TCHECK_1(s);
     c = GET_U_1(s);
     if ((c & 0xC0) == 0xC0)
        return(2);
     while (GET_U_1(s)) {
        if (s >= maxbuf)
            return(-1); /* name goes past the end of the buffer */
-       ND_TCHECK_1(s);
        s += GET_U_1(s) + 1;
        ND_TCHECK_1(s);
     }
-    return(ND_BYTES_BETWEEN(s, s0) + 1);
+    return(ND_BYTES_BETWEEN(s0, s) + 1);
 
 trunc:
     return(-1);        /* name goes past the end of the buffer */
 }
 
-static void
-print_asc(netdissect_options *ndo,
-          const u_char *buf, u_int len)
-{
-    u_int i;
-    for (i = 0; i < len; i++)
-        fn_print_char(ndo, GET_U_1(buf + i));
-}
-
 static const char *
 name_type_str(int name_type)
 {
@@ -296,15 +283,14 @@ smb_data_print(netdissect_options *ndo, const u_char *buf, u_int len)
        return;
     ND_PRINT("[%03X] ", i);
     for (i = 0; i < len; /*nothing*/) {
-        ND_TCHECK_1(buf + i);
        ND_PRINT("%02X ", GET_U_1(buf + i) & 0xff);
        i++;
        if (i%8 == 0)
            ND_PRINT(" ");
        if (i % 16 == 0) {
-           print_asc(ndo, buf + i - 16, 8);
+           nd_printjn(ndo, buf + i - 16, 8);
            ND_PRINT(" ");
-           print_asc(ndo, buf + i - 8, 8);
+           nd_printjn(ndo, buf + i - 8, 8);
            ND_PRINT("\n");
            if (i < len)
                ND_PRINT("[%03X] ", i);
@@ -321,17 +307,13 @@ smb_data_print(netdissect_options *ndo, const u_char *buf, u_int len)
            ND_PRINT("   ");
 
        n = ND_MIN(8, i % 16);
-       print_asc(ndo, buf + i - (i % 16), n);
+       nd_printjn(ndo, buf + i - (i % 16), n);
        ND_PRINT(" ");
        n = (i % 16) - n;
        if (n > 0)
-           print_asc(ndo, buf + i - n, n);
+           nd_printjn(ndo, buf + i - n, n);
        ND_PRINT("\n");
     }
-    return;
-
-trunc:
-    nd_print_trunc(ndo);
 }
 
 
@@ -343,7 +325,7 @@ write_bits(netdissect_options *ndo,
     u_int i = 0;
 
     while ((p = strchr(fmt, '|'))) {
-       u_int l = ND_BYTES_BETWEEN(p, fmt);
+       u_int l = ND_BYTES_BETWEEN(fmt, p);
        if (l && (val & (1 << i)))
            ND_PRINT("%.*s ", (int)l, fmt);
        fmt = p + 1;
@@ -380,7 +362,6 @@ unistr(netdissect_options *ndo, char (*buf)[MAX_UNISTR_SIZE+1],
        sp = s;
        if (!use_unicode) {
            for (;;) {
-               ND_TCHECK_1(sp);
                c = GET_U_1(sp);
                sp++;
                strsize++;
@@ -389,7 +370,6 @@ unistr(netdissect_options *ndo, char (*buf)[MAX_UNISTR_SIZE+1],
            }
        } else {
            for (;;) {
-               ND_TCHECK_2(sp);
                c = GET_LE_U_2(sp);
                sp += 2;
                strsize += 2;
@@ -399,8 +379,7 @@ unistr(netdissect_options *ndo, char (*buf)[MAX_UNISTR_SIZE+1],
        }
     }
     if (!use_unicode) {
-       while (strsize != 0) {
-           ND_TCHECK_1(s);
+       while (strsize != 0) {
            c = GET_U_1(s);
            s++;
            strsize--;
@@ -432,7 +411,6 @@ unistr(netdissect_options *ndo, char (*buf)[MAX_UNISTR_SIZE+1],
        }
     } else {
        while (strsize > 1) {
-           ND_TCHECK_2(s);
            c = GET_LE_U_2(s);
            s += 2;
            strsize -= 2;
@@ -488,14 +466,12 @@ smb_fdata1(netdissect_options *ndo,
     while (*fmt && buf<maxbuf) {
        switch (*fmt) {
        case 'a':
-           ND_TCHECK_1(buf);
            write_bits(ndo, GET_U_1(buf), attrib_fmt);
            buf++;
            fmt++;
            break;
 
        case 'A':
-           ND_TCHECK_2(buf);
            write_bits(ndo, GET_LE_U_2(buf), attrib_fmt);
            buf += 2;
            fmt++;
@@ -508,7 +484,7 @@ smb_fdata1(netdissect_options *ndo,
            u_int l;
 
            p = strchr(++fmt, '}');
-           l = ND_BYTES_BETWEEN(p, fmt);
+           l = ND_BYTES_BETWEEN(fmt, p);
 
            if (l > sizeof(bitfmt) - 1)
                l = sizeof(bitfmt)-1;
@@ -516,7 +492,6 @@ smb_fdata1(netdissect_options *ndo,
            strncpy(bitfmt, fmt, l);
            bitfmt[l] = '\0';
            fmt = p + 1;
-           ND_TCHECK_1(buf);
            write_bits(ndo, GET_U_1(buf), bitfmt);
            buf++;
            break;
@@ -539,7 +514,6 @@ smb_fdata1(netdissect_options *ndo,
        case 'b':
          {
            unsigned int x;
-           ND_TCHECK_1(buf);
            x = GET_U_1(buf);
            ND_PRINT("%u (0x%x)", x, x);
            buf += 1;
@@ -549,7 +523,6 @@ smb_fdata1(netdissect_options *ndo,
        case 'd':
          {
            int x;
-           ND_TCHECK_2(buf);
            x = reverse ? GET_BE_S_2(buf) :
                          GET_LE_S_2(buf);
            ND_PRINT("%d (0x%x)", x, x);
@@ -560,7 +533,6 @@ smb_fdata1(netdissect_options *ndo,
        case 'D':
          {
            int x;
-           ND_TCHECK_4(buf);
            x = reverse ? GET_BE_S_4(buf) :
                          GET_LE_S_4(buf);
            ND_PRINT("%d (0x%x)", x, x);
@@ -571,7 +543,6 @@ smb_fdata1(netdissect_options *ndo,
        case 'L':
          {
            uint64_t x;
-           ND_TCHECK_8(buf);
            x = reverse ? GET_BE_U_8(buf) :
                          GET_LE_U_8(buf);
            ND_PRINT("%" PRIu64 " (0x%" PRIx64 ")", x, x);
@@ -582,7 +553,6 @@ smb_fdata1(netdissect_options *ndo,
        case 'u':
          {
            unsigned int x;
-           ND_TCHECK_2(buf);
            x = reverse ? GET_BE_U_2(buf) :
                          GET_LE_U_2(buf);
            ND_PRINT("%u (0x%x)", x, x);
@@ -593,7 +563,6 @@ smb_fdata1(netdissect_options *ndo,
        case 'U':
          {
            unsigned int x;
-           ND_TCHECK_4(buf);
            x = reverse ? GET_BE_U_4(buf) :
                          GET_LE_U_4(buf);
            ND_PRINT("%u (0x%x)", x, x);
@@ -620,7 +589,6 @@ smb_fdata1(netdissect_options *ndo,
        case 'B':
          {
            unsigned int x;
-           ND_TCHECK_1(buf);
            x = GET_U_1(buf);
            ND_PRINT("0x%X", x);
            buf += 1;
@@ -630,7 +598,6 @@ smb_fdata1(netdissect_options *ndo,
        case 'w':
          {
            unsigned int x;
-           ND_TCHECK_2(buf);
            x = reverse ? GET_BE_U_2(buf) :
                          GET_LE_U_2(buf);
            ND_PRINT("0x%X", x);
@@ -641,7 +608,6 @@ smb_fdata1(netdissect_options *ndo,
        case 'W':
          {
            unsigned int x;
-           ND_TCHECK_4(buf);
            x = reverse ? GET_BE_U_4(buf) :
                          GET_LE_U_4(buf);
            ND_PRINT("0x%X", x);
@@ -655,7 +621,6 @@ smb_fdata1(netdissect_options *ndo,
            switch (*fmt) {
 
            case 'b':
-               ND_TCHECK_1(buf);
                stringlen = GET_U_1(buf);
                stringlen_is_set = 1;
                ND_PRINT("%u", stringlen);
@@ -664,7 +629,6 @@ smb_fdata1(netdissect_options *ndo,
 
            case 'd':
            case 'u':
-               ND_TCHECK_2(buf);
                stringlen = reverse ? GET_BE_U_2(buf) :
                                      GET_LE_U_2(buf);
                stringlen_is_set = 1;
@@ -674,7 +638,6 @@ smb_fdata1(netdissect_options *ndo,
 
            case 'D':
            case 'U':
-               ND_TCHECK_4(buf);
                stringlen = reverse ? GET_BE_U_4(buf) :
                                      GET_LE_U_4(buf);
                stringlen_is_set = 1;
@@ -699,7 +662,6 @@ smb_fdata1(netdissect_options *ndo,
        case 'Z':
        case 'Y':       /* like 'Z', but always ASCII */
          {
-           ND_TCHECK_1(buf);
            if (GET_U_1(buf) != 4 && GET_U_1(buf) != 2) {
                ND_PRINT("Error! ASCIIZ buffer of type %u", GET_U_1(buf));
                return maxbuf;  /* give up */
@@ -771,8 +733,9 @@ smb_fdata1(netdissect_options *ndo,
 
            switch (t) {
            case 1:
-               name_type = name_extract(ndo, startbuf, ND_BYTES_BETWEEN(buf, startbuf),
-                   maxbuf, nbuf);
+               name_type = name_extract(ndo, startbuf,
+                                         ND_BYTES_BETWEEN(startbuf, buf),
+                                         maxbuf, nbuf);
                if (name_type < 0)
                    goto trunc;
                len = name_len(ndo, buf, maxbuf);
@@ -783,7 +746,6 @@ smb_fdata1(netdissect_options *ndo,
                    name_type_str(name_type));
                break;
            case 2:
-               ND_TCHECK_1(buf + 15);
                name_type = GET_U_1(buf + 15);
                ND_PRINT("%-15.15s NameType=0x%02X (%s)", buf, name_type,
                    name_type_str(name_type));
@@ -798,13 +760,12 @@ smb_fdata1(netdissect_options *ndo,
        case 'T':
          {
            time_t t;
-           struct tm *lt;
            const char *tstring;
+           char buffer[sizeof("Www Mmm dd hh:mm:ss yyyyy")];
            uint32_t x;
 
            switch (atoi(fmt + 1)) {
            case 1:
-               ND_TCHECK_4(buf);
                x = GET_LE_U_4(buf);
                if (x == 0 || x == 0xFFFFFFFF)
                    t = 0;
@@ -813,7 +774,6 @@ smb_fdata1(netdissect_options *ndo,
                buf += 4;
                break;
            case 2:
-               ND_TCHECK_4(buf);
                x = GET_LE_U_4(buf);
                if (x == 0 || x == 0xFFFFFFFF)
                    t = 0;
@@ -823,7 +783,7 @@ smb_fdata1(netdissect_options *ndo,
                break;
            case 3:
                ND_TCHECK_8(buf);
-               t = interpret_long_date(ndo, buf);
+               t = interpret_filetime(ndo, buf);
                buf += 8;
                break;
            default:
@@ -831,14 +791,11 @@ smb_fdata1(netdissect_options *ndo,
                break;
            }
            if (t != 0) {
-               lt = localtime(&t);
-               if (lt != NULL)
-                   tstring = asctime(lt);
-               else
-                   tstring = "(Can't convert time)\n";
+               tstring = nd_format_time(buffer, sizeof(buffer), "%Y-%m-%d %T",
+                                        localtime(&t));
            } else
-               tstring = "NULL\n";
-           ND_PRINT("%s", tstring);
+               tstring = "NULL";
+           ND_PRINT("%s\n", tstring);
            fmt++;
            while (ND_ASCII_ISDIGIT(*fmt))
                fmt++;
@@ -925,7 +882,6 @@ smb_fdata(netdissect_options *ndo,
             */
            fmt++;
            return(buf);
-           break;
 
        case '[':
            /*
@@ -968,7 +924,7 @@ smb_fdata(netdissect_options *ndo,
        }
     }
     if (!depth && buf < maxbuf) {
-       u_int len = ND_BYTES_BETWEEN(maxbuf, buf);
+       u_int len = ND_BYTES_BETWEEN(buf, maxbuf);
        ND_PRINT("Data: (%u bytes)\n", len);
        smb_data_print(ndo, buf, len);
        return(buf + len);