Форум программистов, компьютерный форум, киберфорум
Assembler: Windows/protected mode
Форум программистов и сисадминов Киберфорум > Форум программистов > Низкоуровневое программирование > Assembler, MASM, TASM > Assembler: Windows/protected mode
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
78 / 78 / 11
Регистрация: 02.12.2011
Сообщений: 296

Замена событий мьютексами в Ассемблерной программе

09.11.2013, 16:55. Показов 1312. Ответов 6
Метки нет (Все метки)
Студворк — интернет-сервис помощи студентам
...доброго времени суток, уважаемые форумчане... возникла проблемка: для синхронизации потоков необходимо заменить события мьютексами... не могу понять где "споткнулся"... программа "вылетает" в этом месте (скрин-шот имеется), а вот сам код:

Assembler
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
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304

 ;----------------------------------------------------------
 ; synch3.asm - Win32 консольнаz программа для 
 ; изучения средств синхронизации потоков в режиме ядра.    
 ;----------------------------------------------------------
 .486
 .model flat,STDCALL                  ; Модель памяти flat
 ; STDCALL - передача параметров в стиле С (справа-налево), 
 ; вызываемая процедура чистит за собою стек
 %NOINCL         ; Запретить вывод текста подключаемых файлов
 include    WindowConA.inc
 ; Объявления внешними функций Win32 (ASCII), используемых в программе:
 extrn  AllocConsole:PROC
 extrn  SetConsoleTitleA:PROC
 extrn  SetConsoleCursorPosition:PROC
 extrn  ReadFile:PROC
 extrn  CloseHandle:PROC
 extrn  ExitProcess:PROC
 extrn  MoveFileA:PROC
 extrn  CreateFileA:PROC
 extrn  GetStdHandle:PROC
 extrn  WriteConsoleA:PROC
 extrn  ReadConsoleA:PROC
 extrn  WriteFile:PROC
 extrn  GetLastError:PROC
 extrn  CreateThread:PROC
 extrn  ExitProcess:PROC
 extrn  SwitchToThread:PROC
 extrn  Sleep:PROC
 extrn  InitializeCriticalSection:PROC
 extrn  WaitForSingleObject:PROC
 extrn   CreateEventA:PROC
 extrn  SetEvent:PROC
 ; ---------------------------------------------
 ; Дополнительно подключаем
  extrn  CreateMutex:PROC
  extrn  ReleaseMutex:PROC
  ; extrn  OpenMutex:PROC
 ; --------------------------------------------- 
 ; Макрокос установки курсора у заданнyю позицию
 Set_cursor macro   cursor,posx,posy,descr,lbl
    mov     cursor.xx,posx
    push    eax
    mov     ax,         posy
    mov     cursor.yy,  ax
    pop     eax
    push    cursor
    push    descr
    call    SetConsoleCursorPosition
    cmp     eax,        0                           
    jz  lbl                   ; Если неудачно
 endm
 ; --------------------------------------------------
 ; Структура для установки положения курсора в консоли:
  COORD struc
  xx          dw    0     
  yy          dw    0      
  COORD ends
 ; --------------------------------------------------
 ; ------------ К исходной программе ----------------
 ; ------------- добавим структуру ------------------ 
  PSECURITY_ATTRIBUTES struc
   nLength              dd   5
   lpSecurityDescriptor dd   NULL
   bInheritHandle       dd   TRUE
  PSECURITY_ATTRIBUTES ends  
 ; -------------------------------------
 ; Сегмент данных
 .data
  con       COORD  <>
  dummy       dd    0    ; Фиктивный аргумент функции потока
  pThreadID   dd    0
  hThread     dd    0    ; Дескриптор потока 0
  pThreadID1  dd    0
  hThread1    dd    0    ; Дескриптор потока 1
  hEvent      dd    0    ; Дескриптор события
  dOut        dd    0    ; Дескриптор вывода консоли 
  dIn         dd    0    ; Дескриптор ввода консоли
  NumInfo     dd    0    ; Переменная вывода "титульной" строки
  ; ---- Добавим еще переменную ------
  hMtx        dd    0    ; Описатель мьютекса
 ; -------------------------------------------------------- 
  ; Задаем "титульную" строку для вывода
   INFO      db  "  Replacement of Events on Mutex "
   LENINFO  =$-INFO
 ; --------------------------------------------------------------
  str_out0    db    "Client 0: ", 0  ; Строка первого сообщения
  len_out0=$-str_out0
  str_out1    db    "Client 1:",  0  ; Строка второго сообщения
  len_out1=$-str_out1
  NumWri      dd    0
  buffer      db    20 dup(0)        ; Установка буфера 
  nbuff       dd    20
  title_text  db    "Synchronisation test", 0  ; Заголовок консоли
 ; --------------------------------------------------
 ; Переменная вывода "титульной" строки - устанавливает номер строки позиции курсора
  numrow      dw    0               
 ; -------------------------------------------------- 
  .code
 ; -------------- Объявим мьютекс -------------------- 
    Mtx       PSECURITY_ATTRIBUTES <>
 ; ---------------------------------------------------- 
  start proc               ; Точка входа в программу
    call    AllocConsole   ; Запрос консоли
    test    ax,   ax       ; Проверить успешность запроса консоли 
    jz  exit               ; Если неудачно
 ; Вывод заголовка консоли
    push    offset title_text
    call    SetConsoleTitleA
 ; ------- Получить стандартный дескриптор вывода ---------------
    push    STD_OUTPUT_HANDLE
    call    GetStdHandle
    mov     dOut,  eax      ; в dOut-дескриптор вывода консоли
    cmp     eax,   0                           
    jz   exit               ; Если неудачно
 ; ------- Получить стандартный дескриптор ввода ---------------
    push    STD_INPUT_HANDLE
    call    GetStdHandle
    mov     dIn,   eax      ; в dIn-дескриптор ввода консоли
    cmp     eax,   0                           
    jz  exit                ; Если неудачно
 ; ---------------- Вывод "титульной" строки сообщения -----------------   
    pusha
    Set_cursor con,1,numrow,dOut,exit
    inc     numrow
    push    0
    push    offset NumInfo    ; Количество выводимых на экран символов
    push    LENINFO           ; Длина строки для вывода на экран
    push    offset INFO       ; Адрес строки для вывода на экран
    push    dOut
    call    WriteConsoleA
    cmp     eax,   0
    jz  exit                  ; Если неудачно
    popa
 ; ---------------------------------------------------- 
 ; ----------- Создание события заменим ---------------
