sys/fs/smbfs/smbfs_subr.c

   1 /*-
   2  * Copyright (c) 2000-2001 Boris Popov
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  *
  14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  24  * SUCH DAMAGE.
  25  *
  26  * $FreeBSD$
  27  */
  28 #include <sys/param.h>
  29 #include <sys/systm.h>
  30 #include <sys/kernel.h>
  31 #include <sys/clock.h>
  32 #include <sys/malloc.h>
  33 #include <sys/time.h>
  34 #include <sys/vnode.h>
  35 #include <sys/sysctl.h>
  36 #include <sys/iconv.h>
  37
  38 #include <netsmb/smb.h>
  39 #include <netsmb/smb_conn.h>
  40 #include <netsmb/smb_subr.h>
  41 #include <netsmb/smb_rq.h>
  42 #include <netsmb/smb_dev.h>
  43
  44 #include <fs/smbfs/smbfs.h>
  45 #include <fs/smbfs/smbfs_node.h>
  46 #include <fs/smbfs/smbfs_subr.h>
  47
  48 MALLOC_DEFINE(M_SMBFSDATA, "smbfs_data", "SMBFS private data");
  49
  50 void
  51 smb_time_local2server(struct timespec *tsp, int tzoff, u_long *seconds)
  52 {
  53         *seconds = tsp->tv_sec - tzoff * 60 /*- tz_minuteswest * 60 -
  54             (wall_cmos_clock ? adjkerntz : 0)*/;
  55 }
  56
  57 void
  58 smb_time_server2local(u_long seconds, int tzoff, struct timespec *tsp)
  59 {
  60         tsp->tv_sec = seconds + tzoff * 60;
  61             /*+ tz_minuteswest * 60 + (wall_cmos_clock ? adjkerntz : 0)*/;
  62 }
  63
  64 /*
  65  * Number of seconds between 1970 and 1601 year
  66  */
  67 static int64_t DIFF1970TO1601 = 11644473600ULL;
  68
  69 /*
  70  * Time from server comes as UTC, so no need to use tz
  71  */
  72 void
  73 smb_time_NT2local(int64_t nsec, int tzoff, struct timespec *tsp)
  74 {
  75         smb_time_server2local(nsec / 10000000 - DIFF1970TO1601, 0, tsp);
  76 }
  77
  78 void
  79 smb_time_local2NT(struct timespec *tsp, int tzoff, int64_t *nsec)
  80 {
  81         u_long seconds;
  82
  83         smb_time_local2server(tsp, 0, &seconds);
  84         *nsec = (((int64_t)(seconds) & ~1) + DIFF1970TO1601) * (int64_t)10000000;
  85 }
  86
  87 void
  88 smb_time_unix2dos(struct timespec *tsp, int tzoff, u_int16_t *ddp,
  89         u_int16_t *dtp, u_int8_t *dhp)
  90 {
  91         struct timespec tt;
  92         u_long t;
  93
  94         tt = *tsp;
  95         smb_time_local2server(tsp, tzoff, &t);
  96         tt.tv_sec = t;
  97         timespec2fattime(&tt, 1, ddp, dtp, dhp);
  98 }
  99
 100 void
 101 smb_dos2unixtime(u_int dd, u_int dt, u_int dh, int tzoff,
 102         struct timespec *tsp)
 103 {
 104
 105         fattime2timespec(dd, dt, dh, 1, tsp);
 106         smb_time_server2local(tsp->tv_sec, tzoff, tsp);
 107 }
 108
 109 static int
 110 smb_fphelp(struct mbchain *mbp, struct smb_vc *vcp, struct smbnode *np,
 111         int caseopt)
 112 {
 113         struct smbmount *smp= np->n_mount;
 114         struct smbnode **npp = smp->sm_npstack;
 115         int i, error = 0;
 116
 117 /*      simple_lock(&smp->sm_npslock);*/
 118         i = 0;
 119         while (np->n_parent) {
 120                 if (i++ == SMBFS_MAXPATHCOMP) {
 121 /*                      simple_unlock(&smp->sm_npslock);*/
 122                         return ENAMETOOLONG;
 123                 }
 124                 *npp++ = np;
 125                 if ((np->n_flag & NREFPARENT) == 0)
 126                         break;
 127                 np = VTOSMB(np->n_parent);
 128         }
 129 /*      if (i == 0)
 130                 return smb_put_dmem(mbp, vcp, "\\", 2, caseopt);*/
 131         while (i--) {
 132                 np = *--npp;
 133                 if (SMB_UNICODE_STRINGS(vcp))
 134                         error = mb_put_uint16le(mbp, '\\');
 135                 else
 136                         error = mb_put_uint8(mbp, '\\');
 137                 if (error)
 138                         break;
 139                 error = smb_put_dmem(mbp, vcp, np->n_name, np->n_nmlen, caseopt);
 140                 if (error)
 141                         break;
 142         }
 143 /*      simple_unlock(&smp->sm_npslock);*/
 144         return error;
 145 }
 146
 147 int
 148 smbfs_fullpath(struct mbchain *mbp, struct smb_vc *vcp, struct smbnode *dnp,
 149         const char *name, int nmlen)
 150 {
 151         int caseopt = SMB_CS_NONE;
 152         int error;
 153
 154         if (SMB_UNICODE_STRINGS(vcp)) {
 155                 error = mb_put_padbyte(mbp);
 156                 if (error)
 157                         return error;
 158         }
 159         if (SMB_DIALECT(vcp) < SMB_DIALECT_LANMAN1_0)
 160                 caseopt |= SMB_CS_UPPER;
 161         if (dnp != NULL) {
 162                 error = smb_fphelp(mbp, vcp, dnp, caseopt);
 163                 if (error)
 164                         return error;
 165         }
 166         if (name) {
 167                 if (SMB_UNICODE_STRINGS(vcp))
 168                         error = mb_put_uint16le(mbp, '\\');
 169                 else
 170                         error = mb_put_uint8(mbp, '\\');
 171                 if (error)
 172                         return error;
 173                 error = smb_put_dmem(mbp, vcp, name, nmlen, caseopt);
 174                 if (error)
 175                         return error;
 176         }
 177         error = mb_put_uint8(mbp, 0);
 178         if (SMB_UNICODE_STRINGS(vcp) && error == 0)
 179                 error = mb_put_uint8(mbp, 0);
 180         return error;
 181 }
 182
 183 int
 184 smbfs_fname_tolocal(struct smb_vc *vcp, char *name, int *nmlen, int caseopt)
 185 {
 186         int copt = (caseopt == SMB_CS_LOWER ? KICONV_FROM_LOWER :
 187                     (caseopt == SMB_CS_UPPER ? KICONV_FROM_UPPER : 0));
 188         int error = 0;
 189         size_t ilen = *nmlen;
 190         size_t olen;
 191         char *ibuf = name;
 192         char outbuf[SMB_MAXFNAMELEN];
 193         char *obuf = outbuf;
 194
 195         if (vcp->vc_tolocal) {
 196                 olen = sizeof(outbuf);
 197                 bzero(outbuf, sizeof(outbuf));
 198
 199                 /*
 200                 error = iconv_conv_case
 201                         (vcp->vc_tolocal, NULL, NULL, &obuf, &olen, copt);
 202                 if (error) return error;
 203                 */
 204
 205                 error = iconv_conv_case
 206                         (vcp->vc_tolocal, (const char **)&ibuf, &ilen, &obuf, &olen, copt);
 207                 if (error && SMB_UNICODE_STRINGS(vcp)) {
 208                         /*
 209                          * If using unicode, leaving a file name as it was when
 210                          * convert fails will cause a problem because the file name
 211                          * will contain NULL.
 212                          * Here, put '?' and give converted file name.
 213                          */
 214                         *obuf = '?';
 215                         olen--;
 216                         error = 0;
 217                 }
 218                 if (!error) {
 219                         *nmlen = sizeof(outbuf) - olen;
 220                         memcpy(name, outbuf, *nmlen);
 221                 }
 222         }
 223         return error;
 224 }