FazBrowse GitHub Viewer
|
Trending
|
URL:
|
Home
Tools:
[Download Repo ZIP]
[View Raw Code]
[Original HTTPS Page]
OneScript/tests/binarydata.os at develop · sfaqer/OneScript · GitHub
sfaqer
/
OneScript
Public
forked from
EvilBeaver/OneScript
Notifications
You must be signed in to change notification settings
Fork
0
Star
0
Code
Pull requests
0
Actions
Projects
Security and quality
0
Insights
Additional navigation options
Code
Pull requests
Actions
Projects
Security and quality
Insights
Expand file tree
Breadcrumbs
OneScript
/
tests
/
binarydata.os
Copy path
More file actions
More file actions
Latest commit
History
History
History
74 lines (50 loc) · 2.98 KB
Breadcrumbs
OneScript
/
tests
/
binarydata.os
Copy path
File metadata and controls
74 lines (50 loc) · 2.98 KB
Raw
Copy raw file
Download raw file
Open symbols panel
Edit and raw actions
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
//////////////////////////////////////////////////////////////////////
/
// Тест класса ДвоичныеДанные
///////////////////////////////////////////////////////////////////////
Перем
юТест
;
////////////////////////////////////////////////////////////////////
// Программный интерфейс
Функция
Версия
()
Экспорт
Возврат
"0.1"
;
КонецФункции
Функция
ПолучитьСписокТестов
(
ЮнитТестирование
)
Экспорт
юТест
=
ЮнитТестирование
;
ВсеТесты
=
Новый
Массив
;
ВсеТесты.Добавить(
"ТестДолжен_ПроверитьЧтение"
)
;
ВсеТесты.Добавить(
"ТестДолжен_ПроверитьЗапись"
)
;
ВсеТесты.Добавить(
"ТестДолжен_ПроверитьСравнениеДвоичныхДанных"
)
;
Возврат
ВсеТесты
;
КонецФункции
Функция
ПрочитатьФайлВДвоичныеДанные
()
ДД
=
Новый
ДвоичныеДанные(ТекущийСценарий().Источник)
;
Возврат
ДД
;
КонецФункции
Функция
ПрочитатьФайлВСтроку
(
Знач
ИмяФайла
)
ЧТ
=
Новый
ЧтениеТекста(ИмяФайла)
;
Текст
=
ЧТ.Прочитать()
;
ЧТ.Закрыть()
;
Возврат
Текст
;
КонецФункции
Процедура
ТестДолжен_ПроверитьЧтение
()
Экспорт
ДД
=
ПрочитатьФайлВДвоичныеДанные()
;
Файл
=
Новый
Файл(ТекущийСценарий().Источник)
;
юТест.ПроверитьРавенство(Файл.Размер()
,
ДД.Размер())
;
КонецПроцедуры
Процедура
ТестДолжен_ПроверитьЗапись
()
Экспорт
ДД
=
ПрочитатьФайлВДвоичныеДанные()
;
Текст
=
ПрочитатьФайлВСтроку(ТекущийСценарий().Источник)
;
ВремФайл
=
КаталогВременныхФайлов
()
+
"/oscript-bin-data-test__.bin"
;
УдалитьФайлы
(ВремФайл)
;
ДД.Записать(ВремФайл)
;
ТекстИзДД
=
ПрочитатьФайлВСтроку(ВремФайл)
;
УдалитьФайлы
(ВремФайл)
;
юТест.ПроверитьРавенство(Текст
,
ТекстИзДД)
;
КонецПроцедуры
Процедура
ТестДолжен_ПроверитьСравнениеДвоичныхДанных
()
Экспорт
а
=
ПолучитьДвоичныеДанныеИзСтроки(
"123"
)
;
б
=
ПолучитьДвоичныеДанныеИзСтроки(
"123"
)
;
юТест.ПроверитьРавенство(а
,
б)
;
КонецПроцедуры
///////////////////////////////////////////////////////////////////
// Точка входа
//Инициализация();
Back
|
FazBrowse Home
|
New Git URL