/[rdesktop]/sourceforge.net/trunk/rdesktop/disk.c
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Contents of /sourceforge.net/trunk/rdesktop/disk.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 745 - (show annotations)
Mon Aug 9 11:40:41 2004 UTC (19 years, 9 months ago) by stargo
File MIME type: text/plain
File size: 22610 byte(s)
SGI support from Jeremy Meng <voidfoo@cwazy.co.uk>

1 /* -*- c-basic-offset: 8 -*-
2 rdesktop: A Remote Desktop Protocol client.
3 Disk Redirection
4 Copyright (C) Jeroen Meijer 2003
5
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2 of the License, or
9 (at your option) any later version.
10
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
15
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
19 */
20
21 #include "disk.h"
22
23 #include <sys/types.h>
24 #include <sys/stat.h>
25 #include <unistd.h>
26 #include <fcntl.h> /* open, close */
27 #include <dirent.h> /* opendir, closedir, readdir */
28 #include <fnmatch.h>
29 #include <errno.h> /* errno */
30
31 #include <utime.h>
32 #include <time.h> /* ctime */
33
34 #if defined(HAVE_DIRFD)
35 #define DIRFD(a) (dirfd(a))
36 #else
37 #define DIRFD(a) ((a)->DIR_FD_MEMBER_NAME)
38 #endif
39
40 /* TODO: let autoconf figure out everything below... */
41 #if (defined(sun) && (defined(__svr4__) || defined(__SVR4)))
42 #define SOLARIS
43 #endif
44
45 #if (defined(SOLARIS) || defined (__hpux) || defined(__BEOS__))
46 #include <sys/statvfs.h> /* solaris statvfs */
47 /* TODO: Fix mntent-handling for solaris/hpux
48 * #include <sys/mntent.h> */
49 #undef HAVE_MNTENT_H
50 #define MNTENT_PATH "/etc/mnttab"
51 #define STATFS_FN(path, buf) (statvfs(path,buf))
52 #define STATFS_T statvfs
53 #define F_NAMELEN(buf) ((buf).f_namemax)
54
55 #elif (defined(__OpenBSD__) || defined(__NetBSD__) || defined(__FreeBSD__))
56 #include <sys/param.h>
57 #include <sys/mount.h>
58 #define STATFS_FN(path, buf) (statfs(path,buf))
59 #define STATFS_T statfs
60 #define F_NAMELEN(buf) (NAME_MAX)
61
62 #elif (defined(__SGI_IRIX__))
63 #include <sys/types.h>
64 #include <sys/statvfs.h>
65 #define STATFS_FN(path, buf) (statvfs(path,buf))
66 #define STATFS_T statvfs
67 #define F_NAMELEN(buf) ((buf).f_namemax)
68
69 #else
70 #include <sys/vfs.h> /* linux statfs */
71 #include <mntent.h>
72 #define HAVE_MNTENT_H
73 #define MNTENT_PATH "/etc/mtab"
74 #define STATFS_FN(path, buf) (statfs(path,buf))
75 #define STATFS_T statfs
76 #define F_NAMELEN(buf) ((buf).f_namelen)
77 #endif
78
79 #include "rdesktop.h"
80
81 extern RDPDR_DEVICE g_rdpdr_device[];
82
83 FILEINFO g_fileinfo[MAX_OPEN_FILES];
84
85 typedef struct
86 {
87 char name[256];
88 char label[256];
89 unsigned long serial;
90 char type[256];
91 } FsInfoType;
92
93
94 static time_t
95 get_create_time(struct stat *st)
96 {
97 time_t ret, ret1;
98
99 ret = MIN(st->st_ctime, st->st_mtime);
100 ret1 = MIN(ret, st->st_atime);
101
102 if (ret1 != (time_t) 0)
103 return ret1;
104
105 return ret;
106 }
107
108 /* Convert seconds since 1970 to a filetime */
109 static void
110 seconds_since_1970_to_filetime(time_t seconds, uint32 * high, uint32 * low)
111 {
112 unsigned long long ticks;
113
114 ticks = (seconds + 11644473600LL) * 10000000;
115 *low = (uint32) ticks;
116 *high = (uint32) (ticks >> 32);
117 }
118
119 /* Convert seconds since 1970 back to filetime */
120 static time_t
121 convert_1970_to_filetime(uint32 high, uint32 low)
122 {
123 unsigned long long ticks;
124 time_t val;
125
126 ticks = low + (((unsigned long long) high) << 32);
127 ticks /= 10000000;
128 ticks -= 11644473600LL;
129
130 val = (time_t) ticks;
131 return (val);
132
133 }
134
135
136 /* Enumeration of devices from rdesktop.c */
137 /* returns numer of units found and initialized. */
138 /* optarg looks like ':h=/mnt/floppy,b=/mnt/usbdevice1' */
139 /* when it arrives to this function. */
140 int
141 disk_enum_devices(uint32 * id, char *optarg)
142 {
143 char *pos = optarg;
144 char *pos2;
145 int count = 0;
146
147 // skip the first colon
148 optarg++;
149 while ((pos = next_arg(optarg, ',')) && *id < RDPDR_MAX_DEVICES)
150 {
151 pos2 = next_arg(optarg, '=');
152 strcpy(g_rdpdr_device[*id].name, optarg);
153
154 toupper_str(g_rdpdr_device[*id].name);
155
156 /* add trailing colon to name. */
157 strcat(g_rdpdr_device[*id].name, ":");
158
159 g_rdpdr_device[*id].local_path = xmalloc(strlen(pos2) + 1);
160 strcpy(g_rdpdr_device[*id].local_path, pos2);
161 printf("DISK %s to %s\n", g_rdpdr_device[*id].name, g_rdpdr_device[*id].local_path);
162 g_rdpdr_device[*id].device_type = DEVICE_TYPE_DISK;
163 count++;
164 (*id)++;
165
166 optarg = pos;
167 }
168 return count;
169 }
170
171 /* Opens or creates a file or directory */
172 static NTSTATUS
173 disk_create(uint32 device_id, uint32 accessmask, uint32 sharemode, uint32 create_disposition,
174 uint32 flags_and_attributes, char *filename, HANDLE * phandle)
175 {
176 HANDLE handle;
177 DIR *dirp;
178 int flags, mode;
179 char path[256];
180 struct stat filestat;
181
182 handle = 0;
183 dirp = NULL;
184 flags = 0;
185 mode = S_IRWXU | S_IRGRP | S_IXGRP | S_IROTH | S_IXOTH;
186
187
188 if (filename[strlen(filename) - 1] == '/')
189 filename[strlen(filename) - 1] = 0;
190 sprintf(path, "%s%s", g_rdpdr_device[device_id].local_path, filename);
191
192 switch (create_disposition)
193 {
194 case CREATE_ALWAYS:
195
196 // Delete existing file/link.
197 unlink(path);
198 flags |= O_CREAT;
199 break;
200
201 case CREATE_NEW:
202
203 // If the file already exists, then fail.
204 flags |= O_CREAT | O_EXCL;
205 break;
206
207 case OPEN_ALWAYS:
208
209 // Create if not already exists.
210 flags |= O_CREAT;
211 break;
212
213 case OPEN_EXISTING:
214
215 // Default behaviour
216 break;
217
218 case TRUNCATE_EXISTING:
219
220 // If the file does not exist, then fail.
221 flags |= O_TRUNC;
222 break;
223 }
224
225 //printf("Open: \"%s\" flags: %u, accessmask: %u sharemode: %u create disp: %u\n", path, flags_and_attributes, accessmask, sharemode, create_disposition);
226
227 // Get information about file and set that flag ourselfs
228 if ((stat(path, &filestat) == 0) && (S_ISDIR(filestat.st_mode)))
229 {
230 if (flags_and_attributes & FILE_NON_DIRECTORY_FILE)
231 return STATUS_FILE_IS_A_DIRECTORY;
232 else
233 flags_and_attributes |= FILE_DIRECTORY_FILE;
234 }
235
236 if (flags_and_attributes & FILE_DIRECTORY_FILE)
237 {
238 if (flags & O_CREAT)
239 {
240 mkdir(path, mode);
241 }
242
243 dirp = opendir(path);
244 if (!dirp)
245 {
246 switch (errno)
247 {
248 case EACCES:
249
250 return STATUS_ACCESS_DENIED;
251
252 case ENOENT:
253
254 return STATUS_NO_SUCH_FILE;
255
256 default:
257
258 perror("opendir");
259 return STATUS_NO_SUCH_FILE;
260 }
261 }
262 handle = DIRFD(dirp);
263 }
264 else
265 {
266
267 if (accessmask & GENERIC_ALL
268 || (accessmask & GENERIC_READ && accessmask & GENERIC_WRITE))
269 {
270 flags |= O_RDWR;
271 }
272 else if ((accessmask & GENERIC_WRITE) && !(accessmask & GENERIC_READ))
273 {
274 flags |= O_WRONLY;
275 }
276 else
277 {
278 flags |= O_RDONLY;
279 }
280
281 handle = open(path, flags, mode);
282 if (handle == -1)
283 {
284 switch (errno)
285 {
286 case EISDIR:
287
288 return STATUS_FILE_IS_A_DIRECTORY;
289
290 case EACCES:
291
292 return STATUS_ACCESS_DENIED;
293
294 case ENOENT:
295
296 return STATUS_NO_SUCH_FILE;
297 case EEXIST:
298
299 return STATUS_OBJECT_NAME_COLLISION;
300 default:
301
302 perror("open");
303 return STATUS_NO_SUCH_FILE;
304 }
305 }
306
307 /* all read and writes of files should be non blocking */
308 if (fcntl(handle, F_SETFL, O_NONBLOCK) == -1)
309 perror("fcntl");
310 }
311
312 if (handle >= MAX_OPEN_FILES)
313 {
314 error("Maximum number of open files (%s) reached. Increase MAX_OPEN_FILES!\n",
315 handle);
316 exit(1);
317 }
318
319 if (dirp)
320 g_fileinfo[handle].pdir = dirp;
321 g_fileinfo[handle].device_id = device_id;
322 g_fileinfo[handle].flags_and_attributes = flags_and_attributes;
323 strncpy(g_fileinfo[handle].path, path, 255);
324
325 *phandle = handle;
326 return STATUS_SUCCESS;
327 }
328
329 static NTSTATUS
330 disk_close(HANDLE handle)
331 {
332 struct fileinfo *pfinfo;
333
334 pfinfo = &(g_fileinfo[handle]);
335
336 if (pfinfo->flags_and_attributes & FILE_DIRECTORY_FILE)
337 {
338 closedir(pfinfo->pdir);
339 //FIXME: Should check exit code
340 }
341 else
342 {
343 close(handle);
344 }
345
346 return STATUS_SUCCESS;
347 }
348
349 static NTSTATUS
350 disk_read(HANDLE handle, uint8 * data, uint32 length, uint32 offset, uint32 * result)
351 {
352 int n;
353
354 #if 0
355 /* browsing dir ???? */
356 /* each request is 24 bytes */
357 if (g_fileinfo[handle].flags_and_attributes & FILE_DIRECTORY_FILE)
358 {
359 *result = 0;
360 return STATUS_SUCCESS;
361 }
362 #endif
363
364 lseek(handle, offset, SEEK_SET);
365
366 n = read(handle, data, length);
367
368 if (n < 0)
369 {
370 *result = 0;
371 switch (errno)
372 {
373 case EISDIR:
374 return STATUS_FILE_IS_A_DIRECTORY;
375 default:
376 perror("read");
377 return STATUS_INVALID_PARAMETER;
378 }
379 }
380
381 *result = n;
382
383 return STATUS_SUCCESS;
384 }
385
386 static NTSTATUS
387 disk_write(HANDLE handle, uint8 * data, uint32 length, uint32 offset, uint32 * result)
388 {
389 int n;
390
391 lseek(handle, offset, SEEK_SET);
392
393 n = write(handle, data, length);
394
395 if (n < 0)
396 {
397 perror("write");
398 *result = 0;
399 switch (errno)
400 {
401 case ENOSPC:
402 return STATUS_DISK_FULL;
403 default:
404 return STATUS_ACCESS_DENIED;
405 }
406 }
407
408 *result = n;
409
410 return STATUS_SUCCESS;
411 }
412
413 NTSTATUS
414 disk_query_information(HANDLE handle, uint32 info_class, STREAM out)
415 {
416 uint32 file_attributes, ft_high, ft_low;
417 struct stat filestat;
418 char *path, *filename;
419
420 path = g_fileinfo[handle].path;
421
422 // Get information about file
423 if (fstat(handle, &filestat) != 0)
424 {
425 perror("stat");
426 out_uint8(out, 0);
427 return STATUS_ACCESS_DENIED;
428 }
429
430 // Set file attributes
431 file_attributes = 0;
432 if (S_ISDIR(filestat.st_mode))
433 file_attributes |= FILE_ATTRIBUTE_DIRECTORY;
434
435 filename = 1 + strrchr(path, '/');
436 if (filename && filename[0] == '.')
437 file_attributes |= FILE_ATTRIBUTE_HIDDEN;
438
439 if (!file_attributes)
440 file_attributes |= FILE_ATTRIBUTE_NORMAL;
441
442 if (!(filestat.st_mode & S_IWUSR))
443 file_attributes |= FILE_ATTRIBUTE_READONLY;
444
445 // Return requested data
446 switch (info_class)
447 {
448 case FileBasicInformation:
449 seconds_since_1970_to_filetime(get_create_time(&filestat), &ft_high,
450 &ft_low);
451 out_uint32_le(out, ft_low); //create_access_time
452 out_uint32_le(out, ft_high);
453
454 seconds_since_1970_to_filetime(filestat.st_atime, &ft_high, &ft_low);
455 out_uint32_le(out, ft_low); //last_access_time
456 out_uint32_le(out, ft_high);
457
458 seconds_since_1970_to_filetime(filestat.st_mtime, &ft_high, &ft_low);
459 out_uint32_le(out, ft_low); //last_write_time
460 out_uint32_le(out, ft_high);
461
462 seconds_since_1970_to_filetime(filestat.st_ctime, &ft_high, &ft_low);
463 out_uint32_le(out, ft_low); //last_change_time
464 out_uint32_le(out, ft_high);
465
466 out_uint32_le(out, file_attributes);
467 break;
468
469 case FileStandardInformation:
470
471 out_uint32_le(out, filestat.st_size); //Allocation size
472 out_uint32_le(out, 0);
473 out_uint32_le(out, filestat.st_size); //End of file
474 out_uint32_le(out, 0);
475 out_uint32_le(out, filestat.st_nlink); //Number of links
476 out_uint8(out, 0); //Delete pending
477 out_uint8(out, S_ISDIR(filestat.st_mode) ? 1 : 0); //Directory
478 break;
479
480 case FileObjectIdInformation:
481
482 out_uint32_le(out, file_attributes); /* File Attributes */
483 out_uint32_le(out, 0); /* Reparse Tag */
484 break;
485
486 default:
487
488 unimpl("IRP Query (File) Information class: 0x%x\n", info_class);
489 return STATUS_INVALID_PARAMETER;
490 }
491 return STATUS_SUCCESS;
492 }
493
494 NTSTATUS
495 disk_set_information(HANDLE handle, uint32 info_class, STREAM in, STREAM out)
496 {
497 uint32 device_id, length, file_attributes, ft_high, ft_low;
498 char newname[256], fullpath[256];
499 struct fileinfo *pfinfo;
500
501 int mode;
502 struct stat filestat;
503 time_t write_time, change_time, access_time, mod_time;
504 struct utimbuf tvs;
505 struct STATFS_T stat_fs;
506
507 pfinfo = &(g_fileinfo[handle]);
508
509 switch (info_class)
510 {
511 case FileBasicInformation:
512 write_time = change_time = access_time = 0;
513
514 in_uint8s(in, 4); /* Handle of root dir? */
515 in_uint8s(in, 24); /* unknown */
516
517 // CreationTime
518 in_uint32_le(in, ft_low);
519 in_uint32_le(in, ft_high);
520
521 // AccessTime
522 in_uint32_le(in, ft_low);
523 in_uint32_le(in, ft_high);
524 if (ft_low || ft_high)
525 access_time = convert_1970_to_filetime(ft_high, ft_low);
526
527 // WriteTime
528 in_uint32_le(in, ft_low);
529 in_uint32_le(in, ft_high);
530 if (ft_low || ft_high)
531 write_time = convert_1970_to_filetime(ft_high, ft_low);
532
533 // ChangeTime
534 in_uint32_le(in, ft_low);
535 in_uint32_le(in, ft_high);
536 if (ft_low || ft_high)
537 change_time = convert_1970_to_filetime(ft_high, ft_low);
538
539 in_uint32_le(in, file_attributes);
540
541 if (fstat(handle, &filestat))
542 return STATUS_ACCESS_DENIED;
543
544 tvs.modtime = filestat.st_mtime;
545 tvs.actime = filestat.st_atime;
546 if (access_time)
547 tvs.actime = access_time;
548
549
550 if (write_time || change_time)
551 mod_time = MIN(write_time, change_time);
552 else
553 mod_time = write_time ? write_time : change_time;
554
555 if (mod_time)
556 tvs.modtime = mod_time;
557
558
559 if (access_time || write_time || change_time)
560 {
561 #if WITH_DEBUG_RDP5
562 printf("FileBasicInformation access time %s",
563 ctime(&tvs.actime));
564 printf("FileBasicInformation modification time %s",
565 ctime(&tvs.modtime));
566 #endif
567 if (utime(pfinfo->path, &tvs))
568 return STATUS_ACCESS_DENIED;
569 }
570
571 if (!file_attributes)
572 break; // not valid
573
574 mode = filestat.st_mode;
575
576 if (file_attributes & FILE_ATTRIBUTE_READONLY)
577 mode &= ~(S_IWUSR | S_IWGRP | S_IWOTH);
578 else
579 mode |= S_IWUSR;
580
581 mode &= 0777;
582 #if WITH_DEBUG_RDP5
583 printf("FileBasicInformation set access mode 0%o", mode);
584 #endif
585
586 if (fchmod(handle, mode))
587 return STATUS_ACCESS_DENIED;
588
589 break;
590
591 case FileRenameInformation:
592
593 in_uint8s(in, 4); /* Handle of root dir? */
594 in_uint8s(in, 0x1a); /* unknown */
595 in_uint32_le(in, length);
596
597 if (length && (length / 2) < 256)
598 {
599 rdp_in_unistr(in, newname, length);
600 convert_to_unix_filename(newname);
601 }
602 else
603 {
604 return STATUS_INVALID_PARAMETER;
605 }
606
607 sprintf(fullpath, "%s%s", g_rdpdr_device[pfinfo->device_id].local_path,
608 newname);
609
610 if (rename(pfinfo->path, fullpath) != 0)
611 {
612 perror("rename");
613 return STATUS_ACCESS_DENIED;
614 }
615 break;
616
617 case FileDispositionInformation:
618 /* As far as I understand it, the correct
619 thing to do here is to *schedule* a delete,
620 so it will be deleted when the file is
621 closed. Subsequent
622 FileDispositionInformation requests with
623 DeleteFile set to FALSE should unschedule
624 the delete. See
625 http://www.osronline.com/article.cfm?article=245. Currently,
626 we are deleting the file immediately. I
627 guess this is a FIXME. */
628
629 //in_uint32_le(in, delete_on_close);
630
631 /* Make sure we close the file before
632 unlinking it. Not doing so would trigger
633 silly-delete if using NFS, which might fail
634 on FAT floppies, for example. */
635 disk_close(handle);
636
637 if ((pfinfo->flags_and_attributes & FILE_DIRECTORY_FILE)) // remove a directory
638 {
639 if (rmdir(pfinfo->path) < 0)
640 return STATUS_ACCESS_DENIED;
641 }
642 else if (unlink(pfinfo->path) < 0) // unlink a file
643 return STATUS_ACCESS_DENIED;
644
645 break;
646
647 case FileAllocationInformation:
648 /* Fall through to FileEndOfFileInformation,
649 which uses ftrunc. This is like Samba with
650 "strict allocation = false", and means that
651 we won't detect out-of-quota errors, for
652 example. */
653
654 case FileEndOfFileInformation:
655 in_uint8s(in, 28); /* unknown */
656 in_uint32_le(in, length); /* file size */
657
658 /* prevents start of writing if not enough space left on device */
659 if (STATFS_FN(g_rdpdr_device[pfinfo->device_id].local_path, &stat_fs) == 0)
660 if (stat_fs.f_bsize * stat_fs.f_bfree < length)
661 return STATUS_DISK_FULL;
662
663 /* FIXME: Growing file with ftruncate doesn't
664 work with Linux FAT fs */
665 if (ftruncate(handle, length) != 0)
666 {
667 perror("ftruncate");
668 return STATUS_DISK_FULL;
669 }
670
671 break;
672 default:
673
674 unimpl("IRP Set File Information class: 0x%x\n", info_class);
675 return STATUS_INVALID_PARAMETER;
676 }
677 return STATUS_SUCCESS;
678 }
679
680 static FsInfoType *
681 FsVolumeInfo(char *fpath)
682 {
683
684 #ifdef HAVE_MNTENT_H
685 FILE *fdfs;
686 struct mntent *e;
687 static FsInfoType info;
688
689 /* initialize */
690 memset(&info, 0, sizeof(info));
691 strcpy(info.label, "RDESKTOP");
692 strcpy(info.type, "RDPFS");
693
694 fdfs = setmntent(MNTENT_PATH, "r");
695 if (!fdfs)
696 return &info;
697
698 while ((e = getmntent(fdfs)))
699 {
700 if (strncmp(fpath, e->mnt_dir, strlen(fpath)) == 0)
701 {
702 strcpy(info.type, e->mnt_type);
703 strcpy(info.name, e->mnt_fsname);
704 if (strstr(e->mnt_opts, "vfat") || strstr(e->mnt_opts, "iso9660"))
705 {
706 int fd = open(e->mnt_fsname, O_RDONLY);
707 if (fd >= 0)
708 {
709 unsigned char buf[512];
710 memset(buf, 0, sizeof(buf));
711 if (strstr(e->mnt_opts, "vfat"))
712 /*FAT*/
713 {
714 strcpy(info.type, "vfat");
715 read(fd, buf, sizeof(buf));
716 info.serial =
717 (buf[42] << 24) + (buf[41] << 16) +
718 (buf[40] << 8) + buf[39];
719 strncpy(info.label, buf + 43, 10);
720 info.label[10] = '\0';
721 }
722 else if (lseek(fd, 32767, SEEK_SET) >= 0) /* ISO9660 */
723 {
724 read(fd, buf, sizeof(buf));
725 strncpy(info.label, buf + 41, 32);
726 info.label[32] = '\0';
727 //info.Serial = (buf[128]<<24)+(buf[127]<<16)+(buf[126]<<8)+buf[125];
728 }
729 close(fd);
730 }
731 }
732 }
733 }
734 endmntent(fdfs);
735 #else
736 static FsInfoType info;
737
738 /* initialize */
739 memset(&info, 0, sizeof(info));
740 strcpy(info.label, "RDESKTOP");
741 strcpy(info.type, "RDPFS");
742
743 #endif
744 return &info;
745 }
746
747
748 NTSTATUS
749 disk_query_volume_information(HANDLE handle, uint32 info_class, STREAM out)
750 {
751 struct STATFS_T stat_fs;
752 struct fileinfo *pfinfo;
753 FsInfoType *fsinfo;
754
755 pfinfo = &(g_fileinfo[handle]);
756
757 if (STATFS_FN(pfinfo->path, &stat_fs) != 0)
758 {
759 perror("statfs");
760 return STATUS_ACCESS_DENIED;
761 }
762
763 fsinfo = FsVolumeInfo(pfinfo->path);
764
765 switch (info_class)
766 {
767 case FileFsVolumeInformation:
768
769 out_uint32_le(out, 0); /* volume creation time low */
770 out_uint32_le(out, 0); /* volume creation time high */
771 out_uint32_le(out, fsinfo->serial); /* serial */
772
773 out_uint32_le(out, 2 * strlen(fsinfo->label)); /* length of string */
774
775 out_uint8(out, 0); /* support objects? */
776 rdp_out_unistr(out, fsinfo->label, 2 * strlen(fsinfo->label) - 2);
777 break;
778
779 case FileFsSizeInformation:
780
781 out_uint32_le(out, stat_fs.f_blocks); /* Total allocation units low */
782 out_uint32_le(out, 0); /* Total allocation high units */
783 out_uint32_le(out, stat_fs.f_bfree); /* Available allocation units */
784 out_uint32_le(out, 0); /* Available allowcation units */
785 out_uint32_le(out, stat_fs.f_bsize / 0x200); /* Sectors per allocation unit */
786 out_uint32_le(out, 0x200); /* Bytes per sector */
787 break;
788
789 case FileFsAttributeInformation:
790
791 out_uint32_le(out, FS_CASE_SENSITIVE | FS_CASE_IS_PRESERVED); /* fs attributes */
792 out_uint32_le(out, F_NAMELEN(stat_fs)); /* max length of filename */
793
794 out_uint32_le(out, 2 * strlen(fsinfo->type)); /* length of fs_type */
795 rdp_out_unistr(out, fsinfo->type, 2 * strlen(fsinfo->type) - 2);
796 break;
797
798 case FileFsLabelInformation:
799 case FileFsDeviceInformation:
800 case FileFsControlInformation:
801 case FileFsFullSizeInformation:
802 case FileFsObjectIdInformation:
803 case FileFsMaximumInformation:
804
805 default:
806
807 unimpl("IRP Query Volume Information class: 0x%x\n", info_class);
808 return STATUS_INVALID_PARAMETER;
809 }
810 return STATUS_SUCCESS;
811 }
812
813 NTSTATUS
814 disk_query_directory(HANDLE handle, uint32 info_class, char *pattern, STREAM out)
815 {
816 uint32 file_attributes, ft_low, ft_high;
817 char *dirname, fullpath[256];
818 DIR *pdir;
819 struct dirent *pdirent;
820 struct stat fstat;
821 struct fileinfo *pfinfo;
822
823 pfinfo = &(g_fileinfo[handle]);
824 pdir = pfinfo->pdir;
825 dirname = pfinfo->path;
826 file_attributes = 0;
827
828 switch (info_class)
829 {
830 case FileBothDirectoryInformation:
831
832 // If a search pattern is received, remember this pattern, and restart search
833 if (pattern[0] != 0)
834 {
835 strncpy(pfinfo->pattern, 1 + strrchr(pattern, '/'), 64);
836 rewinddir(pdir);
837 }
838
839 // find next dirent matching pattern
840 pdirent = readdir(pdir);
841 while (pdirent && fnmatch(pfinfo->pattern, pdirent->d_name, 0) != 0)
842 pdirent = readdir(pdir);
843
844 if (pdirent == NULL)
845 return STATUS_NO_MORE_FILES;
846
847 // Get information for directory entry
848 sprintf(fullpath, "%s/%s", dirname, pdirent->d_name);
849
850 if (stat(fullpath, &fstat))
851 {
852 switch (errno)
853 {
854 case ENOENT:
855 case ELOOP:
856 case EACCES:
857 /* These are non-fatal errors. */
858 memset(&fstat, 0, sizeof(fstat));
859 break;
860 default:
861 /* Fatal error. By returning STATUS_NO_SUCH_FILE,
862 the directory list operation will be aborted */
863 perror(fullpath);
864 out_uint8(out, 0);
865 return STATUS_NO_SUCH_FILE;
866 }
867 }
868
869 if (S_ISDIR(fstat.st_mode))
870 file_attributes |= FILE_ATTRIBUTE_DIRECTORY;
871 if (pdirent->d_name[0] == '.')
872 file_attributes |= FILE_ATTRIBUTE_HIDDEN;
873 if (!file_attributes)
874 file_attributes |= FILE_ATTRIBUTE_NORMAL;
875 if (!(fstat.st_mode & S_IWUSR))
876 file_attributes |= FILE_ATTRIBUTE_READONLY;
877
878 // Return requested information
879 out_uint8s(out, 8); //unknown zero
880
881 seconds_since_1970_to_filetime(get_create_time(&fstat), &ft_high, &ft_low);
882 out_uint32_le(out, ft_low); // create time
883 out_uint32_le(out, ft_high);
884
885 seconds_since_1970_to_filetime(fstat.st_atime, &ft_high, &ft_low);
886 out_uint32_le(out, ft_low); //last_access_time
887 out_uint32_le(out, ft_high);
888
889 seconds_since_1970_to_filetime(fstat.st_mtime, &ft_high, &ft_low);
890 out_uint32_le(out, ft_low); //last_write_time
891 out_uint32_le(out, ft_high);
892
893 seconds_since_1970_to_filetime(fstat.st_ctime, &ft_high, &ft_low);
894 out_uint32_le(out, ft_low); //change_write_time
895 out_uint32_le(out, ft_high);
896
897 out_uint32_le(out, fstat.st_size); //filesize low
898 out_uint32_le(out, 0); //filesize high
899 out_uint32_le(out, fstat.st_size); //filesize low
900 out_uint32_le(out, 0); //filesize high
901 out_uint32_le(out, file_attributes);
902 out_uint8(out, 2 * strlen(pdirent->d_name) + 2); //unicode length
903 out_uint8s(out, 7); //pad?
904 out_uint8(out, 0); //8.3 file length
905 out_uint8s(out, 2 * 12); //8.3 unicode length
906 rdp_out_unistr(out, pdirent->d_name, 2 * strlen(pdirent->d_name));
907 break;
908
909 default:
910 /* FIXME: Support FileDirectoryInformation,
911 FileFullDirectoryInformation, and
912 FileNamesInformation */
913
914 unimpl("IRP Query Directory sub: 0x%x\n", info_class);
915 return STATUS_INVALID_PARAMETER;
916 }
917
918 return STATUS_SUCCESS;
919 }
920
921
922
923 static NTSTATUS
924 disk_device_control(HANDLE handle, uint32 request, STREAM in, STREAM out)
925 {
926 uint32 result;
927
928 if (((request >> 16) != 20) || ((request >> 16) != 9))
929 return STATUS_INVALID_PARAMETER;
930
931 /* extract operation */
932 request >>= 2;
933 request &= 0xfff;
934
935 printf("DISK IOCTL %d\n", request);
936
937 switch (request)
938 {
939 case 25: // ?
940 case 42: // ?
941 default:
942 unimpl("DISK IOCTL %d\n", request);
943 return STATUS_INVALID_PARAMETER;
944 }
945
946 return STATUS_SUCCESS;
947 }
948
949 DEVICE_FNS disk_fns = {
950 disk_create,
951 disk_close,
952 disk_read,
953 disk_write,
954 disk_device_control /* device_control */
955 };

  ViewVC Help
Powered by ViewVC 1.1.26