Raven, в принципе то, только надо то же самое для такого числа: 0xFFEEDDCCBBAA9988]]>
#define _WS2_32_WINSOCK_SWAP_LONGLONG(l) \
( ( ((l) >> 56) & 0x00000000000000FFLL ) | \
( ((l) >> 40) & 0x000000000000FF00LL ) | \
( ((l) >> 24) & 0x0000000000FF0000LL ) | \
( ((l) >> 8) & 0x00000000FF000000LL ) | \
( ((l) << 8) & 0x000000FF00000000LL ) | \
( ((l) << 24) & 0x0000FF0000000000LL ) | \
( ((l) << 40) & 0x00FF000000000000LL ) | \
( ((l) << 56) & 0xFF00000000000000LL ) )
#ifndef htonll
__inline unsigned __int64 htonll ( unsigned __int64 Value )
{
const unsigned __int64 Retval = _WS2_32_WINSOCK_SWAP_LONGLONG (Value);
return Retval;
}
#endif /* htonll */
Выглядит довольно громоздко, учитывая, что у процессора есть инструкция bswap, которая делает это сразу для 32- или 64-битного регистра. А здесь получается для каждого байта сдвиг и AND, да потом ещё OR между результатами. Куча инструкций.
]]>data := (data << 32) | (data >> 32) ;меняем старший и младший байт местамиА пример использования можете показать?
Судя по её определению,
unsigned __int64 __inline htonll(
unsigned __int64 value
);
это инлайн-функция, т.е., по сути, макрос. Когда компилятор видит в исходнике её вызов, он туда просто вставляет её код. Поэтому в ws2_32.dll её нет, там только htonl.
]]>data := (data << 8) | (data >> 8) ;меняем старший и младший байт местами.. возьму предложенную Malcev'ым.
Она у вас не совсем доделанная:
msgbox % htonl_64(0x0123456789abcdef)
htonl_64(int) { ;x86>net
return DllCall("ntdll\RtlUlonglongByteSwap","UInt64",int,"UInt64")
;return DllCall("Ws2_32\htonll", UInt64, int, UInt64) :NOT_WORK
}А пример использования можете показать?
Т.к. меня данная функция не работает:
htonl_64(int) {
return DllCall("Ws2_32\htonll", UInt64, int, UInt64) ;NOT_WORK
}.. возьму предложенную Malcev'ым.
htonl_64(int) { ;x86>net
return DllCall("ntdll\RtlUlonglongByteSwap","UInt64",int,"UInt64")
;return DllCall("Ws2_32\htonll", UInt64, int, UInt64) :NOT_WORK
}След. пример разбирает фрейм WebSocket'а.
FIN:=(NumGet(&in_data,0,"UChar"))>>7,offset:=1
len:=NumGet(&in_data,offset,"UChar")-128,offset+=1 ;exclude the first bit
OPCODE:=NumGet(&in_data,0,"UChar")-(FIN?128:0)
if (len>=0) {
if(len<=125)
do_nothing()
else if(len=126)
len:=htons(NumGet(&in_data,offset,"UShort")),offset+=2 ;16bits
else if(len=127)
len:=htonl_64(NumGet(&in_data,offset,"UInt64")),offset+=8 ;64bits
} VarSetCapacity(mask,4)
CopyBinData(&in_data+offset,&mask,4),offset+=4
XOR_crypt(&in_data+offset,data,size:=len,mask)
StrGet(&data+offset,size,"CP0")
XOR_crypt(data,ByRef out,size,ByRef key) {
VarSetCapacity(out,size,0)
loop % size {
i:=A_Index-1
num:=Abs(NumGet(data+0, i,"UChar")-1+1)^NumGet(&key+0, (i & 0x3), "UChar")
NumPut(num, &out,i,"UChar")
} return size
}
p.s. недостающие функции можно найти на форумах AHK, если загуглить.
]]>Существует - https://docs.microsoft.com/en-us/window … ck2-htonll.
А пример использования можете показать?
]]>ntohl(int) { ;net>x86
return DllCall("Ws2_32\ntohl", UInt, int, UInt)
}
htonl(int) { ;x86>net
return DllCall("Ws2_32\htonl", UInt, int, UInt)
}
ntohs(int) { ;net>x86
return DllCall("Ws2_32\ntohs", UShort, int, UShort)
}
htons(int) { ;x86>net
return DllCall("Ws2_32\htons", UShort, int, UShort)
}
ntohl_64(int) { ;net>x86
return htonl_64(int)
}
htonl_64(int) { ;x86>net
return DllCall("ntdll\RtlUlonglongByteSwap","UInt64",int,"UInt64")
;return DllCall("Ws2_32\htonll", UInt64, int, UInt64) :NOT_WORK
}Скорее всего, не существует для 64 бит.
Существует - https://docs.microsoft.com/en-us/window … ck2-htonll.
Только, начиная с Windows 8.
Не знаю, зачем вам нужны эти uint64, но на всякий случай — AutoHotkey с этим типом нормально не работает, т.к. знает только int64. Поэтому может при вычислениях число испортить.
Сам AHK - да, переменной такое большое значение не присвоишь, а вот NumPut'ы работают без проблем.
Зачем нужны? Для программы сделал Web-интерфейс и была поставлена задача - связать основной скрипт с браузером. Использовал WebSocket, здесь у каждого фрейма есть структура, и если длина фрейма больше 16-битного числа(UShort), то необходимо длину фрейма поместить в int64. И здесь предстал вопрос: почему число задом наперед?
Скорее всего, не существует для 64 бит.
Вот из-за подобных случаев я и пользуюсь AHK 32 bit.
]]> В чём, интересно, проблема с общей поддержкой uint64.]]>т.к. знает только int64
Судя по всему, NumPut/NumGet знает UInt64, попробуй заменить в моём примере на Int64.
]]>
SetFormat, Integer, Hex
num = 0x8070605040302010
MsgBox, % num + 0
Но если нужен чисто обратный порядок байтов, то проблем быть не должно, наверно.
]]>