Функции делфи: Урок 5 — Функции — The Delphi

Delphi World — Связывание функций

49. Встроенные функции и процедуры для работы с массивами в Delphi

2) Функции массива:

3) Функции для числовых массивов:

Эти функции определены в модуле math и этот модуль должен подключаться оператором USES, чтобы компилятор их понимал.

50. Теоретические основы информатики: информатика как наука

Информатика — это фундаментальная естественная наука, изучающая процессы передачи и обработки информации. 

Источники информатики: документалистика (изучение средств и методов повышения эффективности документооборота) и кибернетика (наука об управлении).

Название «Информатика» – от французского Informatique= Informacion + Automatique (информация + автоматика).

Объект информатики – автоматизированные, основанные на ЭВМ и телекоммуникационной технике информационные системы.

Предмет информатики – информационный ресурс (его сущность, законы функционирования, механизмы взаимодействия с другими ресурсами общества и воздействия на социальный прогресс).

Как предмет информатики, информационный ресурс – это исследование информационных систем с двух сторон:

1) с формально-логической (информационной) — это развитие машинных языков, создание моделей представления знаний (фреймов), разработка информационных технологий;

2) с семантической (смысловой)- это развитие понимания процесса осознания чего – либо человеком.

В итоге закладываются основы искусственного интеллекта.

51. Информация и концепция её определения

Существование множества определений информации обусловлено сложностью, специфичностью и многообразием подходов к толкованию сущности этого понятия. Существуют 3 наиболее распространенные концепции информации, каждая из которых по-своему объясняет ее сущность.

Первая концепция (концепция К. Шеннона), отражая количественно-информационный подход, определяет информацию как меру неопределенности (энтропию) события. Количество информации в том или ином случае зависит от вероятности его получения: чем более вероятным является сообщение, тем меньше информации содержится в нем. Этот подход, хоть и не учитывает смысловую сторону информации, оказался весьма полезным в технике связи и вычислительной технике и послужил основой для измерения информации и оптимального кодирования сообщений. Кроме того, он представляется удобным для иллюстрации такого важного свойства информации, как новизна, неожиданность сообщений.

При таком понимании информация — это снятая неопределенность, или результат выбора из набора возможных альтернатив.

Вторая концепция рассматривает информацию как свойство материи. Ее появление связано с развитием кибернетики и основано на утверждении, что информацию содержат любые сообщения, воспринимаемые человеком или приборами. Наиболее ярко и образно эта концепция информации выражена академиком В.М. Глушковым. Он писал, что «информацию несут не только испещренные буквами листы книги или человеческая речь, но и солнечный свет, складки горного хребта, шум водопада, шелест травы».

То есть, информация как свойство материи создает представление о ее природе и структуре, упорядоченности и разнообразии. Она не может существовать вне материи, а значит, она существовала и будет существовать вечно, ее можно накапливать, хранить и перерабатывать.

Третья концепция основана на логико-семантическом подходе, при котором информация трактуется как знание, причем не любое знание, а та его часть, которая используется для ориентировки, для активного действия, для управления и самоуправления.

Иными словами, информация — это действующая, полезная часть знаний. Представитель этой концепции В. Г. Афанасьев, развивая логико-семантический подход, дает определение социальной информации: «Информация, циркулирующая в обществе, используемая в управлении социальными процессами, является социальной информацией. Она представляет собой знания, сообщения, сведения о социальной форме движения материи и о всех других формах в той мере, в какой она используется обществом…»

Социальная информация — многоуровневое знание. Она характеризует общественные процессы в целом — экономические, политические, социальные, демографические, культурно-духовные и т.д.; конкретные процессы, происходящие в различных ячейках общества- на предприятиях, в кооперативах, семьях и т.д.; а также интересы и стремления различных социальных групп — рабочего класса, молодежи, пенсионеров, женщин и др. В самом общем смысле под социальной информацией понимают знания, сообщения, сведения о социальной форме движения материи и о всех других ее формах в той мере, в какой они используются обществом, вовлеченными в орбиту общественной жизни. То есть информация есть содержание логического мышления, которое, воспринимаясь с помощью слышимого или видимого слова, может быть использована людьми в их деятельности.

Рассмотренные подходы в определенной мере дополняют друг друга, освещают различные стороны сущности понятия информации и облегчают тем самым систематизацию ее основных свойств. Обобщив данные подходы, можно дать следующее определение информации:

Информация — это сведения, снимающие неопределенность об окружающем мире, которые являются объектом хранения, преобразования, передачи и использования. Сведения — это знания выраженные в сигналах, сообщениях, известиях, уведомлениях и т.д.

Функции Delphi

1. Обработка событий с помощью сценариев
2. Объекты и функции
3. Импортированные объекты/функции

