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