Как обратиться к оперативной памяти, выделенной под указанный процесс?

@Dimon_bogoduhov · Регистрация: 15.02.2012

Ребята подскажите пожалуйста, как обратится к оперативной памяти, выделенной под указаный процес.
P.S.: Хочу сделать прогу типо артмани, но никак не могу найти про доступ к оперативной памяти. Буду очень благодарен за помощь.

@testuser2 · 16.04.2024, 15:13

Сообщение от The trick

Это невозможно в общем случае.

Все я понял, и там похоже ерунду написал. Главное закрыть вопрос )

@HackerVlad · 17.04.2024, 18:33

The Trick самый лучший программист в мире

@testuser2 · 20.04.2024, 08:28

Сообщение от The trick

Есть InStrB который не конвертирует.

Вот нет, к сожалению, счас проверил, PeakWorkingSet подрастает после использования InStrB
Нашел декларцию от 2004 там все как надо, и уж было обрадовался, но нет не работает

Visual Basic
1
Declare Function vbaInStr Lib "msvbvm60.dll" Alias "__vbaInStr" (ByVal lStart As Long, ByVal lpStringMatch As Long, ByVal lpStringCheck As Long, ByVal lCompare As Long) As Long

Отсюда такая информация, тут что-то в терминах ассемблера, я конечно не понимаю

Rule 1. Functions of rtcXXX have a tendency to take a Variant as a parameter, compared to __vba_XXX
functions which often take registers of ECX and EDX.
Rule 2. Functions of rtcXXX have a tendency to return the result in result_variant, which is passed as a
parameter, while __vba_XXX functions often return the result in EAX, AX, or AL. Some rtcXXX functions also
return the pointer to result_variant in EAX.

@The trick · 20.04.2024, 20:00

Сообщение от testuser2

Вот нет, к сожалению, счас проверил, PeakWorkingSet подрастает после использования InStrB
Нашел декларцию от 2004 там все как надо, и уж было обрадовался, но нет не работает

Да ты прав, я постоянно совершаю эту ошибку.

https://www.vbforums.com/showt... ost5563637
https://www.vbforums.com/showt... ost5563889

@testuser2 · 21.04.2024, 15:54

Сделал свою поисковушку для значения типа Double. Там перед началом поиска мапятся 8 массивов на одну область с разным смещением. Поисковой цикл шагает через 8 байт, но внутри еще проходит цикл по всем массивам, т.о. просматриваются все биты. Но увы подход оказался не очень продуктивный, меденновато (250 мб за 7 сек.), поэтому код выкладывать нет особого смысла..
The trick, спасибо за ссылки, есть там много интересного про медленный RtlCompareMemory, и др. Ты даже выкладывал там сурс-код InstrB на С. Я так понял, что если этот код переделать под байт-массивы и скомпилировать в библиотеку, это и будет самый быстрый InStrB для бинарных данных? Как таковой особой потребности нет, просто интересно )

@testuser2 · 29.04.2024, 11:58

Сообщение от testuser2

Я сделал код который находит указатель на Double занчение в ячейке Эксель.

Я короче сейчас вычислил, как там находить заголовочную таблицу, в которой хранятся указатели на данные в ячейках. Она состоит из 8 байтных структур, в которых 1е 4 байт(x86) - это указатели (либо данные если данные умещаются в 4 байта - маленькие числа) на числ(Double) либо строки (нуль-терминальные юникод), в остальной части хранится тип и еще какое-то число (х.з.). Теперь бы хотелось найти указатель на эту таблицу - в каком-нибудь из объектов, чтобы получать к ней доступ более "цивилизованным" методом. Хотелось бы просто получить список всех объектов для поиска в них нужного указателя (для этого у меня есть специальная функция, довольно простая)

@testuser2 · 30.04.2024, 13:00

Сообщение от testuser2

Кстати, похоже такой возможности нет.

Короче я нашел, как это делать. Думал будет затупно, но довольно шустро работает

Кликните здесь для просмотра всего текста

Visual Basic
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
Sub TestHeapWalk()
    Dim he As PROCESS_HEAP_ENTRY, he2 As PROCESS_HEAP_ENTRY
    Dim hHeap As LongPtr, arr(), i&, Ptr As LongPtr
    
    ReDim arr(10)
    Debug.Print VarPtr(arr(0))
    
    Ptr = VarPtr(arr(5))
    
    With GetAllocInfo(Ptr)
        Debug.Print .lpData
        Debug.Print .cbData
    End With
End Sub
 
Function GetAllocInfo(ByVal Ptr As LongPtr) As PROCESS_HEAP_ENTRY
    Dim hHeap As LongPtr, he As PROCESS_HEAP_ENTRY, he2 As PROCESS_HEAP_ENTRY
    
    hHeap = GetProcessHeap
    HeapLock hHeap
    Do While HeapWalk(hHeap, he)
        If he.wFlags = PROCESS_HEAP_ENTRY_BUSY Then
            If he.lpData > Ptr Then
                GetAllocInfo = he2
                Exit Do
            End If
            he2 = he
        End If
    Loop
    HeapUnlock hHeap
End Function

Новые блоги и статьи Все статьи Все блоги /
[golang] Конкурентный fetcher с ограничением максимального количества одновременных HTTP запросов. alhaos 10.06.2026 Задача Реализовать конкурентный fetcher с ограничением максимального количества одновременных HTTP запросов. Сигнатура func Fetch(urls string, maxConcurrent int) Result Пример urls :=. . .	[golang] Состояние гонки (race condition) alhaos 10.06.2026 Состояние гонки (race condition) Состояние гонки (Race Condition) — это ошибка, возникающая при одновременном доступе нескольких горутин к одним и тем же данным без должной синхронизации. При этом. . .	Взрослые отношения, и почему они не получаются kumehtar 09.06.2026 Когда в детстве ребёнок не получает от родителей чего-то важного, он лишается не просто приятных переживаний, а основы для формирования определённых внутренних качеств и навыков. Если ребёнок не. . .	[golang] Worker Pool alhaos 09.06.2026 Worker Pool Worker Pool — паттерн конкурентной обработки задач в Go. Суть: фиксированное количество горутин-воркеров читают задачи из общего канала и пишут результаты в общий канал результатов. . . .
[golang] Pipeline alhaos 08.06.2026 Pipeline Pipeline — паттерн конкурентной обработки данных в Go. Суть: данные проходят через цепочку независимых стадий, каждая из которых работает в своей горутине и общается с соседями через. . .	Свет внутри себя kumehtar 07.06.2026 Пусть это будет здесь lIs4oanZS9Y	Программа для com-порта Uhbif79 05.06.2026 Всем привет, давно хотел изучить Qt, начинал, бросал, потом снова начинал. И сейчас вот смог написать свою первую программу. До этого имел опыт программирования микроконтроллеров, писал прошивки на. . .	Транскрипция 55-минутного видео через Whisper: WhisperDesktop облажался, спас Google Colab[ anaschu 01.06.2026 Понадобилось получить текст из свежезагруженного видео на YouTube. Казалось бы, задача на пять минут. Заняла полтора часа. Делюсь опытом — может кому пригодится последовательность решений. . . .

@Dimon_bogoduhov 127 / 62 / 2 Регистрация: 15.02.2012 Сообщений: 127

	Как обратиться к оперативной памяти, выделенной под указанный процесс? 15.02.2012, 02:24. Показов 4256. Ответов 26 Метки нет (Все метки) Ребята подскажите пожалуйста, как обратится к оперативной памяти, выделенной под указаный процес. P.S.: Хочу сделать прогу типо артмани, но никак не могу найти про доступ к оперативной памяти. Буду очень благодарен за помощь. 0

@HackerVlad Вернулся 1748 / 644 / 45 Регистрация: 10.09.2021 Сообщений: 2,786
	17.04.2024, 18:33
	The Trick самый лучший программист в мире 2

@testuser2 1401 / 860 / 92 Регистрация: 08.02.2017 Сообщений: 3,663 Записей в блоге: 2
	21.04.2024, 15:54
	Сделал свою поисковушку для значения типа Double. Там перед началом поиска мапятся 8 массивов на одну область с разным смещением. Поисковой цикл шагает через 8 байт, но внутри еще проходит цикл по всем массивам, т.о. просматриваются все биты. Но увы подход оказался не очень продуктивный, меденновато (250 мб за 7 сек.), поэтому код выкладывать нет особого смысла.. The trick, спасибо за ссылки, есть там много интересного про медленный RtlCompareMemory, и др. Ты даже выкладывал там сурс-код InstrB на С. Я так понял, что если этот код переделать под байт-массивы и скомпилировать в библиотеку, это и будет самый быстрый InStrB для бинарных данных? Как таковой особой потребности нет, просто интересно ) 0