7-zip — нет времени спешить

Как обычно приложения создают контекстные меню.
Приведу упрощенное изложение стандартного алгоритма.

Небольшая отсылка к MSDN
Для большинства не секрет, что ОС для внутренних операций с объектами файловой системы использует не текстовые представления путей к которым мы привыкли, а некие альтернативные идентификаторы которые могут определять и виртуальные объекты.

Идентификатор элемента (функционально эквивалентен имени файлапапки) фактически является структурой ^[3] SHITEMID. Список таких идентификаторов определяется структурой ^[4] ITEMIDLIST.

Для API оболочки объекты пространства имен обычно идентифицируются указателем как раз на эту самую структуру - PIDL (Pointer to an ITEMIDLIST ^[5]).

В общем, изначально, тем или иным образом приложение (например ФМ) должно преобразовать пути в список идентификаторов. Независимо от API (ILCreateFromPath, SHParseDisplayName итп) в конечном счете будет вызван метод интерфейса IShellFolder ^[6] рабочего стола Desktop.IShellFolder::ParseDisplayName, внутри которого для стандартных путей идентификаторы будут собраны из WIN32_FIND_DATAW ^[7], тут (на мой взгляд) можно было бы немного оптимизировать, но разработчикам виднее.
На Win10+ этот метод вызывается из windows.storage.dll (CFSFolder::ParseDisplayName), как и ряд методов ниже.

Затем обычно следует цепочка вызовов (упрощенный вариант):

Desktop.IShellFolder::BindToObject    Получение интерфейса (IShellFolder) родительского объекта (другие подобные API все равно вызовут его)
Parent.IShellFolder::GetUIObjectOf    Получение интерфейса (IContextMenu)
IContextMenu::QueryInterface          Для получения указателя более высокого уровня (IContextMenu3,IContextMenu2)
CreatePopupMenu                       Создается само меню
IContextMenu#::QueryContextMenu       Заполнение меню
TrackPopupMenuEx                      Показываем меню

В GetUIObjectOf мы передаем массив указателей на наши относительные идентификаторы и получаем на выходе интерфейс с дефолтным меню.

При, казалось бы, таком простом действии как создание меню, в действительности "за кулисами" происходит просто огромный объем работы.
Описание всего этого "цирка с конями" потянет на цикл отдельных статей, поэтому сфокусируемся на области используемой 7-zip.

Мы уже выяснили, что инициатор проблемной цепочки это QueryContextMenu.
Внутри CDefFolderMenu::QueryContextMenu происходит много разного
В зависимости от флагов поведение различается, однако базово, к пунктам дефолтного меню добавляются новые с объединением.
По типам объектов в списке сканируются соответствующие ветки реестра на наличие статических и динамических обработчиков.

Для динамики вызываются:
CDefFolderMenu::_AddHandlersToDCA
HDXA_QueryContextMenu

Условный CDefFolderMenu:

