SciTE - Open Source Text Editor for Windows & Linux - [77] :: Программы

Цитата:

предлагаю другой вариант решения, для меня правда C не родной язык, но вроде работает правильно

Мне кажется, что код не критичный по времени стоит писать на уровне скриптов, если это конечно возможно, но если хочется реализовать в виде С-функции то стоит задуматься о своей библиотеки. LUA позволяет очень просто подключать библиотеки написаные в виде DLL. Это позволяет во первых избавиться от изменения кода, а во вторых использовать эти функции не только в Scite, но в том числе и для отладки скриптов сторонними утилитами.
Например я создал библиотеку batlib.dll куда поместил функции

Цитата:

io_exec
io_msgbox
io_getfileattr
io_setfileattr

Для подключения этой библиотеки достаточно просто написать require('batlib');
Для использования можно batlib.exec , a если хочеться именно через библиотеку os то можно сделать загрузчик который грузит DLL и перекидывает функции в нужную таблицу.
Правда я пользуюсь LUA 5.1 (для нее и собирал библиотеку) а там были изменения. Вроде в 5.0 загружать DLL можно только через LoadLib.
А кстати еще не было перехода в Scite на lau 5.1 ?

Добавлено:
Вот скрипт для обработки атрибутов файла в виде таблицы.
Атрибуты можно добовлять по вкусу.

Цитата:

function SetBitValue ( Num, Bit, val )
if(val == '1' or val == 1 or val == true)then
return SetBit ( Num, Bit );
else
return ResetBit(Num, Bit);
end;
end;

function getfileattr_ex(FileName)
local attr_i = os.getfileattr(FileName);
local attr = {};
attr.ro = IsSetBit(attr_i,0);
attr.hide = IsSetBit(attr_i,1);
return attr;
end;

function P.setfileattr_ex(FileName, attr)
local attr_i = os.getfileattr(FileName);

if(attr.ro ~= nil) then
attr_i = SetBitValue(attr_i,0,attr.ro);
end;

if(attr.hide ~= nil) then
attr_i = SetBitValue(attr_i,1,attr.hide);
end;

os.setfileattr(FileName,attr_i);
return attr;
end;

пример

Цитата:

--получить атрибуты
attr = getfileattr_ex([[c:\test.txt]]);

attr.ro = true; -- Установить
attr.hide = nil; -- Не менять
setfileattr_ex([[c:\test.txt]],attr);

Модерирует : gyra, Maz
Widok (09-10-2007 14:48): лимит страниц. продолжаем здесь	Версия для печати • Подписаться • Добавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104