Сервер Syncplify.me! Скриптовый движок был написан на Delphi, поэтому имеется богатый набор стандартных функций Delphi, которые можно использовать в скрипте. И не только когда вы используете PascalScript, на самом деле эти функции были импортированы и доступны для всех языков сценариев, реализованных на сервере Syncplify.me!. На данный момент, пожалуйста, обратитесь к официальной документации Delphi, чтобы узнать, как использовать эти функции:

 
function IntToStr(i: Integer): String
function FloatToStr(e: Extended): String
function DateToStr(e: Extended): String
function TimeToStr(e: Extended): String
function DateTimeToStr(e: Extended) : String Функция
 VarToStr(v: Variant): String
  Функция
 StrToInt(s: String): Integer Функция
 StrToFloat(s: String): Расширенная функция
 StrToDate(s: String): Расширенная функция
 StrToTime(s: String) ): Расширенная функция
 StrToDateTime(s: String): Расширенная
 
функция Format(Fmt: String; Args: array): String
функция FormatFloat(Fmt: String; Value: Extended): String
функция FormatDateTime(Fmt: String; DateTime: TDateTime): String
функция FormatMaskText(EditMask: string ; Значение: строка): строка
 
функция EncodeDate(Год, Месяц, День: Слово): TDateTime
процедура DecodeDate(Дата: TDateTime; var Год, Месяц, День: Слово)
функция EncodeTime(Час, Мин, Сек, Мсек : Word): процедура TDateTime
DecodeTime(Time: TDateTime; var Hour, Min, Sec, MSsec: Word)
функция Дата: TDateTime
функция Время: TDateTime
функция Сейчас: TDateTime
функция DayOfWeek(aDate: DateTime): целое число
функция IsLeapYear(Year: Word): логическое значение
функция DaysInMonth(nYear, 0 nMonth 3 0 функция): Длина(s: String): Целое число
 функция Copy(s: String; from, count: Integer): String
 function Pos(substr, s: String): Integer
 процедура Delete(var s: String; from, count: Integer ): String
procedure Insert(s: String; var s2: String; pos: Integer): String
функция Верхний регистр (s: String): String
функция Нижний регистр(s: String): String
функция Trim(s: String): String
функция NameCase(s: String): String
функция CompareText(s, s1: String) : Integer
function Chr(i: Integer): Char
function Ord(ch: Char): Integer
процедура SetLength(var S: String; L: Integer)
 
function Round(e: Extended): Integer
функция Trunc( e: Extended): функция Integer
 Int(e: Extended): функция Integer
 Frac(X: Extended): Extended 9Функция 0013 Sqrt(e: Расширенный): Расширенная функция
 Abs(e: Расширенный): Расширенная функция
 Sin(e: Расширенный): Расширенная функция
 Cos(e: Расширенный): Расширенная функция
 ArcTan(X: Расширенный): Расширенный Функция
Tan(X: Extended): Расширенная функция
Exp(X: Extended): Расширенная функция
Ln(X: Extended): Расширенная функция
Pi: Расширенная процедура

Inc(var i: Integer; incr: Integer = 1 )
процедура Dec(var i: Integer; decr: Integer = 1)
процедура Randomize 9Функция 0013 Random: Расширенная функция
ValidInt(cInt: String): Булева функция
ValidFloat(cFlt: String): Булева функция
ValidDate(cDate: String): Булева функция
VarArrayCreate(Bounds: Array; Typ: Integer9): 0 Variant1

Блог Вход в песочницу — часть 14: Чтение старых свитков Delphi…

16 марта 2017 г. в Пакетный анализ, кластеризация, форматы файлов ZOO, реверсирование, песочница в то же время. Мониторинг API тривиален. Что не то не то:

• Безумное количество функций API (Native, Win32)
• Вызовы функций, которые немного сложнее отслеживать, поскольку функциональность предоставляется через сложный лабиринт виртуальных таблиц, например. COM
• Мониторинг функций или методов, находящихся на более высоком уровне абстракции, напр. скрипты (AutoIT, VBS, VBA), а также установщики (например, NullSoft)
• Разнообразие библиотечных функций, включенных в исполняемые файлы (статически)

Последний пункт в списке требует немного большего внимания.

Перехватывать API или перехватывать их вызовы каким-либо другим способом относительно легко, если вы знаете, где они находятся (и, возможно, сможете хорошо обработать украденные байты, поскольку некоторые вредоносные программы используют этот трюк). С кодом, встроенным непосредственно в исполняемый файл, нет ни таблицы импорта, ни списка указателей любого типа, ни виртуальных таблиц, ни RTTI, ничего. Конечно, используя такие инструменты, как IDA, или хорошую библиотеку дизассемблирования, или, возможно, инструментальное выполнение, можно определить точное расположение этих функций, но это довольно сложная и трудоемкая задача, особенно для коммерческих песочниц, которые должны работать БЫСТРО.

