Программа DIRSCAN
С помощью программы DIRSCAN вы сможете получить список подкаталогов для каталога, путь к которому задан в качестве параметра при запуске программы.
Для преобразования идентификатора пользователя, создавшего каталог,
в имя мы использовали функцию GetBinderyObjectName() из библиотеки NetWare C Interface:
int GetBinderyObjectName(long ObjectID, char *ObjectName, WORD *ObjectType);
Функция ищет в базе объектов запись с идентификатором ObjectID и в случае успеха записывает в переменные, адресуемые параметрами ObjectName и ObjectType, имя и тип объекта. В случае успешного поиска функция возвращает нулевое значение.
Итак, исходный текст программы DIRSCAN:
// =================================================== // Листинг 11. Просмотр списка подкаталогов // сетевого каталога // Файл dirscan\dirscan.cpp // // (C) A. Frolov, 1993 // ===================================================
#include <stdlib.h> #include <stdio.h> #include <string.h> #include <time.h>
#define BYTE unsigned char #define WORD unsigned int
extern "C" int GetNetWareShellVersion(char *,char *, char *); extern "C" int ScanDirectoryInformation(BYTE, char *, int *, char *, BYTE *, long *, BYTE *); extern "C" int GetBinderyObjectName(long, char *, WORD *);
void main(int argc, char *argv[]) {
char MajorVersion=0; char MinorVersion=0; char Revision=0;
int SequenceNumber; char DirectoryName[16]; BYTE CreationDataAndTime[4]; long OwnerObjectID; BYTE RightsMask; int ccode;
char ObjectName[48]; WORD ObjectType;
printf("\n*DIRSCAN* (C) Frolov A., 1993\n");
// Проверяем наличие сетевой оболочки
asm push si GetNetWareShellVersion(&MajorVersion, &MinorVersion, &Revision); asm pop si
if(MajorVersion == 0) { printf("\nОболочка NetWare не загружена\n"); return; } // В качестве аргумента необходимо задать // путь к просматриваемому каталогу в виде SYS:USERS\*
if(argc < 2) { printf("Укажите путь к каталогу, " "например: dirscan sys:users\\*\n"); return; } printf("Содержимое каталога %s\n", argv[1]); printf("--------------------------------------------\n"); printf("Имя \tКто владелец каталога\n"); printf("--------------------------------------------\n");
// Путь должен быть задан заглавными буквами
strupr(argv[1]);
// Цикл просмотра каталога
for(SequenceNumber = 0;;) {
// Получаем информацию о содержимом каталога
ccode = ScanDirectoryInformation(0, argv[1], &SequenceNumber, DirectoryName, CreationDataAndTime, &OwnerObjectID, &RightsMask);
// Если были ошибки или каталог пуст, завершаем цикл
if(ccode) break; if(DirectoryName[0] == '\0') break;
// Выводим имя каталога
printf("%-12s", DirectoryName);
// Если для каталога определен владелец, // получаем и выводим имя владельца
if(OwnerObjectID) { GetBinderyObjectName(OwnerObjectID, ObjectName, &ObjectType); printf("\t%-12s \n", ObjectName); } else printf("\t <Нет сведений о владельце> \n"); } }
