Blog. Just Blog

Быстрый поиск

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

Распаковка данных в формате LZSS на Ассемблере

01.02.2024 | Категория: Образ мышления: Assembler | Автор: ManHunter

Распаковка данных в формате LZSS на Ассемблере

Алгоритм компрессии LZSS - очередная модификация алгоритма LZ77 за авторством James Storer и Thomas Szymanski. По первым буквам их фамилий алгоритм и получил свое название. Впервые авторы опубликовали свою работу в 1982 году, с тех пор на базе LZSS появилось несколько компрессоров от разных авторов. Скорость упаковки не самая высокая, коэффициент сжатия тоже оставляет желать лучшего, зато хорошая скорость распаковки.

Читать статью целиком »
Просмотров: 153 | Комментариев: 6

Создание файла XLSX на PHP без сторонних библиотек

26.01.2024 | Категория: Web-мастеру и не только | Автор: ManHunter

Создание файла XLSX на PHP без сторонних библиотек

В предыдущей статье я рассказал, как можно легко извлекать данные из файлов в формате XLSX. Раз можно извлекать, значит можно и генерировать такие файлы, тем более, что их формат уже разобран. Если требуется создавать файлы только со статичными данными, без формул, сводных таблиц, графиков и прочей красоты, то совсем не обязательно таскать тяжеленные библиотеки, можно воспользоваться приведенным в статье кодом.

Читать статью целиком »
Просмотров: 117 | Комментариев: 0

Как получить список подсказок у иконок в трее

23.01.2024 | Категория: Образ мышления: Assembler | Автор: ManHunter
Сегодня снова будем издеваться над треем. На этот раз для доступа к данным в трее будем использовать средства интерфейса IAccessible, ранее мы его уже применяли, но немного для других задач.

Структуры, константы, интерфейсы и все остальное уже расписано в статье по ссылке выше, дублировать не буду. Как пройтись по иерархии окон Проводника и получить хэндл трея с иконками тут тоже было немало примеров. Переходим к основной части.
  1.         ; Получить информацию о выбранном элементе
  2.         ; [hTray] - хэндл окна трея с иконками
  3.         invoke  AccessibleObjectFromWindow,[hTray],OBJID_CLIENT,\
  4.                 CLSID_IAccessible,pAcc
  5.  
  6.         ; Количество элементов в окне
  7.         mov     eax,[pAcc]
  8.         mov     eax,[eax]
  9.         stdcall dword [eax+IAccessible.get_accChildCount],[pAcc],tmp
  10.  
  11.         invoke  wsprintf,buff,mask1,[tmp]
  12.         add     esp,12
  13.         stdcall AddLog,[hwmain],ID_LOG,buff
  14.  
  15.         ; Начинаем перебирать с 1 элемента
  16.         mov     ebx,1
  17. loc_loop:
  18.         ; Выделить память под строку
  19.         invoke  SysAllocString,szNull
  20.         mov     [bstrName],eax
  21.  
  22.         ; Получить название выбранного элемента
  23.         push    [bstrName]
  24.         mov     [varChild.vt],VT_I4
  25.         mov     [varChild.lVal],ebx
  26.         mov     eax,varChild
  27.         push    dword [eax+0Ch]
  28.         push    dword [eax+08h]
  29.         push    dword [eax+04h]
  30.         push    dword [eax]
  31.         mov     eax,[pAcc]
  32.         mov     eax,[eax]
  33.         stdcall dword [eax+IAccessible.get_accName],[pAcc]
  34.  
  35.         ; Строка подсказки
  36.         mov     eax,[bstrName]
  37.         mov     eax,[eax]
  38.         ; EAX -> строка подсказки
  39.  
  40.         ; Прибраться за собой
  41.         invoke  SysFreeString,[bstrName]
  42.  
  43.         ; Следующий элемент
  44.         inc     ebx
  45.         cmp     ebx,[tmp]
  46.         jbe     loc_loop
  47.  
  48.         ; Прибраться за собой
  49.         mov     eax,[pAcc]
  50.         mov     eax,[eax]
  51.         stdcall dword [eax+IAccessible.Release],[pAcc]
