Объект загружаемой системной библиотеки - Revision history

Admin: 1 revision imported

2025-01-22T06:57:28Z

1 revision imported

1>Admin: /* Атрибуты и функции */

2024-11-02T06:31:42Z

‎Атрибуты и функции

Admin: 1 revision imported

2023-06-08T10:14:48Z

1 revision imported

1>Admin at 18:11, 15 May 2023

2023-05-15T18:11:18Z

Admin: 1 revision imported

2021-02-07T06:55:24Z

1 revision imported

Admin at 08:16, 2 July 2020

2020-07-02T08:16:52Z

New page

{{infobox object
|object=Lib
|status=2
|create=[[Lib.Load|Load]]}}
{{HeadLinks|
* [[Main_Page|Начальная страница]]
* [[Общее_описание_языка|Общее описание]]
* [[Объекты]]}}

Объект '''системной библиотеки''' используется для доступа к внешним функциях системы или расширения функционала программы за счет функций, находящихся во внешних библиотеках (dll для Windows). '''Важно''': вызовы подобного рода часто оперируют данными, находящимися в системной памяти, изменение или чтение которых может привести к системным исключениям или порче информации в памяти, поэтому работа с внешними библиотеками опасна. Для импортирования функций, нужно знать некоторые важные термины и полностью понимать, что они означают:
* '''Размер чисел в битах'''. Система всегда использует 64-битный формат представления целых чисел, однако, библиотеки часто требуют использование чисел, меньшего размера.
* '''Наличие знака у числа'''. Система всегда использует числа со знаками, однако, библиотеки иногда оперируют числами, верхний бит которых, является частью данных, а не представляет знак. К примеру, число в 8 бит без знака может иметь значение ''240'', со знаком это число равно ''-16''
* '''Способ вызова''' (''Calling convention''). Для работы с ''x86'' библиотеками важно знать, каким образом происходит вызов их функций. Таких способов вызова может быть несколько, при применении неверного способа вызова можно не только получить исключение, но и испортить память, сделать программу нерабочей. Для ''x64'' используется один способ вызова, поэтому, такой проблемы для этой архитектуры не существует (существует второй способ ''vectorcall'', который на данный момент не поддерживает системой). Способ вызова обычно можно найти в документации к библиотеке или в ''include'' файлах с расширением ''h'' или подобным. Следующие способы вызова поддерживаются системой:
** '''stdcall''' (x86,x64) -- стандартный способ вызова функций Windows, используется по умолчанию. Для ''x64'' является единственным доступным способом вызова.
** '''cdecl''' (x86) -- используется при вызове функций, скомпилированных с помощью ''C'' или ''C++''. Система позволяет использование такого способа вызова вместо вызовов ''stdcall'', но не наоборот. Если для библиотек, скомпилированных со способом вызова ''cdecl'' указать способ вызова ''stdcall'', можно получить порчу памяти или привести клиент нерабочее состояние.
** '''fastcall''' (x86) -- используется при вызове функций, скомпилированных с помощью ''C'' или ''C++''. Несовместим с другими способами вызова.
** '''register''' (x86) -- используется при вызове функций, скомпилированных с помощью ''Delphi'' или ''Free Pascal''. Несовместим с другими способами вызова.
*** Для способов вызова ''register'' первые четыре параметра передаются в функцию особым образом, однако, для особых параметров, типа Variant (OLE), структура (запись) система может не знать, что такие параметры должны содержаться в стеке вызова, поэтому их нужно пометить особым образом (см. [[Lib.Load|Load]]). Для получения дополнительной информации, см. [http://docwiki.embarcadero.com/RADStudio/Rio/en/Procedures_and_Functions_(Delphi) статью].
** '''vectorcall''' (x86,x64) -- способ вызова, оперирующий длинными числами (128 бит), в данный момент не поддерживается.
* '''Вызовы by ref'''. Как и в языке системы, функции библиотек иногда могут изменять передаваемые им параметры. Данный факт должен быть указан при импортировании функции, иначе система не будет обновлять возвращенные функцией параметры (см. [[Lib.Load|Load]]).
* '''Адресация строк'''. Любые строки при вызове всегда должны быть заданы, как ссылки, см. [[Lib.Load|Load]].

Если библиотека уже была загружена клиентом, последующие вызовы [[Lib.Load|Load]] не будут вызывать новых загрузок, система будет создавать ссылки на уже загруженную библиотеку. Ниже приведен пример функции, устанавливающей привилегию по ее наименованию в среде Windows x86 или Windows x64. Пример использует возможности [[Буфер#Объект структуры данных записи|записей]], которые тесно связаны с вызовом библиотек.
<pre>
Function EnablePrivilege(PrivName)
//Загрузка библиотек и импортирование функций.
aKernel32:=Lib.Load("kernel32.dll");
aKernel32.RegisterFunction("GetCurrentProcess","stdcall",,"UN");
aKernel32.RegisterFunction("CloseHandle","stdcall","UN","UN");
aAdvapi32:=Lib.Load("advapi32.dll");
aAdvapi32.RegisterFunction("OpenProcessToken","stdcall","UN,UI32,@UN","B32");
aAdvapi32.RegisterFunction("LookupPrivilegeValueW:LookupPrivilegeValue","stdcall","^SZW,^SZW,@I64","B32");
aAdvapi32.RegisterFunction("AdjustTokenPrivileges","stdcall","UN,B32,P,UI32,P,@UI32","B32");
//Описание констант
TOKEN_ADJUST_PRIVILEGES:=32;
TOKEN_QUERY:=8;
SE_PRIVILEGE_ENABLED:=2;

//Получение идентификатора процесса
hToken:=0;
If not aAdvapi32.OpenProcessToken(aKernel32.GetCurrentProcess(),TOKEN_ADJUST_PRIVILEGES+TOKEN_QUERY,hToken) then
Exit 0;
EndIf;
Try
//Получение идентификатора привилегии по ее имени
Luid:=0;
if not aAdvapi32.LookupPrivilegeValue(,PrivName,Luid) Then
Exit 0;
EndIf;
//Создание структуры для передачи функции установки привилегии
rLUID_AND_ATTRIBUTES:=MemoryRecord.Create("Luid:I64,Attributes:UI32");
rTOKEN_PRIVILEGES1:=MemoryRecord.Create("PrivilegeCount:UI32,Privileges:A1:@rLUID_AND_ATTRIBUTES");
rTOKEN_PRIVILEGES1.Allocate();
rTOKEN_PRIVILEGES1.PrivilegeCount:=1;
rTOKEN_PRIVILEGES1.Privileges[0].Attributes:=SE_PRIVILEGE_ENABLED;
rTOKEN_PRIVILEGES1.Privileges[0].Luid:=Luid;
//Установить привилегию
Exit aAdvapi32.AdjustTokenPrivileges(hToken,0,rTOKEN_PRIVILEGES1,0);
Finally
//Закрыть идентификатор процесса
aKernel32.CloseHandle(hToken);
EndTry;
EndFunction;

//Пример вызова функции
Message("Привилегия установлена "+?(EnablePrivilege("SeBackupPrivilege"),"удачно","не удачно"));
</pre>

== Атрибуты и функции==
{{function header}}
{{function entry
|name=[[Lib.FunctionName|<Имя функции>]]
|form={{Grey|Lib.}}'''<Имя функции>'''({{Optional|<Аргумент 1>,<Аргумент 2>,...}}):''<Возвращенное значение>''
|type=0
|status=2
|visual=0
|description=Функция вызывает зарегистрированную ранее функцию библиотеки по ее имени.
}}
{{function entry
|name=[[Lib.Load|Load]]
|form={{Grey|Lib.}}'''Load'''(''<Путь и имя библиотеки (STRING)>''):''<Новый объект (LIB)>''
|type=1
|status=2
|visual=0
|description=Функция производит попытку загрузки указанной библиотеки в память. Если путь не указан, операционная система ищет файл библиотеки в стандартных папках, заданных в переменных окружения. Если для загрузки библиотеки требуется загрузить еще какую-либо промежуточную библиотеку, последняя должна также находиться по указанному пути (либо быть доступна в окружении). В момент загрузки клиент временно меняет текущую директорию в соответствии с путем загрузки, чтобы предусмотреть такие случаи. Если библиотека (или связанные с ней библиотеки) не найдена, функция вызовет исключение. Клиент автоматически вызовет функцию отмены загрузки библиотеки, когда объект будет удален из системы. Функция не принимает серверного пути для загрузки. Если необходимо использовать файл, находящийся на сервере, его необходимо сначала скопировать на локальный компьютер (к примеру, во временную папку).
}}
{{function entry
|name=[[Lib.RegisterFunction|RegisterFunction]]
|form={{Grey|Lib.}}'''RegisterFunction'''(''<Имя функции (STRING)>''{{Optional|<Способ вызова (STRING)>{{Default|{{Eq}}"Stdcall"}},<Аргументы функции (STRING)>,<Возвращаемое значение (STRING)>}})
|type=1
|status=2
|visual=0
|description=Функция производит попытку импорта функции по ее имени из библиотеки, если функция найдена, она будет добавлена к функциям, которые возможно вызвать из данного объекта. Для функции задается, если необходимо, список и типы данных аргументов, а также тип данных возвращаемого значения, если оно присутствует.
}}
{{function entry
|name=[[Lib.CallFunction|CallFunction]]
|form={{Grey|Lib.}}'''CallFunction'''(''<Имя функции (STRING)>''{{Optional|<Аргумент 1>,<Аргумент 2>,...}}):''<Возвращенное значение>''
|type=1
|status=2
|visual=0
|description=Функция вызывает зарегистрированную ранее функцию библиотеки по ее имени. Она отличается от непосредственного вызова функции <code><Библиотека>.<Имя функции>(<Аргументы>...)</code> тем, что поддерживает имена с нестандартными символами и позволяет вызывать функции, имена которых хранятся в переменных, что иногда необходимо при написании сложных участков программ.
}}
{{function footer}}

{{Объекты}}

← Older revision	Revision as of 06:57, 22 January 2025
(No difference)

@@ Line 95: / Line 95: @@
 {{function entry
 |name=[[Lib.RegisterFunction|RegisterFunction]]
-|form={{Grey|Lib.}}'''RegisterFunction'''(''<Имя функции (STRING)>''{{Optional|<Способ вызова (STRING)>{{Default|{{Eq}}"Stdcall"}},<Аргументы функции (STRING)>,<Возвращаемое значение (STRING)>}})
+|form={{Grey|Lib.}}'''RegisterFunction'''(''<Имя функции (STRING)>''{{Optional|<Способ вызова (STRING)>{{Default|{{Eq}}"Stdcall"}},<Аргументы функции (STRING)>,<Возвращаемое значение (STRING)>,<Системный адрес функции (INT)>}})
 |type=1
 |status=2

← Older revision	Revision as of 10:14, 8 June 2023
(No difference)

@@ Line 72: / Line 72: @@
 |name=[[Lib.FunctionName|<Имя функции>]]
 |form={{Grey|Lib.}}'''<Имя функции>'''({{Optional|<Аргумент 1>,<Аргумент 2>,...}}):''<Возвращенное значение>''
 |type=0
 |status=2
 |visual=0
-|description=Функция вызывает зарегистрированную ранее функцию библиотеки по ее имени.
+|description=Атрибут получает системный указатель (адрес) функции обратного вызова. Данный указатель можно передавать во внешние потоки или приложения, либо в системные вызовы, как указатель для вызова адресуемой функции обратного вызова.
 }}
 {{function entry
@@ Line 100: / Line 108: @@
 |visual=0
 |description=Функция вызывает зарегистрированную ранее функцию библиотеки по ее имени. Она отличается от непосредственного вызова функции <code><Библиотека>.<Имя функции>(<Аргументы>...)</code> тем, что поддерживает имена с нестандартными символами и позволяет вызывать функции, имена которых хранятся в переменных, что иногда необходимо при написании сложных участков программ.
 }}
 {{function footer}}

← Older revision	Revision as of 06:55, 7 February 2021
(No difference)