Lines Matching refs:drive
284 $drive= substr( $ENV{WINDIR}, 0, 3 );
286 $ok= 1 == grep /^\Q$drive\E/i, @drives;
287 $ok or print "# No $drive found in list of drives.\n";
290 $ok= DRIVE_FIXED == GetDriveType( $drive );
292 "# ",DRIVE_FIXED," != ",GetDriveType($drive),": ",fileLastError(),"\n";
295 $ok= GetVolumeInformation( $drive, $vol, 64, $ser, $max, $flag, $fs, 16 );
300 chop($drive);
301 $ok= QueryDosDevice( $drive, $dev, 80 );
302 $ok or print "# $drive: ",fileLastError(),"\n";
305 print "# $drive => $text\n";
378 #Add a drive letter that points to our temp directory
379 #Add a drive letter that points to the drive our directory is in
382 # get first drive letters and use to test disk and storage IOCTLs