Кроме того, есть еще одна проблема. Код не находится по фиксированному адресу, но может быть размещен где угодно. Нет, я не говорю о ASLR. Я говорю об обертках, которые используют RunPE для запуска исполняемых файлов из памяти. Если вы перехватываете вызовы Windows API, запуск программ через RunPE не имеет значения — API в конечном итоге будут выполняться из известного места внутри системных библиотек в памяти. С перемещенным кодом статически связанные функции должны быть найдены _каждый_ раз, когда исполняемый файл загружается, сопоставляется с другим процессом или просто перемещается (прямая вставка кода, опустошение процесса, некоторые распаковщики и т. д.). Да, для вредоносной программы, которая порождает несколько дочерних процессов и несколько раз играет с RunPE в течение сеанса, это значительно замедляет тегирование функций в памяти.

Итак… после небольшого паники давайте посмотрим на очень хороший пример.

enfant ужасно программ, которые действительно раздражают при анализе, — это исполняемые файлы Delphi (и все другие марки исполняемых файлов Delphi, например, Embarcadero). Они в значительной степени зависят от пользовательских библиотек Delphi, и поэтому их трудно понять, независимо от того, отлажены они или дизассемблированы. Конечно, существуют хорошие декомпиляторы, которые могут очень помочь, и флирт-сигнатуры для исполняемых файлов Delphi также делают много волшебства при статическом анализе программы. Однако я не знаю ни одной из доступных песочниц или мониторов, выполняющих динамический анализ кода Delphi во время выполнения.

Я помню момент, когда тестировал первую перехватку функций Delphi, которую реализовал несколько лет назад. Мой разум был взорван. Внезапное понимание бизнес-логики программы, которое дало мне перехват, было невероятным… !!!

Я надеюсь, что скоро эта функциональность будет реализована в коммерческих песочницах. Существует огромное количество метаданных, которые только и ждут, чтобы их обнаружили…

Давайте посмотрим на пару примеров — приведенный ниже показывает прогрессивный разбор конфигурации трояна:

 LStrPos |, |1337|IPKServer|IPKMutex|encpassword|-1|AdobeART.exe|AdobeART|-1|
LStrPos |, |1337|IPKServer|IPKMutex|encpassword|-1|AdobeART.exe|AdobeART|-1|
LStrPos |, |1337|IPKServer|IPKMutex|encpassword|-1|AdobeART.exe|AdobeART|-1|
LStrPos |, 1337|IPKServer|IPKMutex|encpassword|-1|AdobeART.exe|AdobeART|-1|
LStrPos |, 1337|IPKServer|IPKMutex|encpassword|-1|AdobeART.exe|AdobeART|-1|
LStrPos |, 1337|IPKServer|IPKMutex|encpassword|-1|AdobeART.exe|AdobeART|-1|
LStrPos |, IPKServer|IPKMutex|encpassword|-1|AdobeART.exe|AdobeART|-1|
LStrPos |, IPKServer|IPKMutex|encpassword|-1|AdobeART.exe|AdobeART|-1|
LStrPos |, IPKServer|IPKMutex|encpassword|-1|AdobeART.exe|AdobeART|-1|
LStrPos |, IPKMutex|encpassword|-1|AdobeART.exe|AdobeART|-1|
LStrPos |, IPKMutex|encpassword|-1|AdobeART. exe|AdobeART|-1|
LStrPos |, IPKMutex|encpassword|-1|AdobeART.exe|AdobeART|-1|
LStrPos |, encpassword|-1|AdobeART.exe|AdobeART|-1|
LStrPos |, encpassword|-1|AdobeART.exe|AdobeART|-1|
LStrPos |, encpassword|-1|AdobeART.exe|AdobeART|-1|
LStrPos |, -1|AdobeART.exe|AdobeART|-1|
LStrPos |, -1|AdobeART.exe|AdobeART|-1|
LStrPos |, -1|AdobeART.exe|AdobeART|-1|
LStrPos |, AdobeART.exe|AdobeART|-1|
LStrPos |, AdobeART.exe|AdobeART|-1|
LStrPos |, AdobeART.exe|AdobeART|-1|
LStrPos |, AdobeART|-1|
LStrPos |, AdobeART|-1|
LStrPos |, AdobeART|-1|
LStrPos |, -1|
LStrPos |, -1|
LStrPos |, -1|
LStrPos |,
 

В этом примере показано сравнение символов, и строка «апокалипсис» может быть прочитана из серии сравнений строк:

 LStrCmp2 (substring=a, string=|)
LStrCmp2 (подстрока=p, строка=|)
LStrCmp2 (подстрока=o, строка=|)
LStrCmp2 (подстрока=c, строка=|)
LStrCmp2 (подстрока=a, строка=|)
LStrCmp2 (подстрока=l, строка=|)
LStrCmp2 (подстрока=y, строка=|)
LStrCmp2 (подстрока=p, строка=|)
LStrCmp2 (подстрока=s, строка=|)
LStrCmp2 (substring=e, string=|) 

Другой пример почти мгновенно сообщает мне, что программе требуется параметр командной строки:

 WStrCmp (substring=, string=/debug)
 

Как насчет антиподпрограмм на основе Delphi? Это совершенно новая неизведанная область!!!

 LStrPos (подстрока = SNIFFER, строка = EXPLORER.