С помощью функции AccessibleObjectFromWindow получаем интерфейс IAccessible для окна трея. С помощью метода get_accChildCount определяем количество дочерних элементов окна, они же иконки в трее, в том числе и скрытые. С помощью метода get_accName получаем текстовые строки с подсказками для каждого элемента, начиная с 1-го. Нулевому элементу соответствует само окно трея.

Читать статью целиком »
Просмотров: 101 | Комментариев: 0

Как узнать локальный IP-адрес компьютера

17.01.2024 | Категория: Образ мышления: Assembler | Автор: ManHunter
Очередной небольшой сниппет, который может пригодиться в работе. Получение IP-адреса компьютера, на котором запущено приложение. Обратите внимание, что это будет локальный адрес, например, который прописан на роутере.

Для удобства дальнейшей работы надо определить структуру, в которой содержится информация о хосте. Остальное вроде бы все штатное.
  1. ; Маска для IP
  2. mask    db '%u.%u.%u.%u',0
  3.  
  4. struct HOSTENT
  5.         h_name      dd ?
  6.         h_aliases   dd ?
  7.         h_addrtype  dw ?
  8.         h_length    dw ?
  9.         h_addr_list dd ?
  10. ends
Остальной код достаточно простой. Получаем имя компьютера, по этому имени получаем информацию о хосте, затем из структуры HOSTENT извлекаем данные о IP-адресе.
  1.         invoke  WSAStartup,0101h,wsadata
  2.         or      eax,eax
  3.         jnz     loc_ret
  4.  
  5.         ; Получить имя хоста
  6.         invoke  gethostname,szHostName,MAX_PATH
  7.         or      eax,eax
  8.         jnz     loc_clean
  9.  
  10.         ; Получить адрес хоста по имени
  11.         invoke  gethostbyname,szHostName
  12.         or      eax,eax
  13.         jz      loc_clean
  14.  
  15.         ; Указатель на массив указателей на IP
  16.         mov     eax,[eax+HOSTENT.h_addr_list]
  17.         or      eax,eax
  18.         jz      loc_clean
  19.  
  20.         ; Первый указатель
  21.         mov     eax,[eax]
  22.         or      eax,eax
  23.         jz      loc_clean
  24.  
  25.         ; Преобразовать IP из формата TCP/IP в обычный
  26.         invoke  ntohl,[eax]
  27.  
  28.         ; Преобразовать байты в символы
  29.         mov     ecx,4
  30. loc_loop:
  31.         movzx   ebx,al
  32.         push    ebx
  33.         shr     eax,8
  34.         loop    loc_loop
  35.  
  36.         invoke  wsprintf,szIP,mask
  37.         add     esp,24
  38.  
  39.         ; szIP -> строка с IP хоста
  40.  
  41. loc_clean:
  42.         ; Прибраться за собой
  43.         invoke  WSACleanup
В принципе, адресов может быть больше одного, так что в случае необходимости потребуется сканировать весь массив указателей. В приведенном примере берется первый адрес.

Читать статью целиком »
Просмотров: 121 | Комментариев: 0

Чтение файла XLSX на PHP без сторонних библиотек

15.01.2024 | Категория: Web-мастеру и не только | Автор: ManHunter

Чтение файла XLSX на PHP без сторонних библиотек

На работе возникла задача читать данные из таблиц формата XLSX. Много лет для этого я использовал замечательную библиотеку PHPExcel, но по ряду технических причин дальнейшее ее использование не представляется возможным. При этом задачу никто не отменял. Поэтому пришлось рисовать свое решение, максимально простое и быстрое.

Читать статью целиком »
Просмотров: 187 | Комментариев: 0

Наверх
Powered by PCL's Speckled Band Engine 0.2 RC3
© ManHunter / PCL, 2008-2024
При использовании материалов ссылка на сайт обязательна
Время генерации: 0.08 сек. / MySQL: 2 (0.0185 сек.) / Память: 4.5 Mb
Наверх