*IContextMenu                                       ;  0x00  (00)  CDefFolderMenu::vftable{IContextMenu3}
*IServiceProvider                                   ;  0x08  (08)  CDefFolderMenu::vftable{IServiceProvider}
*IObjectProvider                                    ;  0x10  (16)  CDefFolderMenu::vftable{IObjectProvider}
*IShellExtInit                                      ;  0x18  (24)  CDefFolderMenu::vftable{for IShellExtInit}
*IObjectWithSelection                               ;  0x20  (32)  CDefFolderMenu::vftable{IObjectWithSelection}
*IOleWindow                                         ;  0x28  (40)  CDefFolderMenu::vftable{IOleWindow}
*IDefaultFolderMenuInitialize                       ;  0x30  (48)  CDefFolderMenu::vftable{IDefaultFolderMenuInitialize}
*IVerbStateTaskCallBack                             ;  0x38  (56)  CDefFolderMenu::vftable{IVerbStateTaskCallBack}
*IContextMenuBaseInfo                               ;  0x40  (64)  CDefFolderMenu::vftable{IContextMenuBaseInfo}
*IContextMenuForProgInvoke                          ;  0x48  (72)  CDefFolderMenu::vftable{IContextMenuForProgInvoke}
*IDefaultFolderMenuGetStateFromWrapperInstances     ;  0x50  (80)  CDefFolderMenu::vftable{IDefaultFolderMenuGetStateFromWrapperInstances}
*IContextMenuCB                                     ;  0x68  (104) CFSFolder::vftable{IContextMenuCB}
*IDataObject                                        ;  0x70  (112) CFSIDLData::vftable{IDataObject}
*IShellFolder2                                      ;  0x88  (136) CFSFolder::vftable{IShellFolder2}
*hdsaStatics                                        ;  0xB0  (176) HDSA - массив для статики    DSA_Create(sizeof(STATICITEMINFO),  1)
*HDXA                                               ;  0xB8  (184) HDXA - массив для динамики   DSA_Create(sizeof(CONTEXTMENUINFO), 5)
*hdsaCustomInfo                                     ;  0xC0  (192) HDSA - массив SEARCHINFO's   DSA_Create(sizeof(SEARCHINFO),      1)
*pidlFolder.LPITEMIDLIST                            ;  0xC8  (200) PIDL родительской директории
*apidl.LPITEMIDLIST                                 ;  0xD0  (208) Указатель на массив структур ITEMIDLIST
cidl                                                ;  0xD8  (216) Размер массива apidl (количество структур)
*paa.IAssociationArray                              ;  0xE0  (224) CAssocArray::vftable{IQueryAssociations}
*psss.IServiceProvider                              ;  0xE8  (232) CSafeServiceSite::vftable{IServiceProvider}
nKeys                                               ;  0xF0  (240) Количество хэндлов ключей реестра в массиве hkeyClsKeys
hkeyClsKeys[16]                                     ;  0xF8  (248) HKEY - (#DEF_FOLDERMENU_MAXHKEYS = 16) - Массив открытых хэдлов реестра для класса

При сборе инфы реестра заполняются соответствующие пулы данных, в основном это:

• Ассоциативный массив IAssociationArray (упорядоченный список путей реестра с информацией о типе, обработчиках, псевдонимах команд, иконках итп)

• Три динамических массива структур - для статических (hdsaStatics), динамических (HDXA) обработчиков и массив SEARCHINFO (hdsaCustomInfo).

Впоследствии при вызове метода CDefFolderMenu::InvokeCommand, если команда (verb) не каноническая (из списка дефолтного меню) и не статика, функция HDXA_LetHandlerProcessCommandEx начнет перебор структур CONTEXTMENUINFO из массива HDXA и будет пробовать вызвать метод IContextMenu::InvokeCommand по указателю в начале структуры. И тут, либо какой-то метод успешно отработает, либо, если массив кончился, CDefFolderMenu::InvokeCommand вернет E_INVALIDARG

На этом этапе нужно подгрузить в адресное пространство процесса библиотеки всех востребованных динамических расширений меню, а в случае 7-zip, это практически всегда. И тут мы подходим к инициализации нашего обработчика.

Function Name                               Invocations MinInst MaxInst AvgInst
7_zip!UString::Len                                  436       4       4       4
7_zip!operator new                                  380      10      10      10
7_zip!_malloc_base                                  380      19      19      19
7_zip!malloc                                        380       1       1       1
7_zip!operator new[]                                361       1       1       1
7_zip!free                                          287       3       3       3
7_zip!_free_base                                    287       3      13      12
7_zip!operator delete                               287       1       1       1
7_zip!operator delete[]                             287       1       1       1
7_zip!memcpy                                        250      11      46      20
7_zip!wmemcpy                                       234      12      12      12
7_zip!UString::UString                              243      20     128      22
7_zip!UString::SetStartLen                          131      27      27      27

7_zip!UString::Len:
00007ffb`b3b71690 48894c2408      mov     qword ptr [rsp+8],rcx ss:00000000`01de7cf0=0000000001de7d38
0:000> k
 # Child-SP          RetAddr           Call Site
00 00000000`01de7ce8 00007ffb`b3b71c06 7_zip!UString::Len [X:7z2201-srcCPPCommonMyString.h @ 587] 
01 00000000`01de7cf0 00007ffb`b3b71897 7_zip!CLang::OpenFromString+0x2d6 [X:7z2201-srcCPPCommonLang.cpp @ 71] 
02 00000000`01de7d90 00007ffb`b3b82224 7_zip!CLang::Open+0x1f7 [X:7z2201-srcCPPCommonLang.cpp @ 146] 
03 00000000`01de7e20 00007ffb`b3b82493 7_zip!LangOpen+0x24 [X:7z2201-srcCPP7zipUIFileManagerLangUtils.cpp @ 30] 
04 00000000`01de7e50 00007ffb`b3b82534 7_zip!OpenDefaultLang+0x143 [X:7z2201-srcCPP7zipUIFileManagerLangUtils.cpp @ 257] 
05 00000000`01de7ee0 00007ffb`b3b82339 7_zip!ReloadLang+0x34 [X:7z2201-srcCPP7zipUIFileManagerLangUtils.cpp @ 279] 
06 00000000`01de7f40 00007ffb`b3b7fa30 7_zip!LoadLangOneTime+0x39 [X:7z2201-srcCPP7zipUIFileManagerLangUtils.cpp @ 43] 
07 00000000`01de7f80 00007ffb`b80cfe1f 7_zip!CZipContextMenu::QueryContextMenu+0x20 [X:7z2201-srcCPP7zipUIExplorerContextMenu.cpp @ 535] 
08 00000000`01de8ae0 00007ffb`b80a7b70 SHELL32!HDXA_QueryContextMenu+0x5e7
09 00000000`01de8d80 00000000`005ed2ce SHELL32!CDefFolderMenu::QueryContextMenu+0x5c0
0a 00000000`01de8ef0 00000000`00000001 TOTALCMD64+0x1ed2ce

STDMETHODIMP CZipContextMenu::Initialize(LPCITEMIDLIST pidlFolder, LPDATAOBJECT dataObject, HKEY /* hkeyProgID */)
{
  _dropMode = false;
  _dropPath.Empty();
  if (pidlFolder != 0)
  {
    #ifndef UNDER_CE
    if (NShell::GetPathFromIDList(pidlFolder, _dropPath))
    {
      NName::NormalizeDirPathPrefix(_dropPath);
      _dropMode = !_dropPath.IsEmpty();
    }
    else
    #endif
      _dropPath.Empty();
  }
  return GetFileNames(dataObject, _fileNames); 🡰
}

🡻

HRESULT CZipContextMenu::GetFileNames(LPDATAOBJECT dataObject, UStringVector &fileNames)
{
  fileNames.Clear();
  if (!dataObject)
    return E_INVALIDARG;

  #ifndef UNDER_CE
  FORMATETC fmte = {CF_HDROP, NULL, DVASPECT_CONTENT, -1, TYMED_HGLOBAL};
  NCOM::CStgMedium stgMedium;
  HRESULT result = dataObject->GetData(&fmte, &stgMedium);
  if (result != S_OK)
    return result;
  stgMedium._mustBeReleased = true;

  NShell::CDrop drop(false);
  NMemory::CGlobalLock globalLock(stgMedium->hGlobal);
  drop.Attach((HDROP)globalLock.GetPointer());
  drop.QueryFileNames(fileNames);  🡰
  
  #endif

  return S_OK;
}

🡻

void CDrop::QueryFileNames(UStringVector &fileNames)
{
  UINT numFiles = QueryCountOfFiles();
  fileNames.ClearAndReserve(numFiles);
  for (UINT i = 0; i < numFiles; i++)
  {
    const UString s2 = QueryFileName(i); 🡰
    if (!s2.IsEmpty())
      fileNames.AddInReserved(s2);
  }
}

🡻

UString CDrop::QueryFileName(UINT fileIndex)
{
  UString fileName;
  {
    UINT bufferSize = QueryFile(fileIndex, (LPWSTR)NULL, 0);    🡰  вызов чтобы узнать размер буфера
    const unsigned len = bufferSize + 2;
    QueryFile(fileIndex, fileName.GetBuf(len), bufferSize + 1); 🡰  реальный вызов
    fileName.ReleaseBuf_CalcLen(len);
  }
  return fileName;
}

🡻

UINT QueryFile(UINT fileIndex, LPWSTR fileName, UINT fileNameSize)
    { return ::DragQueryFileW(m_Object, fileIndex, fileName, fileNameSize); }

🡻

SHELL32!DragQueryFileW

🡻

┌─────────────────────────────────────────────────────┐
│    4     0 [  0] SHELL32!DragQueryFileW             │
│   17     0 [  1]   SHELL32!DragQueryFileAorW        │
│   15     0 [  2]     KERNEL32!GlobalLock            │
│   28     0 [  3]       KERNEL32!IsBadReadPtr        │
│   22    28 [  2]     KERNEL32!GlobalLock            │
│   40    50 [  1]   SHELL32!DragQueryFileAorW        │
│    1     0 [  2]     KERNEL32!lstrlenWStub          │
│  654     0 [  2]     KERNELBASE!lstrlenW            │
│   60   705 [  1]   SHELL32!DragQueryFileAorW        │
│ 2181     0 [  2]     SHELL32!StringCchCopyW         │
│   68  2886 [  1]   SHELL32!DragQueryFileAorW        │
│   15     0 [  2]     KERNEL32!GlobalUnlock          │
│   73  2901 [  1]   SHELL32!DragQueryFileAorW        │
│    6     0 [  2]     SHELL32!_security_check_cookie │
│   83  2907 [  1]   SHELL32!DragQueryFileAorW        │
│    6  2990 [  0] SHELL32!DragQueryFileW             │
└─────────────────────────────────────────────────────┘

ObjCount = DragQueryFileW(hDrop, 0xFFFFFFFF, 0i64, 0);
if ( !ObjCount )
   return E_FAIL;
sub_39D20(a1 + 24);
Count = 16;                                 ✓
if ( ObjCount < 16 )                        ✓
   Count = ObjCount;                        ✓
for ( i = 0; i < Count; ++i )               ✓
{
   szFile[0] = 0;
   DragQueryFileW(hDrop, i, szFile, 0x800u);
   sub_39DC0(a1 + 24, szFile);
}

@echo off
cd /d "%~dp0"
set TestDir=%~dp0TEST
md "%TestDir%"
echo "Working..."
for /L %%N in (1,1,20000) do REM. >"%TestDir%%%N.txt"

При запуске создаст рядом с собой папку TEST с 20k текстовыми файлами нулевого размера.
Затем открываете любой ФМ кроме штатного проводника, Ctrl+A и ПКМ.