$save nolist /* *============================================================================ * This program is distributed in the hope that it will be useful, but * WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE * * Permission to use for any purpose, modify, copy, and make enhancements * and derivative works of the software is granted if attribution is given to * R.M. Gillmore, dba the ACME Software Deli, as the author * * While the ACME Software Deli does not work for money, there is nonetheless * a significant amount of work involved. The ACME Software Deli maintains the * rights to all code written, though it may be used and distributed as long as * the following conditions are maintained. * * 1. The copyright statement at the top of each code block is maintained in * your distribution. * 2. You do not identify yourself as the ACME Software Deli * 3. Any changes made to the software are sent to the ACME Software Deli *============================================================================ */ /* * $Id: volInfo.ext 1157 2025-05-05 00:35:39Z rmgillmore $ */ $if not VOLINFO_EXT_INCLUDED $set (VOLINFO_EXT_INCLUDED) $include (..\lib\comnDefs.ext) declare diskInfoLabelLength literally '12', diskInfoTypeLength literally '9'; declare diskInfoBlockType literally 'structure ( informationLevel word, diskSerialNumber dword, volumeLabel (diskInfoLabelLength) char, fileSystemType (diskInfoTypeLength) char )'; $if not volumeInfoSource getVolumeInformation: procedure ( driveID, diskInfoBlockPtr ) external; declare driveID char, diskInfoBlockPtr pointer; end getVolumeInformation; getVolumeName: procedure ( driveID, volumeNameStringPtr ) external; declare driveID char, volumeNameStringPtr pointer; end getVolumeName; getDriveSerialNumber: procedure( driveID ) dword external; declare driveID char; end getDriveSerialNumber; $endif $endif $restore