2 * Copyright 2000, International Business Machines Corporation and others.
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
10 #include <afsconfig.h>
11 #include <afs/param.h>
25 #define SECURITY_WIN32
33 #include <cm_server.h>
37 #include <cm_scache.h>
44 #include <pioctl_nt.h>
45 #include <WINNT/afsreg.h>
46 #include <lanahelper.h>
48 #include <loadfuncs-krb5.h>
51 static char AFSConfigKeyName[] = AFSREG_CLT_SVC_PARAM_SUBKEY;
53 static const char utf8_prefix[] = UTF8_PREFIX;
54 static const int utf8_prefix_size = sizeof(utf8_prefix) - sizeof(char);
56 #define FS_IOCTLREQUEST_MAXSIZE 8192
57 /* big structure for representing and storing an IOCTL request */
58 typedef struct fs_ioctlRequest {
59 char *mp; /* marshalling/unmarshalling ptr */
60 long nbytes; /* bytes received (when unmarshalling) */
61 char data[FS_IOCTLREQUEST_MAXSIZE]; /* data we're marshalling */
65 CMtoUNIXerror(int cm_code)
68 case CM_ERROR_TIMEDOUT:
70 case CM_ERROR_NOACCESS:
72 case CM_ERROR_NOSUCHFILE:
73 case CM_ERROR_NOSUCHPATH:
74 case CM_ERROR_BPLUS_NOMATCH:
81 case CM_ERROR_INEXACT_MATCH:
83 case CM_ERROR_CROSSDEVLINK:
89 case CM_ERROR_READONLY:
91 case CM_ERROR_WOULDBLOCK:
93 case CM_ERROR_NOSUCHCELL:
94 return ESRCH; /* hack */
95 case CM_ERROR_NOSUCHVOLUME:
96 return EPIPE; /* hack */
97 case CM_ERROR_NOMORETOKENS:
98 return EDOM; /* hack */
99 case CM_ERROR_TOOMANYBUFS:
100 return EFBIG; /* hack */
101 case CM_ERROR_ALLBUSY:
103 case CM_ERROR_ALLDOWN:
104 return ENOSYS; /* hack */
105 case CM_ERROR_ALLOFFLINE:
106 return ENXIO; /* hack */
108 if (cm_code > 0 && cm_code < EILSEQ)
116 InitFSRequest(fs_ioctlRequest_t * rp)
126 static BOOL debug = 0;
131 if (RegOpenKey (HKEY_LOCAL_MACHINE,
132 TEXT("Software\\OpenAFS\\Client"), &hk) == 0)
134 DWORD dwSize = sizeof(BOOL);
135 DWORD dwType = REG_DWORD;
136 RegQueryValueEx (hk, TEXT("IoctlDebug"), NULL, &dwType, (PBYTE)&debug, &dwSize);
147 DisableServiceManagerCheck(void)
150 static BOOL smcheck = 0;
155 if (RegOpenKey (HKEY_LOCAL_MACHINE,
156 TEXT("Software\\OpenAFS\\Client"), &hk) == 0)
158 DWORD dwSize = sizeof(BOOL);
159 DWORD dwType = REG_DWORD;
160 RegQueryValueEx (hk, TEXT("DisableIoctlSMCheck"), NULL, &dwType, (PBYTE)&smcheck, &dwSize);
172 LPSTR lpszMachineName,
173 LPSTR lpszServiceName,
174 DWORD *lpdwCurrentState)
177 SC_HANDLE schSCManager = NULL;
178 SC_HANDLE schService = NULL;
179 DWORD fdwDesiredAccess = 0;
180 SERVICE_STATUS ssServiceStatus = {0};
183 *lpdwCurrentState = 0;
185 fdwDesiredAccess = GENERIC_READ;
187 schSCManager = OpenSCManager(lpszMachineName,
191 if(schSCManager == NULL)
197 schService = OpenService(schSCManager,
201 if(schService == NULL)
207 fRet = QueryServiceStatus(schService,
216 *lpdwCurrentState = ssServiceStatus.dwCurrentState;
220 CloseServiceHandle(schService);
221 CloseServiceHandle(schSCManager);
227 DECL_FUNC_PTR(krb5_cc_default_name);
228 DECL_FUNC_PTR(krb5_cc_set_default_name);
229 DECL_FUNC_PTR(krb5_get_default_config_files);
230 DECL_FUNC_PTR(krb5_free_config_files);
231 DECL_FUNC_PTR(krb5_free_context);
232 DECL_FUNC_PTR(krb5_get_default_realm);
233 DECL_FUNC_PTR(krb5_free_default_realm);
234 DECL_FUNC_PTR(krb5_init_context);
235 DECL_FUNC_PTR(krb5_cc_default);
236 DECL_FUNC_PTR(krb5_parse_name);
237 DECL_FUNC_PTR(krb5_free_principal);
238 DECL_FUNC_PTR(krb5_cc_close);
239 DECL_FUNC_PTR(krb5_cc_get_principal);
240 DECL_FUNC_PTR(krb5_build_principal);
241 DECL_FUNC_PTR(krb5_c_random_make_octets);
242 DECL_FUNC_PTR(krb5_get_init_creds_password);
243 DECL_FUNC_PTR(krb5_free_cred_contents);
244 DECL_FUNC_PTR(krb5_cc_resolve);
245 DECL_FUNC_PTR(krb5_unparse_name);
246 DECL_FUNC_PTR(krb5_free_unparsed_name);
248 FUNC_INFO krb5_fi[] = {
249 MAKE_FUNC_INFO(krb5_cc_default_name),
250 MAKE_FUNC_INFO(krb5_cc_set_default_name),
251 MAKE_FUNC_INFO(krb5_get_default_config_files),
252 MAKE_FUNC_INFO(krb5_free_config_files),
253 MAKE_FUNC_INFO(krb5_free_context),
254 MAKE_FUNC_INFO(krb5_get_default_realm),
255 MAKE_FUNC_INFO(krb5_free_default_realm),
256 MAKE_FUNC_INFO(krb5_init_context),
257 MAKE_FUNC_INFO(krb5_cc_default),
258 MAKE_FUNC_INFO(krb5_parse_name),
259 MAKE_FUNC_INFO(krb5_free_principal),
260 MAKE_FUNC_INFO(krb5_cc_close),
261 MAKE_FUNC_INFO(krb5_cc_get_principal),
262 MAKE_FUNC_INFO(krb5_build_principal),
263 MAKE_FUNC_INFO(krb5_c_random_make_octets),
264 MAKE_FUNC_INFO(krb5_get_init_creds_password),
265 MAKE_FUNC_INFO(krb5_free_cred_contents),
266 MAKE_FUNC_INFO(krb5_cc_resolve),
267 MAKE_FUNC_INFO(krb5_unparse_name),
268 MAKE_FUNC_INFO(krb5_free_unparsed_name),
274 const char* dll_name,
276 HINSTANCE* ph, // [out, optional] - DLL handle
277 int* pindex, // [out, optional] - index of last func loaded (-1 if none)
278 int cleanup, // cleanup function pointers and unload on error
279 int go_on, // continue loading even if some functions cannot be loaded
280 int silent // do not pop-up a system dialog if DLL cannot be loaded
289 if (pindex) *pindex = -1;
291 for (n = 0; fi[n].func_ptr_var; n++)
292 *(fi[n].func_ptr_var) = 0;
295 em = SetErrorMode(SEM_FAILCRITICALERRORS);
296 h = LoadLibrary(dll_name);
304 for (i = 0; (go_on || !error) && (i < n); i++)
306 void* p = (void*)GetProcAddress(h, fi[i].func_name);
312 *(fi[i].func_ptr_var) = p;
315 if (pindex) *pindex = last_i;
316 if (error && cleanup && !go_on) {
317 for (i = 0; i < n; i++) {
318 *(fi[i].func_ptr_var) = 0;
327 #if defined(_IA64_) || defined(_AMD64_)
328 #define KERB5DLL "krb5_64.dll"
330 #define KERB5DLL "krb5_32.dll"
335 static HINSTANCE hKrb5DLL = 0;
340 hKrb5DLL = LoadLibrary(KERB5DLL);
342 if (!LoadFuncs(KERB5DLL, krb5_fi, 0, 0, 1, 0, 0))
344 FreeLibrary(hKrb5DLL);
354 GetLSAPrincipalName(char * szUser, DWORD *dwSize)
356 krb5_context ctx = 0;
357 krb5_error_code code;
358 krb5_ccache mslsa_ccache=0;
359 krb5_principal princ = 0;
363 if (!IsKrb5Available())
366 if (code = pkrb5_init_context(&ctx))
369 if (code = pkrb5_cc_resolve(ctx, "MSLSA:", &mslsa_ccache))
372 if (code = pkrb5_cc_get_principal(ctx, mslsa_ccache, &princ))
375 if (code = pkrb5_unparse_name(ctx, princ, &pname))
378 if ( strlen(pname) < *dwSize ) {
379 strncpy(szUser, pname, *dwSize);
380 szUser[*dwSize-1] = '\0';
383 *dwSize = (DWORD)strlen(pname);
387 pkrb5_free_unparsed_name(ctx, pname);
390 pkrb5_free_principal(ctx, princ);
393 pkrb5_cc_close(ctx, mslsa_ccache);
396 pkrb5_free_context(ctx);
401 DriveIsMappedToAFS(char *drivestr, char *NetbiosName)
403 DWORD dwResult, dwResultEnum;
405 DWORD cbBuffer = 16384; // 16K is a good size
406 DWORD cEntries = -1; // enumerate all possible entries
407 LPNETRESOURCE lpnrLocal; // pointer to enumerated structures
412 // Call the WNetOpenEnum function to begin the enumeration.
414 dwResult = WNetOpenEnum(RESOURCE_CONNECTED,
417 NULL, // NULL first time the function is called
418 &hEnum); // handle to the resource
420 if (dwResult != NO_ERROR)
424 // Call the GlobalAlloc function to allocate resources.
426 lpnrLocal = (LPNETRESOURCE) GlobalAlloc(GPTR, cbBuffer);
427 if (lpnrLocal == NULL)
432 // Initialize the buffer.
434 ZeroMemory(lpnrLocal, cbBuffer);
436 // Call the WNetEnumResource function to continue
440 dwResultEnum = WNetEnumResource(hEnum, // resource handle
441 &cEntries, // defined locally as -1
442 lpnrLocal, // LPNETRESOURCE
443 &cbBuffer); // buffer size
445 // If the call succeeds, loop through the structures.
447 if (dwResultEnum == NO_ERROR) {
448 for (i = 0; i < cEntries; i++) {
449 if (lpnrLocal[i].lpLocalName &&
450 toupper(lpnrLocal[i].lpLocalName[0]) == toupper(drivestr[0])) {
452 // Skip the two backslashes at the start of the UNC device name
454 if ( _strnicmp( &(lpnrLocal[i].lpRemoteName[2]), NetbiosName, strlen(NetbiosName)) == 0 )
464 else if (dwResultEnum != ERROR_NO_MORE_ITEMS)
467 while (dwResultEnum != ERROR_NO_MORE_ITEMS);
470 // Call the GlobalFree function to free the memory.
472 GlobalFree((HGLOBAL) lpnrLocal);
474 // Call WNetCloseEnum to end the enumeration.
476 dwResult = WNetCloseEnum(hEnum);
482 GetIoctlHandle(char *fileNamep, HANDLE * handlep)
485 char netbiosName[MAX_NB_NAME_LENGTH];
486 DWORD CurrentState = 0;
487 char HostName[64] = "";
488 char tbuffer[MAX_PATH]="";
491 char szUser[128] = "";
492 char szClient[MAX_PATH] = "";
493 char szPath[MAX_PATH] = "";
496 DWORD ioctlDebug = IoctlDebug();
498 DWORD dwSize = sizeof(szUser);
501 memset(HostName, '\0', sizeof(HostName));
502 gethostname(HostName, sizeof(HostName));
503 if (!DisableServiceManagerCheck() &&
504 GetServiceStatus(HostName, TEXT("TransarcAFSDaemon"), &CurrentState) == NOERROR &&
505 CurrentState != SERVICE_RUNNING)
508 // Populate the Netbios Name
509 lana_GetNetbiosName(netbiosName,LANA_NETBIOS_NAME_FULL);
512 drivep = strchr(fileNamep, ':');
513 if (drivep && (drivep - fileNamep) >= 1) {
515 tbuffer[0] = *(drivep - 1);
520 driveType = GetDriveType(tbuffer);
524 if (DriveIsMappedToAFS(tbuffer, netbiosName))
525 strcpy(&tbuffer[2], SMB_IOCTL_FILENAME);
532 } else if (fileNamep[0] == fileNamep[1] &&
533 (fileNamep[0] == '\\' || fileNamep[0] == '/'))
535 int count = 0, i = 0;
537 while (count < 4 && fileNamep[i]) {
538 tbuffer[i] = fileNamep[i];
539 if ( tbuffer[i] == '\\' ||
544 if (fileNamep[i] == 0)
547 strcat(tbuffer, SMB_IOCTL_FILENAME);
549 char curdir[MAX_PATH]="";
551 GetCurrentDirectory(sizeof(curdir), curdir);
552 if ( curdir[1] == ':' ) {
553 tbuffer[0] = curdir[0];
555 strcpy(tbuffer + 2, SMB_IOCTL_FILENAME);
556 } else if (curdir[0] == curdir[1] &&
557 (curdir[0] == '\\' || curdir[0] == '/'))
559 int count = 0, i = 0;
561 while (count < 4 && curdir[i]) {
562 tbuffer[i] = curdir[i];
563 if ( tbuffer[i] == '\\' ||
571 strcat(tbuffer, SMB_IOCTL_FILENAME_NOSLASH);
576 /* No file name starting with drive colon specified, use UNC name */
577 sprintf(tbuffer,"\\\\%s\\all%s",netbiosName,SMB_IOCTL_FILENAME);
581 /* now open the file */
582 fh = CreateFile(tbuffer, GENERIC_READ | GENERIC_WRITE,
583 FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, OPEN_EXISTING,
584 FILE_FLAG_WRITE_THROUGH, NULL);
588 if (fh == INVALID_HANDLE_VALUE) {
591 gle = GetLastError();
592 if (gle && ioctlDebug ) {
596 if ( FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM,
599 MAKELANGID(LANG_ENGLISH,SUBLANG_ENGLISH_US),
605 fprintf(stderr,"pioctl CreateFile(%s) failed: 0x%X\r\n\t[%s]\r\n",
611 lana_GetNetbiosName(szClient, LANA_NETBIOS_NAME_FULL);
613 if (RegOpenKey (HKEY_CURRENT_USER,
614 TEXT("Software\\Microsoft\\Windows\\CurrentVersion\\Explorer"), &hk) == 0)
616 DWORD dwType = REG_SZ;
617 RegQueryValueEx (hk, TEXT("Logon User Name"), NULL, &dwType, (PBYTE)szUser, &dwSize);
624 fprintf(stderr, "pioctl Explorer logon user: [%s]\r\n",szUser);
627 sprintf(szPath, "\\\\%s", szClient);
628 memset (&nr, 0x00, sizeof(NETRESOURCE));
629 nr.dwType=RESOURCETYPE_DISK;
631 nr.lpRemoteName=szPath;
632 res = WNetAddConnection2(&nr,NULL,szUser,0);
636 fprintf(stderr, "pioctl WNetAddConnection2(%s,%s) failed: 0x%X\r\n",
643 sprintf(szPath, "\\\\%s\\all", szClient);
644 res = WNetAddConnection2(&nr,NULL,szUser,0);
648 fprintf(stderr, "pioctl WNetAddConnection2(%s,%s) failed: 0x%X\r\n",
656 goto try_lsa_principal;
658 fh = CreateFile(tbuffer, GENERIC_READ | GENERIC_WRITE,
659 FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, OPEN_EXISTING,
660 FILE_FLAG_WRITE_THROUGH, NULL);
662 if (fh == INVALID_HANDLE_VALUE) {
663 gle = GetLastError();
664 if (gle && ioctlDebug ) {
668 if ( FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM,
671 MAKELANGID(LANG_ENGLISH,SUBLANG_ENGLISH_US),
677 fprintf(stderr,"pioctl CreateFile(%s) failed: 0x%X\r\n\t[%s]\r\n",
687 if (fh == INVALID_HANDLE_VALUE) {
690 dwSize = sizeof(szUser);
691 if (GetLSAPrincipalName(szUser, &dwSize)) {
694 fprintf(stderr, "pioctl LSA Principal logon user: [%s]\r\n",szUser);
697 sprintf(szPath, "\\\\%s", szClient);
698 memset (&nr, 0x00, sizeof(NETRESOURCE));
699 nr.dwType=RESOURCETYPE_DISK;
701 nr.lpRemoteName=szPath;
702 res = WNetAddConnection2(&nr,NULL,szUser,0);
706 fprintf(stderr, "pioctl WNetAddConnection2(%s,%s) failed: 0x%X\r\n",
713 sprintf(szPath, "\\\\%s\\all", szClient);
714 res = WNetAddConnection2(&nr,NULL,szUser,0);
718 fprintf(stderr, "pioctl WNetAddConnection2(%s,%s) failed: 0x%X\r\n",
728 fh = CreateFile(tbuffer, GENERIC_READ | GENERIC_WRITE,
729 FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, OPEN_EXISTING,
730 FILE_FLAG_WRITE_THROUGH, NULL);
732 if (fh == INVALID_HANDLE_VALUE) {
733 gle = GetLastError();
734 if (gle && ioctlDebug ) {
738 if ( FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM,
741 MAKELANGID(LANG_ENGLISH,SUBLANG_ENGLISH_US),
747 fprintf(stderr,"pioctl CreateFile(%s) failed: 0x%X\r\n\t[%s]\r\n",
758 if ( fh == INVALID_HANDLE_VALUE ) {
759 dwSize = sizeof(szUser);
760 if (GetUserNameEx(NameSamCompatible, szUser, &dwSize)) {
763 fprintf(stderr, "pioctl SamCompatible logon user: [%s]\r\n",szUser);
766 sprintf(szPath, "\\\\%s", szClient);
767 memset (&nr, 0x00, sizeof(NETRESOURCE));
768 nr.dwType=RESOURCETYPE_DISK;
770 nr.lpRemoteName=szPath;
771 res = WNetAddConnection2(&nr,NULL,szUser,0);
775 fprintf(stderr, "pioctl WNetAddConnection2(%s,%s) failed: 0x%X\r\n",
781 sprintf(szPath, "\\\\%s\\all", szClient);
782 res = WNetAddConnection2(&nr,NULL,szUser,0);
786 fprintf(stderr, "pioctl WNetAddConnection2(%s,%s) failed: 0x%X\r\n",
793 fh = CreateFile(tbuffer, GENERIC_READ | GENERIC_WRITE,
794 FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, OPEN_EXISTING,
795 FILE_FLAG_WRITE_THROUGH, NULL);
797 if (fh == INVALID_HANDLE_VALUE) {
798 gle = GetLastError();
799 if (gle && ioctlDebug ) {
803 if ( FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM,
806 MAKELANGID(LANG_ENGLISH,SUBLANG_ENGLISH_US),
812 fprintf(stderr,"pioctl CreateFile(%s) failed: 0x%X\r\n\t[%s]\r\n",
820 fprintf(stderr, "GetUserNameEx(NameSamCompatible) failed: 0x%X\r\n", GetLastError());
825 /* return fh and success code */
831 Transceive(HANDLE handle, fs_ioctlRequest_t * reqp)
836 DWORD ioctlDebug = IoctlDebug();
839 rcount = (long)(reqp->mp - reqp->data);
843 fprintf(stderr, "pioctl Transceive rcount <= 0: %d\r\n",rcount);
846 return EINVAL; /* not supposed to happen */
849 if (!WriteFile(handle, reqp->data, rcount, &ioCount, NULL)) {
850 /* failed to write */
851 gle = GetLastError();
855 fprintf(stderr, "pioctl Transceive WriteFile failed: 0x%X\r\n",gle);
861 if (!ReadFile(handle, reqp->data, sizeof(reqp->data), &ioCount, NULL)) {
863 gle = GetLastError();
867 fprintf(stderr, "pioctl Transceive ReadFile failed: 0x%X\r\n",gle);
873 reqp->nbytes = ioCount; /* set # of bytes available */
874 reqp->mp = reqp->data; /* restart marshalling */
881 MarshallLong(fs_ioctlRequest_t * reqp, long val)
883 memcpy(reqp->mp, &val, 4);
889 UnmarshallLong(fs_ioctlRequest_t * reqp, long *valp)
893 /* not enough data left */
894 if (reqp->nbytes < 4) {
895 if ( IoctlDebug() ) {
897 fprintf(stderr, "pioctl UnmarshallLong reqp->nbytes < 4: %d\r\n",
904 memcpy(valp, reqp->mp, 4);
910 /* includes marshalling NULL pointer as a null (0 length) string */
912 MarshallString(fs_ioctlRequest_t * reqp, char *stringp, int is_utf8)
918 count = (int)strlen(stringp) + 1;/* space required including null */
923 count += utf8_prefix_size;
926 /* watch for buffer overflow */
927 if ((reqp->mp - reqp->data) + count > sizeof(reqp->data)) {
928 if ( IoctlDebug() ) {
930 fprintf(stderr, "pioctl MarshallString buffer overflow\r\n");
937 memcpy(reqp->mp, utf8_prefix, utf8_prefix_size);
938 reqp->mp += utf8_prefix_size;
939 count -= utf8_prefix_size;
943 memcpy(reqp->mp, stringp, count);
950 /* take a path with a drive letter, possibly relative, and return a full path
951 * without the drive letter. This is the full path relative to the working
952 * dir for that drive letter. The input and output paths can be the same.
955 fs_GetFullPath(char *pathp, char *outPathp, long outSize)
967 if (pathp[0] != 0 && pathp[1] == ':') {
968 /* there's a drive letter there */
976 if ( firstp[0] == '\\' && firstp[1] == '\\' ||
977 firstp[0] == '/' && firstp[1] == '/') {
978 /* UNC path - strip off the server and sharename */
980 for ( i=2,count=2; count < 4 && firstp[i]; i++ ) {
981 if ( firstp[i] == '\\' || firstp[i] == '/' ) {
985 if ( firstp[i] == 0 ) {
986 strcpy(outPathp,"\\");
988 strcpy(outPathp,&firstp[--i]);
990 for (p=outPathp ;*p; p++) {
995 } else if (firstp[0] == '\\' || firstp[0] == '/') {
996 /* already an absolute pathname, just copy it back */
997 strcpy(outPathp, firstp);
998 for (p=outPathp ;*p; p++) {
1005 GetCurrentDirectory(sizeof(origPath), origPath);
1008 if (pathHasDrive && (*pathp & ~0x20) != (origPath[0] & ~0x20)) {
1009 /* a drive has been specified and it isn't our current drive.
1010 * to get path, switch to it first. Must case-fold drive letters
1011 * for user convenience.
1014 newPath[0] = *pathp;
1017 if (!SetCurrentDirectory(newPath)) {
1018 code = GetLastError();
1020 if ( IoctlDebug() ) {
1022 fprintf(stderr, "pioctl fs_GetFullPath SetCurrentDirectory(%s) failed: 0x%X\r\n",
1030 /* now get the absolute path to the current wdir in this drive */
1031 GetCurrentDirectory(sizeof(tpath), tpath);
1032 if (tpath[1] == ':')
1033 strcpy(outPathp, tpath + 2); /* skip drive letter */
1034 else if ( tpath[0] == '\\' && tpath[1] == '\\'||
1035 tpath[0] == '/' && tpath[1] == '/') {
1036 /* UNC path - strip off the server and sharename */
1038 for ( i=2,count=2; count < 4 && tpath[i]; i++ ) {
1039 if ( tpath[i] == '\\' || tpath[i] == '/' ) {
1043 if ( tpath[i] == 0 ) {
1044 strcpy(outPathp,"\\");
1046 strcpy(outPathp,&tpath[--i]);
1049 /* this should never happen */
1050 strcpy(outPathp, tpath);
1053 /* if there is a non-null name after the drive, append it */
1055 int len = (int)strlen(outPathp);
1056 if (outPathp[len-1] != '\\' && outPathp[len-1] != '/')
1057 strcat(outPathp, "\\");
1058 strcat(outPathp, firstp);
1061 /* finally, if necessary, switch back to our home drive letter */
1063 SetCurrentDirectory(origPath);
1066 for (p=outPathp ;*p; p++) {
1074 pioctl_int(char *pathp, long opcode, struct ViceIoctl *blobp, int follow, int is_utf8)
1076 fs_ioctlRequest_t preq;
1079 char fullPath[1000];
1083 code = GetIoctlHandle(pathp, &reqHandle);
1092 /* init the request structure */
1093 InitFSRequest(&preq);
1095 /* marshall the opcode, the path name and the input parameters */
1096 MarshallLong(&preq, opcode);
1097 /* when marshalling the path, remove the drive letter, since we already
1098 * used the drive letter to find the AFS daemon; we don't need it any more.
1099 * Eventually we'll expand relative path names here, too, since again, only
1100 * we understand those.
1103 code = fs_GetFullPath(pathp, fullPath, sizeof(fullPath));
1105 CloseHandle(reqHandle);
1110 strcpy(fullPath, "");
1113 MarshallString(&preq, fullPath, is_utf8);
1114 if (blobp->in_size) {
1115 if (blobp->in_size > sizeof(preq.data) - (preq.mp - preq.data)*sizeof(char)) {
1119 memcpy(preq.mp, blobp->in, blobp->in_size);
1120 preq.mp += blobp->in_size;
1123 /* now make the call */
1124 code = Transceive(reqHandle, &preq);
1126 CloseHandle(reqHandle);
1130 /* now unmarshall the return value */
1131 if (UnmarshallLong(&preq, &temp) != 0) {
1132 CloseHandle(reqHandle);
1137 CloseHandle(reqHandle);
1138 errno = CMtoUNIXerror(temp);
1139 if ( IoctlDebug() ) {
1141 fprintf(stderr, "pioctl temp != 0: 0x%X\r\n",temp);
1147 /* otherwise, unmarshall the output parameters */
1148 if (blobp->out_size) {
1149 temp = blobp->out_size;
1150 if (preq.nbytes < temp)
1152 memcpy(blobp->out, preq.mp, temp);
1153 blobp->out_size = temp;
1156 /* and return success */
1157 CloseHandle(reqHandle);
1162 pioctl_utf8(char * pathp, long opcode, struct ViceIoctl * blobp, int follow)
1164 return pioctl_int(pathp, opcode, blobp, follow, TRUE);
1168 pioctl(char * pathp, long opcode, struct ViceIoctl * blobp, int follow)
1170 return pioctl_int(pathp, opcode, blobp, follow, FALSE);