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