a09e4c14476ceea011bf13b0780b58aadd0b6d71
[openafs.git] / src / WINNT / afsd / afsd_init.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/afs_args.h>
13
14 #include <windows.h>
15 #include <string.h>
16 #include <nb30.h>
17 #include <stdio.h>
18 #include <stdlib.h>
19 #include <winsock2.h>
20
21 #include <osi.h>
22 #include "afsd.h"
23 #include <rx\rx.h>
24 #include <rx\rx_null.h>
25
26 #include <WINNT/syscfg.h>
27
28 #include "smb.h"
29 #include "cm_rpc.h"
30
31 extern int RXAFSCB_ExecuteRequest();
32 extern int RXSTATS_ExecuteRequest();
33
34 extern afs_int32 cryptall;
35
36 char AFSConfigKeyName[] =
37         "SYSTEM\\CurrentControlSet\\Services\\TransarcAFSDaemon\\Parameters";
38
39 osi_log_t *afsd_logp;
40
41 char cm_rootVolumeName[64];
42 DWORD cm_rootVolumeNameLen;
43 cm_volume_t *cm_rootVolumep = NULL;
44 cm_cell_t *cm_rootCellp = NULL;
45 cm_fid_t cm_rootFid;
46 cm_scache_t *cm_rootSCachep;
47 char cm_mountRoot[1024];
48 DWORD cm_mountRootLen;
49 int cm_logChunkSize;
50 int cm_chunkSize;
51 #ifdef AFS_FREELANCE_CLIENT
52 char *cm_FakeRootDir;
53 #endif /* freelance */
54
55 int smb_UseV3;
56
57 int LANadapter;
58
59 int numBkgD;
60 int numSvThreads;
61
62 int traceOnPanic = 0;
63
64 int logReady = 0;
65
66 char cm_HostName[200];
67 long cm_HostAddr;
68
69 char cm_CachePath[200];
70 DWORD cm_CachePathLen;
71
72 BOOL isGateway = FALSE;
73
74 BOOL reportSessionStartups = FALSE;
75
76 cm_initparams_v1 cm_initParams;
77
78 /*
79  * AFSD Initialization Log
80  *
81  * This is distinct from the regular debug logging facility.
82  * Log items go directly to a file, not to an array in memory, so that even
83  * if AFSD crashes, the log can be inspected.
84  */
85
86 HANDLE afsi_file;
87
88 #ifdef AFS_AFSDB_ENV
89 int cm_dnsEnabled = 1;
90 #endif
91
92 /*#ifdef AFS_FREELANCE_CLIENT
93 extern int cm_freelanceEnabled;
94 #endif*/
95
96 void cm_InitFakeRootDir();
97
98 void
99 afsi_start()
100 {
101         char wd[100];
102         char t[100], u[100];
103         int zilch;
104         int code;
105
106         afsi_file = INVALID_HANDLE_VALUE;
107         code = GetWindowsDirectory(wd, sizeof(wd));
108         if (code == 0) return;
109         strcat(wd, "\\afsd_init.log");
110         GetTimeFormat(LOCALE_SYSTEM_DEFAULT, 0, NULL, NULL, t, sizeof(t));
111         afsi_file = CreateFile(wd, GENERIC_WRITE, FILE_SHARE_READ, NULL,
112                                 CREATE_ALWAYS, FILE_FLAG_WRITE_THROUGH, NULL);
113         GetTimeFormat(LOCALE_SYSTEM_DEFAULT, 0, NULL, NULL, u, sizeof(u));
114         strcat(t, ": Create log file\n");
115         strcat(u, ": Created log file\n");
116         WriteFile(afsi_file, t, strlen(t), &zilch, NULL);
117         WriteFile(afsi_file, u, strlen(u), &zilch, NULL);
118 }
119
120 void
121 afsi_log(char *pattern, ...)
122 {
123         char s[100], t[100], u[100];
124         int zilch;
125         va_list ap;
126         va_start(ap, pattern);
127
128         vsprintf(s, pattern, ap);
129         GetTimeFormat(LOCALE_SYSTEM_DEFAULT, 0, NULL, NULL, t, sizeof(t));
130         sprintf(u, "%s: %s\n", t, s);
131         if (afsi_file != INVALID_HANDLE_VALUE)
132                 WriteFile(afsi_file, u, strlen(u), &zilch, NULL);
133 }
134
135 /*
136  * Standard AFSD trace
137  */
138
139 void afsd_ForceTrace(BOOL flush)
140 {
141         HANDLE handle;
142         int len;
143         char buf[100];
144
145         if (!logReady) return;
146
147         len = GetTempPath(99, buf);
148         strcpy(&buf[len], "/afsd.log");
149         handle = CreateFile(buf, GENERIC_WRITE, FILE_SHARE_READ,
150                             NULL, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL);
151         if (handle == INVALID_HANDLE_VALUE) {
152                 logReady = 0;
153                 osi_panic("Cannot create log file", __FILE__, __LINE__);
154         }
155         osi_LogPrint(afsd_logp, handle);
156         if (flush)
157                 FlushFileBuffers(handle);
158         CloseHandle(handle);
159 }
160
161 /*
162  * AFSD Initialization
163  */
164
165 int afsd_InitCM(char **reasonP)
166 {
167         osi_uid_t debugID;
168         long cacheBlocks;
169         long cacheSize;
170         long logChunkSize;
171         long stats;
172         long traceBufSize;
173         long ltt, ltto;
174         char rootCellName[256];
175         struct rx_service *serverp;
176         static struct rx_securityClass *nullServerSecurityClassp;
177         struct hostent *thp;
178         char *msgBuf;
179         char buf[200];
180         HKEY parmKey;
181         DWORD dummyLen;
182         long code;
183         /*int freelanceEnabled;*/
184         WSADATA WSAjunk;
185
186         WSAStartup(0x0101, &WSAjunk);
187
188         /* setup osidebug server at RPC slot 1000 */
189         osi_LongToUID(1000, &debugID);
190         code = osi_InitDebug(&debugID);
191         afsi_log("osi_InitDebug code %d", code);
192 //      osi_LockTypeSetDefault("stat"); /* comment this out for speed *
193         if (code != 0) {
194                 *reasonP = "unknown error";
195                 return -1;
196         }
197
198         /* who are we ? */
199         gethostname(cm_HostName, sizeof(cm_HostName));
200         afsi_log("gethostname %s", cm_HostName);
201         thp = gethostbyname(cm_HostName);
202         memcpy(&cm_HostAddr, thp->h_addr_list[0], 4);
203
204         /* seed random number generator */
205         srand(ntohl(cm_HostAddr));
206
207         /* Look up configuration parameters in Registry */
208
209         code = RegOpenKeyEx(HKEY_LOCAL_MACHINE, AFSConfigKeyName,
210                                 0, KEY_QUERY_VALUE, &parmKey);
211         if (code != ERROR_SUCCESS) {
212                 FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM
213                                 | FORMAT_MESSAGE_ALLOCATE_BUFFER,
214                               NULL, code, 0, (LPTSTR)&msgBuf, 0, NULL);
215                 sprintf(buf,
216                         "Failure in configuration while opening Registry: %s",
217                         msgBuf);
218                 osi_panic(buf, __FILE__, __LINE__);
219         }
220
221         dummyLen = sizeof(LANadapter);
222         code = RegQueryValueEx(parmKey, "LANadapter", NULL, NULL,
223                                 (BYTE *) &LANadapter, &dummyLen);
224         if (code == ERROR_SUCCESS)
225                 afsi_log("LAN adapter number %d", LANadapter);
226         else {
227                 LANadapter = -1;
228                 afsi_log("Default LAN adapter number");
229         }
230
231         dummyLen = sizeof(cacheSize);
232         code = RegQueryValueEx(parmKey, "CacheSize", NULL, NULL,
233                                 (BYTE *) &cacheSize, &dummyLen);
234         if (code == ERROR_SUCCESS)
235                 afsi_log("Cache size %d", cacheSize);
236         else {
237                 cacheSize = CM_CONFIGDEFAULT_CACHESIZE;
238                 afsi_log("Default cache size %d", cacheSize);
239         }
240
241         dummyLen = sizeof(logChunkSize);
242         code = RegQueryValueEx(parmKey, "ChunkSize", NULL, NULL,
243                                 (BYTE *) &logChunkSize, &dummyLen);
244         if (code == ERROR_SUCCESS) {
245                 if (logChunkSize < 12 || logChunkSize > 30) {
246                         afsi_log("Invalid chunk size %d, using default",
247                                  logChunkSize);
248                         logChunkSize = CM_CONFIGDEFAULT_CHUNKSIZE;
249                 }
250                 afsi_log("Chunk size %d", logChunkSize);
251         } else {
252                 logChunkSize = CM_CONFIGDEFAULT_CHUNKSIZE;
253                 afsi_log("Default chunk size %d", logChunkSize);
254         }
255         cm_logChunkSize = logChunkSize;
256         cm_chunkSize = 1 << logChunkSize;
257
258         dummyLen = sizeof(numBkgD);
259         code = RegQueryValueEx(parmKey, "Daemons", NULL, NULL,
260                                 (BYTE *) &numBkgD, &dummyLen);
261         if (code == ERROR_SUCCESS)
262                 afsi_log("%d background daemons", numBkgD);
263         else {
264                 numBkgD = CM_CONFIGDEFAULT_DAEMONS;
265                 afsi_log("Defaulting to %d background daemons", numBkgD);
266         }
267
268         dummyLen = sizeof(numSvThreads);
269         code = RegQueryValueEx(parmKey, "ServerThreads", NULL, NULL,
270                                 (BYTE *) &numSvThreads, &dummyLen);
271         if (code == ERROR_SUCCESS)
272                 afsi_log("%d server threads", numSvThreads);
273         else {
274                 numSvThreads = CM_CONFIGDEFAULT_SVTHREADS;
275                 afsi_log("Defaulting to %d server threads", numSvThreads);
276         }
277
278         dummyLen = sizeof(stats);
279         code = RegQueryValueEx(parmKey, "Stats", NULL, NULL,
280                                 (BYTE *) &stats, &dummyLen);
281         if (code == ERROR_SUCCESS)
282                 afsi_log("Status cache size %d", stats);
283         else {
284                 stats = CM_CONFIGDEFAULT_STATS;
285                 afsi_log("Default status cache size %d", stats);
286         }
287
288         dummyLen = sizeof(ltt);
289         code = RegQueryValueEx(parmKey, "LogoffTokenTransfer", NULL, NULL,
290                                 (BYTE *) &ltt, &dummyLen);
291         if (code == ERROR_SUCCESS)
292                 afsi_log("Logoff token transfer %s",  (ltt ? "on" : "off"));
293         else {
294                 ltt = 1;
295                 afsi_log("Logoff token transfer on by default");
296         }
297         smb_LogoffTokenTransfer = ltt;
298
299         if (ltt) {
300                 dummyLen = sizeof(ltto);
301                 code = RegQueryValueEx(parmKey, "LogoffTokenTransferTimeout",
302                                         NULL, NULL, (BYTE *) &ltto, &dummyLen);
303                 if (code == ERROR_SUCCESS)
304                         afsi_log("Logoff token tranfer timeout %d seconds",
305                                  ltto);
306                 else {
307                         ltto = 10;
308                         afsi_log("Default logoff token transfer timeout 10 seconds");
309                 }
310         }
311         smb_LogoffTransferTimeout = ltto;
312
313         dummyLen = sizeof(cm_rootVolumeName);
314         code = RegQueryValueEx(parmKey, "RootVolume", NULL, NULL,
315                                 cm_rootVolumeName, &dummyLen);
316         if (code == ERROR_SUCCESS)
317                 afsi_log("Root volume %s", cm_rootVolumeName);
318         else {
319                 strcpy(cm_rootVolumeName, "root.afs");
320                 afsi_log("Default root volume name root.afs");
321         }
322
323         cm_mountRootLen = sizeof(cm_mountRoot);
324         code = RegQueryValueEx(parmKey, "Mountroot", NULL, NULL,
325                                 cm_mountRoot, &cm_mountRootLen);
326         if (code == ERROR_SUCCESS)
327                 afsi_log("Mount root %s", cm_mountRoot);
328         else {
329                 strcpy(cm_mountRoot, "/afs");
330                 cm_mountRootLen = 4;
331                 /* Don't log */
332         }
333
334         dummyLen = sizeof(cm_CachePath);
335         code = RegQueryValueEx(parmKey, "CachePath", NULL, NULL,
336                                 cm_CachePath, &dummyLen);
337         if (code == ERROR_SUCCESS)
338                 afsi_log("Cache path %s", cm_CachePath);
339         else {
340                 GetWindowsDirectory(cm_CachePath, sizeof(cm_CachePath));
341                 cm_CachePath[2] = 0;    /* get drive letter only */
342                 strcat(cm_CachePath, "\\AFSCache");
343                 afsi_log("Default cache path %s", cm_CachePath);
344         }
345
346         dummyLen = sizeof(traceOnPanic);
347         code = RegQueryValueEx(parmKey, "TrapOnPanic", NULL, NULL,
348                                 (BYTE *) &traceOnPanic, &dummyLen);
349         if (code == ERROR_SUCCESS)
350                 afsi_log("Set to %s on panic",
351                          traceOnPanic ? "trap" : "not trap");
352         else {
353                 traceOnPanic = 0;
354                 /* Don't log */
355         }
356
357         dummyLen = sizeof(isGateway);
358         code = RegQueryValueEx(parmKey, "IsGateway", NULL, NULL,
359                                 (BYTE *) &isGateway, &dummyLen);
360         if (code == ERROR_SUCCESS)
361                 afsi_log("Set for %s service",
362                          isGateway ? "gateway" : "stand-alone");
363         else {
364                 isGateway = 0;
365                 /* Don't log */
366         }
367
368         dummyLen = sizeof(reportSessionStartups);
369         code = RegQueryValueEx(parmKey, "ReportSessionStartups", NULL, NULL,
370                                 (BYTE *) &reportSessionStartups, &dummyLen);
371         if (code == ERROR_SUCCESS)
372                 afsi_log("Session startups %s be recorded in the Event Log",
373                          reportSessionStartups ? "will" : "will not");
374         else {
375                 reportSessionStartups = 0;
376                 /* Don't log */
377         }
378
379         dummyLen = sizeof(traceBufSize);
380         code = RegQueryValueEx(parmKey, "TraceBufferSize", NULL, NULL,
381                                 (BYTE *) &traceBufSize, &dummyLen);
382         if (code == ERROR_SUCCESS)
383                 afsi_log("Trace Buffer size %d", traceBufSize);
384         else {
385                 traceBufSize = CM_CONFIGDEFAULT_TRACEBUFSIZE;
386                 afsi_log("Default trace buffer size %d", traceBufSize);
387         }
388
389         dummyLen = sizeof(cm_sysName);
390         code = RegQueryValueEx(parmKey, "SysName", NULL, NULL,
391                                 cm_sysName, &dummyLen);
392         if (code == ERROR_SUCCESS)
393                 afsi_log("Sys name %s", cm_sysName);
394         else {
395                 strcat(cm_sysName, "i386_nt40");
396                 afsi_log("Default sys name %s", cm_sysName);
397         }
398
399         dummyLen = sizeof(cryptall);
400         code = RegQueryValueEx(parmKey, "SecurityLevel", NULL, NULL,
401                                 (BYTE *) &cryptall, &dummyLen);
402         if (code == ERROR_SUCCESS)
403                 afsi_log("SecurityLevel is %s", cryptall?"crypt":"clear");
404         else {
405                 cryptall = rxkad_clear;
406                 afsi_log("Default SecurityLevel is clear");
407         }
408
409 #ifdef AFS_AFSDB_ENV
410         dummyLen = sizeof(cm_dnsEnabled);
411         code = RegQueryValueEx(parmKey, "UseDNS", NULL, NULL,
412                                 (BYTE *) &cm_dnsEnabled, &dummyLen);
413         if (code == ERROR_SUCCESS) {
414                 afsi_log("DNS %s be used to find AFS cell servers",
415                          cm_dnsEnabled ? "will" : "will not");
416         }
417         else {
418           cm_dnsEnabled = 1;   /* default on */
419         }
420 #endif /* AFS_AFSDB_ENV */
421
422 #ifdef AFS_FREELANCE_CLIENT
423         dummyLen = sizeof(cm_freelanceEnabled);
424         code = RegQueryValueEx(parmKey, "FreelanceClient", NULL, NULL,
425                                 (BYTE *) &cm_freelanceEnabled, &dummyLen);
426         if (code == ERROR_SUCCESS) {
427                 afsi_log("Freelance client feature %s activated",
428                          cm_freelanceEnabled ? "is" : "is not");
429         }
430         else {
431           cm_freelanceEnabled = 0;  /* default off */
432         }
433 #endif /* AFS_FREELANCE_CLIENT */
434
435         RegCloseKey (parmKey);
436
437         /* setup early variables */
438         /* These both used to be configurable. */
439         smb_UseV3 = 1;
440         buf_bufferSize = CM_CONFIGDEFAULT_BLOCKSIZE;
441
442         /* turn from 1024 byte units into memory blocks */
443         cacheBlocks = (cacheSize * 1024) / buf_bufferSize;
444         
445         /* setup and enable debug log */
446         afsd_logp = osi_LogCreate("afsd", traceBufSize);
447         afsi_log("osi_LogCreate log addr %x", afsd_logp);
448         osi_LogEnable(afsd_logp);
449         logReady = 1;
450
451         /* get network related info */
452         cm_noIPAddr = CM_MAXINTERFACE_ADDR;
453         code = syscfg_GetIFInfo(&cm_noIPAddr,
454                                 cm_IPAddr, cm_SubnetMask,
455                                 cm_NetMtu, cm_NetFlags);
456
457         if ( (cm_noIPAddr <= 0) || (code <= 0 ) )
458             afsi_log("syscfg_GetIFInfo error code %d", code);
459         else
460             afsi_log("First Network address %x SubnetMask %x",
461                      cm_IPAddr[0], cm_SubnetMask[0]);
462
463         /*
464          * Save client configuration for GetCacheConfig requests
465          */
466         cm_initParams.nChunkFiles = 0;
467         cm_initParams.nStatCaches = stats;
468         cm_initParams.nDataCaches = 0;
469         cm_initParams.nVolumeCaches = 0;
470         cm_initParams.firstChunkSize = cm_chunkSize;
471         cm_initParams.otherChunkSize = cm_chunkSize;
472         cm_initParams.cacheSize = cacheSize;
473         cm_initParams.setTime = 0;
474         cm_initParams.memCache = 0;
475
476         /* initialize RX, and tell it to listen to port 7001, which is used for
477          * callback RPC messages.
478          */
479         code = rx_Init(htons(7001));
480         afsi_log("rx_Init code %x", code);
481         if (code != 0) {
482                 *reasonP = "afsd: failed to init rx client on port 7001";
483                 return -1;
484         }
485
486         /* Initialize the RPC server for session keys */
487         RpcInit();
488
489         /* create an unauthenticated service #1 for callbacks */
490         nullServerSecurityClassp = rxnull_NewServerSecurityObject();
491         serverp = rx_NewService(0, 1, "AFS", &nullServerSecurityClassp, 1,
492                 RXAFSCB_ExecuteRequest);
493         afsi_log("rx_NewService addr %x", serverp);
494         if (serverp == NULL) {
495                 *reasonP = "unknown error";
496                 return -1;
497         }
498
499         nullServerSecurityClassp = rxnull_NewServerSecurityObject();
500         serverp = rx_NewService(0, RX_STATS_SERVICE_ID, "rpcstats",
501                 &nullServerSecurityClassp, 1, RXSTATS_ExecuteRequest);
502         afsi_log("rx_NewService addr %x", serverp);
503         if (serverp == NULL) {
504                 *reasonP = "unknown error";
505                 return -1;
506         }
507         
508         /* start server threads, *not* donating this one to the pool */
509         rx_StartServer(0);
510         afsi_log("rx_StartServer");
511
512         /* init user daemon, and other packages */
513         cm_InitUser();
514
515         cm_InitACLCache(2*stats);
516
517         cm_InitConn();
518
519         cm_InitCell();
520         
521         cm_InitServer();
522         
523         cm_InitVolume();
524         
525         cm_InitIoctl();
526         
527         smb_InitIoctl();
528         
529         cm_InitCallback();
530         
531         cm_InitSCache(stats);
532         
533         code = cm_InitDCache(0, cacheBlocks);
534         afsi_log("cm_InitDCache code %x", code);
535         if (code != 0) {
536                 *reasonP = "error initializing cache";
537                 return -1;
538         }
539
540 #ifdef AFS_AFSDB_ENV
541         if (cm_InitDNS(cm_dnsEnabled) == -1)
542           cm_dnsEnabled = 0;  /* init failed, so deactivate */
543         afsi_log("cm_InitDNS %d", cm_dnsEnabled);
544 #endif
545
546         code = cm_GetRootCellName(rootCellName);
547         afsi_log("cm_GetRootCellName code %d rcn %s", code,
548                  (code ? "<none>" : rootCellName));
549         if (code != 0 && !cm_freelanceEnabled) {
550             *reasonP = "can't find root cell name in afsd.ini";
551             return -1;
552         }
553         else if (cm_freelanceEnabled)
554           cm_rootCellp = NULL;
555
556         if (code == 0 && !cm_freelanceEnabled) {
557           cm_rootCellp = cm_GetCell(rootCellName, CM_FLAG_CREATE);
558           afsi_log("cm_GetCell addr %x", cm_rootCellp);
559           if (cm_rootCellp == NULL) {
560             *reasonP = "can't find root cell in afsdcell.ini";
561             return -1;
562           }
563         }
564
565 #ifdef AFS_FREELANCE_CLIENT
566         if (cm_freelanceEnabled)
567           cm_InitFreelance();
568 #endif
569
570         return 0;
571 }
572
573 int afsd_InitDaemons(char **reasonP)
574 {
575         long code;
576         cm_req_t req;
577
578         cm_InitReq(&req);
579
580         /* this should really be in an init daemon from here on down */
581
582         if (!cm_freelanceEnabled) {
583           code = cm_GetVolumeByName(cm_rootCellp, cm_rootVolumeName, cm_rootUserp,
584                                     &req, CM_FLAG_CREATE, &cm_rootVolumep);
585           afsi_log("cm_GetVolumeByName code %x root vol %x", code,
586                    (code ? 0xffffffff : cm_rootVolumep));
587           if (code != 0) {
588             *reasonP = "can't find root volume in root cell";
589             return -1;
590           }
591         }
592
593         /* compute the root fid */
594         if (!cm_freelanceEnabled) {
595           cm_rootFid.cell = cm_rootCellp->cellID;
596           cm_rootFid.volume = cm_GetROVolumeID(cm_rootVolumep);
597           cm_rootFid.vnode = 1;
598           cm_rootFid.unique = 1;
599         }
600         else
601           cm_FakeRootFid(&cm_rootFid);
602         
603         code = cm_GetSCache(&cm_rootFid, &cm_rootSCachep, cm_rootUserp, &req);
604         afsi_log("cm_GetSCache code %x scache %x", code,
605                  (code ? 0xffffffff : cm_rootSCachep));
606         if (code != 0) {
607                 *reasonP = "unknown error";
608                 return -1;
609         }
610
611         cm_InitDaemon(numBkgD);
612         afsi_log("cm_InitDaemon");
613
614         return 0;
615 }
616
617 int afsd_InitSMB(char **reasonP, void *aMBfunc)
618 {
619         char hostName[200];
620         char *ctemp;
621
622         /* Do this last so that we don't handle requests before init is done.
623          * Here we initialize the SMB listener.
624          */
625         strcpy(hostName, cm_HostName);
626         ctemp = strchr(hostName, '.');  /* turn ntdfs.* into ntdfs */
627         if (ctemp) *ctemp = 0;
628         hostName[11] = 0;       /* ensure that even after adding the -A, we
629                                  * leave one byte free for the netbios server
630                                  * type.
631                                  */
632         strcat(hostName, "-AFS");
633         _strupr(hostName);
634         smb_Init(afsd_logp, hostName, smb_UseV3, LANadapter, numSvThreads,
635                  aMBfunc);
636         afsi_log("smb_Init");
637
638         return 0;
639 }
640