;   push    NULL
;   push    TRUE
;   push    FALSE
;   push    NULL
;   call    CreateEventA
;   cmp     eax,   NULL
;   je  exit                ; Если неудачно
;   mov     hEvent, eax
 ; --------------------------------------------------------
 ; ---------------- Создание мьютекса ---------------------
    push    NULL                          
    push    FALSE                          
    push    offset Mtx    
    call    CreateMutex                    
    cmp     eax,   NULL
    je  exit                ; Если неудачно
    mov     hMtx, eax
 ; -------------------------------------------------------
 ; ----------- Создание дочерних потоков ----------------------
    push    offset pThreadID
    push    NULL
    push    offset dummy
    push    offset ThreadProc
    push    NULL
    push    NULL 
    call    CreateThread
    cmp     eax,    NULL
    je  exit                ; Выход, если неудачно
    mov     hThread, eax
    push    offset pThreadID1
    push    NULL
    push    offset dummy
    push    offset ThreadProc1
    push    NULL
    push    NULL 
    call    CreateThread
    cmp     eax,    NULL
    je  exit                ; Выход, если неудачно
    mov     hThread1, eax
 ; ---------- Ожидание завершения работы потока ------------
    push    0ffffffffh            ; Устанавливаем время ожидания
    push    hThread
    call    WaitForSingleObject
    push    0ffffffffh            ; Устанавливаем время ожидания
    push    hThread1
    call    WaitForSingleObject
 ; ------------ Вывести содержимое буфера ------------------
    Set_cursor con,1,5,dOut,exit
    push    0
    push    offset NumWri  ; Количество выведенных на экран символов
    push    nbuff          ; Длина строки для вывода на экран
    push    offset buffer  ; Адрес строки для вивода на экран
    push    dOut
    call    WriteConsoleA
    cmp     eax,     0
    jz  exit               ; Если неудачно
 ; ------------- Обработку события заменяем ------------    
 ; ------- Перевод события в свободное состояние -------
 ;  push    hEvent
