src/WINNT/afsd/cm_cell.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
  13 #ifndef DJGPP
  14 #include <windows.h>
  15 #include <nb30.h>
  16 #include <winsock2.h>
  17 #endif /* !DJGPP */
  18 #include <stdlib.h>
  19 #include <stdio.h>
  20 #include <malloc.h>
  21 #include <osi.h>
  22 #include <string.h>
  23
  24 #include "afsd.h"
  25
  26 osi_rwlock_t cm_cellLock;
  27
  28 cm_cell_t *cm_allCellsp;
  29
  30 /* function called as callback proc from cm_SearchCellFile.  Return 0 to
  31  * continue processing.
  32  */
  33 long cm_AddCellProc(void *rockp, struct sockaddr_in *addrp, char *namep)
  34 {
  35         cm_server_t *tsp;
  36         cm_serverRef_t *tsrp;
  37     cm_cell_t *cellp;
  38
  39         cellp = rockp;
  40
  41         /* if this server was previously created by fs setserverprefs */
  42         if ( tsp = cm_FindServer(addrp, CM_SERVER_VLDB))
  43         {
  44                 if ( !tsp->cellp )
  45                         tsp->cellp = cellp;
  46         }
  47         else
  48                 tsp = cm_NewServer(addrp, CM_SERVER_VLDB, cellp);
  49
  50         /* Insert the vlserver into a sorted list, sorted by server rank */
  51         tsrp = cm_NewServerRef(tsp);
  52         cm_InsertServerList(&cellp->vlServersp, tsrp);
  53
  54         return 0;
  55 }
  56
  57 /* load up a cell structure from the cell database, afsdcell.ini */
  58 cm_cell_t *cm_GetCell(char *namep, long flags)
  59 {
  60   return cm_GetCell_Gen(namep, NULL, flags);
  61 }
  62
  63 cm_cell_t *cm_GetCell_Gen(char *namep, char *newnamep, long flags)
  64 {
  65         cm_cell_t *cp;
  66     long code;
  67     static cellCounter = 1;             /* locked by cm_cellLock */
  68         int ttl;
  69         char fullname[200]="";
  70
  71         if (!strcmp(namep,SMB_IOCTL_FILENAME_NOSLASH))
  72                 return NULL;
  73
  74         lock_ObtainWrite(&cm_cellLock);
  75         for (cp = cm_allCellsp; cp; cp=cp->nextp) {
  76                 if (strcmp(namep, cp->namep) == 0) {
  77             strcpy(fullname, cp->namep);
  78             break;
  79                 }
  80     }
  81
  82         if ((!cp && (flags & CM_FLAG_CREATE))
  83 #ifdef AFS_AFSDB_ENV
  84          /* if it's from DNS, see if it has expired */
  85          || (cp && (cp->flags & CM_CELLFLAG_DNS)
  86          && ((cp->flags & CM_CELLFLAG_VLSERVER_INVALID) || (time(0) > cp->timeout)))
  87 #endif
  88           ) {
  89         int dns_expired = 0;
  90                 if (!cp) {
  91             cp = malloc(sizeof(cm_cell_t));
  92             memset(cp, 0, sizeof(cm_cell_t));
  93         }
  94         else {
  95             dns_expired = 1;
  96             /* must empty cp->vlServersp */
  97             cm_FreeServerList(&cp->vlServersp);
  98             cp->vlServersp = NULL;
  99         }
 100
 101         code = cm_SearchCellFile(namep, fullname, cm_AddCellProc, cp);
 102                 if (code) {
 103             afsi_log("in cm_GetCell_gen cm_SearchCellFile(%s) returns code= %d fullname= %s",
 104                       namep, code, fullname);
 105
 106 #ifdef AFS_AFSDB_ENV
 107             if (cm_dnsEnabled /*&& cm_DomainValid(namep)*/) {
 108                 code = cm_SearchCellByDNS(namep, fullname, &ttl, cm_AddCellProc, cp);
 109                 if ( code ) {
 110                     afsi_log("in cm_GetCell_gen cm_SearchCellByDNS(%s) returns code= %d fullname= %s",
 111                              namep, code, fullname);
 112                     if (dns_expired) {
 113                         cp->flags |= CM_CELLFLAG_VLSERVER_INVALID;
 114                         cp = NULL;  /* set cp to NULL to indicate error */
 115                         goto done;
 116                     }
 117                 }
 118                 else {   /* got cell from DNS */
 119                     cp->flags |= CM_CELLFLAG_DNS;
 120                     cp->flags &= ~CM_CELLFLAG_VLSERVER_INVALID;
 121                     cp->timeout = time(0) + ttl;
 122                 }
 123             }
 124 #endif
 125             if (cp && code) {     /* free newly allocated memory */
 126                 free(cp);
 127                 cp = NULL;
 128                 goto done;
 129             }
 130                 }
 131
 132                 /* randomise among those vlservers having the same rank*/
 133         cm_RandomizeServer(&cp->vlServersp);
 134
 135 #ifdef AFS_AFSDB_ENV
 136         if (dns_expired) {
 137             /* we want to preserve the full name and mutex.
 138              * also, cp is already in the cm_allCellsp list
 139              */
 140             goto done;
 141         }
 142 #endif /* AFS_AFSDB_ENV */
 143
 144         /* otherwise we found the cell, and so we're nearly done */
 145         lock_InitializeMutex(&cp->mx, "cm_cell_t mutex");
 146
 147                 /* copy in name */
 148         cp->namep = malloc(strlen(fullname)+1);
 149         strcpy(cp->namep, fullname);
 150
 151                 /* thread on global list */
 152         cp->nextp = cm_allCellsp;
 153         cm_allCellsp = cp;
 154
 155         cp->cellID = cellCounter++;
 156     }
 157
 158   done:
 159     /* fullname is not valid if cp == NULL */
 160         if (cp && newnamep)
 161         strcpy(newnamep, fullname);
 162         lock_ReleaseWrite(&cm_cellLock);
 163     return cp;
 164 }
 165
 166 cm_cell_t *cm_FindCellByID(long cellID)
 167 {
 168         cm_cell_t *cp;
 169         int ttl;
 170     int code;
 171
 172         lock_ObtainWrite(&cm_cellLock);
 173         for(cp = cm_allCellsp; cp; cp=cp->nextp) {
 174                 if (cellID == cp->cellID)
 175             break;
 176     }
 177
 178 #ifdef AFS_AFSDB_ENV
 179         /* if it's from DNS, see if it has expired */
 180         if (cp && cm_dnsEnabled && (cp->flags & CM_CELLFLAG_DNS) &&
 181         ((cp->flags & CM_CELLFLAG_VLSERVER_INVALID) || (time(0) > cp->timeout))) {
 182         /* must empty cp->vlServersp */
 183         cm_FreeServerList(&cp->vlServersp);
 184         cp->vlServersp = NULL;
 185
 186         code = cm_SearchCellByDNS(cp->namep, NULL, &ttl, cm_AddCellProc, cp);
 187         if (code == 0) {   /* got cell from DNS */
 188             cp->flags |= CM_CELLFLAG_DNS;
 189             cp->flags &= ~CM_CELLFLAG_VLSERVER_INVALID;
 190 #ifdef DEBUG
 191             fprintf(stderr, "cell %s: ttl=%d\n", cp->namep, ttl);
 192 #endif
 193             cp->timeout = time(0) + ttl;
 194         } else {
 195             cp->flags |= CM_CELLFLAG_VLSERVER_INVALID;
 196             cp = NULL;      /* return NULL to indicate failure */
 197         }
 198         /* if we fail to find it this time, we'll just do nothing and leave the
 199          * current entry alone
 200          */
 201         }
 202 #endif /* AFS_AFSDB_ENV */
 203
 204         lock_ReleaseWrite(&cm_cellLock);
 205     return cp;
 206 }
 207
 208 void cm_InitCell(void)
 209 {
 210         static osi_once_t once;
 211
 212     if (osi_Once(&once)) {
 213                 lock_InitializeRWLock(&cm_cellLock, "cell global lock");
 214         cm_allCellsp = NULL;
 215                 osi_EndOnce(&once);
 216     }
 217 }
 218 void cm_ChangeRankCellVLServer(cm_server_t *tsp)
 219 {
 220         cm_cell_t *cp;
 221         int code;
 222
 223         cp = tsp->cellp;        /* cell that this vlserver belongs to */
 224         osi_assert(cp);
 225
 226         lock_ObtainMutex(&cp->mx);
 227         code = cm_ChangeRankServer(&cp->vlServersp, tsp);
 228
 229         if ( !code )            /* if the server list was rearranged */
 230             cm_RandomizeServer(&cp->vlServersp);
 231
 232         lock_ReleaseMutex(&cp->mx);
 233 }
 234