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

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

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

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

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

В общем, изначально, тем или иным образом приложение (например ФМ) должно преобразовать пути в список идентификаторов. Независимо от API (ILCreateFromPath, SHParseDisplayName итп) в конечном счете будет вызван метод интерфейса IShellFolder рабочего стола Desktop.IShellFolder::ParseDisplayName, внутри которого для стандартных путей идентификаторы будут собраны из WIN32_FIND_DATAW, тут (на мой взгляд) можно было бы немного оптимизировать, но разработчикам виднее.
На 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 и ПКМ.