;   call    SetEvent
 ; -----------------------------------------------------
 ; ------- Перевод мьтеска в свободное состояние -------
    push    hMtx
 ;   push    TRUE   
    call    ReleaseMutex    ; Освобождаем мьютекс
 ; -----------------------------------------------------
 ; ------- ожидание перевода каретки для выхода -------
    push    0
    push    offset NumWri   ; Количество выведенных символов
    push    len_out0        ; Размер буфера вывода 
    push    offset str_out0 ; Вывод строки первого сообщения
    push    dIn
    call    ReadConsoleA     
    cmp eax, 0
    jz  exit                ; Если неудачно
 exit:
 ; --------- Закрытие описателя дочернего потока --------
    push    hThread
    call    CloseHandle
    push    hThread1
    call    CloseHandle
 ; ------------ Выход из программы ----------------------
 ; подготовка вызова VOID ExitProcess(UINT uExitCode)
    push    0
    call    ExitProcess
  start endp
 ; --------------Процедура потока 0 ---------------------
  ThreadProc proc
  arg   param:DWORD
  uses  ebx,edi,esi
 ; ------------ Обработку события заменяем --------------  
 ;---------------- Ожидание события ---------------------
;   push    0ffffffffh
;   push    hEvent
;   call    WaitForSingleObject
 ;---------------- Ожидание мьютекса --------------------- 
 ;   push   0ffffffffh
    push    hMtx
;    push    INFINITE
    push    0ffffffffh           ; Устанавливаем ожидание
    call    WaitForSingleObject
 ; ---------------- Вывести сообщение ----------------------
    Set_cursor con,1,1,dOut,exit_proc
    push    0
    push    offset NumWri   ; Количество выведенных на экран символов
    push    len_out0        ; Длина строки для вывода на экран
    push    offset str_out0 ; Адрес строки для вывода на экран
    push    dOut
    call    WriteConsoleA
 ; -------------------- Ввести строку -----------------------
    push    0
    push    offset NumWri   ; Количество введенных символов
    push    nbuff           ; Длина строки для вывода на экран
    push    offset buffer   ; Адрес буфера для введенной строки
    push    dIn
    call    ReadConsoleA
    cmp     eax,   0
    jz  exit                ; Если неудачно
  exit_proc:                ; Завершить процедуру
 ; ------------- Обработку события заменяем ------------ 
  ;  push   hEvent
  ; call    SetEvent
 
    push    offset hMtx
    call    ReleaseMutex
 ; --------------------- Возврат ------------------  
    ret
  ThreadProc  endp
 ; -------------- Процедура потока 1 ------------------------
  ThreadProc1 proc
  arg   param:DWORD
  uses  ebx,edi,esi
 ; ------------------ Ожидание события ----------------------
;   push    0ffffffffh
;   push    hEvent
;   call    WaitForSingleObject
 ;---------------- Ожидание мьютекса ---------------------
 ;   push   0ffffffffh
    push    offset hMtx       ; Устанавливаем ожидание   
;   push    INFINITE
    push    0ffffffffh
    call    WaitForSingleObject
 ; ------------------ Вывод сообщения -----------------------
    Set_cursor con,1,3,dOut,exit_proc1
    push    0
    push    offset NumWri   ; Количество выведенных на экран символов
    push    len_out1        ; Длина строки для вывода на экран
    push    offset str_out1 ; Адрес строки для вывода на экран
    push    dOut
    call    WriteConsoleA
 ; ------------------ Ввести строку -------------------------
    push    0
    push    offset NumWri   ; Количество введенных символов
    push    nbuff           ; Длина строки для вывода на экран
    push    offset buffer   ; Адрес буфера для введенной строки
    push    dIn
    call    ReadConsoleA
    cmp     eax,   0
    jz  exit                ; Если неудачно
  exit_proc1:               ; Завершение процедуры
;    push   hEvent
;   call    SetEvent
    
    push    offset hMtx
    call    ReleaseMutex
    ret
  ThreadProc1  endp
  end   start
 ; ------------------------ КОНЕЦ ------------------------
...заранее благодарен...
Миниатюры
Замена событий мьютексами в Ассемблерной программе  
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
 09.11.2013, 16:55
Ответы с готовыми решениями:

Вызов ассемблерной процедуры в программе на Си
Задание: В си-программе ввести матрицу 5х6 чисел(где каждая ячейка матрицы представляет строку символов),ввести диапазон значений. Написать...

