Нативный CopyMemory

Натолкнуло на рассуждения, уже ранее упомянутое.. В общем то уже ранее слышал, про замедление работы апишных функций в современных реалиях. Собственно вопрос, возможно ли копирование блока/участка с динамически меняющимся (настраиваемым) значением(?). Собственно копирование то возможно блоков разного размера, есл говорить о больших - замапив на оба блока массивы и выполнив присвоения в цикле с одного массива в другой. Тесты показывают, что блок одинакового размера копируется в 4 раза быстрей с помощью массива long, нежели битового и также в других случаях - чем меньше итераций, тем кратно быстрей. Можно копировать и большие блоки за одну операцию средствами VB. Если создать тип, с фиксированным массивом внутри, то один экземпляр типа (фактически массив) можно присвоить другому экземпляру типа. С динамическими массивами так не получится, блок перезаписывается, также как и у строк. С другой стороны у фиксированого массива свои недостатки, его нельзя замапить изменить его заголовочную структуру и даже поменять указатель на нее

0

Сообщение от HackerVlad нельзя разве

Конечно нет.

0

Замер с моего ноутбука (Win8.1), с автокадного 64битного vba. CM в 1,8 раз медленней
1.594971/0.8798828
1,81270846526378

Добавлено через 1 минуту
Прямое присвоение там 0,3320313 при прочих равных

0

Глядя на код VBA Memory Tools, видно, что там довольно профессиональный досканально-скурпулезный подход, очнь много тестов, подчас многое не понятно. Понравились мне там конструкции типа MemByte(VarPtr(x1)) = MemByte(VarPtr(x2)). В данном случае это комбинация из парных свойств Property Let, и Property Get, и появилась идея поразбираться, как это работает. Кртакий вывод работает не очень хорошо если дело касается данных (строки, массивы) и именно это является одной из причин (возможно основной) медлительности левого Mid-а, который работает по такому же принципу, зашитому в VB. В чем подвох. В выражении
s2 передается в функцию аналогично методу ByVal, т.е. сначала копируется во временную переменную, и только потом используется в функции, и при завершении фунции временная переменная удаляется полностью вместе с данными. Дальнейшие тонкости больше подходят для другой моей темы, поэтому черкану, там тоже пару строк.

0

HackerVlad, только ситхи всё возводят в абсолют
Когда человек говорит так однозначно и бескомпромиссно, как вы, да ещё, к тому же без доказательной базы, лично для меня это говорит тольео о том, что у вас очень маленький опыт тестирования, или же вы не делаете выводов, или же тесты нельзя назвать полными.

testuser2, приветствую! Судя оп тестам, получается обычная ситуация — нет универсального варианта, и, для достижения максимальной скорости, нужно уметь комбинировать приёмы в зависимости от ситуации.
Поняло не всё, но пример с Mid'ом заинтересовал — ведь метод вставки с помощью него считается (и совершенно правильно) наибыстрейшим на VBA.

За темой послежу, желаю успехов в исследованиях. Если будет что сказать — скажу

0

Самый оптимальный и почти самый быстрый вариант - RtlMoveMemory (aka CopyMemory). Всё остальное -это микрооптимизации которые лишь в некоторых случаях могут повысить производительность.

2

The trick, полагаю, его можно считать универсальным, а также самым быстрым, но с оговоркой "если мы не хотим заморачиваться, считая биты и тому подобное".
Так получается?

0

Jack Famous, для маленьких порций данных он может быть медленнее других способов. К примеру для копирования 4 или 8 байт быстрее использовать другие способы

1

Сообщение от The trick Самый оптимальный и почти самый быстрый вариант - RtlMoveMemory (aka CopyMemory). Всё остальное -это микрооптимизации которые лишь в некоторых случаях могут повысить производительность.

Это верно, для 32-битной платформы, но вот для vba x64, данный тезис почему-то не работает, медленный он, и даже оказался медленней порядка 2-3 раз метода, который я здесь описал.

Добавлено через 17 минут
Jack Famous, обобщенно резюмируя по теме могу сказать, что мелкие операции копировния стандартных типов (long, integer и т.д.), можно осуществлять очень быстро, благодаря манипуляций с указателями, описаными уважаемым The trick-ом.

1

testuser2, нужны примеры практического применения в сравнении со штатными способами — например, вот тут, смотрите, будет быстрее, чем Mid() = , а вот тут обнуление массива быстрее, чем ReDim динамического или Erase статического.

0

Сообщение от Jack Famous нужны примеры практического применения в сравнении со штатными способам

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

Добавлено через 7 минут

Сообщение от Jack Famous HackerVlad, только ситхи всё возводят в абсолют

HackerVlad, кстати хоть и пишет часто не по теме, но один из тех людей, которые вносят существенный вклад в данный раздел, все время делится своими наработками, за что ему респект )

1

testuser2, я вас умоляю) орды халявщиков просто не осиливают не то, что работу с указателями, а даже темы с готовыми решениями)))

Сообщение от testuser2 HackerVlad, кстати хоть и пишет часто не по теме, но один из тех людей, которые вносят существенный вклад в данный раздел, все время делится своими наработками, за что ему респект )

за это я ему респектнул ранее, но он [в этой теме] как-то пишет вызывающе-негативно. Так нельзя, я считаю.

0

Это верно, для 32-битной платформы, но вот для vba x64, данный тезис почему-то не работает, медленный он, и даже оказался медленней порядка 2-3 раз метода, который я здесь описал.

Скинь пожалуйста этот тест. По факту что 32битная RtlMoveMemory что 64 битная- разницы нет. 64 битная даже быстрее должна быть. Возможно ты не учитываешь тот факт что при первом вызове API функции происходит поиск API функции, который тоже занимает какое-то время. Ну и возможно что какие-то неочевидные моменты типа конверсии данных происходит - нужно глянуть код непосредственно чтобы сказать в чем дело.

0

Jack Famous, я если честно вообще не понял, за что ты меня обосрал

Добавлено через 2 минуты
testuser2, спасибо большое) приятно слышать хорошие отзывы)

0

The trick, в модуле TestArrayCopySpeed процедура testCopySpeed, там две строчки
Если надо протестировать CopyMemory. Чтобы протестировать мою функциют надо раскомментировать строки с MemCopyLs
Расширение zip надо убрать

Вложения

РаботаСоСтрокамиVBA2.xlsm.zip (41.9 Кб, 3 просмотров)

0

Jack Famous, давай на ты, тут все на ты , и я на сколько знаю, ты общаешься на с Щербаковым и Виталием Бедным, так что мне тем более не резон )


Добавлено через 9 минут
The trick, там в тесте есть ошибка (сейчс обнаружил), я последний раз когда редактировал поменял положение параметров Dst и Src, сделал как у CopyMemory. Должно быть так.

0

Сообщение от HackerVlad Jack Famous, я если честно вообще не понял, за что ты меня обосрал

даже не думал. Просто переписка на 3ёх страницах темы выглядит, как testuser2 показывает и объясняет, а ты ушёл в какой-то однозначный отказ.

testuser2, ну раз принято, ок. С ними общаюсь, потому что давно знакомы.

0

Мир и дружба)))

2

Короче посмотрел я в чем дело. В общем в VBE7 по какой-то причине при вызове Declared функции всегда вызывается DllFunctionCall, которая каждый раз вызывает LoadLibrary/GetProcAddress пару. Почему так сделали - мне неизвестно. В VBA6/VB6 - адрес сохраняется. Прикол в том что там есть ассемблерные чанки которые такие же как и в VBA6/VB6 (NativeDeclareProlog/NativeDeclareCall/NativeDeclareEpilog), но на них в коде VBE7 нет ни одной ссылки. Вместо этого вызывается последовательность DeclareProlog/DeclareCall/DeclareEpilog в которой вызывается DllFunctionCall которая многократно замедляет любую API функцию:



К счастью есть TlbCall который не вызывает ничего лишнего, так что объявив RtlMoveMemory в tlb код будет исполняться намного-намного быстрее. Насчет самой RtlMoveMemory - там все сделано очень быстро, и ничего там тормозить не должно. Я еще поковыряю, мб как-то через Declare получится сделать через NativeDeclareEpilog. Можно кстати просто перезаписать динамические чанки и напрямую вызывать нужную функцию - нужно только глянуть какой импорт у VBE7 И есть ли доступ к ним.

5

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

1

Тут уж, как говориться, "маэстро взялся за дело"! Серьезная информация поступила )

Сообщение от The trick Вместо этого вызывается последовательность DeclareProlog/DeclareCall/DeclareEpilog в которой вызывается DllFunctionCall которая многократно замедляет любую API функцию:

Ну конечно, я когда узнал про это замедление, сразу подумал, это искусственная вещь.

Сообщение от The trick Почему так сделали - мне неизвестно.

Сейчас тупо все 64 битное, все оптимизировано под 64 бит и железки и система, и тут на тебеп.., им просто понадобилось притормозить ... мы просто промолчим, это все понятно.

Сообщение от The trick можно выполнять к примеру код из строки по типу EbExecuteLine.

Я вот недавно узнал, что на кнопку можно повесить действие
При этом строка "Range " будет интерпретировться как параметр в виде объекта Range при вызове процедуры кнопкой.

1