JScript: Многопоточность: [DynamicWrapperX] WINAPI и CreateTheard

В общем, мне удалось вызвать функцию скрипта из другого потока, но толку от этого нет, т.к. скрипт не выполняется параллельно, а ждёт завершения этой функции.

На самом деле поток там один и тот же. Это можно проверить, посмотрев через API GetWindowThreadProcessId, каким потоком создаются диалоговые окна в этом примере:

doc = new ActiveXObject("htmlfile");
doc.parentWindow.setTimeout(function() {
  WScript.Echo('this is thread!');
}, 0);

WScript.Echo("The end.")

Посмотреть можно, например, скриптом AutoHotkey:

F11::
    hWnd := WinExist("A")
    ThreadID := DllCall("user32.dll\GetWindowThreadProcessId"
                            , "Ptr", hWnd, "Ptr", 0)
    MsgBox, %ThreadID%
Return

Насколько я понимаю суть проблемы, функцию скрипта можно вызвать из другого потока, но выполняться она будет в своём, а не в том, который её вызвал. Код скрипта, видимо, выполняется в однопоточном апартменте (single-threaded apartment). Поэтому вызовы к его объектам (а функция — это объект) из других потоков должны идти не напрямую, а через прокси. Прокси создаётся в вызывающем потоке при маршалинге в него указателя на интерфейс вызываемого объекта. Вызывающий код получает указатель на этот прокси, а не на оригинальный объект. Сам прокси также не вызывает методы объекта напрямую, а посылает оконное сообщение в вызываемый поток. И уже там по этому сообщению вызывается метод объекта, т.е. работает он в своём потоке. Так что параллельности не получается.

Если просто использовать в другом потоке указатель на объект функции, без маршалинга, и попробовать вызвать функцию напрямую, то вернётся код ошибки. Не знаю, есть ли там какая-то защита от такого вызова или просто функции нужно что-то, хранящееся в локальной памяти потока (TLS), и она этого в другом потоке не находит. Указатель на объект DynamicWrapperX, к примеру, можно передать в другой поток и вызвать оттуда напрямую его метод, и там выполнение действительно пойдёт параллельно (другое дело, что он на это не рассчитан). С объектом функции это не проходит.

chessman
Я имел в виду, что поэкспериментировал с кодом внутри Dynwrapx. Добавил в RegisterCallback ещё один параметр, по которому она помещала в структуру Callback вместо указателя на объект функции указатель на IStream, полученный от CoMarshalInterThreadInterfaceInStream. Добавил метод NewThread, который запускал новый поток со встроенной функции, которая в свою очередь вызывала CoInitialize и CoGetInterfaceAndReleaseStream и заменяла в структуре Callback указатель на IStream указателем на прокси. После этого вызовы из нового потока по указателю, возвращаемому RegisterCallback, работают, запускается функция скрипта, но, скажем, вот такой цикл

For i=0 to 7
    DX.Beep 800, 100
    WSH.Sleep 1000
Next

при этом останавливается и ждёт, пока я не закрою диалоговое окно, выведенное функцией, т.е. видно, что параллельного выполнения нет. Функция просто вклинивается между командами скрипта. Интересно, что если вторую команду цикла реализовать как DX.Sleep 1000, функция цикл не прерывает. Видимо, при вызове WSH.Sleep проверяется очередь сообщений и обрабатывается сообщение, полученное от прокси, а Dynwrapx, конечно, этого не делает.

Может, свой скрипт-контрол соорудить многопоточный? Как-то я читал, что требуется от скрипт-хоста — вроде не так много, какие-то два или три интерфейса. Всю работу ведь по идее движок будет делать. Интересно было бы попробовать.