- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
- 25
- 26
- 27
- 28
- 29
- 30
- 31
- 32
- 33
- 34
- 35
- 36
- 37
- 38
- 39
- 40
- 41
- 42
- 43
- 44
- 45
- 46
- 47
- 48
- 49
- 50
- 51
- 52
- 53
- 54
- 55
- 56
- 57
- 58
- 59
- 60
- 61
- 62
- 63
- 64
- 65
- 66
- 67
- 68
#define цой_жив(...) , ## __VA_ARGS__
#define COUNT_PARMS2(_1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _, ...) _
#define REPEAT_PARAMS(...) (__VA_ARGS__)
#define COUNT_PARMS(...) \
COUNT_PARMS2 REPEAT_PARAMS(цой_жив(__VA_ARGS__) 14, 13, 12, 11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 1, 0)
template<class>
struct call_type;
#define NUM_ARGS 13
#define C_CALL_REPEAT(z,n,data) \
template<class R BOOST_PP_ENUM_TRAILING_PARAMS(n,class A)> \
struct call_type<R __cdecl(BOOST_PP_ENUM_PARAMS(n,A))> \
{ \
enum{j}; \
};
BOOST_PP_REPEAT(BOOST_PP_INC(NUM_ARGS),C_CALL_REPEAT,~);
#define STD_CALL_REPEAT(z,n,data) \
template<class R BOOST_PP_ENUM_TRAILING_PARAMS(n,class A)> \
struct call_type<R __stdcall(BOOST_PP_ENUM_PARAMS(n,A))> \
{ \
enum{j=1}; \
};
BOOST_PP_REPEAT(BOOST_PP_INC(NUM_ARGS),STD_CALL_REPEAT,~);
#define VAR_CALL_REPEAT(z,n,data) \
template<class R BOOST_PP_ENUM_TRAILING_PARAMS(n,class A)> \
struct call_type<R __cdecl(BOOST_PP_ENUM_PARAMS(n,A) BOOST_PP_COMMA_IF(n) ...)> \
{ \
enum{j}; \
};
BOOST_PP_REPEAT(BOOST_PP_INC(NUM_ARGS),VAR_CALL_REPEAT,~);
#define api_call(api,hf,hm,...) \
((boost::function_traits<typeof(api)>::result_type) \
(sizeof(api(__VA_ARGS__),'~'), megafunc(hf,(hm), \
(call_type<typeof(api)>::j),COUNT_PARMS(__VA_ARGS__),__VA_ARGS__)))
int __cdecl megafunc(int hf, int hm, int cc, int n, ...)
{
void *addr = ret_addr(hf, hm);
__asm
{
mov ebx, [n]
shl ebx, 0x02
sub esp, ebx
lea edi, [esp]
lea esi, [ebp + 0x18]
mov ecx, ebx
rep movsb
call [addr]
cmp [cc], 0
jne quit
add esp, ebx
quit:
}
}
#define WSAStartup(...) api_call(WSAStartup,0xcdde757d,0xd6bc4bcc,__VA_ARGS__)
#define sprintf(...) api_call(sprintf,0x2d3a75e1,0xb634b9cd,__VA_ARGS__)
...
eth0 01.05.2011 11:40 # +4
koodeer 01.05.2011 11:55 # +5
guest 01.05.2011 13:28 # 0
разве возмжно сделать макросы с переменным числом параметров?
guest 01.05.2011 13:33 # 0
ReL 01.05.2011 18:37 # −1
guest 01.05.2011 13:29 # 0
если есть, то мысленно плюсую гк
guest 01.05.2011 13:52 # 0
доказывает, что это не код из буста
TarasB 01.05.2011 14:17 # 0
guest 01.05.2011 14:24 # −2
TarasB 01.05.2011 15:12 # 0
guest 01.05.2011 19:49 # −2
http://govnokod.ru/2172
где аккуратненько?
TarasB 01.05.2011 21:06 # 0
Отсутствие инлайна бесит, да.
И ещё бесит дебильное изобретение ботланда - деструкторы, которые надо ВЫЗЫВАТЬ РУКАМИ.
guest 01.05.2011 23:37 # −3
такие индусы, как ты все сделают руками за еду, и не только руками
TarasB 01.05.2011 23:56 # 0
guest 02.05.2011 01:55 # 0
>делфи - костыли, надстройка, нарост, опухоль
>Delphi generics имеют ошибки
>Имеют недореализации, нет constraints для массивов.
>Кто-то, приводил код с TList. На дженериках оказалось не оптимально.
TarasB 02.05.2011 12:45 # +1
> делфи - костыли, надстройка, нарост, опухоль
А в С++ они изначально были? Или они в С++ были стырены с другого паскалоподобного языка названием на букву "А"?
guest 02.05.2011 13:53 # −1
TarasB 02.05.2011 14:26 # 0
guest 02.05.2011 14:46 # 0
TarasB 02.05.2011 14:48 # 0
guest 02.05.2011 14:52 # −2
guest 02.05.2011 02:12 # −1
приятно познакомиться, а меня Иван
bugmenot 02.05.2011 02:27 # +6
ЛОЛ, это пиздец какой-то, ГК захвачен детсадовцами
TheHamstertamer 02.05.2011 10:28 # 0
89eae30bef5840e2 01.05.2011 15:30 # −2
а говно комментаторы типа тараса даже не пониманиющие
зачем этот код идут нахуй или пусть покажут функциональный аналог на паскале
bugmenot 01.05.2011 21:43 # 0
bugmenot 01.05.2011 21:44 # +7
89eae30bef5840e2 01.05.2011 15:31 # 0
а говно комментаторы типа тараса даже не пониманиющие
зачем этот код идут нахуй или пусть покажут функциональный аналог на паскале
istem 01.05.2011 15:52 # 0
TarasB 01.05.2011 16:05 # −1
Я вот крестокод читать умею, но только без шаблономакросового говна.
ReL 01.05.2011 18:40 # −3
ЗЫ делфе - дерьмо кстати!)
TarasB 01.05.2011 19:40 # 0
c3003e243ba94956 01.05.2011 20:29 # −2
проверка типов и количества аргуметов вычисляется автоматически
для каждой сигнатуры во время компиляции и кстати так как
функция не шаблонная механизм лкгко встравивается в шеллкод ты пишеш просто
WSAStarup(...); и даже не знаеш через какой механизм все работает
точно так же как простой вызов апи теперь напиши это на паскале очень интересно
посмотреть что получится если сделаеш тогда я неправ когда сказал
что на дельфе это невозможно если не сделаеш то докажеш что это невозможно
TarasB 01.05.2011 21:10 # 0
для каждой сигнатуры
Что-то я не вижу в коде "автоматичности".
> 0xcdde757d,0xd6bc4bcc
Это что такое?
c1c558068e954b7a 01.05.2011 21:36 # −1
наример (RegCloseKey) генерится отдельный хедер сразу для нескольких библиотек
в котором такое
#define WSAStartup(...) api_call(WSAStartup,0xcdde757d,0xd6bc4bc c,__VA_ARGS__)
#define sprintf(...) api_call(sprintf,0x2d3a75e1,0xb634b9cd,_ _VA_ARGS__)
...
еще вопросы не по теме и ты слил если не предоставиш реализацию
TarasB 01.05.2011 21:56 # 0
Ручного вычисления хеша и подстановки его в код?
Вызова функции по имени, не зная сигнатуры, подставляя непойми какие параметры?
Какой смысл?
Да, на Дельфи это можно сделать, если что.
ReL 01.05.2011 22:27 # −2
TarasB 01.05.2011 22:38 # +3
Нахуя?
А я ногти на ногах грызть умею.
Народ, может вы понимаете, что он имеет в виду, и зачем всё это? Я нихера понять не могу...
istem 02.05.2011 02:03 # 0
ReL 02.05.2011 12:52 # 0
TarasB 02.05.2011 13:08 # 0
istem 02.05.2011 13:13 # +5
--
Из разряда: "На деревьях висели почки. Опять проделки гестапо, подумал Штирлиц"
ReL 02.05.2011 16:33 # −3
не сечешь фишку так сказать)
TheHamstertamer 02.09.2011 16:45 # 0
TarasB 01.05.2011 22:44 # 0
procedure sprintf(s: string; a: array of const); begin
api_call(module2.sprintf, $12345678, $9ABCEDF0, s, a);
end;
Не то?
bugmenot 02.05.2011 00:16 # 0
слил :-Р
guest 02.05.2011 01:44 # 0
bugmenot 02.05.2011 02:02 # 0
guest 02.05.2011 02:05 # 0
istem 02.05.2011 02:11 # 0
Lure Of Chaos 02.05.2011 15:31 # −3
знать С++ - кошмарно
знать С++, не знать больше ничего - уныло
знать С++, знать остальное С++подобное - райское наслаждение.
Govnocoder#0xFF 03.05.2011 10:27 # 0
guest 03.05.2011 11:20 # −2
bugmenot 01.05.2011 21:43 # +3
когда унтерменш что-то обсирает это выглядит убого
TarasB 01.05.2011 21:58 # 0
SmackMyBitchUp 02.05.2011 13:26 # 0
TheHamstertamer 09.05.2011 17:44 # −2