Замена элементов в строке в ассемблерной вставке
void split_and_print(char s1) { _asm { xor ebx,ebx cld mov ecx,15 mov al, '+' lea edi,s1 m_beg:

Задачи на использование событий. Осуществить использование событий в программе с применением синтаксиса обработчика, рекомендованного для среды NET Fr
NET Framework. Программа для поиска простых чисел среди чисел Фибоначчи. При нахождении очередного простого числа активировать событие...

6
Ушел с форума
Автор FAQ
 Аватар для Mikl___
16371 / 7683 / 1080
Регистрация: 11.11.2010
Сообщений: 13,757
09.11.2013, 17:21
Simulkin Stas,
а из какой книги эта программа?
0
78 / 78 / 11
Регистрация: 02.12.2011
Сообщений: 296
09.11.2013, 17:52  [ТС]
...Mikl, по-моему, переделанный Рихтер: очень похоже на то..., а также, что вариант с событиями (он, кстати, работает без проблем) "перепаян" из C++...но однозначно утверждать не стану...
0
Ушел с форума
Автор FAQ
 Аватар для Mikl___
16371 / 7683 / 1080
Регистрация: 11.11.2010
Сообщений: 13,757
09.11.2013, 18:24
Simulkin Stas,
хорошо, внимательно полистаю Рихтера, может быть найду место, где ты "споткнулся"...
1
78 / 78 / 11
Регистрация: 02.12.2011
Сообщений: 296
12.11.2013, 08:32  [ТС]
....вопрос в продолжение темы: кто-нибудь работал или создавал мьютексы?... в данном коде проблемы начинаются уже при вызове CreateMutex... может у кого-то есть пример Ассемблерного кода с их (мьютексов) использованием?...
0
193 / 188 / 18
Регистрация: 06.10.2013
Сообщений: 357
12.11.2013, 09:07
Assembler
1
2

invoke CreateMutex,0,1,0
invoke CloseHandle,eax
Assembler
1

 Mtx       PSECURITY_ATTRIBUTES <>
Не нашёл место в коде, где поля структуры заполняются.
1
78 / 78 / 11
Регистрация: 02.12.2011
Сообщений: 296
12.11.2013, 22:02  [ТС]
...всем, кто откликнулся - большое спасибо!... вопрос снят с повестки дня... делюсь горьким опытом: может это кому-нибудь пригодится... надо же было так "подколоться" и "приколоться" - в литературе (из всей мною просмотренной - во всей!!!) записано дословно (точнее до БУКОВКИ):

Assembler
1

call CreateMutex
, а в файле подключения (IMPORT32.LIB) эта же функция обозначена как
KERNEL32.dll
/*какие-то "иероглифы" */
CreateMutexA
...последствия вполне понятны...
2
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
 12.11.2013, 22:02
Помогаю со студенческими работами здесь

Перехват и обработка в программе событий, возникающих в стороннем приложении
Всем доброго времени суток уважаемые програмисты . Начал изучать прекрасный язык програмирования си шарп. Возникла определенная задача...

Работа с мьютексами
Помогите реализовать или дайте совет) Поиск файлов по маске в каталоге. Количество потоков равно кол-ву каталогов. Найденные файлы...

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

Замена иконки в программе.
Решил поменять иконку в программе. зашел в project/ options и там поменял. Иконка в папке с прогой. Иконка поменялась только на 2 формах из...

Замена формулы в программе
Необходимо формулу из графика заменить на такую формулу , сам проект в архиве. Буду рад помощи


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Новые блоги и статьи
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
 Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов
Argus19 22.11.2025
Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином.
Programma_Boinc 20.11.2025
Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .
Ломающие изменения в C#.NStar Alpha
Etyuhibosecyu 20.11.2025
Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .
Мысли в слух
kumehtar 18.11.2025
Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .
Создание Single Page Application на фреймах
krapotkin 16.11.2025
Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .
Фото: Daniel Greenwood
kumehtar 13.11.2025
 Расскажи мне о Мире, бродяга
kumehtar 12.11.2025
— Расскажи мне о Мире, бродяга, Ты же видел моря и метели. Как сменялись короны и стяги, Как эпохи стрелою летели. - Этот мир — это крылья и горы, Снег и пламя, любовь и тревоги, И бескрайние. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Поддержать - Реклама - Условия использования - Обратная связь
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru