src/WINNT/afsd/cm_ioctl.c

   1 /*
   2  * Copyright 2000, International Business Machines Corporation and others.
   3  * All Rights Reserved.
   4  *
   5  * This software has been released under the terms of the IBM Public
   6  * License.  For details, see the LICENSE file in the top-level source
   7  * directory or online at http://www.openafs.org/dl/license10.html
   8  */
   9
  10 #include <afs/param.h>
  11 #include <afs/stds.h>
  12 #include <afs/cellconfig.h>
  13 #include <afs/ptserver.h>
  14 #include <ubik.h>
  15
  16 #ifndef DJGPP
  17 #include <windows.h>
  18 #else
  19 #include <sys/socket.h>
  20 #endif /* !DJGPP */
  21 #include <errno.h>
  22 #include <stdlib.h>
  23 #include <malloc.h>
  24 #include <string.h>
  25 #include <stdio.h>
  26 #include <time.h>
  27
  28 #include <osi.h>
  29
  30 #include "afsd.h"
  31 #include "afsd_init.h"
  32 #include <WINNT\afsreg.h>
  33
  34 #include "smb.h"
  35
  36 #ifndef DJGPP
  37 #include <rx/rxkad.h>
  38 #include "afsrpc.h"
  39 #else
  40 #include <rx/rxkad.h>
  41 #include "afsrpc95.h"
  42 #endif
  43
  44 #include "cm_rpc.h"
  45 #include <strsafe.h>
  46 #include <winioctl.h>
  47 #include <rx\rx.h>
  48
  49 #ifdef _DEBUG
  50 #include <crtdbg.h>
  51 #endif
  52
  53 /* Copied from afs_tokens.h */
  54 #define PIOCTL_LOGON    0x1
  55 #define MAX_PATH 260
  56
  57 osi_mutex_t cm_Afsdsbmt_Lock;
  58
  59 extern afs_int32 cryptall;
  60 extern char cm_NetbiosName[];
  61
  62 extern void afsi_log(char *pattern, ...);
  63
  64 void cm_InitIoctl(void)
  65 {
  66     lock_InitializeMutex(&cm_Afsdsbmt_Lock, "AFSDSBMT.INI Access Lock");
  67 }
  68
  69 long cm_CleanFile(cm_scache_t *scp, cm_user_t *userp, cm_req_t *reqp)
  70 {
  71     long code;
  72
  73     code = buf_CleanVnode(scp, userp, reqp);
  74
  75     lock_ObtainWrite(&scp->rw);
  76     cm_DiscardSCache(scp);
  77     lock_ReleaseWrite(&scp->rw);
  78
  79     osi_Log2(afsd_logp,"cm_CleanFile scp 0x%x returns error: [%x]",scp, code);
  80     return code;
  81 }
  82
  83 long cm_FlushFile(cm_scache_t *scp, cm_user_t *userp, cm_req_t *reqp)
  84 {
  85     long code;
  86
  87 #ifdef AFS_FREELANCE_CLIENT
  88     if ( scp->fid.cell == AFS_FAKE_ROOT_CELL_ID && scp->fid.volume == AFS_FAKE_ROOT_VOL_ID ) {
  89         cm_noteLocalMountPointChange();
  90         return 0;
  91     }
  92 #endif
  93
  94     code = buf_FlushCleanPages(scp, userp, reqp);
  95
  96     lock_ObtainWrite(&scp->rw);
  97     cm_DiscardSCache(scp);
  98
  99     lock_ReleaseWrite(&scp->rw);
 100
 101     osi_Log2(afsd_logp,"cm_FlushFile scp 0x%x returns error: [%x]",scp, code);
 102     return code;
 103 }
 104
 105 long cm_FlushParent(cm_scache_t *scp, cm_user_t *userp, cm_req_t *reqp)
 106 {
 107     long code = 0;
 108     cm_scache_t * pscp;
 109
 110     pscp = cm_FindSCacheParent(scp);
 111
 112     /* now flush the file */
 113     code = cm_FlushFile(pscp, userp, reqp);
 114     cm_ReleaseSCache(pscp);
 115
 116     return code;
 117 }
 118
 119
 120 long cm_FlushVolume(cm_user_t *userp, cm_req_t *reqp, afs_uint32 cell, afs_uint32 volume)
 121 {
 122     long code = 0;
 123     cm_scache_t *scp;
 124     int i;
 125
 126 #ifdef AFS_FREELANCE_CLIENT
 127     if ( cell == AFS_FAKE_ROOT_CELL_ID && volume == AFS_FAKE_ROOT_VOL_ID ) {
 128         cm_noteLocalMountPointChange();
 129         return 0;
 130     }
 131 #endif
 132
 133     lock_ObtainWrite(&cm_scacheLock);
 134     for (i=0; i<cm_data.scacheHashTableSize; i++) {
 135         for (scp = cm_data.scacheHashTablep[i]; scp; scp = scp->nextp) {
 136             if (scp->fid.volume == volume && scp->fid.cell == cell) {
 137                 cm_HoldSCacheNoLock(scp);
 138                 lock_ReleaseWrite(&cm_scacheLock);
 139
 140                 /* now flush the file */
 141                 code = cm_FlushFile(scp, userp, reqp);
 142                 lock_ObtainWrite(&cm_scacheLock);
 143                 cm_ReleaseSCacheNoLock(scp);
 144             }
 145         }
 146     }
 147     lock_ReleaseWrite(&cm_scacheLock);
 148
 149     return code;
 150 }
 151
 152 /*
 153  * cm_ResetACLCache -- invalidate ACL info for a user that has just
 154  *                      obtained or lost tokens
 155  */
 156 void cm_ResetACLCache(cm_user_t *userp)
 157 {
 158     cm_scache_t *scp;
 159     int hash;
 160
 161     lock_ObtainWrite(&cm_scacheLock);
 162     for (hash=0; hash < cm_data.scacheHashTableSize; hash++) {
 163         for (scp=cm_data.scacheHashTablep[hash]; scp; scp=scp->nextp) {
 164             cm_HoldSCacheNoLock(scp);
 165             lock_ReleaseWrite(&cm_scacheLock);
 166             lock_ObtainWrite(&scp->rw);
 167             cm_InvalidateACLUser(scp, userp);
 168             lock_ReleaseWrite(&scp->rw);
 169             lock_ObtainWrite(&cm_scacheLock);
 170             cm_ReleaseSCacheNoLock(scp);
 171         }
 172     }
 173     lock_ReleaseWrite(&cm_scacheLock);
 174 }
 175
 176 /*
 177  *  TranslateExtendedChars - This is a fix for TR 54482.
 178  *
 179  *  If an extended character (80 - FF) is entered into a file
 180  *  or directory name in Windows, the character is translated
 181  *  into the OEM character map before being passed to us.  Why
 182  *  this occurs is unknown.  Our pioctl functions must match
 183  *  this translation for paths given via our own commands (like
 184  *  fs).  If we do not do this, then we will try to perform an
 185  *  operation on a non-translated path, which we will fail to
 186  *  find, since the path was created with the translated chars.
 187  *  This function performs the required translation.
 188  */
 189 void TranslateExtendedChars(char *str)
 190 {
 191 #ifdef DJGPP
 192     char *p;
 193 #endif
 194
 195     if (!str || !*str)
 196         return;
 197
 198 #ifndef DJGPP
 199     CharToOem(str, str);
 200 #else
 201     p = str;
 202     while (*p) *p++ &= 0x7f;  /* turn off high bit; probably not right */
 203 #endif
 204 }
 205
 206 /* parse the passed-in file name and do a namei on it.  If we fail,
 207  * return an error code, otherwise return the vnode located in *scpp.
 208  */
 209 #define CM_PARSE_FLAG_LITERAL 1
 210
 211 long cm_ParseIoctlPath(smb_ioctl_t *ioctlp, cm_user_t *userp, cm_req_t *reqp,
 212         cm_scache_t **scpp, afs_uint32 flags)
 213 {
 214     long code;
 215     cm_scache_t *substRootp = NULL;
 216     cm_scache_t *iscp = NULL;
 217     char * relativePath;
 218     char * lastComponent = NULL;
 219     afs_uint32 follow = (flags & CM_PARSE_FLAG_LITERAL ? CM_FLAG_NOMOUNTCHASE : CM_FLAG_FOLLOW);
 220
 221     relativePath = ioctlp->inDatap;
 222     /* setup the next data value for the caller to use */
 223     ioctlp->inDatap += (long)strlen(ioctlp->inDatap) + 1;;
 224
 225     osi_Log1(afsd_logp, "cm_ParseIoctlPath %s", osi_LogSaveString(afsd_logp,relativePath));
 226
 227     /* This is usually the file name, but for StatMountPoint it is the path. */
 228     /* ioctlp->inDatap can be either of the form:
 229      *    \path\.
 230      *    \path\file
 231      *    \\netbios-name\submount\path\.
 232      *    \\netbios-name\submount\path\file
 233      */
 234
 235         /* We do not perform path name translation on the ioctl path data
 236          * because these paths were not translated by Windows through the
 237          * file system API.  Therefore, they are not OEM characters but
 238          * whatever the display character set is.
 239          */
 240     // TranslateExtendedChars(relativePath);
 241
 242     /* This is usually nothing, but for StatMountPoint it is the file name. */
 243     // TranslateExtendedChars(ioctlp->inDatap);
 244
 245     if (relativePath[0] == relativePath[1] &&
 246          relativePath[1] == '\\' &&
 247          !_strnicmp(cm_NetbiosName,relativePath+2,strlen(cm_NetbiosName)))
 248     {
 249         char shareName[256];
 250         char *sharePath;
 251         int shareFound, i;
 252
 253         /* We may have found a UNC path.
 254          * If the first component is the NetbiosName,
 255          * then throw out the second component (the submount)
 256          * since it had better expand into the value of ioctl->tidPathp
 257          */
 258         char * p;
 259         p = relativePath + 2 + strlen(cm_NetbiosName) + 1;                      /* buffer overflow vuln.? */
 260         if ( !_strnicmp("all", p, 3) )
 261             p += 4;
 262
 263         for (i = 0; *p && *p != '\\'; i++,p++ ) {
 264             shareName[i] = *p;
 265         }
 266         p++;                    /* skip past trailing slash */
 267         shareName[i] = 0;       /* terminate string */
 268
 269         shareFound = smb_FindShare(ioctlp->fidp->vcp, ioctlp->uidp, shareName, &sharePath);
 270         if ( shareFound ) {
 271             /* we found a sharename, therefore use the resulting path */
 272             code = cm_NameI(cm_data.rootSCachep, ioctlp->prefix->data,
 273                              CM_FLAG_CASEFOLD | CM_FLAG_FOLLOW,
 274                              userp, sharePath, reqp, &substRootp);
 275             free(sharePath);
 276             if (code) {
 277                 osi_Log1(afsd_logp,"cm_ParseIoctlPath [1] code 0x%x", code);
 278                 return code;
 279             }
 280
 281             lastComponent = strrchr(p, '\\');
 282             if (lastComponent && (lastComponent - p) > 1 &&strlen(lastComponent) > 1) {
 283                 *lastComponent = '\0';
 284                 lastComponent++;
 285
 286                 code = cm_NameI(substRootp, p, CM_FLAG_CASEFOLD | CM_FLAG_FOLLOW,
 287                                  userp, NULL, reqp, &iscp);
 288                 if (code == 0)
 289                     code = cm_NameI(iscp, lastComponent, CM_FLAG_CASEFOLD | follow,
 290                                     userp, NULL, reqp, scpp);
 291                 if (iscp)
 292                     cm_ReleaseSCache(iscp);
 293             } else {
 294                 code = cm_NameI(substRootp, p, CM_FLAG_CASEFOLD,
 295                                 userp, NULL, reqp, scpp);
 296             }
 297             cm_ReleaseSCache(substRootp);
 298             if (code) {
 299                 osi_Log1(afsd_logp,"cm_ParseIoctlPath [2] code 0x%x", code);
 300                 return code;
 301             }
 302         } else {
 303             /* otherwise, treat the name as a cellname mounted off the afs root.
 304              * This requires that we reconstruct the shareName string with
 305              * leading and trailing slashes.
 306              */
 307             p = relativePath + 2 + strlen(cm_NetbiosName) + 1;
 308             if ( !_strnicmp("all", p, 3) )
 309                 p += 4;
 310
 311             shareName[0] = '/';
 312             for (i = 1; *p && *p != '\\'; i++,p++ ) {
 313                 shareName[i] = *p;
 314             }
 315             p++;                    /* skip past trailing slash */
 316             shareName[i++] = '/';       /* add trailing slash */
 317             shareName[i] = 0;       /* terminate string */
 318
 319
 320             code = cm_NameI(cm_data.rootSCachep, ioctlp->prefix->data,
 321                              CM_FLAG_CASEFOLD | CM_FLAG_FOLLOW,
 322                              userp, shareName, reqp, &substRootp);
 323             if (code) {
 324                 osi_Log1(afsd_logp,"cm_ParseIoctlPath [3] code 0x%x", code);
 325                 return code;
 326             }
 327
 328             lastComponent = strrchr(p, '\\');
 329             if (lastComponent && (lastComponent - p) > 1 &&strlen(lastComponent) > 1) {
 330                 *lastComponent = '\0';
 331                 lastComponent++;
 332
 333                 code = cm_NameI(substRootp, p, CM_FLAG_CASEFOLD | CM_FLAG_FOLLOW,
 334                                  userp, NULL, reqp, &iscp);
 335                 if (code == 0)
 336                     code = cm_NameI(iscp, lastComponent, CM_FLAG_CASEFOLD | follow,
 337                                     userp, NULL, reqp, scpp);
 338                 if (iscp)
 339                     cm_ReleaseSCache(iscp);
 340             } else {
 341                 code = cm_NameI(substRootp, p, CM_FLAG_CASEFOLD,
 342                                 userp, NULL, reqp, scpp);
 343             }
 344
 345             if (code) {
 346                 cm_ReleaseSCache(substRootp);
 347                 osi_Log1(afsd_logp,"cm_ParseIoctlPath code [4] 0x%x", code);
 348                 return code;
 349             }
 350         }
 351     } else {
 352         code = cm_NameI(cm_data.rootSCachep, ioctlp->prefix->data,
 353                          CM_FLAG_CASEFOLD | CM_FLAG_FOLLOW,
 354                          userp, ioctlp->tidPathp, reqp, &substRootp);
 355         if (code) {
 356             osi_Log1(afsd_logp,"cm_ParseIoctlPath [6] code 0x%x", code);
 357             return code;
 358         }
 359
 360         lastComponent = strrchr(relativePath, '\\');
 361         if (lastComponent && (lastComponent - relativePath) > 1 && strlen(lastComponent) > 1) {
 362             *lastComponent = '\0';
 363             lastComponent++;
 364
 365             code = cm_NameI(substRootp, relativePath, CM_FLAG_CASEFOLD | CM_FLAG_FOLLOW,
 366                              userp, NULL, reqp, &iscp);
 367             if (code == 0)
 368                 code = cm_NameI(iscp, lastComponent, CM_FLAG_CASEFOLD | follow,
 369                                  userp, NULL, reqp, scpp);
 370             if (iscp)
 371                 cm_ReleaseSCache(iscp);
 372         } else {
 373             code = cm_NameI(substRootp, relativePath, CM_FLAG_CASEFOLD | follow,
 374                              userp, NULL, reqp, scpp);
 375         }
 376         if (code) {
 377             cm_ReleaseSCache(substRootp);
 378             osi_Log1(afsd_logp,"cm_ParseIoctlPath [7] code 0x%x", code);
 379             return code;
 380         }
 381     }
 382
 383     if (substRootp)
 384         cm_ReleaseSCache(substRootp);
 385
 386     /* and return success */
 387     osi_Log1(afsd_logp,"cm_ParseIoctlPath [8] code 0x%x", code);
 388     return 0;
 389 }
 390
 391 void cm_SkipIoctlPath(smb_ioctl_t *ioctlp)
 392 {
 393     size_t temp;
 394
 395     temp = strlen(ioctlp->inDatap) + 1;
 396     ioctlp->inDatap += temp;
 397 }
 398
 399 /*
 400  * Must be called before cm_ParseIoctlPath or cm_SkipIoctlPath
 401  */
 402 static cm_ioctlQueryOptions_t *
 403 cm_IoctlGetQueryOptions(struct smb_ioctl *ioctlp, struct cm_user *userp)
 404 {
 405     afs_uint32 pathlen = strlen(ioctlp->inDatap) + 1;
 406     char *p = ioctlp->inDatap + pathlen;
 407     cm_ioctlQueryOptions_t * optionsp = NULL;
 408
 409     if (ioctlp->inCopied > p - ioctlp->inAllocp) {
 410         optionsp = (cm_ioctlQueryOptions_t *)p;
 411         if (optionsp->size < 12 /* minimum size of struct */)
 412             optionsp = NULL;
 413     }
 414
 415     return optionsp;
 416 }
 417
 418 /*
 419  * Must be called after cm_ParseIoctlPath or cm_SkipIoctlPath
 420  * or any other time that ioctlp->inDatap points at the
 421  * cm_ioctlQueryOptions_t object.
 422  */
 423 static void
 424 cm_IoctlSkipQueryOptions(struct smb_ioctl *ioctlp, struct cm_user *userp)
 425 {
 426     cm_ioctlQueryOptions_t * optionsp = (cm_ioctlQueryOptions_t *)ioctlp->inDatap;
 427     ioctlp->inDatap += optionsp->size;
 428 }
 429
 430 /* format the specified path to look like "/afs/<cellname>/usr", by
 431  * adding "/afs" (if necessary) in front, changing any \'s to /'s, and
 432  * removing any trailing "/"'s. One weirdo caveat: "/afs" will be
 433  * intentionally returned as "/afs/"--this makes submount manipulation
 434  * easier (because we can always jump past the initial "/afs" to find
 435  * the AFS path that should be written into afsdsbmt.ini).
 436  */
 437 void cm_NormalizeAfsPath(char *outpathp, long outlen, char *inpathp)
 438 {
 439     char *cp;
 440     char bslash_mountRoot[256];
 441
 442     strncpy(bslash_mountRoot, cm_mountRoot, sizeof(bslash_mountRoot) - 1);
 443     bslash_mountRoot[0] = '\\';
 444
 445     if (!strnicmp (inpathp, cm_mountRoot, strlen(cm_mountRoot)))
 446         StringCbCopy(outpathp, outlen, inpathp);
 447     else if (!strnicmp (inpathp, bslash_mountRoot, strlen(bslash_mountRoot)))
 448         StringCbCopy(outpathp, outlen, inpathp);
 449     else if ((inpathp[0] == '/') || (inpathp[0] == '\\'))
 450         StringCbPrintfA(outpathp, outlen, "%s%s", cm_mountRoot, inpathp);
 451     else // inpathp looks like "<cell>/usr"
 452         StringCbPrintfA(outpathp, outlen, "%s/%s", cm_mountRoot, inpathp);
 453
 454     for (cp = outpathp; *cp != 0; ++cp) {
 455         if (*cp == '\\')
 456             *cp = '/';
 457     }
 458
 459     if (strlen(outpathp) && (outpathp[strlen(outpathp)-1] == '/')) {
 460         outpathp[strlen(outpathp)-1] = 0;
 461     }
 462
 463     if (!strcmpi (outpathp, cm_mountRoot)) {
 464         StringCbCopy(outpathp, outlen, cm_mountRoot);
 465     }
 466 }
 467
 468 #define LEAF_SIZE 256
 469 /* parse the passed-in file name and do a namei on its parent.  If we fail,
 470  * return an error code, otherwise return the vnode located in *scpp.
 471  */
 472 long cm_ParseIoctlParent(smb_ioctl_t *ioctlp, cm_user_t *userp, cm_req_t *reqp,
 473                          cm_scache_t **scpp, char *leafp)
 474 {
 475     long code;
 476     char tbuffer[1024];
 477     char *tp, *jp;
 478     cm_scache_t *substRootp = NULL;
 479
 480     StringCbCopyA(tbuffer, sizeof(tbuffer), ioctlp->inDatap);
 481     tp = strrchr(tbuffer, '\\');
 482     jp = strrchr(tbuffer, '/');
 483     if (!tp)
 484         tp = jp;
 485     else if (jp && (tp - tbuffer) < (jp - tbuffer))
 486         tp = jp;
 487     if (!tp) {
 488         StringCbCopyA(tbuffer, sizeof(tbuffer), "\\");
 489         if (leafp)
 490             StringCbCopyA(leafp, LEAF_SIZE, ioctlp->inDatap);
 491     }
 492     else {
 493         *tp = 0;
 494         if (leafp)
 495             StringCbCopyA(leafp, LEAF_SIZE, tp+1);
 496     }
 497
 498     if (tbuffer[0] == tbuffer[1] &&
 499         tbuffer[1] == '\\' &&
 500         !_strnicmp(cm_NetbiosName,tbuffer+2,strlen(cm_NetbiosName)))
 501     {
 502         char shareName[256];
 503         char *sharePath;
 504         int shareFound, i;
 505
 506         /* We may have found a UNC path.
 507          * If the first component is the NetbiosName,
 508          * then throw out the second component (the submount)
 509          * since it had better expand into the value of ioctl->tidPathp
 510          */
 511         char * p;
 512         p = tbuffer + 2 + strlen(cm_NetbiosName) + 1;
 513         if ( !_strnicmp("all", p, 3) )
 514             p += 4;
 515
 516         for (i = 0; *p && *p != '\\'; i++,p++ ) {
 517             shareName[i] = *p;
 518         }
 519         p++;                    /* skip past trailing slash */
 520         shareName[i] = 0;       /* terminate string */
 521
 522         shareFound = smb_FindShare(ioctlp->fidp->vcp, ioctlp->uidp, shareName, &sharePath);
 523         if ( shareFound ) {
 524             /* we found a sharename, therefore use the resulting path */
 525             code = cm_NameI(cm_data.rootSCachep, ioctlp->prefix->data,
 526                              CM_FLAG_CASEFOLD | CM_FLAG_FOLLOW,
 527                              userp, sharePath, reqp, &substRootp);
 528             free(sharePath);
 529             if (code) return code;
 530
 531             code = cm_NameI(substRootp, p, CM_FLAG_CASEFOLD | CM_FLAG_FOLLOW,
 532                              userp, NULL, reqp, scpp);
 533             cm_ReleaseSCache(substRootp);
 534             if (code) return code;
 535         } else {
 536             /* otherwise, treat the name as a cellname mounted off the afs root.
 537              * This requires that we reconstruct the shareName string with
 538              * leading and trailing slashes.
 539              */
 540             p = tbuffer + 2 + strlen(cm_NetbiosName) + 1;
 541             if ( !_strnicmp("all", p, 3) )
 542                 p += 4;
 543
 544             shareName[0] = '/';
 545             for (i = 1; *p && *p != '\\'; i++,p++ ) {
 546                 shareName[i] = *p;
 547             }
 548             p++;                    /* skip past trailing slash */
 549             shareName[i++] = '/';       /* add trailing slash */
 550             shareName[i] = 0;       /* terminate string */
 551
 552             code = cm_NameI(cm_data.rootSCachep, ioctlp->prefix->data,
 553                              CM_FLAG_CASEFOLD | CM_FLAG_FOLLOW,
 554                              userp, shareName, reqp, &substRootp);
 555             if (code) return code;
 556
 557             code = cm_NameI(substRootp, p, CM_FLAG_CASEFOLD | CM_FLAG_FOLLOW,
 558                             userp, NULL, reqp, scpp);
 559             cm_ReleaseSCache(substRootp);
 560             if (code) return code;
 561         }
 562     } else {
 563         code = cm_NameI(cm_data.rootSCachep, ioctlp->prefix->data,
 564                         CM_FLAG_CASEFOLD | CM_FLAG_FOLLOW,
 565                         userp, ioctlp->tidPathp, reqp, &substRootp);
 566         if (code) return code;
 567
 568         code = cm_NameI(substRootp, tbuffer, CM_FLAG_CASEFOLD | CM_FLAG_FOLLOW,
 569                         userp, NULL, reqp, scpp);
 570         cm_ReleaseSCache(substRootp);
 571         if (code) return code;
 572     }
 573
 574     /* # of bytes of path */
 575     code = (long)strlen(ioctlp->inDatap) + 1;
 576     ioctlp->inDatap += code;
 577
 578     /* and return success */
 579     return 0;
 580 }
 581
 582 long cm_IoctlGetACL(smb_ioctl_t *ioctlp, cm_user_t *userp)
 583 {
 584     cm_conn_t *connp;
 585     cm_scache_t *scp;
 586     AFSOpaque acl;
 587     AFSFetchStatus fileStatus;
 588     AFSVolSync volSync;
 589     long code;
 590     AFSFid afid;
 591     int tlen;
 592     cm_req_t req;
 593     struct rx_connection * callp;
 594     cm_ioctlQueryOptions_t *optionsp;
 595     afs_uint32 flags = 0;
 596
 597     cm_InitReq(&req);
 598
 599     optionsp = cm_IoctlGetQueryOptions(ioctlp, userp);
 600     if (optionsp && CM_IOCTL_QOPTS_HAVE_LITERAL(optionsp))
 601         flags |= (optionsp->literal ? CM_PARSE_FLAG_LITERAL : 0);
 602
 603     if (optionsp && CM_IOCTL_QOPTS_HAVE_FID(optionsp)) {
 604         cm_fid_t fid;
 605         cm_SkipIoctlPath(ioctlp);
 606         cm_SetFid(&fid, optionsp->fid.cell, optionsp->fid.volume,
 607                   optionsp->fid.vnode, optionsp->fid.unique);
 608         code = cm_GetSCache(&fid, &scp, userp, &req);
 609     } else {
 610         code = cm_ParseIoctlPath(ioctlp, userp, &req, &scp, flags);
 611     }
 612     if (code)
 613         return code;
 614
 615     /* now make the get acl call */
 616 #ifdef AFS_FREELANCE_CLIENT
 617     if ( scp->fid.cell == AFS_FAKE_ROOT_CELL_ID && scp->fid.volume == AFS_FAKE_ROOT_VOL_ID ) {
 618         code = 0;
 619         ioctlp->outDatap[0] ='\0';
 620     } else
 621 #endif
 622     {
 623         afid.Volume = scp->fid.volume;
 624         afid.Vnode = scp->fid.vnode;
 625         afid.Unique = scp->fid.unique;
 626         do {
 627             acl.AFSOpaque_val = ioctlp->outDatap;
 628             acl.AFSOpaque_len = 0;
 629             code = cm_ConnFromFID(&scp->fid, userp, &req, &connp);
 630             if (code) continue;
 631
 632             callp = cm_GetRxConn(connp);
 633             code = RXAFS_FetchACL(callp, &afid, &acl, &fileStatus, &volSync);
 634             rx_PutConnection(callp);
 635
 636         } while (cm_Analyze(connp, userp, &req, &scp->fid, &volSync, NULL, NULL, code));
 637         code = cm_MapRPCError(code, &req);
 638         cm_ReleaseSCache(scp);
 639
 640         if (code) return code;
 641     }
 642     /* skip over return data */
 643     tlen = (int)strlen(ioctlp->outDatap) + 1;
 644     ioctlp->outDatap += tlen;
 645
 646     /* and return success */
 647     return 0;
 648 }
 649
 650 long cm_IoctlGetFileCellName(struct smb_ioctl *ioctlp, struct cm_user *userp)
 651 {
 652     long code;
 653     cm_scache_t *scp;
 654     cm_cell_t *cellp;
 655     cm_req_t req;
 656     cm_ioctlQueryOptions_t *optionsp;
 657     afs_uint32 flags = 0;
 658
 659     cm_InitReq(&req);
 660
 661     optionsp = cm_IoctlGetQueryOptions(ioctlp, userp);
 662     if (optionsp && CM_IOCTL_QOPTS_HAVE_LITERAL(optionsp))
 663         flags |= (optionsp->literal ? CM_PARSE_FLAG_LITERAL : 0);
 664
 665     if (optionsp && CM_IOCTL_QOPTS_HAVE_FID(optionsp)) {
 666         cm_fid_t fid;
 667         cm_SkipIoctlPath(ioctlp);
 668         cm_SetFid(&fid, optionsp->fid.cell, optionsp->fid.volume,
 669                   optionsp->fid.vnode, optionsp->fid.unique);
 670         code = cm_GetSCache(&fid, &scp, userp, &req);
 671     } else {
 672         code = cm_ParseIoctlPath(ioctlp, userp, &req, &scp, flags);
 673     }
 674     if (code)
 675         return code;
 676
 677 #ifdef AFS_FREELANCE_CLIENT
 678     if ( cm_freelanceEnabled &&
 679          scp->fid.cell==AFS_FAKE_ROOT_CELL_ID &&
 680          scp->fid.volume==AFS_FAKE_ROOT_VOL_ID &&
 681          scp->fid.vnode==0x1 && scp->fid.unique==0x1 ) {
 682         StringCbCopyA(ioctlp->outDatap, SMB_IOCTL_MAXDATA - (ioctlp->outDatap - ioctlp->outAllocp), "Freelance.Local.Root");
 683         ioctlp->outDatap += strlen(ioctlp->outDatap) + 1;
 684         code = 0;
 685     } else
 686 #endif /* AFS_FREELANCE_CLIENT */
 687     {
 688         cellp = cm_FindCellByID(scp->fid.cell, CM_FLAG_NOPROBE);
 689         if (cellp) {
 690             StringCbCopyA(ioctlp->outDatap, SMB_IOCTL_MAXDATA - (ioctlp->outDatap - ioctlp->outAllocp), cellp->name);
 691             ioctlp->outDatap += strlen(ioctlp->outDatap) + 1;
 692             code = 0;
 693         }
 694         else
 695             code = CM_ERROR_NOSUCHCELL;
 696     }
 697
 698     cm_ReleaseSCache(scp);
 699     return code;
 700 }
 701
 702 long cm_IoctlSetACL(struct smb_ioctl *ioctlp, struct cm_user *userp)
 703 {
 704     cm_conn_t *connp;
 705     cm_scache_t *scp;
 706     AFSOpaque acl;
 707     AFSFetchStatus fileStatus;
 708     AFSVolSync volSync;
 709     long code;
 710     AFSFid fid;
 711     cm_req_t req;
 712     struct rx_connection * callp;
 713
 714     cm_InitReq(&req);
 715
 716     code = cm_ParseIoctlPath(ioctlp, userp, &req, &scp, 0);
 717     if (code) return code;
 718
 719 #ifdef AFS_FREELANCE_CLIENT
 720     if ( scp->fid.cell == AFS_FAKE_ROOT_CELL_ID && scp->fid.volume == AFS_FAKE_ROOT_VOL_ID ) {
 721         code = CM_ERROR_NOACCESS;
 722     } else
 723 #endif
 724     {
 725         /* now make the get acl call */
 726         fid.Volume = scp->fid.volume;
 727         fid.Vnode = scp->fid.vnode;
 728         fid.Unique = scp->fid.unique;
 729         do {
 730             acl.AFSOpaque_val = ioctlp->inDatap;
 731             acl.AFSOpaque_len = (u_int)strlen(ioctlp->inDatap)+1;
 732             code = cm_ConnFromFID(&scp->fid, userp, &req, &connp);
 733             if (code) continue;
 734
 735             callp = cm_GetRxConn(connp);
 736             code = RXAFS_StoreACL(callp, &fid, &acl, &fileStatus, &volSync);
 737             rx_PutConnection(callp);
 738
 739         } while (cm_Analyze(connp, userp, &req, &scp->fid, &volSync, NULL, NULL, code));
 740         code = cm_MapRPCError(code, &req);
 741
 742         /* invalidate cache info, since we just trashed the ACL cache */
 743         lock_ObtainWrite(&scp->rw);
 744         cm_DiscardSCache(scp);
 745         lock_ReleaseWrite(&scp->rw);
 746     }
 747     cm_ReleaseSCache(scp);
 748
 749     return code;
 750 }
 751
 752
 753
 754 long cm_IoctlFlushAllVolumes(struct smb_ioctl *ioctlp, struct cm_user *userp)
 755 {
 756     long code;
 757     cm_scache_t *scp;
 758     int i;
 759     cm_req_t req;
 760
 761     cm_InitReq(&req);
 762
 763     cm_SkipIoctlPath(ioctlp);   /* we don't care about the path */
 764
 765     lock_ObtainWrite(&cm_scacheLock);
 766     for (i=0; i<cm_data.scacheHashTableSize; i++) {
 767         for (scp = cm_data.scacheHashTablep[i]; scp; scp = scp->nextp) {
 768             cm_HoldSCacheNoLock(scp);
 769             lock_ReleaseWrite(&cm_scacheLock);
 770
 771             /* now flush the file */
 772             code = cm_FlushFile(scp, userp, &req);
 773             lock_ObtainWrite(&cm_scacheLock);
 774             cm_ReleaseSCacheNoLock(scp);
 775         }
 776     }
 777     lock_ReleaseWrite(&cm_scacheLock);
 778
 779     return code;
 780 }
 781
 782 long cm_IoctlFlushVolume(struct smb_ioctl *ioctlp, struct cm_user *userp)
 783 {
 784     long code;
 785     cm_scache_t *scp;
 786     unsigned long volume;
 787     unsigned long cell;
 788     cm_req_t req;
 789     cm_ioctlQueryOptions_t *optionsp;
 790     afs_uint32 flags = 0;
 791
 792     cm_InitReq(&req);
 793
 794     optionsp = cm_IoctlGetQueryOptions(ioctlp, userp);
 795     if (optionsp && CM_IOCTL_QOPTS_HAVE_LITERAL(optionsp))
 796         flags |= (optionsp->literal ? CM_PARSE_FLAG_LITERAL : 0);
 797
 798     if (optionsp && CM_IOCTL_QOPTS_HAVE_FID(optionsp)) {
 799         cm_fid_t fid;
 800         cm_SkipIoctlPath(ioctlp);
 801         cm_SetFid(&fid, optionsp->fid.cell, optionsp->fid.volume,
 802                   optionsp->fid.vnode, optionsp->fid.unique);
 803         code = cm_GetSCache(&fid, &scp, userp, &req);
 804     } else {
 805         code = cm_ParseIoctlPath(ioctlp, userp, &req, &scp, flags);
 806     }
 807     if (code)
 808         return code;
 809
 810 #ifdef AFS_FREELANCE_CLIENT
 811     if ( scp->fid.cell == AFS_FAKE_ROOT_CELL_ID && scp->fid.volume == AFS_FAKE_ROOT_VOL_ID ) {
 812         code = CM_ERROR_NOACCESS;
 813     } else
 814 #endif
 815     {
 816         volume = scp->fid.volume;
 817         cell = scp->fid.cell;
 818         cm_ReleaseSCache(scp);
 819
 820         code = cm_FlushVolume(userp, &req, cell, volume);
 821     }
 822     return code;
 823 }
 824
 825 long cm_IoctlFlushFile(struct smb_ioctl *ioctlp, struct cm_user *userp)
 826 {
 827     long code;
 828     cm_scache_t *scp;
 829     cm_req_t req;
 830     cm_ioctlQueryOptions_t *optionsp;
 831     afs_uint32 flags = 0;
 832
 833     cm_InitReq(&req);
 834
 835     optionsp = cm_IoctlGetQueryOptions(ioctlp, userp);
 836     if (optionsp && CM_IOCTL_QOPTS_HAVE_LITERAL(optionsp))
 837         flags |= (optionsp->literal ? CM_PARSE_FLAG_LITERAL : 0);
 838
 839     if (optionsp && CM_IOCTL_QOPTS_HAVE_FID(optionsp)) {
 840         cm_fid_t fid;
 841         cm_SkipIoctlPath(ioctlp);
 842         cm_SetFid(&fid, optionsp->fid.cell, optionsp->fid.volume,
 843                   optionsp->fid.vnode, optionsp->fid.unique);
 844         code = cm_GetSCache(&fid, &scp, userp, &req);
 845     } else {
 846         code = cm_ParseIoctlPath(ioctlp, userp, &req, &scp, flags);
 847     }
 848     if (code)
 849         return code;
 850
 851 #ifdef AFS_FREELANCE_CLIENT
 852     if ( scp->fid.cell == AFS_FAKE_ROOT_CELL_ID && scp->fid.volume == AFS_FAKE_ROOT_VOL_ID ) {
 853         code = CM_ERROR_NOACCESS;
 854     } else
 855 #endif
 856     {
 857         cm_FlushFile(scp, userp, &req);
 858     }
 859     cm_ReleaseSCache(scp);
 860
 861     return 0;
 862 }
 863
 864 long cm_IoctlSetVolumeStatus(struct smb_ioctl *ioctlp, struct cm_user *userp)
 865 {
 866     cm_scache_t *scp;
 867     char volName[32];
 868     char offLineMsg[256];
 869     char motd[256];
 870     cm_conn_t *tcp;
 871     long code;
 872     AFSFetchVolumeStatus volStat;
 873     AFSStoreVolumeStatus storeStat;
 874     cm_volume_t *tvp;
 875     char *cp;
 876     cm_cell_t *cellp;
 877     cm_req_t req;
 878     struct rx_connection * callp;
 879
 880     cm_InitReq(&req);
 881
 882     code = cm_ParseIoctlPath(ioctlp, userp, &req, &scp, 0);
 883     if (code) return code;
 884
 885 #ifdef AFS_FREELANCE_CLIENT
 886     if ( scp->fid.cell == AFS_FAKE_ROOT_CELL_ID && scp->fid.volume == AFS_FAKE_ROOT_VOL_ID ) {
 887         code = CM_ERROR_NOACCESS;
 888     } else
 889 #endif
 890     {
 891         cellp = cm_FindCellByID(scp->fid.cell, 0);
 892         osi_assertx(cellp, "null cm_cell_t");
 893
 894         if (scp->flags & CM_SCACHEFLAG_RO) {
 895             cm_ReleaseSCache(scp);
 896             return CM_ERROR_READONLY;
 897         }
 898
 899         code = cm_FindVolumeByID(cellp, scp->fid.volume, userp, &req,
 900                                  CM_GETVOL_FLAG_CREATE, &tvp);
 901         if (code) {
 902             cm_ReleaseSCache(scp);
 903             return code;
 904         }
 905         cm_PutVolume(tvp);
 906
 907         /* Copy the junk out, using cp as a roving pointer. */
 908         cp = ioctlp->inDatap;
 909         memcpy((char *)&volStat, cp, sizeof(AFSFetchVolumeStatus));
 910         cp += sizeof(AFSFetchVolumeStatus);
 911         StringCbCopyA(volName, sizeof(volName), cp);
 912         cp += strlen(volName)+1;
 913         StringCbCopyA(offLineMsg, sizeof(offLineMsg), cp);
 914         cp +=  strlen(offLineMsg)+1;
 915         StringCbCopyA(motd, sizeof(motd), cp);
 916         storeStat.Mask = 0;
 917         if (volStat.MinQuota != -1) {
 918             storeStat.MinQuota = volStat.MinQuota;
 919             storeStat.Mask |= AFS_SETMINQUOTA;
 920         }
 921         if (volStat.MaxQuota != -1) {
 922             storeStat.MaxQuota = volStat.MaxQuota;
 923             storeStat.Mask |= AFS_SETMAXQUOTA;
 924         }
 925
 926         do {
 927             code = cm_ConnFromFID(&scp->fid, userp, &req, &tcp);
 928             if (code) continue;
 929
 930             callp = cm_GetRxConn(tcp);
 931             code = RXAFS_SetVolumeStatus(callp, scp->fid.volume,
 932                                           &storeStat, volName, offLineMsg, motd);
 933             rx_PutConnection(callp);
 934
 935         } while (cm_Analyze(tcp, userp, &req, &scp->fid, NULL, NULL, NULL, code));
 936         code = cm_MapRPCError(code, &req);
 937     }
 938
 939     /* return on failure */
 940     cm_ReleaseSCache(scp);
 941     if (code) {
 942         return code;
 943     }
 944
 945     /* we are sending parms back to make compat. with prev system.  should
 946      * change interface later to not ask for current status, just set
 947      * new status
 948      */
 949     cp = ioctlp->outDatap;
 950     memcpy(cp, (char *)&volStat, sizeof(VolumeStatus));
 951     cp += sizeof(VolumeStatus);
 952     StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), volName);
 953     cp += strlen(volName)+1;
 954     StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), offLineMsg);
 955     cp += strlen(offLineMsg)+1;
 956     StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), motd);
 957     cp += strlen(motd)+1;
 958
 959     /* now return updated return data pointer */
 960     ioctlp->outDatap = cp;
 961
 962     return 0;
 963 }
 964
 965 long cm_IoctlGetVolumeStatus(struct smb_ioctl *ioctlp, struct cm_user *userp)
 966 {
 967     char volName[32];
 968     cm_scache_t *scp;
 969     char offLineMsg[256];
 970     char motd[256];
 971     cm_conn_t *connp;
 972     register long code;
 973     AFSFetchVolumeStatus volStat;
 974     register char *cp;
 975     char *Name;
 976     char *OfflineMsg;
 977     char *MOTD;
 978     cm_req_t req;
 979     struct rx_connection * callp;
 980     cm_ioctlQueryOptions_t *optionsp;
 981     afs_uint32 flags = 0;
 982
 983     cm_InitReq(&req);
 984
 985     optionsp = cm_IoctlGetQueryOptions(ioctlp, userp);
 986     if (optionsp && CM_IOCTL_QOPTS_HAVE_LITERAL(optionsp))
 987         flags |= (optionsp->literal ? CM_PARSE_FLAG_LITERAL : 0);
 988
 989     if (optionsp && CM_IOCTL_QOPTS_HAVE_FID(optionsp)) {
 990         cm_fid_t fid;
 991         cm_SkipIoctlPath(ioctlp);
 992         cm_SetFid(&fid, optionsp->fid.cell, optionsp->fid.volume,
 993                   optionsp->fid.vnode, optionsp->fid.unique);
 994         code = cm_GetSCache(&fid, &scp, userp, &req);
 995     } else {
 996         code = cm_ParseIoctlPath(ioctlp, userp, &req, &scp, flags);
 997     }
 998     if (code)
 999         return code;
1000
1001 #ifdef AFS_FREELANCE_CLIENT
1002     if ( scp->fid.cell == AFS_FAKE_ROOT_CELL_ID && scp->fid.volume == AFS_FAKE_ROOT_VOL_ID ) {
1003         code = 0;
1004         strncpy(volName, "Freelance.Local.Root", sizeof(volName));
1005         offLineMsg[0] = '\0';
1006         strncpy(motd, "Freelance mode in use.", sizeof(motd));
1007         volStat.Vid = scp->fid.volume;
1008         volStat.MaxQuota = 0;
1009         volStat.BlocksInUse = 100;
1010         volStat.PartBlocksAvail = 0;
1011         volStat.PartMaxBlocks = 100;
1012     } else
1013 #endif
1014     {
1015         Name = volName;
1016         OfflineMsg = offLineMsg;
1017         MOTD = motd;
1018         do {
1019             code = cm_ConnFromFID(&scp->fid, userp, &req, &connp);
1020             if (code) continue;
1021
1022             callp = cm_GetRxConn(connp);
1023             code = RXAFS_GetVolumeStatus(callp, scp->fid.volume,
1024                                          &volStat, &Name, &OfflineMsg, &MOTD);
1025             rx_PutConnection(callp);
1026
1027         } while (cm_Analyze(connp, userp, &req, &scp->fid, NULL, NULL, NULL, code));
1028         code = cm_MapRPCError(code, &req);
1029     }
1030
1031     cm_ReleaseSCache(scp);
1032     if (code) return code;
1033
1034     /* Copy all this junk into msg->im_data, keeping track of the lengths. */
1035     cp = ioctlp->outDatap;
1036     memcpy(cp, (char *)&volStat, sizeof(AFSFetchVolumeStatus));
1037     cp += sizeof(AFSFetchVolumeStatus);
1038     StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), volName);
1039     cp += strlen(volName)+1;
1040     StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), offLineMsg);
1041     cp += strlen(offLineMsg)+1;
1042     StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), motd);
1043     cp += strlen(motd)+1;
1044
1045     /* return new size */
1046     ioctlp->outDatap = cp;
1047
1048     return 0;
1049 }
1050
1051 long cm_IoctlGetFid(struct smb_ioctl *ioctlp, struct cm_user *userp)
1052 {
1053     cm_scache_t *scp;
1054     register long code;
1055     register char *cp;
1056     cm_fid_t fid;
1057     cm_req_t req;
1058     cm_ioctlQueryOptions_t * optionsp;
1059     afs_uint32 flags = 0;
1060
1061     cm_InitReq(&req);
1062
1063     optionsp = cm_IoctlGetQueryOptions(ioctlp, userp);
1064     if (optionsp && CM_IOCTL_QOPTS_HAVE_LITERAL(optionsp))
1065         flags |= (optionsp->literal ? CM_PARSE_FLAG_LITERAL : 0);
1066
1067     code = cm_ParseIoctlPath(ioctlp, userp, &req, &scp, flags);
1068     if (code) return code;
1069
1070     memset(&fid, 0, sizeof(cm_fid_t));
1071     fid.cell   = scp->fid.cell;
1072     fid.volume = scp->fid.volume;
1073     fid.vnode  = scp->fid.vnode;
1074     fid.unique = scp->fid.unique;
1075
1076     cm_ReleaseSCache(scp);
1077
1078     /* Copy all this junk into msg->im_data, keeping track of the lengths. */
1079     cp = ioctlp->outDatap;
1080     memcpy(cp, (char *)&fid, sizeof(cm_fid_t));
1081     cp += sizeof(cm_fid_t);
1082
1083     /* return new size */
1084     ioctlp->outDatap = cp;
1085
1086     return 0;
1087 }
1088
1089 long cm_IoctlGetFileType(struct smb_ioctl *ioctlp, struct cm_user *userp)
1090 {
1091     cm_scache_t *scp;
1092     register long code;
1093     register char *cp;
1094     afs_uint32 fileType = 0;
1095     cm_req_t req;
1096     cm_ioctlQueryOptions_t * optionsp;
1097     afs_uint32 flags = 0;
1098
1099     cm_InitReq(&req);
1100
1101     optionsp = cm_IoctlGetQueryOptions(ioctlp, userp);
1102     if (optionsp && CM_IOCTL_QOPTS_HAVE_LITERAL(optionsp))
1103         flags |= (optionsp->literal ? CM_PARSE_FLAG_LITERAL : 0);
1104
1105     if (optionsp && CM_IOCTL_QOPTS_HAVE_FID(optionsp)) {
1106         cm_fid_t fid;
1107         cm_SkipIoctlPath(ioctlp);
1108         cm_SetFid(&fid, optionsp->fid.cell, optionsp->fid.volume,
1109                   optionsp->fid.vnode, optionsp->fid.unique);
1110         code = cm_GetSCache(&fid, &scp, userp, &req);
1111     } else {
1112         code = cm_ParseIoctlPath(ioctlp, userp, &req, &scp, flags);
1113     }
1114     if (code)
1115         return code;
1116
1117     fileType = scp->fileType;
1118     cm_ReleaseSCache(scp);
1119
1120     /* Copy all this junk into msg->im_data, keeping track of the lengths. */
1121     cp = ioctlp->outDatap;
1122     memcpy(cp, (char *)&fileType, sizeof(fileType));
1123     cp += sizeof(fileType);
1124
1125     /* return new size */
1126     ioctlp->outDatap = cp;
1127
1128     return 0;
1129 }
1130
1131 long cm_IoctlGetOwner(struct smb_ioctl *ioctlp, struct cm_user *userp)
1132 {
1133     cm_scache_t *scp;
1134     register long code;
1135     register char *cp;
1136     cm_req_t req;
1137     cm_ioctlQueryOptions_t *optionsp;
1138     afs_uint32 flags = 0;
1139
1140     cm_InitReq(&req);
1141
1142     optionsp = cm_IoctlGetQueryOptions(ioctlp, userp);
1143     if (optionsp && CM_IOCTL_QOPTS_HAVE_LITERAL(optionsp))
1144         flags |= (optionsp->literal ? CM_PARSE_FLAG_LITERAL : 0);
1145
1146     if (optionsp && CM_IOCTL_QOPTS_HAVE_FID(optionsp)) {
1147         cm_fid_t fid;
1148         cm_SkipIoctlPath(ioctlp);
1149         cm_SetFid(&fid, optionsp->fid.cell, optionsp->fid.volume,
1150                   optionsp->fid.vnode, optionsp->fid.unique);
1151         code = cm_GetSCache(&fid, &scp, userp, &req);
1152     } else {
1153         code = cm_ParseIoctlPath(ioctlp, userp, &req, &scp, flags);
1154     }
1155     if (code)
1156         return code;
1157
1158     /* Copy all this junk into msg->im_data, keeping track of the lengths. */
1159     cp = ioctlp->outDatap;
1160     memcpy(cp, (char *)&scp->owner, sizeof(afs_uint32));
1161     cp += sizeof(afs_uint32);
1162     memcpy(cp, (char *)&scp->group, sizeof(afs_uint32));
1163     cp += sizeof(afs_uint32);
1164
1165     /* return new size */
1166     ioctlp->outDatap = cp;
1167
1168     cm_ReleaseSCache(scp);
1169
1170     return 0;
1171 }
1172
1173 long cm_IoctlWhereIs(struct smb_ioctl *ioctlp, struct cm_user *userp)
1174 {
1175     long code;
1176     cm_scache_t *scp;
1177     cm_cell_t *cellp;
1178     cm_volume_t *tvp;
1179     cm_serverRef_t **tsrpp, *current;
1180     cm_server_t *tsp;
1181     unsigned long volume;
1182     char *cp;
1183     cm_req_t req;
1184     cm_ioctlQueryOptions_t *optionsp;
1185     afs_uint32 flags = 0;
1186
1187     cm_InitReq(&req);
1188
1189     optionsp = cm_IoctlGetQueryOptions(ioctlp, userp);
1190     if (optionsp && CM_IOCTL_QOPTS_HAVE_LITERAL(optionsp))
1191         flags |= (optionsp->literal ? CM_PARSE_FLAG_LITERAL : 0);
1192
1193     if (optionsp && CM_IOCTL_QOPTS_HAVE_FID(optionsp)) {
1194         cm_fid_t fid;
1195         cm_SkipIoctlPath(ioctlp);
1196         cm_SetFid(&fid, optionsp->fid.cell, optionsp->fid.volume,
1197                   optionsp->fid.vnode, optionsp->fid.unique);
1198         code = cm_GetSCache(&fid, &scp, userp, &req);
1199     } else {
1200         code = cm_ParseIoctlPath(ioctlp, userp, &req, &scp, flags);
1201     }
1202     if (code)
1203         return code;
1204
1205     volume = scp->fid.volume;
1206
1207     cellp = cm_FindCellByID(scp->fid.cell, 0);
1208
1209     cm_ReleaseSCache(scp);
1210
1211     if (!cellp)
1212         return CM_ERROR_NOSUCHCELL;
1213
1214 #ifdef AFS_FREELANCE_CLIENT
1215     if ( cellp->cellID == AFS_FAKE_ROOT_CELL_ID) {
1216         struct in_addr addr;
1217
1218         addr.s_net = 127;
1219         addr.s_host = 0;
1220         addr.s_lh = 0;
1221         addr.s_impno = 1;
1222
1223         cp = ioctlp->outDatap;
1224
1225         memcpy(cp, (char *)&addr, sizeof(addr));
1226         cp += sizeof(addr);
1227
1228         /* still room for terminating NULL, add it on */
1229         addr.s_addr = 0;
1230         memcpy(cp, (char *)&addr, sizeof(addr));
1231         cp += sizeof(addr);
1232
1233         ioctlp->outDatap = cp;
1234     } else
1235 #endif
1236     {
1237         code = cm_FindVolumeByID(cellp, volume, userp, &req, CM_GETVOL_FLAG_CREATE, &tvp);
1238         if (code)
1239             return code;
1240
1241         cp = ioctlp->outDatap;
1242
1243         tsrpp = cm_GetVolServers(tvp, volume);
1244         lock_ObtainRead(&cm_serverLock);
1245         for (current = *tsrpp; current; current = current->next) {
1246             tsp = current->server;
1247             memcpy(cp, (char *)&tsp->addr.sin_addr.s_addr, sizeof(long));
1248             cp += sizeof(long);
1249         }
1250         lock_ReleaseRead(&cm_serverLock);
1251         cm_FreeServerList(tsrpp, 0);
1252
1253         /* still room for terminating NULL, add it on */
1254         volume = 0;     /* reuse vbl */
1255         memcpy(cp, (char *)&volume, sizeof(long));
1256         cp += sizeof(long);
1257
1258         ioctlp->outDatap = cp;
1259         cm_PutVolume(tvp);
1260     }
1261     return 0;
1262 }
1263
1264 long cm_IoctlStatMountPoint(struct smb_ioctl *ioctlp, struct cm_user *userp)
1265 {
1266     long code;
1267     cm_scache_t *dscp;
1268     cm_scache_t *scp;
1269     char *cp;
1270     cm_req_t req;
1271
1272     cm_InitReq(&req);
1273
1274     code = cm_ParseIoctlPath(ioctlp, userp, &req, &dscp, 0);
1275     if (code) return code;
1276
1277     cp = ioctlp->inDatap;
1278
1279     code = cm_Lookup(dscp, cp, CM_FLAG_NOMOUNTCHASE, userp, &req, &scp);
1280     cm_ReleaseSCache(dscp);
1281     if (code) return code;
1282
1283     lock_ObtainWrite(&scp->rw);
1284
1285     /* now check that this is a real mount point */
1286     if (scp->fileType != CM_SCACHETYPE_MOUNTPOINT) {
1287         lock_ReleaseWrite(&scp->rw);
1288         cm_ReleaseSCache(scp);
1289         return CM_ERROR_INVAL;
1290     }
1291
1292     code = cm_ReadMountPoint(scp, userp, &req);
1293     if (code == 0) {
1294         cp = ioctlp->outDatap;
1295         StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), scp->mountPointStringp);
1296         cp += strlen(cp) + 1;
1297         ioctlp->outDatap = cp;
1298     }
1299     lock_ReleaseWrite(&scp->rw);
1300     cm_ReleaseSCache(scp);
1301
1302     return code;
1303 }
1304
1305 long cm_IoctlDeleteMountPoint(struct smb_ioctl *ioctlp, struct cm_user *userp)
1306 {
1307     long code;
1308     cm_scache_t *dscp;
1309     cm_scache_t *scp;
1310     char *cp;
1311     cm_req_t req;
1312
1313     cm_InitReq(&req);
1314
1315     code = cm_ParseIoctlPath(ioctlp, userp, &req, &dscp, 0);
1316     if (code) return code;
1317
1318     cp = ioctlp->inDatap;
1319
1320     code = cm_Lookup(dscp, cp, CM_FLAG_NOMOUNTCHASE, userp, &req, &scp);
1321
1322     /* if something went wrong, bail out now */
1323     if (code)
1324         goto done3;
1325
1326     lock_ObtainWrite(&scp->rw);
1327     code = cm_SyncOp(scp, NULL, userp, &req, 0,
1328                       CM_SCACHESYNC_NEEDCALLBACK | CM_SCACHESYNC_GETSTATUS);
1329     if (code)
1330         goto done2;
1331
1332     /* now check that this is a real mount point */
1333     if (scp->fileType != CM_SCACHETYPE_MOUNTPOINT) {
1334         code = CM_ERROR_INVAL;
1335         goto done1;
1336     }
1337
1338     /* time to make the RPC, so drop the lock */
1339     lock_ReleaseWrite(&scp->rw);
1340
1341 #ifdef AFS_FREELANCE_CLIENT
1342     if (cm_freelanceEnabled && dscp == cm_data.rootSCachep) {
1343         /* we are adding the mount point to the root dir., so call
1344          * the freelance code to do the add. */
1345         osi_Log0(afsd_logp,"IoctlDeleteMountPoint from Freelance root dir");
1346         code = cm_FreelanceRemoveMount(cp);
1347     } else
1348 #endif
1349     {
1350         /* easier to do it this way */
1351         code = cm_Unlink(dscp, cp, userp, &req);
1352     }
1353     if (code == 0 && (dscp->flags & CM_SCACHEFLAG_ANYWATCH))
1354         smb_NotifyChange(FILE_ACTION_REMOVED,
1355                           FILE_NOTIFY_CHANGE_DIR_NAME,
1356                           dscp, cp, NULL, TRUE);
1357
1358     lock_ObtainWrite(&scp->rw);
1359   done1:
1360     cm_SyncOpDone(scp, NULL, CM_SCACHESYNC_NEEDCALLBACK | CM_SCACHESYNC_GETSTATUS);
1361
1362   done2:
1363     cm_DiscardSCache(scp);
1364     lock_ReleaseWrite(&scp->rw);
1365     cm_ReleaseSCache(scp);
1366
1367   done3:
1368     cm_ReleaseSCache(dscp);
1369     return code;
1370 }
1371
1372 long cm_IoctlCheckServers(struct smb_ioctl *ioctlp, struct cm_user *userp)
1373 {
1374     cm_cell_t *cellp;
1375     chservinfo_t csi;
1376     char *tp;
1377     char *cp;
1378     long temp;
1379     cm_server_t *tsp;
1380     int haveCell;
1381
1382     cm_SkipIoctlPath(ioctlp);   /* we don't care about the path */
1383     tp = ioctlp->inDatap;
1384     haveCell = 0;
1385
1386     memcpy(&temp, tp, sizeof(temp));
1387     if (temp == 0x12345678) {   /* For afs3.3 version */
1388         memcpy(&csi, tp, sizeof(csi));
1389         if (csi.tinterval >= 0) {
1390             cp = ioctlp->outDatap;
1391             memcpy(cp, (char *)&cm_daemonCheckDownInterval, sizeof(long));
1392             ioctlp->outDatap += sizeof(long);
1393             if (csi.tinterval > 0) {
1394                 if (!smb_SUser(userp))
1395                     return CM_ERROR_NOACCESS;
1396                 cm_daemonCheckDownInterval = csi.tinterval;
1397             }
1398             return 0;
1399         }
1400         if (csi.tsize)
1401             haveCell = 1;
1402         temp = csi.tflags;
1403         cp = csi.tbuffer;
1404     } else {    /* For pre afs3.3 versions */
1405         memcpy((char *)&temp, ioctlp->inDatap, sizeof(long));
1406         ioctlp->inDatap = cp = ioctlp->inDatap + sizeof(long);
1407         if (cp - ioctlp->inAllocp < ioctlp->inCopied)   /* still more data available */
1408             haveCell = 1;
1409     }
1410
1411     /*
1412      * 1: fast check, don't contact servers.
1413      * 2: local cell only.
1414      */
1415     if (haveCell) {
1416         /* have cell name, too */
1417         cellp = cm_GetCell(cp, (temp & 1) ? CM_FLAG_NOPROBE : 0);
1418         if (!cellp)
1419             return CM_ERROR_NOSUCHCELL;
1420     }
1421     else cellp = (cm_cell_t *) 0;
1422     if (!cellp && (temp & 2)) {
1423         /* use local cell */
1424         cellp = cm_FindCellByID(1, 0);
1425     }
1426     if (!(temp & 1)) {  /* if not fast, call server checker routine */
1427         /* check down servers */
1428         cm_CheckServers(CM_FLAG_CHECKDOWNSERVERS | CM_FLAG_CHECKUPSERVERS,
1429                          cellp);
1430     }
1431
1432     /* now return the current down server list */
1433     cp = ioctlp->outDatap;
1434     lock_ObtainRead(&cm_serverLock);
1435     for (tsp = cm_allServersp; tsp; tsp=tsp->allNextp) {
1436         if (cellp && tsp->cellp != cellp) continue;     /* cell spec'd and wrong */
1437         if ((tsp->flags & CM_SERVERFLAG_DOWN)
1438              && tsp->type == CM_SERVER_FILE) {
1439             memcpy(cp, (char *)&tsp->addr.sin_addr.s_addr, sizeof(long));
1440             cp += sizeof(long);
1441         }
1442     }
1443     lock_ReleaseRead(&cm_serverLock);
1444
1445     ioctlp->outDatap = cp;
1446     return 0;
1447 }
1448
1449 long cm_IoctlGag(struct smb_ioctl *ioctlp, struct cm_user *userp)
1450 {
1451     /* we don't print anything superfluous, so we don't support the gag call */
1452     return CM_ERROR_INVAL;
1453 }
1454
1455 long cm_IoctlCheckVolumes(struct smb_ioctl *ioctlp, struct cm_user *userp)
1456 {
1457     cm_RefreshVolumes();
1458     return 0;
1459 }
1460
1461 long cm_IoctlSetCacheSize(struct smb_ioctl *ioctlp, struct cm_user *userp)
1462 {
1463     afs_uint64 temp;
1464     long code;
1465
1466     cm_SkipIoctlPath(ioctlp);
1467
1468     memcpy(&temp, ioctlp->inDatap, sizeof(temp));
1469     if (temp == 0)
1470         temp = cm_data.buf_nOrigBuffers;
1471     else {
1472         /* temp is in 1K units, convert to # of buffers */
1473         temp = temp / (cm_data.buf_blockSize / 1024);
1474     }
1475
1476     /* now adjust the cache size */
1477     code = buf_SetNBuffers(temp);
1478
1479     return code;
1480 }
1481
1482 long cm_IoctlTraceControl(struct smb_ioctl *ioctlp, struct cm_user *userp)
1483 {
1484     long inValue;
1485
1486     cm_SkipIoctlPath(ioctlp);
1487
1488     memcpy(&inValue, ioctlp->inDatap, sizeof(long));
1489
1490     /* print trace */
1491     if (inValue & 8) {
1492         afsd_ForceTrace(FALSE);
1493         buf_ForceTrace(FALSE);
1494     }
1495
1496     if (inValue & 2) {
1497         /* set tracing value to low order bit */
1498         if ((inValue & 1) == 0) {
1499             /* disable tracing */
1500             osi_LogDisable(afsd_logp);
1501             rx_DebugOnOff(FALSE);
1502         }
1503         else {
1504             /* enable tracing */
1505             osi_LogEnable(afsd_logp);
1506             rx_DebugOnOff(TRUE);
1507         }
1508     }
1509
1510     /* see if we're supposed to do a reset, too */
1511     if (inValue & 4) {
1512         osi_LogReset(afsd_logp);
1513     }
1514
1515     /* and copy out tracing flag */
1516     inValue = afsd_logp->enabled;       /* use as a temp vbl */
1517     memcpy(ioctlp->outDatap, &inValue, sizeof(long));
1518     ioctlp->outDatap += sizeof(long);
1519     return 0;
1520 }
1521
1522 long cm_IoctlGetCacheParms(struct smb_ioctl *ioctlp, struct cm_user *userp)
1523 {
1524     cm_cacheParms_t parms;
1525
1526     memset(&parms, 0, sizeof(parms));
1527
1528     /* first we get, in 1K units, the cache size */
1529     parms.parms[0] = cm_data.buf_nbuffers * (cm_data.buf_blockSize / 1024);
1530
1531     /* and then the actual # of buffers in use (not in the free list, I guess,
1532      * will be what we do).
1533      */
1534     parms.parms[1] = (cm_data.buf_nbuffers - buf_CountFreeList()) * (cm_data.buf_blockSize / 1024);
1535
1536     memcpy(ioctlp->outDatap, &parms, sizeof(parms));
1537     ioctlp->outDatap += sizeof(parms);
1538
1539     return 0;
1540 }
1541
1542 long cm_IoctlGetCell(struct smb_ioctl *ioctlp, struct cm_user *userp)
1543 {
1544     long whichCell;
1545     long magic = 0;
1546     cm_cell_t *tcellp;
1547     cm_serverRef_t *serverRefp;
1548     cm_server_t *serverp;
1549     long i;
1550     char *cp;
1551     char *tp;
1552     char *basep;
1553
1554     cm_SkipIoctlPath(ioctlp);
1555
1556     tp = ioctlp->inDatap;
1557
1558     memcpy((char *)&whichCell, tp, sizeof(long));
1559     tp += sizeof(long);
1560
1561     /* see if more than one long passed in, ignoring the null pathname (the -1) */
1562     if (ioctlp->inCopied-1 > sizeof(long)) {
1563         memcpy((char *)&magic, tp, sizeof(long));
1564     }
1565
1566     lock_ObtainRead(&cm_cellLock);
1567     for (tcellp = cm_data.allCellsp; tcellp; tcellp = tcellp->allNextp) {
1568         if (whichCell == 0) break;
1569         whichCell--;
1570     }
1571     lock_ReleaseRead(&cm_cellLock);
1572     if (tcellp) {
1573         int max = 8;
1574
1575         cp = ioctlp->outDatap;
1576
1577         if (magic == 0x12345678) {
1578             memcpy(cp, (char *)&magic, sizeof(long));
1579             max = 13;
1580         }
1581         memset(cp, 0, max * sizeof(long));
1582         basep = cp;
1583         lock_ObtainRead(&cm_serverLock);        /* for going down server list */
1584         /* jaltman - do the reference counts to serverRefp contents need to be increased? */
1585         serverRefp = tcellp->vlServersp;
1586         for (i=0; i<max; i++) {
1587             if (!serverRefp) break;
1588             serverp = serverRefp->server;
1589             memcpy(cp, &serverp->addr.sin_addr.s_addr, sizeof(long));
1590             cp += sizeof(long);
1591             serverRefp = serverRefp->next;
1592         }
1593         lock_ReleaseRead(&cm_serverLock);
1594         cp = basep + max * sizeof(afs_int32);
1595         StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), tcellp->name);
1596         cp += strlen(tcellp->name)+1;
1597         ioctlp->outDatap = cp;
1598     }
1599
1600     if (tcellp)
1601         return 0;
1602     else
1603         return CM_ERROR_NOMORETOKENS;   /* mapped to EDOM */
1604 }
1605
1606 long cm_IoctlNewCell(struct smb_ioctl *ioctlp, struct cm_user *userp)
1607 {
1608     /* NT cache manager will read cell information from CellServDB each time
1609      * cell is accessed. So, this call is necessary only if list of server for a cell
1610      * changes (or IP addresses of cell servers changes).
1611      * All that needs to be done is to refresh server information for all cells that
1612      * are already loaded.
1613
1614      * cell list will be cm_CellLock and cm_ServerLock will be held for write.
1615      */
1616
1617     cm_cell_t *cp;
1618     cm_cell_rock_t rock;
1619
1620
1621     cm_SkipIoctlPath(ioctlp);
1622     lock_ObtainWrite(&cm_cellLock);
1623
1624     for (cp = cm_data.allCellsp; cp; cp=cp->allNextp)
1625     {
1626         long code;
1627         lock_ObtainMutex(&cp->mx);
1628         /* delete all previous server lists - cm_FreeServerList will ask for write on cm_ServerLock*/
1629         cm_FreeServerList(&cp->vlServersp, CM_FREESERVERLIST_DELETE);
1630         cp->vlServersp = NULL;
1631         rock.cellp = cp;
1632         rock.flags = 0;
1633         code = cm_SearchCellFile(cp->name, cp->name, cm_AddCellProc, &rock);
1634 #ifdef AFS_AFSDB_ENV
1635         if (code) {
1636             if (cm_dnsEnabled) {
1637                 int ttl;
1638                 code = cm_SearchCellByDNS(cp->name, cp->name, &ttl, cm_AddCellProc, &rock);
1639                 if ( code == 0 ) { /* got cell from DNS */
1640                     cp->flags |= CM_CELLFLAG_DNS;
1641                     cp->flags &= ~CM_CELLFLAG_VLSERVER_INVALID;
1642                     cp->timeout = time(0) + ttl;
1643                 }
1644             }
1645         }
1646         else {
1647             cp->flags &= ~CM_CELLFLAG_DNS;
1648         }
1649 #endif /* AFS_AFSDB_ENV */
1650         if (code) {
1651             cp->flags |= CM_CELLFLAG_VLSERVER_INVALID;
1652         }
1653         else {
1654             cp->flags &= ~CM_CELLFLAG_VLSERVER_INVALID;
1655             cm_RandomizeServer(&cp->vlServersp);
1656         }
1657         lock_ReleaseMutex(&cp->mx);
1658     }
1659
1660     lock_ReleaseWrite(&cm_cellLock);
1661     return 0;
1662 }
1663
1664 long cm_IoctlGetWsCell(smb_ioctl_t *ioctlp, cm_user_t *userp)
1665 {
1666         long code = 0;
1667
1668         if (cm_freelanceEnabled) {
1669             if (cm_GetRootCellName(ioctlp->outDatap))
1670                 StringCbCopyA(ioctlp->outDatap, SMB_IOCTL_MAXDATA - (ioctlp->outDatap - ioctlp->outAllocp), "Freelance.Local.Root");
1671             ioctlp->outDatap += strlen(ioctlp->outDatap) +1;
1672         } else if (cm_data.rootCellp) {
1673             /* return the default cellname to the caller */
1674             StringCbCopyA(ioctlp->outDatap, SMB_IOCTL_MAXDATA - (ioctlp->outDatap - ioctlp->outAllocp), cm_data.rootCellp->name);
1675             ioctlp->outDatap += strlen(ioctlp->outDatap) +1;
1676         } else {
1677             /* if we don't know our default cell, return failure */
1678             code = CM_ERROR_NOSUCHCELL;
1679     }
1680
1681     return code;
1682 }
1683
1684 long cm_IoctlSysName(struct smb_ioctl *ioctlp, struct cm_user *userp)
1685 {
1686     long setSysName, foundname = 0;
1687     char *cp, *cp2, inname[MAXSYSNAME], outname[MAXSYSNAME];
1688     int t, count, num = 0;
1689     char **sysnamelist[MAXSYSNAME];
1690
1691     cm_SkipIoctlPath(ioctlp);
1692
1693     memcpy(&setSysName, ioctlp->inDatap, sizeof(long));
1694     ioctlp->inDatap += sizeof(long);
1695
1696     if (setSysName) {
1697         /* check my args */
1698         if ( setSysName < 0 || setSysName > MAXNUMSYSNAMES )
1699             return EINVAL;
1700         cp2 = ioctlp->inDatap;
1701         for ( cp=ioctlp->inDatap, count = 0; count < setSysName; count++ ) {
1702             /* won't go past end of ioctlp->inDatap since maxsysname*num < ioctlp->inDatap length */
1703             t = (int)strlen(cp);
1704             if (t >= MAXSYSNAME || t <= 0)
1705                 return EINVAL;
1706             /* check for names that can shoot us in the foot */
1707             if (*cp == '.' && (cp[1] == 0 || (cp[1] == '.' && cp[2] == 0)))
1708                 return EINVAL;
1709             cp += t + 1;
1710         }
1711         /* args ok */
1712
1713         /* inname gets first entry in case we're being a translator */
1714         /* (we are never a translator) */
1715         t = (int)strlen(ioctlp->inDatap);
1716         memcpy(inname, ioctlp->inDatap, t + 1);
1717         ioctlp->inDatap += t + 1;
1718         num = count;
1719     }
1720
1721     /* Not xlating, so local case */
1722     if (!cm_sysName)
1723         osi_panic("cm_IoctlSysName: !cm_sysName\n", __FILE__, __LINE__);
1724
1725     if (!setSysName) {      /* user just wants the info */
1726         StringCbCopyA(outname, sizeof(outname), cm_sysName);
1727         foundname = cm_sysNameCount;
1728         *sysnamelist = cm_sysNameList;
1729     } else {
1730         /* Local guy; only root can change sysname */
1731         /* clear @sys entries from the dnlc, once afs_lookup can
1732          * do lookups of @sys entries and thinks it can trust them */
1733         /* privs ok, store the entry, ... */
1734         StringCbCopyA(cm_sysName, sizeof(cm_sysName), inname);
1735         StringCbCopyA(cm_sysNameList[0], MAXSYSNAME, inname);
1736         if (setSysName > 1) {       /* ... or list */
1737             cp = ioctlp->inDatap;
1738             for (count = 1; count < setSysName; ++count) {
1739                 if (!cm_sysNameList[count])
1740                     osi_panic("cm_IoctlSysName: no cm_sysNameList entry to write\n",
1741                                __FILE__, __LINE__);
1742                 t = (int)strlen(cp);
1743                 StringCbCopyA(cm_sysNameList[count], MAXSYSNAME, cp);
1744                 cp += t + 1;
1745             }
1746         }
1747         cm_sysNameCount = setSysName;
1748     }
1749
1750     if (!setSysName) {
1751         /* return the sysname to the caller */
1752         cp = ioctlp->outDatap;
1753         memcpy(cp, (char *)&foundname, sizeof(afs_int32));
1754         cp += sizeof(afs_int32);        /* skip found flag */
1755         if (foundname) {
1756             StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), outname);
1757             cp += strlen(outname) + 1;  /* skip name and terminating null char */
1758             for ( count=1; count < foundname ; ++count) {   /* ... or list */
1759                 if ( !(*sysnamelist)[count] )
1760                     osi_panic("cm_IoctlSysName: no cm_sysNameList entry to read\n",
1761                                __FILE__, __LINE__);
1762                 t = (int)strlen((*sysnamelist)[count]);
1763                 if (t >= MAXSYSNAME)
1764                     osi_panic("cm_IoctlSysName: sysname entry garbled\n",
1765                                __FILE__, __LINE__);
1766                 StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), (*sysnamelist)[count]);
1767                 cp += t + 1;
1768             }
1769         }
1770         ioctlp->outDatap = cp;
1771     }
1772
1773     /* done: success */
1774     return 0;
1775 }
1776
1777 long cm_IoctlGetCellStatus(struct smb_ioctl *ioctlp, struct cm_user *userp)
1778 {
1779     long temp;
1780     cm_cell_t *cellp;
1781
1782     cm_SkipIoctlPath(ioctlp);
1783
1784     cellp = cm_GetCell(ioctlp->inDatap, 0);
1785     if (!cellp)
1786         return CM_ERROR_NOSUCHCELL;
1787
1788     temp = 0;
1789     lock_ObtainMutex(&cellp->mx);
1790     if (cellp->flags & CM_CELLFLAG_SUID)
1791         temp |= CM_SETCELLFLAG_SUID;
1792     lock_ReleaseMutex(&cellp->mx);
1793
1794     /* now copy out parm */
1795     memcpy(ioctlp->outDatap, &temp, sizeof(long));
1796     ioctlp->outDatap += sizeof(long);
1797
1798     return 0;
1799 }
1800
1801 long cm_IoctlSetCellStatus(struct smb_ioctl *ioctlp, struct cm_user *userp)
1802 {
1803     long temp;
1804     cm_cell_t *cellp;
1805
1806     cm_SkipIoctlPath(ioctlp);
1807
1808     cellp = cm_GetCell(ioctlp->inDatap + 2*sizeof(long), 0);
1809     if (!cellp)
1810         return CM_ERROR_NOSUCHCELL;
1811
1812     memcpy((char *)&temp, ioctlp->inDatap, sizeof(long));
1813
1814     lock_ObtainMutex(&cellp->mx);
1815     if (temp & CM_SETCELLFLAG_SUID)
1816         cellp->flags |= CM_CELLFLAG_SUID;
1817     else
1818         cellp->flags &= ~CM_CELLFLAG_SUID;
1819     lock_ReleaseMutex(&cellp->mx);
1820
1821     return 0;
1822 }
1823
1824 long cm_IoctlSetSPrefs(struct smb_ioctl *ioctlp, struct cm_user *userp)
1825 {
1826     cm_SSetPref_t         *spin; /* input */
1827     cm_SPref_t        *srvin;   /* one input component */
1828     cm_server_t       *tsp;
1829     int                   i, vlonly, noServers, type;
1830     struct sockaddr_in  tmp;
1831     unsigned short        rank;
1832
1833     cm_SkipIoctlPath(ioctlp);       /* we don't care about the path */
1834
1835     spin           = (cm_SSetPref_t *)ioctlp->inDatap;
1836     noServers  = spin->num_servers;
1837     vlonly     = spin->flags;
1838     if ( vlonly )
1839         type = CM_SERVER_VLDB;
1840     else
1841         type = CM_SERVER_FILE;
1842
1843     for ( i=0; i < noServers; i++)
1844     {
1845         srvin          = &(spin->servers[i]);
1846         rank           = srvin->rank + (rand() & 0x000f);
1847         tmp.sin_addr   = srvin->host;
1848         tmp.sin_family = AF_INET;
1849
1850         tsp = cm_FindServer(&tmp, type);
1851         if ( tsp )              /* an existing server - ref count increased */
1852         {
1853             tsp->ipRank = rank; /* no need to protect by mutex*/
1854
1855             if (type == CM_SERVER_FILE)
1856             {   /* fileserver */
1857                 /* find volumes which might have RO copy
1858                 /* on server and change the ordering of
1859                  * their RO list
1860                  */
1861                 cm_ChangeRankVolume(tsp);
1862             }
1863             else
1864             {
1865                 /* set preferences for an existing vlserver */
1866                 cm_ChangeRankCellVLServer(tsp);
1867             }
1868         }
1869         else    /* add a new server without a cell */
1870         {
1871             tsp = cm_NewServer(&tmp, type, NULL, CM_FLAG_NOPROBE); /* refcount = 1 */
1872             tsp->ipRank = rank;
1873         }
1874         lock_ObtainMutex(&tsp->mx);
1875         tsp->flags |= CM_SERVERFLAG_PREF_SET;
1876         lock_ReleaseMutex(&tsp->mx);
1877         cm_PutServer(tsp);  /* decrease refcount */
1878     }
1879     return 0;
1880 }
1881
1882 long cm_IoctlGetSPrefs(struct smb_ioctl *ioctlp, struct cm_user *userp)
1883 {
1884     cm_SPrefRequest_t *spin; /* input */
1885     cm_SPrefInfo_t    *spout;   /* output */
1886     cm_SPref_t        *srvout;   /* one output component */
1887     cm_server_t       *tsp;
1888     int                   i, vlonly, noServers;
1889
1890     cm_SkipIoctlPath(ioctlp);       /* we don't care about the path */
1891
1892     spin      = (cm_SPrefRequest_t *)ioctlp->inDatap;
1893     spout     = (cm_SPrefInfo_t *) ioctlp->outDatap;
1894     srvout    = spout->servers;
1895     noServers = spin->num_servers;
1896     vlonly    = spin->flags & CM_SPREF_VLONLY;
1897     spout->num_servers = 0;
1898
1899     lock_ObtainRead(&cm_serverLock); /* get server lock */
1900
1901     for (tsp=cm_allServersp, i=0; tsp && noServers; tsp=tsp->allNextp,i++){
1902         if (spin->offset > i) {
1903             continue;    /* catch up to where we left off */
1904         }
1905
1906         if ( vlonly && (tsp->type == CM_SERVER_FILE) )
1907             continue;   /* ignore fileserver for -vlserver option*/
1908         if ( !vlonly && (tsp->type == CM_SERVER_VLDB) )
1909             continue;   /* ignore vlservers */
1910
1911         srvout->host = tsp->addr.sin_addr;
1912         srvout->rank = tsp->ipRank;
1913         srvout++;
1914         spout->num_servers++;
1915         noServers--;
1916     }
1917     lock_ReleaseRead(&cm_serverLock); /* release server lock */
1918
1919     if ( tsp )  /* we ran out of space in the output buffer */
1920         spout->next_offset = i;
1921     else
1922         spout->next_offset = 0;
1923     ioctlp->outDatap += sizeof(cm_SPrefInfo_t) +
1924         (spout->num_servers -1 ) * sizeof(cm_SPref_t) ;
1925     return 0;
1926 }
1927
1928 long cm_IoctlStoreBehind(struct smb_ioctl *ioctlp, struct cm_user *userp)
1929 {
1930     /* we ignore default asynchrony since we only have one way
1931      * of doing this today.
1932      */
1933     return 0;
1934 }
1935
1936 long cm_IoctlCreateMountPoint(struct smb_ioctl *ioctlp, struct cm_user *userp)
1937 {
1938     char leaf[LEAF_SIZE];
1939     long code;
1940     cm_scache_t *dscp;
1941     cm_attr_t tattr;
1942     char *cp;
1943     cm_req_t req;
1944     char mpInfo[256];
1945     char fullCell[256];
1946     char volume[256];
1947     char cell[256];
1948     int ttl;
1949
1950     cm_InitReq(&req);
1951
1952     code = cm_ParseIoctlParent(ioctlp, userp, &req, &dscp, leaf);
1953     if (code)
1954         return code;
1955
1956     /* Translate chars for the mount point name */
1957     TranslateExtendedChars(leaf);
1958
1959     /*
1960      * The fs command allows the user to specify partial cell names on NT.  These must
1961      * be expanded to the full cell name for mount points so that the mount points will
1962      * work on UNIX clients.
1963      */
1964
1965     /* Extract the possibly partial cell name */
1966     StringCbCopyA(cell, sizeof(cell), ioctlp->inDatap + 1);      /* Skip the mp type character */
1967
1968     if (cp = strchr(cell, ':')) {
1969         /* Extract the volume name */
1970         *cp = 0;
1971         StringCbCopyA(volume,  sizeof(volume), cp + 1);
1972
1973         /* Get the full name for this cell */
1974         code = cm_SearchCellFile(cell, fullCell, 0, 0);
1975 #ifdef AFS_AFSDB_ENV
1976         if (code && cm_dnsEnabled)
1977             code = cm_SearchCellByDNS(cell, fullCell, &ttl, 0, 0);
1978 #endif
1979         if (code) {
1980             cm_ReleaseSCache(dscp);
1981             return CM_ERROR_NOSUCHCELL;
1982         }
1983
1984         StringCbPrintfA(mpInfo, sizeof(mpInfo), "%c%s:%s", *ioctlp->inDatap, fullCell, volume);
1985     } else {
1986         /* No cell name specified */
1987         StringCbCopyA(mpInfo, sizeof(mpInfo), ioctlp->inDatap);
1988     }
1989
1990 #ifdef AFS_FREELANCE_CLIENT
1991     if (cm_freelanceEnabled && dscp == cm_data.rootSCachep) {
1992         /* we are adding the mount point to the root dir., so call
1993          * the freelance code to do the add. */
1994         osi_Log0(afsd_logp,"IoctlCreateMountPoint within Freelance root dir");
1995         code = cm_FreelanceAddMount(leaf, fullCell, volume,
1996                                     *ioctlp->inDatap == '%', NULL);
1997     } else
1998 #endif
1999     {
2000         /* create the symlink with mode 644.  The lack of X bits tells
2001          * us that it is a mount point.
2002          */
2003         tattr.mask = CM_ATTRMASK_UNIXMODEBITS | CM_ATTRMASK_CLIENTMODTIME;
2004         tattr.unixModeBits = 0644;
2005         tattr.clientModTime = time(NULL);
2006
2007         code = cm_SymLink(dscp, leaf, mpInfo, 0, &tattr, userp, &req);
2008     }
2009
2010     if (code == 0 && (dscp->flags & CM_SCACHEFLAG_ANYWATCH))
2011         smb_NotifyChange(FILE_ACTION_ADDED,
2012                          FILE_NOTIFY_CHANGE_DIR_NAME,
2013                          dscp, leaf, NULL, TRUE);
2014
2015     cm_ReleaseSCache(dscp);
2016     return code;
2017 }
2018
2019 long cm_IoctlSymlink(struct smb_ioctl *ioctlp, struct cm_user *userp)
2020 {
2021     char leaf[LEAF_SIZE];
2022     long code;
2023     cm_scache_t *dscp;
2024     cm_attr_t tattr;
2025     char *cp;
2026     cm_req_t req;
2027
2028     cm_InitReq(&req);
2029
2030     code = cm_ParseIoctlParent(ioctlp, userp, &req, &dscp, leaf);
2031     if (code) return code;
2032
2033     /* Translate chars for the link name */
2034     TranslateExtendedChars(leaf);
2035
2036     /* Translate chars for the linked to name */
2037     TranslateExtendedChars(ioctlp->inDatap);
2038
2039     cp = ioctlp->inDatap;               /* contents of link */
2040
2041 #ifdef AFS_FREELANCE_CLIENT
2042     if (cm_freelanceEnabled && dscp == cm_data.rootSCachep) {
2043         /* we are adding the symlink to the root dir., so call
2044          * the freelance code to do the add. */
2045         if (cp[0] == cp[1] && cp[1] == '\\' &&
2046             !_strnicmp(cm_NetbiosName,cp+2,strlen(cm_NetbiosName)))
2047         {
2048             /* skip \\AFS\ or \\AFS\all\ */
2049             char * p;
2050             p = cp + 2 + strlen(cm_NetbiosName) + 1;
2051             if ( !_strnicmp("all", p, 3) )
2052                 p += 4;
2053             cp = p;
2054         }
2055         osi_Log0(afsd_logp,"IoctlCreateSymlink within Freelance root dir");
2056         code = cm_FreelanceAddSymlink(leaf, cp, NULL);
2057     } else
2058 #endif
2059     {
2060         /* Create symlink with mode 0755. */
2061         tattr.mask = CM_ATTRMASK_UNIXMODEBITS;
2062         tattr.unixModeBits = 0755;
2063
2064         code = cm_SymLink(dscp, leaf, cp, 0, &tattr, userp, &req);
2065     }
2066
2067     if (code == 0 && (dscp->flags & CM_SCACHEFLAG_ANYWATCH))
2068         smb_NotifyChange(FILE_ACTION_ADDED,
2069                           FILE_NOTIFY_CHANGE_FILE_NAME
2070                           | FILE_NOTIFY_CHANGE_DIR_NAME,
2071                           dscp, leaf, NULL, TRUE);
2072
2073     cm_ReleaseSCache(dscp);
2074
2075     return code;
2076 }
2077
2078
2079 long cm_IoctlListlink(struct smb_ioctl *ioctlp, struct cm_user *userp)
2080 {
2081     long code;
2082     cm_scache_t *dscp;
2083     cm_scache_t *scp;
2084     char *cp;
2085     cm_space_t *spacep;
2086     cm_scache_t *newRootScp;
2087     cm_req_t req;
2088
2089     cm_InitReq(&req);
2090
2091     code = cm_ParseIoctlPath(ioctlp, userp, &req, &dscp, 0);
2092     if (code) return code;
2093
2094     cp = ioctlp->inDatap;
2095
2096     code = cm_Lookup(dscp, cp, CM_FLAG_NOMOUNTCHASE, userp, &req, &scp);
2097     cm_ReleaseSCache(dscp);
2098     if (code) return code;
2099
2100     /* Check that it's a real symlink */
2101     if (scp->fileType != CM_SCACHETYPE_SYMLINK &&
2102         scp->fileType != CM_SCACHETYPE_DFSLINK &&
2103         scp->fileType != CM_SCACHETYPE_INVALID) {
2104         cm_ReleaseSCache(scp);
2105         return CM_ERROR_INVAL;
2106     }
2107
2108     code = cm_AssembleLink(scp, "", &newRootScp, &spacep, userp, &req);
2109     cm_ReleaseSCache(scp);
2110     if (code == 0) {
2111         cp = ioctlp->outDatap;
2112         if (newRootScp != NULL) {
2113             StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), cm_mountRoot);
2114             StringCbCatA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), "/");
2115             cp += strlen(cp);
2116         }
2117         StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), spacep->data);
2118         cp += strlen(cp) + 1;
2119         ioctlp->outDatap = cp;
2120         cm_FreeSpace(spacep);
2121         if (newRootScp != NULL)
2122             cm_ReleaseSCache(newRootScp);
2123         code = 0;
2124     } else if (code == CM_ERROR_PATH_NOT_COVERED &&
2125                 scp->fileType == CM_SCACHETYPE_DFSLINK ||
2126                code == CM_ERROR_NOSUCHPATH &&
2127                 scp->fileType == CM_SCACHETYPE_INVALID) {
2128
2129         cp = ioctlp->outDatap;
2130         StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), scp->mountPointStringp);
2131         cp += strlen(cp) + 1;
2132         ioctlp->outDatap = cp;
2133         code = 0;
2134     }
2135
2136     return code;
2137 }
2138
2139 long cm_IoctlIslink(struct smb_ioctl *ioctlp, struct cm_user *userp)
2140 {/*CHECK FOR VALID SYMLINK*/
2141     long code;
2142     cm_scache_t *dscp;
2143     cm_scache_t *scp;
2144     char *cp;
2145     cm_req_t req;
2146
2147     cm_InitReq(&req);
2148
2149     code = cm_ParseIoctlPath(ioctlp, userp, &req, &dscp, 0);
2150     if (code) return code;
2151
2152     cp = ioctlp->inDatap;
2153     osi_LogEvent("cm_IoctlListlink",NULL," name[%s]",cp);
2154
2155     code = cm_Lookup(dscp, cp, CM_FLAG_NOMOUNTCHASE, userp, &req, &scp);
2156     cm_ReleaseSCache(dscp);
2157     if (code) return code;
2158
2159     /* Check that it's a real symlink */
2160     if (scp->fileType != CM_SCACHETYPE_SYMLINK &&
2161         scp->fileType != CM_SCACHETYPE_DFSLINK &&
2162         scp->fileType != CM_SCACHETYPE_INVALID)
2163         code = CM_ERROR_INVAL;
2164     cm_ReleaseSCache(scp);
2165     return code;
2166 }
2167
2168 long cm_IoctlDeletelink(struct smb_ioctl *ioctlp, struct cm_user *userp)
2169 {
2170     long code;
2171     cm_scache_t *dscp;
2172     cm_scache_t *scp;
2173     char *cp;
2174     cm_req_t req;
2175
2176     cm_InitReq(&req);
2177
2178     code = cm_ParseIoctlPath(ioctlp, userp, &req, &dscp, 0);
2179     if (code) return code;
2180
2181     cp = ioctlp->inDatap;
2182
2183     code = cm_Lookup(dscp, cp, CM_FLAG_NOMOUNTCHASE, userp, &req, &scp);
2184
2185     /* if something went wrong, bail out now */
2186     if (code)
2187         goto done3;
2188
2189     lock_ObtainWrite(&scp->rw);
2190     code = cm_SyncOp(scp, NULL, userp, &req, 0,
2191                       CM_SCACHESYNC_NEEDCALLBACK | CM_SCACHESYNC_GETSTATUS);
2192     if (code)
2193         goto done2;
2194
2195     /* now check that this is a real symlink */
2196     if (scp->fileType != CM_SCACHETYPE_SYMLINK &&
2197         scp->fileType != CM_SCACHETYPE_DFSLINK &&
2198         scp->fileType != CM_SCACHETYPE_INVALID) {
2199         code = CM_ERROR_INVAL;
2200         goto done1;
2201     }
2202
2203     /* time to make the RPC, so drop the lock */
2204     lock_ReleaseWrite(&scp->rw);
2205
2206 #ifdef AFS_FREELANCE_CLIENT
2207     if (cm_freelanceEnabled && dscp == cm_data.rootSCachep) {
2208         /* we are adding the mount point to the root dir., so call
2209          * the freelance code to do the add. */
2210         osi_Log0(afsd_logp,"IoctlDeletelink from Freelance root dir");
2211         code = cm_FreelanceRemoveSymlink(cp);
2212     } else
2213 #endif
2214     {
2215         /* easier to do it this way */
2216         code = cm_Unlink(dscp, cp, userp, &req);
2217     }
2218     if (code == 0 && (dscp->flags & CM_SCACHEFLAG_ANYWATCH))
2219         smb_NotifyChange(FILE_ACTION_REMOVED,
2220                           FILE_NOTIFY_CHANGE_FILE_NAME
2221                           | FILE_NOTIFY_CHANGE_DIR_NAME,
2222                           dscp, cp, NULL, TRUE);
2223
2224     lock_ObtainWrite(&scp->rw);
2225   done1:
2226     cm_SyncOpDone(scp, NULL, CM_SCACHESYNC_NEEDCALLBACK | CM_SCACHESYNC_GETSTATUS);
2227
2228   done2:
2229     cm_DiscardSCache(scp);
2230     lock_ReleaseWrite(&scp->rw);
2231     cm_ReleaseSCache(scp);
2232
2233   done3:
2234     cm_ReleaseSCache(dscp);
2235     return code;
2236 }
2237
2238 #ifdef QUERY_AFSID
2239 long cm_UsernameToId(char *uname, cm_ucell_t * ucellp, afs_uint32* uid)
2240 {
2241     afs_int32 code;
2242     namelist lnames;
2243     idlist lids;
2244     static struct afsconf_cell info;
2245     struct rx_connection *serverconns[MAXSERVERS];
2246     struct rx_securityClass *sc[3];
2247     afs_int32 scIndex = 2;      /* authenticated - we have a token */
2248     struct ubik_client *pruclient = NULL;
2249     struct afsconf_dir *tdir;
2250     int i;
2251     char * p, * r;
2252
2253     tdir = afsconf_Open(AFSDIR_CLIENT_ETC_DIRPATH);
2254     code = afsconf_GetCellInfo(tdir, ucellp->cellp->name, "afsprot", &info);
2255     afsconf_Close(tdir);
2256
2257     sc[0] = 0;
2258     sc[1] = 0;
2259     sc[2] = 0;
2260
2261     /* we have the token that was given to us in the settoken
2262      * call.   we just have to use it.
2263      */
2264     scIndex = 2;        /* kerberos ticket */
2265     sc[2] = rxkad_NewClientSecurityObject(rxkad_clear, &ucellp->sessionKey,
2266                                           ucellp->kvno, ucellp->ticketLen,
2267                                           ucellp->ticketp);
2268
2269     memset(serverconns, 0, sizeof(serverconns));        /* terminate list!!! */
2270     for (i = 0; i < info.numServers; i++)
2271         serverconns[i] =
2272             rx_NewConnection(info.hostAddr[i].sin_addr.s_addr,
2273                              info.hostAddr[i].sin_port, PRSRV, sc[scIndex],
2274                              scIndex);
2275
2276     code = ubik_ClientInit(serverconns, &pruclient);
2277     if (code) {
2278         return code;
2279     }
2280
2281     code = rxs_Release(sc[scIndex]);
2282
2283     lids.idlist_len = 0;
2284     lids.idlist_val = 0;
2285     lnames.namelist_len = 1;
2286     lnames.namelist_val = (prname *) malloc(PR_MAXNAMELEN);
2287     strncpy(lnames.namelist_val[0], uname, PR_MAXNAMELEN);
2288     lnames.namelist_val[0][PR_MAXNAMELEN-1] = '\0';
2289     for ( p=lnames.namelist_val[0], r=NULL; *p; p++ ) {
2290         if (isupper(*p))
2291             *p = tolower(*p);
2292         if (*p == '@')
2293             r = p;
2294     }
2295     if (r && !stricmp(r+1,ucellp->cellp->name))
2296         *r = '\0';
2297
2298     code = ubik_PR_NameToID(pruclient, 0, &lnames, &lids);
2299     if (lids.idlist_val) {
2300         *uid = *lids.idlist_val;
2301         free(lids.idlist_val);
2302     }
2303     if (lnames.namelist_val)
2304         free(lnames.namelist_val);
2305
2306     if ( pruclient ) {
2307         ubik_ClientDestroy(pruclient);
2308         pruclient = NULL;
2309     }
2310
2311     return 0;
2312 }
2313 #endif /* QUERY_AFSID */
2314
2315 long cm_IoctlSetToken(struct smb_ioctl *ioctlp, struct cm_user *userp)
2316 {
2317     char *saveDataPtr;
2318     char *tp;
2319     int ticketLen;
2320     char *ticket;
2321     int ctSize;
2322     struct ClearToken ct;
2323     cm_cell_t *cellp;
2324     cm_ucell_t *ucellp;
2325     char *uname = NULL;
2326     afs_uuid_t uuid;
2327     int flags;
2328     char sessionKey[8];
2329     char *smbname;
2330     int release_userp = 0;
2331     char * wdir = NULL;
2332
2333     saveDataPtr = ioctlp->inDatap;
2334
2335     cm_SkipIoctlPath(ioctlp);
2336
2337     tp = ioctlp->inDatap;
2338
2339     /* ticket length */
2340     memcpy(&ticketLen, tp, sizeof(ticketLen));
2341     tp += sizeof(ticketLen);
2342     if (ticketLen < MINKTCTICKETLEN || ticketLen > MAXKTCTICKETLEN)
2343         return CM_ERROR_INVAL;
2344
2345     /* remember ticket and skip over it for now */
2346     ticket = tp;
2347     tp += ticketLen;
2348
2349     /* clear token size */
2350     memcpy(&ctSize, tp, sizeof(ctSize));
2351     tp += sizeof(ctSize);
2352     if (ctSize != sizeof(struct ClearToken))
2353         return CM_ERROR_INVAL;
2354
2355     /* clear token */
2356     memcpy(&ct, tp, ctSize);
2357     tp += ctSize;
2358     if (ct.AuthHandle == -1)
2359         ct.AuthHandle = 999;    /* more rxvab compat stuff */
2360
2361     /* more stuff, if any */
2362     if (ioctlp->inCopied > tp - saveDataPtr) {
2363         /* flags:  logon flag */
2364         memcpy(&flags, tp, sizeof(int));
2365         tp += sizeof(int);
2366
2367         /* cell name */
2368         cellp = cm_GetCell(tp, CM_FLAG_CREATE | CM_FLAG_NOPROBE);
2369         if (!cellp)
2370             return CM_ERROR_NOSUCHCELL;
2371         tp += strlen(tp) + 1;
2372
2373         /* user name */
2374         uname = tp;
2375         tp += strlen(tp) + 1;
2376
2377         if (flags & PIOCTL_LOGON) {
2378             /* SMB user name with which to associate tokens */
2379             smbname = tp;
2380             osi_Log2(smb_logp,"cm_IoctlSetToken for user [%s] smbname [%s]",
2381                      osi_LogSaveString(smb_logp,uname), osi_LogSaveString(smb_logp,smbname));
2382             fprintf(stderr, "SMB name = %s\n", smbname);
2383             tp += strlen(tp) + 1;
2384         } else {
2385             osi_Log1(smb_logp,"cm_IoctlSetToken for user [%s]",
2386                      osi_LogSaveString(smb_logp, uname));
2387         }
2388
2389 #ifndef DJGPP   /* for win95, session key is back in pioctl */
2390                 /* uuid */
2391         memcpy(&uuid, tp, sizeof(uuid));
2392         if (!cm_FindTokenEvent(uuid, sessionKey))
2393             return CM_ERROR_INVAL;
2394 #endif /* !DJGPP */
2395     } else {
2396         cellp = cm_data.rootCellp;
2397         osi_Log0(smb_logp,"cm_IoctlSetToken - no name specified");
2398     }
2399
2400     if (flags & PIOCTL_LOGON) {
2401         userp = smb_FindCMUserByName(smbname, ioctlp->fidp->vcp->rname,
2402                                      SMB_FLAG_CREATE|SMB_FLAG_AFSLOGON);
2403         release_userp = 1;
2404     }
2405
2406     /* store the token */
2407     lock_ObtainMutex(&userp->mx);
2408     ucellp = cm_GetUCell(userp, cellp);
2409     osi_Log1(smb_logp,"cm_IoctlSetToken ucellp %lx", ucellp);
2410     ucellp->ticketLen = ticketLen;
2411     if (ucellp->ticketp)
2412         free(ucellp->ticketp);  /* Discard old token if any */
2413     ucellp->ticketp = malloc(ticketLen);
2414     memcpy(ucellp->ticketp, ticket, ticketLen);
2415 #ifndef DJGPP
2416     /*
2417      * Get the session key from the RPC, rather than from the pioctl.
2418      */
2419     /*
2420     memcpy(&ucellp->sessionKey, ct.HandShakeKey, sizeof(ct.HandShakeKey));
2421     */
2422     memcpy(ucellp->sessionKey.data, sessionKey, sizeof(sessionKey));
2423 #else
2424     /* for win95, we are getting the session key from the pioctl */
2425     memcpy(&ucellp->sessionKey, ct.HandShakeKey, sizeof(ct.HandShakeKey));
2426 #endif /* !DJGPP */
2427     ucellp->kvno = ct.AuthHandle;
2428     ucellp->expirationTime = ct.EndTimestamp;
2429     ucellp->gen++;
2430 #ifdef QUERY_AFSID
2431     ucellp->uid = ANONYMOUSID;
2432 #endif
2433     if (uname) {
2434         StringCbCopyA(ucellp->userName, MAXKTCNAMELEN, uname);
2435 #ifdef QUERY_AFSID
2436         cm_UsernameToId(uname, ucellp, &ucellp->uid);
2437 #endif
2438     }
2439     ucellp->flags |= CM_UCELLFLAG_RXKAD;
2440     lock_ReleaseMutex(&userp->mx);
2441
2442     if (flags & PIOCTL_LOGON) {
2443         ioctlp->flags |= SMB_IOCTLFLAG_LOGON;
2444     }
2445
2446     cm_ResetACLCache(userp);
2447
2448     if (release_userp)
2449         cm_ReleaseUser(userp);
2450
2451     return 0;
2452 }
2453
2454 long cm_IoctlGetTokenIter(struct smb_ioctl *ioctlp, struct cm_user *userp)
2455 {
2456     char *tp, *cp;
2457     int iterator;
2458     int temp;
2459     cm_ucell_t *ucellp;
2460     struct ClearToken ct;
2461
2462     cm_SkipIoctlPath(ioctlp);
2463
2464     tp = ioctlp->inDatap;
2465     cp = ioctlp->outDatap;
2466
2467     /* iterator */
2468     memcpy(&iterator, tp, sizeof(iterator));
2469     tp += sizeof(iterator);
2470
2471     lock_ObtainMutex(&userp->mx);
2472
2473     /* look for token */
2474     for (;;iterator++) {
2475         ucellp = cm_FindUCell(userp, iterator);
2476         if (!ucellp) {
2477             lock_ReleaseMutex(&userp->mx);
2478             return CM_ERROR_NOMORETOKENS;
2479         }
2480         if (ucellp->flags & CM_UCELLFLAG_RXKAD)
2481             break;
2482     }
2483
2484     /* new iterator */
2485     temp = ucellp->iterator + 1;
2486     memcpy(cp, &temp, sizeof(temp));
2487     cp += sizeof(temp);
2488
2489     /* ticket length */
2490     memcpy(cp, &ucellp->ticketLen, sizeof(ucellp->ticketLen));
2491     cp += sizeof(ucellp->ticketLen);
2492
2493     /* ticket */
2494     memcpy(cp, ucellp->ticketp, ucellp->ticketLen);
2495     cp += ucellp->ticketLen;
2496
2497     /* clear token size */
2498     temp = sizeof(ct);
2499     memcpy(cp, &temp, sizeof(temp));
2500     cp += sizeof(temp);
2501
2502     /* clear token */
2503     ct.AuthHandle = ucellp->kvno;
2504 #ifndef DJGPP
2505     /*
2506      * Don't give out a real session key here
2507      */
2508     /*
2509     memcpy(ct.HandShakeKey, &ucellp->sessionKey, sizeof(ct.HandShakeKey));
2510     */
2511     memset(ct.HandShakeKey, 0, sizeof(ct.HandShakeKey));
2512 #else
2513     memcpy(ct.HandShakeKey, &ucellp->sessionKey, sizeof(ct.HandShakeKey));
2514 #endif /* !DJGPP */
2515     ct.ViceId = 37;                     /* XXX */
2516     ct.BeginTimestamp = 0;              /* XXX */
2517     ct.EndTimestamp = ucellp->expirationTime;
2518     memcpy(cp, &ct, sizeof(ct));
2519     cp += sizeof(ct);
2520
2521     /* Primary flag (unused) */
2522     temp = 0;
2523     memcpy(cp, &temp, sizeof(temp));
2524     cp += sizeof(temp);
2525
2526     /* cell name */
2527     StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), ucellp->cellp->name);
2528     cp += strlen(cp) + 1;
2529
2530     /* user name */
2531     StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), ucellp->userName);
2532     cp += strlen(cp) + 1;
2533
2534     ioctlp->outDatap = cp;
2535
2536     lock_ReleaseMutex(&userp->mx);
2537
2538     return 0;
2539 }
2540
2541 long cm_IoctlGetToken(struct smb_ioctl *ioctlp, struct cm_user *userp)
2542 {
2543     char *cp;
2544     int temp;
2545     cm_cell_t *cellp;
2546     cm_ucell_t *ucellp;
2547     struct ClearToken ct;
2548     char *tp;
2549 #ifndef DJGPP
2550     afs_uuid_t uuid;
2551 #endif /* !DJGPP */
2552
2553     cm_SkipIoctlPath(ioctlp);
2554
2555     tp = ioctlp->inDatap;
2556
2557     cp = ioctlp->outDatap;
2558
2559     /* cell name is right here */
2560     cellp = cm_GetCell(tp, 0);
2561     if (!cellp)
2562         return CM_ERROR_NOSUCHCELL;
2563     tp += strlen(tp) + 1;
2564
2565 #ifndef DJGPP
2566     /* uuid */
2567     memcpy(&uuid, tp, sizeof(uuid));
2568 #endif /* !DJGPP */
2569
2570     lock_ObtainMutex(&userp->mx);
2571
2572     ucellp = cm_GetUCell(userp, cellp);
2573     if (!ucellp || !(ucellp->flags & CM_UCELLFLAG_RXKAD)) {
2574         lock_ReleaseMutex(&userp->mx);
2575         return CM_ERROR_NOMORETOKENS;
2576     }
2577
2578     /* ticket length */
2579     memcpy(cp, &ucellp->ticketLen, sizeof(ucellp->ticketLen));
2580     cp += sizeof(ucellp->ticketLen);
2581
2582     /* ticket */
2583     memcpy(cp, ucellp->ticketp, ucellp->ticketLen);
2584     cp += ucellp->ticketLen;
2585
2586     /* clear token size */
2587     temp = sizeof(ct);
2588     memcpy(cp, &temp, sizeof(temp));
2589     cp += sizeof(temp);
2590
2591     /* clear token */
2592     ct.AuthHandle = ucellp->kvno;
2593 #ifndef DJGPP
2594     /*
2595      * Don't give out a real session key here
2596      */
2597     /*
2598     memcpy(ct.HandShakeKey, &ucellp->sessionKey, sizeof(ct.HandShakeKey));
2599     */
2600     memset(ct.HandShakeKey, 0, sizeof(ct.HandShakeKey));
2601 #else
2602     memcpy(ct.HandShakeKey, &ucellp->sessionKey, sizeof(ct.HandShakeKey));
2603 #endif /* !DJGPP */
2604     ct.ViceId = 37;                     /* XXX */
2605     ct.BeginTimestamp = 0;              /* XXX */
2606     ct.EndTimestamp = ucellp->expirationTime;
2607     memcpy(cp, &ct, sizeof(ct));
2608     cp += sizeof(ct);
2609
2610     /* Primary flag (unused) */
2611     temp = 0;
2612     memcpy(cp, &temp, sizeof(temp));
2613     cp += sizeof(temp);
2614
2615     /* cell name */
2616     StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), ucellp->cellp->name);
2617     cp += strlen(cp) + 1;
2618
2619     /* user name */
2620     StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), ucellp->userName);
2621     cp += strlen(cp) + 1;
2622
2623     ioctlp->outDatap = cp;
2624
2625     lock_ReleaseMutex(&userp->mx);
2626
2627 #ifndef DJGPP
2628     cm_RegisterNewTokenEvent(uuid, ucellp->sessionKey.data);
2629 #endif /* !DJGPP */
2630
2631     return 0;
2632 }
2633
2634 long cm_IoctlDelToken(struct smb_ioctl *ioctlp, struct cm_user *userp)
2635 {
2636     char *cp;
2637     cm_cell_t *cellp;
2638     cm_ucell_t *ucellp;
2639
2640     cm_SkipIoctlPath(ioctlp);
2641
2642     cp = ioctlp->outDatap;
2643
2644     /* cell name is right here */
2645     cellp = cm_GetCell(ioctlp->inDatap, 0);
2646     if (!cellp)
2647         return CM_ERROR_NOSUCHCELL;
2648
2649     lock_ObtainMutex(&userp->mx);
2650
2651     ucellp = cm_GetUCell(userp, cellp);
2652     if (!ucellp) {
2653         lock_ReleaseMutex(&userp->mx);
2654         return CM_ERROR_NOMORETOKENS;
2655     }
2656
2657     osi_Log1(smb_logp,"cm_IoctlDelToken ucellp %lx", ucellp);
2658
2659     if (ucellp->ticketp) {
2660         free(ucellp->ticketp);
2661         ucellp->ticketp = NULL;
2662     }
2663     ucellp->ticketLen = 0;
2664     memset(ucellp->sessionKey.data, 0, 8);
2665     ucellp->kvno = 0;
2666     ucellp->expirationTime = 0;
2667     ucellp->userName[0] = '\0';
2668     ucellp->flags &= ~CM_UCELLFLAG_RXKAD;
2669     ucellp->gen++;
2670
2671     lock_ReleaseMutex(&userp->mx);
2672
2673     cm_ResetACLCache(userp);
2674
2675     return 0;
2676 }
2677
2678 long cm_IoctlDelAllToken(struct smb_ioctl *ioctlp, struct cm_user *userp)
2679 {
2680     cm_ucell_t *ucellp;
2681
2682     lock_ObtainMutex(&userp->mx);
2683
2684     for (ucellp = userp->cellInfop; ucellp; ucellp = ucellp->nextp) {
2685         osi_Log1(smb_logp,"cm_IoctlDelAllToken ucellp %lx", ucellp);
2686
2687         if (ucellp->ticketp) {
2688             free(ucellp->ticketp);
2689             ucellp->ticketp = NULL;
2690         }
2691         ucellp->ticketLen = 0;
2692         memset(ucellp->sessionKey.data, 0, 8);
2693         ucellp->kvno = 0;
2694         ucellp->expirationTime = 0;
2695         ucellp->userName[0] = '\0';
2696         ucellp->flags &= ~CM_UCELLFLAG_RXKAD;
2697         ucellp->gen++;
2698     }
2699
2700     lock_ReleaseMutex(&userp->mx);
2701
2702     cm_ResetACLCache(userp);
2703
2704     return 0;
2705 }
2706
2707 long cm_IoctlMakeSubmount(smb_ioctl_t *ioctlp, cm_user_t *userp)
2708 {
2709     char afspath[MAX_PATH];
2710     char *submountreqp;
2711     int nextAutoSubmount;
2712     HKEY hkSubmounts;
2713     DWORD dwType, dwSize;
2714     DWORD status;
2715     DWORD dwIndex;
2716     DWORD dwSubmounts;
2717
2718     cm_SkipIoctlPath(ioctlp);
2719
2720     /* Serialize this one, to prevent simultaneous mods
2721      * to afsdsbmt.ini
2722      */
2723     lock_ObtainMutex(&cm_Afsdsbmt_Lock);
2724
2725     /* Parse the input parameters--first the required afs path,
2726      * then the requested submount name (which may be "").
2727      */
2728     cm_NormalizeAfsPath (afspath, sizeof(afspath), ioctlp->inDatap);
2729     submountreqp = ioctlp->inDatap + (strlen(ioctlp->inDatap)+1);
2730
2731     /* If the caller supplied a suggested submount name, see if
2732      * that submount name is in use... if so, the submount's path
2733      * has to match our path.
2734      */
2735
2736     RegCreateKeyEx( HKEY_LOCAL_MACHINE,
2737                     AFSREG_CLT_OPENAFS_SUBKEY "\\Submounts",
2738                     0,
2739                     "AFS",
2740                     REG_OPTION_NON_VOLATILE,
2741                     KEY_READ|KEY_WRITE|KEY_QUERY_VALUE,
2742                     NULL,
2743                     &hkSubmounts,
2744                     NULL );
2745
2746     if (submountreqp && *submountreqp) {
2747         char submountPathNormalized[MAX_PATH];
2748         char submountPath[MAX_PATH];
2749
2750         dwSize = sizeof(submountPath);
2751         status = RegQueryValueEx( hkSubmounts, submountreqp, 0,
2752                                   &dwType, submountPath, &dwSize);
2753
2754         if (status != ERROR_SUCCESS) {
2755
2756             /* The suggested submount name isn't in use now--
2757              * so we can safely map the requested submount name
2758              * to the supplied path. Remember not to write the
2759              * leading "/afs" when writing out the submount.
2760              */
2761             RegSetValueEx( hkSubmounts, submountreqp, 0,
2762                            REG_EXPAND_SZ,
2763                            (strlen(&afspath[strlen(cm_mountRoot)])) ?
2764                            &afspath[strlen(cm_mountRoot)]:"/",
2765                            (strlen(&afspath[strlen(cm_mountRoot)])) ?
2766                            (DWORD)strlen(&afspath[strlen(cm_mountRoot)])+1:2);
2767
2768             RegCloseKey( hkSubmounts );
2769             StringCbCopyA(ioctlp->outDatap, SMB_IOCTL_MAXDATA - (ioctlp->outDatap - ioctlp->outAllocp), submountreqp);
2770             ioctlp->outDatap += strlen(ioctlp->outDatap) +1;
2771             lock_ReleaseMutex(&cm_Afsdsbmt_Lock);
2772             return 0;
2773         }
2774
2775         /* The suggested submount name is already in use--if the
2776          * supplied path matches the submount's path, we can still
2777          * use the suggested submount name.
2778          */
2779         cm_NormalizeAfsPath (submountPathNormalized, sizeof(submountPathNormalized), submountPath);
2780         if (!strcmp (submountPathNormalized, afspath)) {
2781             StringCbCopyA(ioctlp->outDatap, SMB_IOCTL_MAXDATA - (ioctlp->outDatap - ioctlp->outAllocp), submountreqp);
2782             ioctlp->outDatap += strlen(ioctlp->outDatap) +1;
2783             RegCloseKey( hkSubmounts );
2784             lock_ReleaseMutex(&cm_Afsdsbmt_Lock);
2785             return 0;
2786         }
2787     }
2788
2789     RegQueryInfoKey( hkSubmounts,
2790                      NULL,  /* lpClass */
2791                      NULL,  /* lpcClass */
2792                      NULL,  /* lpReserved */
2793                      NULL,  /* lpcSubKeys */
2794                      NULL,  /* lpcMaxSubKeyLen */
2795                      NULL,  /* lpcMaxClassLen */
2796                      &dwSubmounts, /* lpcValues */
2797                      NULL,  /* lpcMaxValueNameLen */
2798                      NULL,  /* lpcMaxValueLen */
2799                      NULL,  /* lpcbSecurityDescriptor */
2800                      NULL   /* lpftLastWriteTime */
2801                      );
2802
2803
2804     /* Having obtained a list of all available submounts, start
2805      * searching that list for a path which matches the requested
2806      * AFS path. We'll also keep track of the highest "auto15"/"auto47"
2807      * submount, in case we need to add a new one later.
2808      */
2809
2810     nextAutoSubmount = 1;
2811
2812     for ( dwIndex = 0; dwIndex < dwSubmounts; dwIndex ++ ) {
2813         char submountPathNormalized[MAX_PATH];
2814         char submountPath[MAX_PATH] = "";
2815         DWORD submountPathLen = sizeof(submountPath);
2816         char submountName[MAX_PATH];
2817         DWORD submountNameLen = sizeof(submountName);
2818
2819         dwType = 0;
2820         RegEnumValue( hkSubmounts, dwIndex, submountName, &submountNameLen, NULL,
2821                       &dwType, submountPath, &submountPathLen);
2822         if (dwType == REG_EXPAND_SZ) {
2823             char buf[MAX_PATH];
2824             StringCbCopyA(buf, MAX_PATH, submountPath);
2825             submountPathLen = ExpandEnvironmentStrings(buf, submountPath, MAX_PATH);
2826             if (submountPathLen > MAX_PATH)
2827                 continue;
2828         }
2829
2830         /* If this is an Auto### submount, remember its ### value */
2831         if ((!strnicmp (submountName, "auto", 4)) &&
2832              (isdigit (submountName[strlen("auto")]))) {
2833             int thisAutoSubmount;
2834             thisAutoSubmount = atoi (&submountName[strlen("auto")]);
2835             nextAutoSubmount = max (nextAutoSubmount,
2836                                      thisAutoSubmount+1);
2837         }
2838
2839         if ((submountPathLen == 0) ||
2840              (submountPathLen == sizeof(submountPath) - 1)) {
2841             continue;
2842         }
2843
2844         /* See if the path for this submount matches the path
2845          * that our caller specified. If so, we can return
2846          * this submount.
2847          */
2848         cm_NormalizeAfsPath (submountPathNormalized, sizeof(submountPathNormalized), submountPath);
2849         if (!strcmp (submountPathNormalized, afspath)) {
2850             StringCbCopyA(ioctlp->outDatap, SMB_IOCTL_MAXDATA - (ioctlp->outDatap - ioctlp->outAllocp), submountName);
2851             ioctlp->outDatap += strlen(ioctlp->outDatap) +1;
2852             RegCloseKey(hkSubmounts);
2853             lock_ReleaseMutex(&cm_Afsdsbmt_Lock);
2854             return 0;
2855
2856         }
2857     }
2858
2859     /* We've been through the entire list of existing submounts, and
2860      * didn't find any which matched the specified path. So, we'll
2861      * just have to add one. Remember not to write the leading "/afs"
2862      * when writing out the submount.
2863      */
2864
2865     StringCbPrintfA(ioctlp->outDatap, SMB_IOCTL_MAXDATA - (ioctlp->outDatap - ioctlp->outAllocp), "auto%ld", nextAutoSubmount);
2866
2867     RegSetValueEx( hkSubmounts,
2868                    ioctlp->outDatap,
2869                    0,
2870                    REG_EXPAND_SZ,
2871                    (strlen(&afspath[strlen(cm_mountRoot)])) ?
2872                    &afspath[strlen(cm_mountRoot)]:"/",
2873                    (strlen(&afspath[strlen(cm_mountRoot)])) ?
2874                    (DWORD)strlen(&afspath[strlen(cm_mountRoot)])+1:2);
2875
2876     ioctlp->outDatap += strlen(ioctlp->outDatap) +1;
2877     RegCloseKey(hkSubmounts);
2878     lock_ReleaseMutex(&cm_Afsdsbmt_Lock);
2879     return 0;
2880 }
2881
2882 long cm_IoctlGetRxkcrypt(smb_ioctl_t *ioctlp, cm_user_t *userp)
2883 {
2884     memcpy(ioctlp->outDatap, &cryptall, sizeof(cryptall));
2885     ioctlp->outDatap += sizeof(cryptall);
2886
2887     return 0;
2888 }
2889
2890 long cm_IoctlSetRxkcrypt(smb_ioctl_t *ioctlp, cm_user_t *userp)
2891 {
2892     afs_int32 c = cryptall;
2893
2894     cm_SkipIoctlPath(ioctlp);
2895
2896     memcpy(&cryptall, ioctlp->inDatap, sizeof(cryptall));
2897
2898     if (c != cryptall) {
2899         if (cryptall)
2900             LogEvent(EVENTLOG_INFORMATION_TYPE, MSG_CRYPT_ON);
2901         else
2902             LogEvent(EVENTLOG_INFORMATION_TYPE, MSG_CRYPT_OFF);
2903     }
2904     return 0;
2905 }
2906
2907 long cm_IoctlRxStatProcess(struct smb_ioctl *ioctlp, struct cm_user *userp)
2908 {
2909     afs_int32 flags;
2910     int code = 0;
2911
2912     cm_SkipIoctlPath(ioctlp);
2913
2914     memcpy((char *)&flags, ioctlp->inDatap, sizeof(afs_int32));
2915     if (!(flags & AFSCALL_RXSTATS_MASK) || (flags & ~AFSCALL_RXSTATS_MASK)) {
2916         return -1;
2917     }
2918     if (flags & AFSCALL_RXSTATS_ENABLE) {
2919         rx_enableProcessRPCStats();
2920     }
2921     if (flags & AFSCALL_RXSTATS_DISABLE) {
2922         rx_disableProcessRPCStats();
2923     }
2924     if (flags & AFSCALL_RXSTATS_CLEAR) {
2925         rx_clearProcessRPCStats(AFS_RX_STATS_CLEAR_ALL);
2926     }
2927     return 0;
2928 }
2929
2930 long cm_IoctlRxStatPeer(struct smb_ioctl *ioctlp, struct cm_user *userp)
2931 {
2932     afs_int32 flags;
2933     int code = 0;
2934
2935     cm_SkipIoctlPath(ioctlp);
2936
2937     memcpy((char *)&flags, ioctlp->inDatap, sizeof(afs_int32));
2938     if (!(flags & AFSCALL_RXSTATS_MASK) || (flags & ~AFSCALL_RXSTATS_MASK)) {
2939         return -1;
2940     }
2941     if (flags & AFSCALL_RXSTATS_ENABLE) {
2942         rx_enablePeerRPCStats();
2943     }
2944     if (flags & AFSCALL_RXSTATS_DISABLE) {
2945         rx_disablePeerRPCStats();
2946     }
2947     if (flags & AFSCALL_RXSTATS_CLEAR) {
2948         rx_clearPeerRPCStats(AFS_RX_STATS_CLEAR_ALL);
2949     }
2950     return 0;
2951 }
2952
2953 #ifdef DJGPP
2954 extern int afsd_shutdown(int);
2955 extern int afs_shutdown;
2956
2957 long cm_IoctlShutdown(smb_ioctl_t *ioctlp, cm_user_t *userp) {
2958   afs_shutdown = 1;   /* flag to shut down */
2959   return 0;
2960 }
2961 #endif /* DJGPP */
2962
2963 long cm_IoctlGetSMBName(smb_ioctl_t *ioctlp, cm_user_t *userp)
2964 {
2965   smb_user_t *uidp = ioctlp->uidp;
2966
2967   if (uidp && uidp->unp) {
2968     memcpy(ioctlp->outDatap, uidp->unp->name, strlen(uidp->unp->name));
2969     ioctlp->outDatap += strlen(uidp->unp->name);
2970   }
2971
2972   return 0;
2973 }
2974
2975 long cm_IoctlUUIDControl(struct smb_ioctl * ioctlp, struct cm_user *userp)
2976 {
2977     long cmd;
2978     afsUUID uuid;
2979
2980     memcpy(&cmd, ioctlp->inDatap, sizeof(long));
2981
2982     if (cmd) {             /* generate a new UUID */
2983         UuidCreate((UUID *) &uuid);
2984         cm_data.Uuid = uuid;
2985         cm_ForceNewConnectionsAllServers();
2986     }
2987
2988     memcpy(ioctlp->outDatap, &cm_data.Uuid, sizeof(cm_data.Uuid));
2989     ioctlp->outDatap += sizeof(cm_data.Uuid);
2990
2991     return 0;
2992 }
2993
2994 /*
2995  * functions to dump contents of various structures.
2996  * In debug build (linked with crt debug library) will dump allocated but not freed memory
2997  */
2998 extern int cm_DumpSCache(FILE *outputFile, char *cookie, int lock);
2999 extern int cm_DumpBufHashTable(FILE *outputFile, char *cookie, int lock);
3000 extern int smb_DumpVCP(FILE *outputFile, char *cookie, int lock);
3001
3002 long cm_IoctlMemoryDump(struct smb_ioctl *ioctlp, struct cm_user *userp)
3003 {
3004     long inValue = 0;
3005     HANDLE hLogFile;
3006     char logfileName[MAX_PATH+1];
3007     char *cookie;
3008     DWORD dwSize;
3009
3010 #ifdef _DEBUG
3011     static _CrtMemState memstate;
3012 #endif
3013
3014     cm_SkipIoctlPath(ioctlp);
3015     memcpy(&inValue, ioctlp->inDatap, sizeof(long));
3016
3017     dwSize = GetEnvironmentVariable("TEMP", logfileName, sizeof(logfileName));
3018     if ( dwSize == 0 || dwSize > sizeof(logfileName) )
3019     {
3020         GetWindowsDirectory(logfileName, sizeof(logfileName));
3021     }
3022     strncat(logfileName, "\\afsd_alloc.log", sizeof(logfileName));
3023
3024     hLogFile = CreateFile(logfileName, GENERIC_WRITE, FILE_SHARE_WRITE, NULL, OPEN_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL);
3025
3026     if (!hLogFile)
3027     {
3028       /* error */
3029       inValue = -1;
3030       memcpy(ioctlp->outDatap, &inValue, sizeof(long));
3031       ioctlp->outDatap += sizeof(long);
3032
3033       return 0;
3034     }
3035
3036     SetFilePointer(hLogFile, 0, NULL, FILE_END);
3037
3038     cookie = inValue ? "b" : "e";
3039
3040 #ifdef _DEBUG
3041
3042     if (inValue)
3043     {
3044       _CrtMemCheckpoint(&memstate);
3045     }
3046     else
3047     {
3048         _CrtSetReportMode(_CRT_WARN, _CRTDBG_MODE_FILE);
3049         _CrtSetReportFile(_CRT_WARN, hLogFile);
3050         _CrtMemDumpAllObjectsSince(&memstate);
3051     }
3052 #endif
3053
3054     /* dump all interesting data */
3055     cm_MemDumpDirStats(hLogFile, cookie, 1);
3056     cm_MemDumpBPlusStats(hLogFile, cookie, 1);
3057     cm_DumpCells(hLogFile, cookie, 1);
3058     cm_DumpVolumes(hLogFile, cookie, 1);
3059     cm_DumpSCache(hLogFile, cookie, 1);
3060     cm_DumpBufHashTable(hLogFile, cookie, 1);
3061     smb_DumpVCP(hLogFile, cookie, 1);
3062
3063     CloseHandle(hLogFile);
3064
3065     inValue = 0;        /* success */
3066     memcpy(ioctlp->outDatap, &inValue, sizeof(long));
3067     ioctlp->outDatap += sizeof(long);
3068
3069     return 0;
3070 }
3071
3072
3073 static long
3074 cm_CheckServersStatus(cm_serverRef_t *serversp)
3075 {
3076     long code = 0;
3077     cm_serverRef_t *tsrp;
3078     cm_server_t *tsp;
3079     int someBusy = 0, someOffline = 0, allOffline = 1, allBusy = 1, allDown = 1;
3080
3081     if (serversp == NULL) {
3082         osi_Log1(afsd_logp, "cm_CheckServersStatus returning 0x%x", CM_ERROR_ALLDOWN);
3083         return CM_ERROR_ALLDOWN;
3084     }
3085
3086     lock_ObtainRead(&cm_serverLock);
3087     for (tsrp = serversp; tsrp; tsrp=tsrp->next) {
3088         if (tsp = tsrp->server) {
3089             cm_GetServerNoLock(tsp);
3090             lock_ReleaseRead(&cm_serverLock);
3091             if (!(tsp->flags & CM_SERVERFLAG_DOWN)) {
3092                 allDown = 0;
3093                 if (tsrp->status == srv_busy) {
3094                     allOffline = 0;
3095                     someBusy = 1;
3096                 } else if (tsrp->status == srv_offline) {
3097                     allBusy = 0;
3098                     someOffline = 1;
3099                 } else {
3100                     allOffline = 0;
3101                     allBusy = 0;
3102                     cm_PutServer(tsp);
3103                     goto done;
3104                 }
3105             }
3106             lock_ObtainRead(&cm_serverLock);
3107             cm_PutServerNoLock(tsp);
3108         }
3109     }
3110     lock_ReleaseRead(&cm_serverLock);
3111
3112     if (allDown)
3113         code = CM_ERROR_ALLDOWN;
3114     else if (allBusy)
3115         code = CM_ERROR_ALLBUSY;
3116     else if (allOffline || (someBusy && someOffline))
3117         code = CM_ERROR_ALLOFFLINE;
3118
3119   done:
3120     osi_Log1(afsd_logp, "cm_CheckServersStatus returning 0x%x", code);
3121     return code;
3122 }
3123
3124
3125 long cm_IoctlPathAvailability(struct smb_ioctl *ioctlp, struct cm_user *userp)
3126 {
3127     long code;
3128     cm_scache_t *scp;
3129     cm_cell_t *cellp;
3130     cm_volume_t *tvp;
3131     cm_vol_state_t *statep;
3132     afs_uint32 volume;
3133     cm_req_t req;
3134     cm_ioctlQueryOptions_t *optionsp;
3135     afs_uint32 flags = 0;
3136
3137     cm_InitReq(&req);
3138
3139     optionsp = cm_IoctlGetQueryOptions(ioctlp, userp);
3140     if (optionsp && CM_IOCTL_QOPTS_HAVE_LITERAL(optionsp))
3141         flags |= (optionsp->literal ? CM_PARSE_FLAG_LITERAL : 0);
3142
3143     if (optionsp && CM_IOCTL_QOPTS_HAVE_FID(optionsp)) {
3144         cm_fid_t fid;
3145         cm_SkipIoctlPath(ioctlp);
3146         cm_SetFid(&fid, optionsp->fid.cell, optionsp->fid.volume,
3147                   optionsp->fid.vnode, optionsp->fid.unique);
3148         code = cm_GetSCache(&fid, &scp, userp, &req);
3149     } else {
3150         code = cm_ParseIoctlPath(ioctlp, userp, &req, &scp, flags);
3151     }
3152     if (code)
3153         return code;
3154
3155 #ifdef AFS_FREELANCE_CLIENT
3156     if ( scp->fid.cell == AFS_FAKE_ROOT_CELL_ID && scp->fid.volume == AFS_FAKE_ROOT_VOL_ID ) {
3157         code = 0;
3158         cm_ReleaseSCache(scp);
3159     } else
3160 #endif
3161     {
3162         volume = scp->fid.volume;
3163
3164         cellp = cm_FindCellByID(scp->fid.cell, 0);
3165
3166         cm_ReleaseSCache(scp);
3167
3168         if (!cellp)
3169             return CM_ERROR_NOSUCHCELL;
3170
3171         code = cm_FindVolumeByID(cellp, volume, userp, &req, CM_GETVOL_FLAG_CREATE, &tvp);
3172         if (code)
3173             return code;
3174
3175         statep = cm_VolumeStateByID(tvp, volume);
3176         switch (statep->state) {
3177         case vl_online:
3178         case vl_unknown:
3179             code = 0;
3180             break;
3181         case vl_busy:
3182             code = CM_ERROR_ALLBUSY;
3183             break;
3184         case vl_offline:
3185             code = CM_ERROR_ALLOFFLINE;
3186             break;
3187         case vl_alldown:
3188             code = CM_ERROR_ALLDOWN;
3189             break;
3190         }
3191         cm_PutVolume(tvp);
3192     }
3193     return code;
3194 }
3195
3196
3197 long cm_IoctlVolStatTest(struct smb_ioctl *ioctlp, struct cm_user *userp)
3198 {
3199     long code;
3200     cm_cell_t *cellp = NULL;
3201     cm_volume_t *volp;
3202     cm_vol_state_t *statep;
3203     struct VolStatTest * testp;
3204     cm_req_t req;
3205     afs_uint32 n;
3206     size_t len;
3207
3208     cm_InitReq(&req);
3209
3210     cm_SkipIoctlPath(ioctlp);   /* we don't care about the path */
3211     testp = (struct VolStatTest *)ioctlp->inDatap;
3212
3213 #ifdef AFS_FREELANCE_CLIENT
3214     if (testp->fid.cell == -1)
3215         return CM_ERROR_NOACCESS;
3216 #endif
3217
3218     if (testp->flags & VOLSTAT_TEST_CHECK_VOLUME) {
3219         cm_CheckOfflineVolumes();
3220         return 0;
3221     }
3222
3223     if (testp->flags & VOLSTAT_TEST_NETWORK_UP) {
3224         cm_VolStatus_Network_Started(cm_NetbiosName
3225 #ifdef _WIN64
3226                                   , cm_NetbiosName
3227 #endif
3228                                   );
3229         return 0;
3230     }
3231
3232     if (testp->flags & VOLSTAT_TEST_NETWORK_DOWN) {
3233         cm_VolStatus_Network_Stopped(cm_NetbiosName
3234 #ifdef _WIN64
3235                                   , cm_NetbiosName
3236 #endif
3237                                   );
3238         return 0;
3239     }
3240
3241     if (testp->cellname[0]) {
3242         n = atoi(testp->cellname);
3243         if (n)
3244             testp->fid.cell = n;
3245         else
3246             cellp = cm_GetCell(testp->cellname, 0);
3247     }
3248
3249     if (testp->fid.cell > 0) {
3250         cellp = cm_FindCellByID(testp->fid.cell, 0);
3251     }
3252
3253     if (!cellp)
3254         return CM_ERROR_NOSUCHCELL;
3255
3256     if (testp->volname[0]) {
3257         n = atoi(testp->volname);
3258         if (n)
3259             testp->fid.volume = n;
3260         else
3261             code = cm_FindVolumeByName(cellp, testp->volname, userp, &req, CM_GETVOL_FLAG_NO_LRU_UPDATE, &volp);
3262     }
3263
3264     if (testp->fid.volume > 0)
3265         code = cm_FindVolumeByID(cellp, testp->fid.volume, userp, &req, CM_GETVOL_FLAG_NO_LRU_UPDATE, &volp);
3266
3267     if (code)
3268         return code;
3269
3270     if (testp->fid.volume)
3271         statep = cm_VolumeStateByID(volp, testp->fid.volume);
3272     else
3273         statep = cm_VolumeStateByName(volp, testp->volname);
3274
3275     if (statep) {
3276         statep->state = testp->state;
3277         code = cm_VolStatus_Change_Notification(cellp->cellID, statep->ID, testp->state);
3278     }
3279
3280     cm_PutVolume(volp);
3281
3282     return code;
3283 }
3284
3285