wt.org.eclipse.swt.win32.win32.x86.4.3.swt.org.eclipse.swt.win32.win32.x86.4.3.source-code.callback.c Maven / Gradle / Ivy
Go to download
Show more of this group Show more artifacts with this name
Show all versions of org.eclipse.swt.win32.win32.x86 Show documentation
Show all versions of org.eclipse.swt.win32.win32.x86 Show documentation
SWT is an open source widget toolkit for Java designed to provide efficient, portable access to the user-interface facilities of the operating systems on which it is implemented.
The newest version!
/*******************************************************************************
* Copyright (c) 2000, 2012 IBM Corporation and others.
* All rights reserved. This program and the accompanying materials
* are made available under the terms of the Eclipse Public License v1.0
* which accompanies this distribution, and is available at
* http://www.eclipse.org/legal/epl-v10.html
*
* Contributors:
* IBM Corporation - initial API and implementation
*******************************************************************************/
/**
* Callback implementation.
*/
#include "callback.h"
#include
#ifndef CALLBACK_NATIVE
#define CALLBACK_NATIVE(func) Java_org_eclipse_swt_internal_Callback_##func
#endif
/* define this to print out debug statements */
/* #define DEBUG_CALL_PRINTS */
/* --------------- callback globals ----------------- */
static JavaVM *jvm = NULL;
static CALLBACK_DATA callbackData[MAX_CALLBACKS];
static int callbackEnabled = 1;
static int callbackEntryCount = 0;
static int initialized = 0;
static jint JNI_VERSION = 0;
#ifdef DEBUG_CALL_PRINTS
static int counter = 0;
#endif
#ifdef ATOMIC
#include
#define ATOMIC_INC(value) OSAtomicIncrement32(&value);
#define ATOMIC_DEC(value) OSAtomicDecrement32(&value);
#else
#define ATOMIC_INC(value) value++;
#define ATOMIC_DEC(value) value--;
#endif
jintLong callback(int index, ...);
#ifdef USE_ASSEMBLER
#if !(defined (_WIN32) || defined (_WIN32_WCE))
#include
#endif
static unsigned char *callbackCode = NULL;
#define CALLBACK_THUNK_SIZE 64
#else
/* --------------- callback functions --------------- */
/* Function name from index and number of arguments */
#define FN(index, args) fn##index##_##args
/**
* Functions templates
*
* NOTE: If the maximum number of arguments changes (MAX_ARGS), the number
* of function templates has to change accordingly.
*/
/* Function template with no arguments */
#define FN_0(index) RETURN_TYPE FN(index, 0)() { return RETURN_CAST callback(index); }
/* Function template with 1 argument */
#define FN_1(index) RETURN_TYPE FN(index, 1)(jintLong p1) { return RETURN_CAST callback(index, p1); }
/* Function template with 2 arguments */
#define FN_2(index) RETURN_TYPE FN(index, 2)(jintLong p1, jintLong p2) { return RETURN_CAST callback(index, p1, p2); }
/* Function template with 3 arguments */
#define FN_3(index) RETURN_TYPE FN(index, 3)(jintLong p1, jintLong p2, jintLong p3) { return RETURN_CAST callback(index, p1, p2, p3); }
/* Function template with 4 arguments */
#define FN_4(index) RETURN_TYPE FN(index, 4)(jintLong p1, jintLong p2, jintLong p3, jintLong p4) { return RETURN_CAST callback(index, p1, p2, p3, p4); }
/* Function template with 5 arguments */
#define FN_5(index) RETURN_TYPE FN(index, 5)(jintLong p1, jintLong p2, jintLong p3, jintLong p4, jintLong p5) { return RETURN_CAST callback(index, p1, p2, p3, p4, p5); }
/* Function template with 6 arguments */
#define FN_6(index) RETURN_TYPE FN(index, 6)(jintLong p1, jintLong p2, jintLong p3, jintLong p4, jintLong p5, jintLong p6) { return RETURN_CAST callback(index, p1, p2, p3, p4, p5, p6); }
/* Function template with 7 arguments */
#define FN_7(index) RETURN_TYPE FN(index, 7)(jintLong p1, jintLong p2, jintLong p3, jintLong p4, jintLong p5, jintLong p6, jintLong p7) { return RETURN_CAST callback(index, p1, p2, p3, p4, p5, p6, p7); }
/* Function template with 8 arguments */
#define FN_8(index) RETURN_TYPE FN(index, 8)(jintLong p1, jintLong p2, jintLong p3, jintLong p4, jintLong p5, jintLong p6, jintLong p7, jintLong p8) { return RETURN_CAST callback(index, p1, p2, p3, p4, p5, p6, p7, p8); }
/* Function template with 9 arguments */
#define FN_9(index) RETURN_TYPE FN(index, 9)(jintLong p1, jintLong p2, jintLong p3, jintLong p4, jintLong p5, jintLong p6, jintLong p7, jintLong p8, jintLong p9) { return RETURN_CAST callback(index, p1, p2, p3, p4, p5, p6, p7, p8, p9); }
/* Function template with 10 arguments */
#define FN_10(index) RETURN_TYPE FN(index, 10) (jintLong p1, jintLong p2, jintLong p3, jintLong p4, jintLong p5, jintLong p6, jintLong p7, jintLong p8, jintLong p9, jintLong p10) { return RETURN_CAST callback(index, p1, p2, p3, p4, p5, p6, p7, p8, p9, p10); }
/* Function template with 11 arguments */
#define FN_11(index) RETURN_TYPE FN(index, 11) (jintLong p1, jintLong p2, jintLong p3, jintLong p4, jintLong p5, jintLong p6, jintLong p7, jintLong p8, jintLong p9, jintLong p10, jintLong p11) { return RETURN_CAST callback(index, p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11); }
/* Function template with 12 arguments */
#define FN_12(index) RETURN_TYPE FN(index, 12) (jintLong p1, jintLong p2, jintLong p3, jintLong p4, jintLong p5, jintLong p6, jintLong p7, jintLong p8, jintLong p9, jintLong p10, jintLong p11, jintLong p12) { return RETURN_CAST callback(index, p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12); }
/**
* Define all functions with the specified number of arguments.
*
* NOTE: If the maximum number of callbacks changes (MAX_CALLBACKS),
* this macro has to be updated.
*/
#if MAX_CALLBACKS == 16
#define FN_BLOCK(args) \
FN_##args(0) \
FN_##args(1) \
FN_##args(2) \
FN_##args(3) \
FN_##args(4) \
FN_##args(5) \
FN_##args(6) \
FN_##args(7) \
FN_##args(8) \
FN_##args(9) \
FN_##args(10) \
FN_##args(11) \
FN_##args(12) \
FN_##args(13) \
FN_##args(14) \
FN_##args(15)
#elif MAX_CALLBACKS == 128
#define FN_BLOCK(args) \
FN_##args(0) \
FN_##args(1) \
FN_##args(2) \
FN_##args(3) \
FN_##args(4) \
FN_##args(5) \
FN_##args(6) \
FN_##args(7) \
FN_##args(8) \
FN_##args(9) \
FN_##args(10) \
FN_##args(11) \
FN_##args(12) \
FN_##args(13) \
FN_##args(14) \
FN_##args(15) \
FN_##args(16) \
FN_##args(17) \
FN_##args(18) \
FN_##args(19) \
FN_##args(20) \
FN_##args(21) \
FN_##args(22) \
FN_##args(23) \
FN_##args(24) \
FN_##args(25) \
FN_##args(26) \
FN_##args(27) \
FN_##args(28) \
FN_##args(29) \
FN_##args(30) \
FN_##args(31) \
FN_##args(32) \
FN_##args(33) \
FN_##args(34) \
FN_##args(35) \
FN_##args(36) \
FN_##args(37) \
FN_##args(38) \
FN_##args(39) \
FN_##args(40) \
FN_##args(41) \
FN_##args(42) \
FN_##args(43) \
FN_##args(44) \
FN_##args(45) \
FN_##args(46) \
FN_##args(47) \
FN_##args(48) \
FN_##args(49) \
FN_##args(50) \
FN_##args(51) \
FN_##args(52) \
FN_##args(53) \
FN_##args(54) \
FN_##args(55) \
FN_##args(56) \
FN_##args(57) \
FN_##args(58) \
FN_##args(59) \
FN_##args(60) \
FN_##args(61) \
FN_##args(62) \
FN_##args(63) \
FN_##args(64) \
FN_##args(65) \
FN_##args(66) \
FN_##args(67) \
FN_##args(68) \
FN_##args(69) \
FN_##args(70) \
FN_##args(71) \
FN_##args(72) \
FN_##args(73) \
FN_##args(74) \
FN_##args(75) \
FN_##args(76) \
FN_##args(77) \
FN_##args(78) \
FN_##args(79) \
FN_##args(80) \
FN_##args(81) \
FN_##args(82) \
FN_##args(83) \
FN_##args(84) \
FN_##args(85) \
FN_##args(86) \
FN_##args(87) \
FN_##args(88) \
FN_##args(89) \
FN_##args(90) \
FN_##args(91) \
FN_##args(92) \
FN_##args(93) \
FN_##args(94) \
FN_##args(95) \
FN_##args(96) \
FN_##args(97) \
FN_##args(98) \
FN_##args(99) \
FN_##args(100) \
FN_##args(101) \
FN_##args(102) \
FN_##args(103) \
FN_##args(104) \
FN_##args(105) \
FN_##args(106) \
FN_##args(107) \
FN_##args(108) \
FN_##args(109) \
FN_##args(110) \
FN_##args(111) \
FN_##args(112) \
FN_##args(113) \
FN_##args(114) \
FN_##args(115) \
FN_##args(116) \
FN_##args(117) \
FN_##args(118) \
FN_##args(119) \
FN_##args(120) \
FN_##args(121) \
FN_##args(122) \
FN_##args(123) \
FN_##args(124) \
FN_##args(125) \
FN_##args(126) \
FN_##args(127)
#elif MAX_CALLBACKS == 256
#define FN_BLOCK(args) \
FN_##args(0) \
FN_##args(1) \
FN_##args(2) \
FN_##args(3) \
FN_##args(4) \
FN_##args(5) \
FN_##args(6) \
FN_##args(7) \
FN_##args(8) \
FN_##args(9) \
FN_##args(10) \
FN_##args(11) \
FN_##args(12) \
FN_##args(13) \
FN_##args(14) \
FN_##args(15) \
FN_##args(16) \
FN_##args(17) \
FN_##args(18) \
FN_##args(19) \
FN_##args(20) \
FN_##args(21) \
FN_##args(22) \
FN_##args(23) \
FN_##args(24) \
FN_##args(25) \
FN_##args(26) \
FN_##args(27) \
FN_##args(28) \
FN_##args(29) \
FN_##args(30) \
FN_##args(31) \
FN_##args(32) \
FN_##args(33) \
FN_##args(34) \
FN_##args(35) \
FN_##args(36) \
FN_##args(37) \
FN_##args(38) \
FN_##args(39) \
FN_##args(40) \
FN_##args(41) \
FN_##args(42) \
FN_##args(43) \
FN_##args(44) \
FN_##args(45) \
FN_##args(46) \
FN_##args(47) \
FN_##args(48) \
FN_##args(49) \
FN_##args(50) \
FN_##args(51) \
FN_##args(52) \
FN_##args(53) \
FN_##args(54) \
FN_##args(55) \
FN_##args(56) \
FN_##args(57) \
FN_##args(58) \
FN_##args(59) \
FN_##args(60) \
FN_##args(61) \
FN_##args(62) \
FN_##args(63) \
FN_##args(64) \
FN_##args(65) \
FN_##args(66) \
FN_##args(67) \
FN_##args(68) \
FN_##args(69) \
FN_##args(70) \
FN_##args(71) \
FN_##args(72) \
FN_##args(73) \
FN_##args(74) \
FN_##args(75) \
FN_##args(76) \
FN_##args(77) \
FN_##args(78) \
FN_##args(79) \
FN_##args(80) \
FN_##args(81) \
FN_##args(82) \
FN_##args(83) \
FN_##args(84) \
FN_##args(85) \
FN_##args(86) \
FN_##args(87) \
FN_##args(88) \
FN_##args(89) \
FN_##args(90) \
FN_##args(91) \
FN_##args(92) \
FN_##args(93) \
FN_##args(94) \
FN_##args(95) \
FN_##args(96) \
FN_##args(97) \
FN_##args(98) \
FN_##args(99) \
FN_##args(100) \
FN_##args(101) \
FN_##args(102) \
FN_##args(103) \
FN_##args(104) \
FN_##args(105) \
FN_##args(106) \
FN_##args(107) \
FN_##args(108) \
FN_##args(109) \
FN_##args(110) \
FN_##args(111) \
FN_##args(112) \
FN_##args(113) \
FN_##args(114) \
FN_##args(115) \
FN_##args(116) \
FN_##args(117) \
FN_##args(118) \
FN_##args(119) \
FN_##args(120) \
FN_##args(121) \
FN_##args(122) \
FN_##args(123) \
FN_##args(124) \
FN_##args(125) \
FN_##args(126) \
FN_##args(127) \
FN_##args(128) \
FN_##args(129) \
FN_##args(130) \
FN_##args(131) \
FN_##args(132) \
FN_##args(133) \
FN_##args(134) \
FN_##args(135) \
FN_##args(136) \
FN_##args(137) \
FN_##args(138) \
FN_##args(139) \
FN_##args(140) \
FN_##args(141) \
FN_##args(142) \
FN_##args(143) \
FN_##args(144) \
FN_##args(145) \
FN_##args(146) \
FN_##args(147) \
FN_##args(148) \
FN_##args(149) \
FN_##args(150) \
FN_##args(151) \
FN_##args(152) \
FN_##args(153) \
FN_##args(154) \
FN_##args(155) \
FN_##args(156) \
FN_##args(157) \
FN_##args(158) \
FN_##args(159) \
FN_##args(160) \
FN_##args(161) \
FN_##args(162) \
FN_##args(163) \
FN_##args(164) \
FN_##args(165) \
FN_##args(166) \
FN_##args(167) \
FN_##args(168) \
FN_##args(169) \
FN_##args(170) \
FN_##args(171) \
FN_##args(172) \
FN_##args(173) \
FN_##args(174) \
FN_##args(175) \
FN_##args(176) \
FN_##args(177) \
FN_##args(178) \
FN_##args(179) \
FN_##args(180) \
FN_##args(181) \
FN_##args(182) \
FN_##args(183) \
FN_##args(184) \
FN_##args(185) \
FN_##args(186) \
FN_##args(187) \
FN_##args(188) \
FN_##args(189) \
FN_##args(190) \
FN_##args(191) \
FN_##args(192) \
FN_##args(193) \
FN_##args(194) \
FN_##args(195) \
FN_##args(196) \
FN_##args(197) \
FN_##args(198) \
FN_##args(199) \
FN_##args(200) \
FN_##args(201) \
FN_##args(202) \
FN_##args(203) \
FN_##args(204) \
FN_##args(205) \
FN_##args(206) \
FN_##args(207) \
FN_##args(208) \
FN_##args(209) \
FN_##args(210) \
FN_##args(211) \
FN_##args(212) \
FN_##args(213) \
FN_##args(214) \
FN_##args(215) \
FN_##args(216) \
FN_##args(217) \
FN_##args(218) \
FN_##args(219) \
FN_##args(220) \
FN_##args(221) \
FN_##args(222) \
FN_##args(223) \
FN_##args(224) \
FN_##args(225) \
FN_##args(226) \
FN_##args(227) \
FN_##args(228) \
FN_##args(229) \
FN_##args(230) \
FN_##args(231) \
FN_##args(232) \
FN_##args(233) \
FN_##args(234) \
FN_##args(235) \
FN_##args(236) \
FN_##args(237) \
FN_##args(238) \
FN_##args(239) \
FN_##args(240) \
FN_##args(241) \
FN_##args(242) \
FN_##args(243) \
FN_##args(244) \
FN_##args(245) \
FN_##args(246) \
FN_##args(247) \
FN_##args(248) \
FN_##args(249) \
FN_##args(250) \
FN_##args(251) \
FN_##args(252) \
FN_##args(253) \
FN_##args(254) \
FN_##args(255)
#else
#error Invalid MAX_CALLBACKS
#endif /* MAX_CALLBACKS == 16 */
/**
* Define all callback functions.
*
* NOTE: If the maximum number of arguments changes (MAX_ARGS), the following
* has to change accordinglly.
*/
FN_BLOCK(0)
FN_BLOCK(1)
FN_BLOCK(2)
FN_BLOCK(3)
FN_BLOCK(4)
FN_BLOCK(5)
FN_BLOCK(6)
FN_BLOCK(7)
FN_BLOCK(8)
FN_BLOCK(9)
FN_BLOCK(10)
FN_BLOCK(11)
FN_BLOCK(12)
/**
* Initialize the function pointers for the callback routines.
*
* NOTE: If MAX_ARGS or MAX_CALLBACKS changes, the following has to be updated.
*/
#if MAX_CALLBACKS == 16
#define FN_A_BLOCK(args) { \
(jintLong)FN(0, args), \
(jintLong)FN(1, args), \
(jintLong)FN(2, args), \
(jintLong)FN(3, args), \
(jintLong)FN(4, args), \
(jintLong)FN(5, args), \
(jintLong)FN(6, args), \
(jintLong)FN(7, args), \
(jintLong)FN(8, args), \
(jintLong)FN(9, args), \
(jintLong)FN(10, args), \
(jintLong)FN(11, args), \
(jintLong)FN(12, args), \
(jintLong)FN(13, args), \
(jintLong)FN(14, args), \
(jintLong)FN(15, args), \
},
#elif MAX_CALLBACKS == 128
#define FN_A_BLOCK(args) { \
(jintLong)FN(0, args), \
(jintLong)FN(1, args), \
(jintLong)FN(2, args), \
(jintLong)FN(3, args), \
(jintLong)FN(4, args), \
(jintLong)FN(5, args), \
(jintLong)FN(6, args), \
(jintLong)FN(7, args), \
(jintLong)FN(8, args), \
(jintLong)FN(9, args), \
(jintLong)FN(10, args), \
(jintLong)FN(11, args), \
(jintLong)FN(12, args), \
(jintLong)FN(13, args), \
(jintLong)FN(14, args), \
(jintLong)FN(15, args), \
(jintLong)FN(16, args), \
(jintLong)FN(17, args), \
(jintLong)FN(18, args), \
(jintLong)FN(19, args), \
(jintLong)FN(20, args), \
(jintLong)FN(21, args), \
(jintLong)FN(22, args), \
(jintLong)FN(23, args), \
(jintLong)FN(24, args), \
(jintLong)FN(25, args), \
(jintLong)FN(26, args), \
(jintLong)FN(27, args), \
(jintLong)FN(28, args), \
(jintLong)FN(29, args), \
(jintLong)FN(30, args), \
(jintLong)FN(31, args), \
(jintLong)FN(32, args), \
(jintLong)FN(33, args), \
(jintLong)FN(34, args), \
(jintLong)FN(35, args), \
(jintLong)FN(36, args), \
(jintLong)FN(37, args), \
(jintLong)FN(38, args), \
(jintLong)FN(39, args), \
(jintLong)FN(40, args), \
(jintLong)FN(41, args), \
(jintLong)FN(42, args), \
(jintLong)FN(43, args), \
(jintLong)FN(44, args), \
(jintLong)FN(45, args), \
(jintLong)FN(46, args), \
(jintLong)FN(47, args), \
(jintLong)FN(48, args), \
(jintLong)FN(49, args), \
(jintLong)FN(50, args), \
(jintLong)FN(51, args), \
(jintLong)FN(52, args), \
(jintLong)FN(53, args), \
(jintLong)FN(54, args), \
(jintLong)FN(55, args), \
(jintLong)FN(56, args), \
(jintLong)FN(57, args), \
(jintLong)FN(58, args), \
(jintLong)FN(59, args), \
(jintLong)FN(60, args), \
(jintLong)FN(61, args), \
(jintLong)FN(62, args), \
(jintLong)FN(63, args), \
(jintLong)FN(64, args), \
(jintLong)FN(65, args), \
(jintLong)FN(66, args), \
(jintLong)FN(67, args), \
(jintLong)FN(68, args), \
(jintLong)FN(69, args), \
(jintLong)FN(70, args), \
(jintLong)FN(71, args), \
(jintLong)FN(72, args), \
(jintLong)FN(73, args), \
(jintLong)FN(74, args), \
(jintLong)FN(75, args), \
(jintLong)FN(76, args), \
(jintLong)FN(77, args), \
(jintLong)FN(78, args), \
(jintLong)FN(79, args), \
(jintLong)FN(80, args), \
(jintLong)FN(81, args), \
(jintLong)FN(82, args), \
(jintLong)FN(83, args), \
(jintLong)FN(84, args), \
(jintLong)FN(85, args), \
(jintLong)FN(86, args), \
(jintLong)FN(87, args), \
(jintLong)FN(88, args), \
(jintLong)FN(89, args), \
(jintLong)FN(90, args), \
(jintLong)FN(91, args), \
(jintLong)FN(92, args), \
(jintLong)FN(93, args), \
(jintLong)FN(94, args), \
(jintLong)FN(95, args), \
(jintLong)FN(96, args), \
(jintLong)FN(97, args), \
(jintLong)FN(98, args), \
(jintLong)FN(99, args), \
(jintLong)FN(100, args), \
(jintLong)FN(101, args), \
(jintLong)FN(102, args), \
(jintLong)FN(103, args), \
(jintLong)FN(104, args), \
(jintLong)FN(105, args), \
(jintLong)FN(106, args), \
(jintLong)FN(107, args), \
(jintLong)FN(108, args), \
(jintLong)FN(109, args), \
(jintLong)FN(110, args), \
(jintLong)FN(111, args), \
(jintLong)FN(112, args), \
(jintLong)FN(113, args), \
(jintLong)FN(114, args), \
(jintLong)FN(115, args), \
(jintLong)FN(116, args), \
(jintLong)FN(117, args), \
(jintLong)FN(118, args), \
(jintLong)FN(119, args), \
(jintLong)FN(120, args), \
(jintLong)FN(121, args), \
(jintLong)FN(122, args), \
(jintLong)FN(123, args), \
(jintLong)FN(124, args), \
(jintLong)FN(125, args), \
(jintLong)FN(126, args), \
(jintLong)FN(127, args), \
},
#elif MAX_CALLBACKS == 256
#define FN_A_BLOCK(args) { \
(jintLong)FN(0, args), \
(jintLong)FN(1, args), \
(jintLong)FN(2, args), \
(jintLong)FN(3, args), \
(jintLong)FN(4, args), \
(jintLong)FN(5, args), \
(jintLong)FN(6, args), \
(jintLong)FN(7, args), \
(jintLong)FN(8, args), \
(jintLong)FN(9, args), \
(jintLong)FN(10, args), \
(jintLong)FN(11, args), \
(jintLong)FN(12, args), \
(jintLong)FN(13, args), \
(jintLong)FN(14, args), \
(jintLong)FN(15, args), \
(jintLong)FN(16, args), \
(jintLong)FN(17, args), \
(jintLong)FN(18, args), \
(jintLong)FN(19, args), \
(jintLong)FN(20, args), \
(jintLong)FN(21, args), \
(jintLong)FN(22, args), \
(jintLong)FN(23, args), \
(jintLong)FN(24, args), \
(jintLong)FN(25, args), \
(jintLong)FN(26, args), \
(jintLong)FN(27, args), \
(jintLong)FN(28, args), \
(jintLong)FN(29, args), \
(jintLong)FN(30, args), \
(jintLong)FN(31, args), \
(jintLong)FN(32, args), \
(jintLong)FN(33, args), \
(jintLong)FN(34, args), \
(jintLong)FN(35, args), \
(jintLong)FN(36, args), \
(jintLong)FN(37, args), \
(jintLong)FN(38, args), \
(jintLong)FN(39, args), \
(jintLong)FN(40, args), \
(jintLong)FN(41, args), \
(jintLong)FN(42, args), \
(jintLong)FN(43, args), \
(jintLong)FN(44, args), \
(jintLong)FN(45, args), \
(jintLong)FN(46, args), \
(jintLong)FN(47, args), \
(jintLong)FN(48, args), \
(jintLong)FN(49, args), \
(jintLong)FN(50, args), \
(jintLong)FN(51, args), \
(jintLong)FN(52, args), \
(jintLong)FN(53, args), \
(jintLong)FN(54, args), \
(jintLong)FN(55, args), \
(jintLong)FN(56, args), \
(jintLong)FN(57, args), \
(jintLong)FN(58, args), \
(jintLong)FN(59, args), \
(jintLong)FN(60, args), \
(jintLong)FN(61, args), \
(jintLong)FN(62, args), \
(jintLong)FN(63, args), \
(jintLong)FN(64, args), \
(jintLong)FN(65, args), \
(jintLong)FN(66, args), \
(jintLong)FN(67, args), \
(jintLong)FN(68, args), \
(jintLong)FN(69, args), \
(jintLong)FN(70, args), \
(jintLong)FN(71, args), \
(jintLong)FN(72, args), \
(jintLong)FN(73, args), \
(jintLong)FN(74, args), \
(jintLong)FN(75, args), \
(jintLong)FN(76, args), \
(jintLong)FN(77, args), \
(jintLong)FN(78, args), \
(jintLong)FN(79, args), \
(jintLong)FN(80, args), \
(jintLong)FN(81, args), \
(jintLong)FN(82, args), \
(jintLong)FN(83, args), \
(jintLong)FN(84, args), \
(jintLong)FN(85, args), \
(jintLong)FN(86, args), \
(jintLong)FN(87, args), \
(jintLong)FN(88, args), \
(jintLong)FN(89, args), \
(jintLong)FN(90, args), \
(jintLong)FN(91, args), \
(jintLong)FN(92, args), \
(jintLong)FN(93, args), \
(jintLong)FN(94, args), \
(jintLong)FN(95, args), \
(jintLong)FN(96, args), \
(jintLong)FN(97, args), \
(jintLong)FN(98, args), \
(jintLong)FN(99, args), \
(jintLong)FN(100, args), \
(jintLong)FN(101, args), \
(jintLong)FN(102, args), \
(jintLong)FN(103, args), \
(jintLong)FN(104, args), \
(jintLong)FN(105, args), \
(jintLong)FN(106, args), \
(jintLong)FN(107, args), \
(jintLong)FN(108, args), \
(jintLong)FN(109, args), \
(jintLong)FN(110, args), \
(jintLong)FN(111, args), \
(jintLong)FN(112, args), \
(jintLong)FN(113, args), \
(jintLong)FN(114, args), \
(jintLong)FN(115, args), \
(jintLong)FN(116, args), \
(jintLong)FN(117, args), \
(jintLong)FN(118, args), \
(jintLong)FN(119, args), \
(jintLong)FN(120, args), \
(jintLong)FN(121, args), \
(jintLong)FN(122, args), \
(jintLong)FN(123, args), \
(jintLong)FN(124, args), \
(jintLong)FN(125, args), \
(jintLong)FN(126, args), \
(jintLong)FN(127, args), \
(jintLong)FN(128, args), \
(jintLong)FN(129, args), \
(jintLong)FN(130, args), \
(jintLong)FN(131, args), \
(jintLong)FN(132, args), \
(jintLong)FN(133, args), \
(jintLong)FN(134, args), \
(jintLong)FN(135, args), \
(jintLong)FN(136, args), \
(jintLong)FN(137, args), \
(jintLong)FN(138, args), \
(jintLong)FN(139, args), \
(jintLong)FN(140, args), \
(jintLong)FN(141, args), \
(jintLong)FN(142, args), \
(jintLong)FN(143, args), \
(jintLong)FN(144, args), \
(jintLong)FN(145, args), \
(jintLong)FN(146, args), \
(jintLong)FN(147, args), \
(jintLong)FN(148, args), \
(jintLong)FN(149, args), \
(jintLong)FN(150, args), \
(jintLong)FN(151, args), \
(jintLong)FN(152, args), \
(jintLong)FN(153, args), \
(jintLong)FN(154, args), \
(jintLong)FN(155, args), \
(jintLong)FN(156, args), \
(jintLong)FN(157, args), \
(jintLong)FN(158, args), \
(jintLong)FN(159, args), \
(jintLong)FN(160, args), \
(jintLong)FN(161, args), \
(jintLong)FN(162, args), \
(jintLong)FN(163, args), \
(jintLong)FN(164, args), \
(jintLong)FN(165, args), \
(jintLong)FN(166, args), \
(jintLong)FN(167, args), \
(jintLong)FN(168, args), \
(jintLong)FN(169, args), \
(jintLong)FN(170, args), \
(jintLong)FN(171, args), \
(jintLong)FN(172, args), \
(jintLong)FN(173, args), \
(jintLong)FN(174, args), \
(jintLong)FN(175, args), \
(jintLong)FN(176, args), \
(jintLong)FN(177, args), \
(jintLong)FN(178, args), \
(jintLong)FN(179, args), \
(jintLong)FN(180, args), \
(jintLong)FN(181, args), \
(jintLong)FN(182, args), \
(jintLong)FN(183, args), \
(jintLong)FN(184, args), \
(jintLong)FN(185, args), \
(jintLong)FN(186, args), \
(jintLong)FN(187, args), \
(jintLong)FN(188, args), \
(jintLong)FN(189, args), \
(jintLong)FN(190, args), \
(jintLong)FN(191, args), \
(jintLong)FN(192, args), \
(jintLong)FN(193, args), \
(jintLong)FN(194, args), \
(jintLong)FN(195, args), \
(jintLong)FN(196, args), \
(jintLong)FN(197, args), \
(jintLong)FN(198, args), \
(jintLong)FN(199, args), \
(jintLong)FN(200, args), \
(jintLong)FN(201, args), \
(jintLong)FN(202, args), \
(jintLong)FN(203, args), \
(jintLong)FN(204, args), \
(jintLong)FN(205, args), \
(jintLong)FN(206, args), \
(jintLong)FN(207, args), \
(jintLong)FN(208, args), \
(jintLong)FN(209, args), \
(jintLong)FN(210, args), \
(jintLong)FN(211, args), \
(jintLong)FN(212, args), \
(jintLong)FN(213, args), \
(jintLong)FN(214, args), \
(jintLong)FN(215, args), \
(jintLong)FN(216, args), \
(jintLong)FN(217, args), \
(jintLong)FN(218, args), \
(jintLong)FN(219, args), \
(jintLong)FN(220, args), \
(jintLong)FN(221, args), \
(jintLong)FN(222, args), \
(jintLong)FN(223, args), \
(jintLong)FN(224, args), \
(jintLong)FN(225, args), \
(jintLong)FN(226, args), \
(jintLong)FN(227, args), \
(jintLong)FN(228, args), \
(jintLong)FN(229, args), \
(jintLong)FN(230, args), \
(jintLong)FN(231, args), \
(jintLong)FN(232, args), \
(jintLong)FN(233, args), \
(jintLong)FN(234, args), \
(jintLong)FN(235, args), \
(jintLong)FN(236, args), \
(jintLong)FN(237, args), \
(jintLong)FN(238, args), \
(jintLong)FN(239, args), \
(jintLong)FN(240, args), \
(jintLong)FN(241, args), \
(jintLong)FN(242, args), \
(jintLong)FN(243, args), \
(jintLong)FN(244, args), \
(jintLong)FN(245, args), \
(jintLong)FN(246, args), \
(jintLong)FN(247, args), \
(jintLong)FN(248, args), \
(jintLong)FN(249, args), \
(jintLong)FN(250, args), \
(jintLong)FN(251, args), \
(jintLong)FN(252, args), \
(jintLong)FN(253, args), \
(jintLong)FN(254, args), \
(jintLong)FN(255, args), \
},
#else
#error Invalid MAX_CALLBACKS
#endif /* MAX_CALLBACKS == 16 */
jintLong fnx_array[MAX_ARGS+1][MAX_CALLBACKS] = {
FN_A_BLOCK(0)
FN_A_BLOCK(1)
FN_A_BLOCK(2)
FN_A_BLOCK(3)
FN_A_BLOCK(4)
FN_A_BLOCK(5)
FN_A_BLOCK(6)
FN_A_BLOCK(7)
FN_A_BLOCK(8)
FN_A_BLOCK(9)
FN_A_BLOCK(10)
FN_A_BLOCK(11)
FN_A_BLOCK(12)
};
#endif /* USE_ASSEMBLER */
/* --------------- callback class calls --------------- */
JNIEXPORT jintLong JNICALL CALLBACK_NATIVE(bind)
(JNIEnv *env, jclass that, jobject callbackObject, jobject object, jstring method, jstring signature, jint argCount, jboolean isStatic, jboolean isArrayBased, jintLong errorResult)
{
int i;
jmethodID mid = NULL;
jclass javaClass = that;
const char *methodString = NULL, *sigString = NULL;
if (jvm == NULL) (*env)->GetJavaVM(env, &jvm);
if (JNI_VERSION == 0) JNI_VERSION = (*env)->GetVersion(env);
if (!initialized) {
memset(&callbackData, 0, sizeof(callbackData));
initialized = 1;
}
if (method) methodString = (const char *) (*env)->GetStringUTFChars(env, method, NULL);
if (signature) sigString = (const char *) (*env)->GetStringUTFChars(env, signature, NULL);
if (object && methodString && sigString) {
if (isStatic) {
mid = (*env)->GetStaticMethodID(env, object, methodString, sigString);
} else {
javaClass = (*env)->GetObjectClass(env, object);
mid = (*env)->GetMethodID(env, javaClass, methodString, sigString);
}
}
if (method && methodString) (*env)->ReleaseStringUTFChars(env, method, methodString);
if (signature && sigString) (*env)->ReleaseStringUTFChars(env, signature, sigString);
if (mid == 0) goto fail;
for (i=0; iNewGlobalRef(env, callbackObject)) == NULL) goto fail;
if ((callbackData[i].object = (*env)->NewGlobalRef(env, object)) == NULL) goto fail;
callbackData[i].isStatic = isStatic;
callbackData[i].isArrayBased = isArrayBased;
callbackData[i].argCount = argCount;
callbackData[i].errorResult = errorResult;
callbackData[i].methodID = mid;
#ifndef USE_ASSEMBLER
return (jintLong) fnx_array[argCount][i];
#else
{
int j = 0, k;
unsigned char* code;
#ifdef __APPLE__
int pad = 0;
#endif
if (callbackCode == NULL) {
#if defined (_WIN32) || defined (_WIN32_WCE)
callbackCode = VirtualAlloc(NULL, CALLBACK_THUNK_SIZE * MAX_CALLBACKS, MEM_COMMIT, PAGE_EXECUTE_READWRITE);
if (callbackCode == NULL) return 0;
#else
callbackCode = mmap(NULL, CALLBACK_THUNK_SIZE * MAX_CALLBACKS, PROT_EXEC | PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_ANON, -1, 0);
if (callbackCode == MAP_FAILED) return 0;
#endif
}
code = (unsigned char *)(callbackCode + (i * CALLBACK_THUNK_SIZE));
//PUSH EBP - 1 byte
code[j++] = 0x55;
//MOV EBP,ESP - 2 bytes
code[j++] = 0x8b;
code[j++] = 0xec;
#ifdef __APPLE__
/* darwin calling conventions require that the stack be aligned on a 16-byte boundary. */
k = (argCount+3)*sizeof(jintLong);
pad = ((k + 15) & ~15) - k;
if (pad > 0) {
//SUB ESP,pad - 3 bytes
code[j++] = 0x83;
code[j++] = 0xec;
code[j++] = pad;
}
#endif
// 3*argCount bytes
for (k=(argCount + 1) * sizeof(jintLong); k >= sizeof(jintLong)*2; k -= sizeof(jintLong)) {
//PUSH SS:[EBP+k]
code[j++] = 0xff;
code[j++] = 0x75;
code[j++] = k;
}
if (i > 127) {
//PUSH i - 5 bytes
code[j++] = 0x68;
code[j++] = ((i >> 0) & 0xFF);
code[j++] = ((i >> 8) & 0xFF);
code[j++] = ((i >> 16) & 0xFF);
code[j++] = ((i >> 24) & 0xFF);
} else {
//PUSH i - 2 bytes
code[j++] = 0x6a;
code[j++] = i;
}
//MOV EAX callback - 1 + sizeof(jintLong) bytes
code[j++] = 0xb8;
((jintLong *)&code[j])[0] = (jintLong)&callback;
j += sizeof(jintLong);
//CALL EAX - 2 bytes
code[j++] = 0xff;
code[j++] = 0xd0;
//ADD ESP,(argCount + 1) * sizeof(jintLong) - 3 bytes
code[j++] = 0x83;
code[j++] = 0xc4;
#ifdef __APPLE__
code[j++] = (unsigned char)(pad + ((argCount + 1) * sizeof(jintLong)));
#else
code[j++] = (unsigned char)((argCount + 1) * sizeof(jintLong));
#endif
//POP EBP - 1 byte
code[j++] = 0x5d;
#if defined (_WIN32) || defined (_WIN32_WCE)
//RETN argCount * sizeof(jintLong) - 3 bytes
code[j++] = 0xc2;
code[j++] = (unsigned char)(argCount * sizeof(jintLong));
code[j++] = 0x00;
#else
//RETN - 1 byte
code[j++] = 0xc3;
#endif
if (j > CALLBACK_THUNK_SIZE) {
jclass errorClass = (*env)->FindClass(env, "java/lang/Error");
(*env)->ThrowNew(env, errorClass, "Callback thunk overflow");
}
return (jintLong)code;
}
#endif /* USE_ASSEMBLER */
}
}
fail:
return 0;
}
JNIEXPORT void JNICALL CALLBACK_NATIVE(unbind)
(JNIEnv *env, jclass that, jobject callback)
{
int i;
for (i=0; iIsSameObject(env, callback, callbackData[i].callback)) {
if (callbackData[i].callback != NULL) (*env)->DeleteGlobalRef(env, callbackData[i].callback);
if (callbackData[i].object != NULL) (*env)->DeleteGlobalRef(env, callbackData[i].object);
memset(&callbackData[i], 0, sizeof(CALLBACK_DATA));
}
}
}
JNIEXPORT jboolean JNICALL CALLBACK_NATIVE(getEnabled)
(JNIEnv *env, jclass that)
{
return (jboolean)callbackEnabled;
}
JNIEXPORT jint JNICALL CALLBACK_NATIVE(getEntryCount)
(JNIEnv *env, jclass that)
{
return (jint)callbackEntryCount;
}
JNIEXPORT void JNICALL CALLBACK_NATIVE(setEnabled)
(JNIEnv *env, jclass that, jboolean enable)
{
callbackEnabled = enable;
}
JNIEXPORT void JNICALL CALLBACK_NATIVE(reset)
(JNIEnv *env, jclass that)
{
memset((void *)&callbackData, 0, sizeof(callbackData));
}
jintLong callback(int index, ...)
{
if (!callbackEnabled) return 0;
{
JNIEnv *env = NULL;
jmethodID mid = callbackData[index].methodID;
jobject object = callbackData[index].object;
jboolean isStatic = callbackData[index].isStatic;
jboolean isArrayBased = callbackData[index].isArrayBased;
jint argCount = callbackData[index].argCount;
jintLong result = callbackData[index].errorResult;
jthrowable ex;
int detach = 0;
va_list vl;
#ifdef DEBUG_CALL_PRINTS
fprintf(stderr, "* callback starting %d\n", counter++);
#endif
#ifdef JNI_VERSION_1_2
if (IS_JNI_1_2) {
(*jvm)->GetEnv(jvm, (void **)&env, JNI_VERSION_1_2);
}
#endif
#ifdef JNI_VERSION_1_4
if (env == NULL) {
if (JNI_VERSION >= JNI_VERSION_1_4) {
(*jvm)->AttachCurrentThreadAsDaemon(jvm, (void **)&env, NULL);
}
}
#endif
if (env == NULL) {
(*jvm)->AttachCurrentThread(jvm, (void **)&env, NULL);
if (IS_JNI_1_2) detach = 1;
}
/* If the current thread is not attached to the VM, it is not possible to call into the VM */
if (env == NULL) {
#ifdef DEBUG_CALL_PRINTS
fprintf(stderr, "* could not get env\n");
#endif
goto noEnv;
}
/* If an exception has occurred in previous callbacks do not call into the VM. */
if ((ex = (*env)->ExceptionOccurred(env))) {
(*env)->DeleteLocalRef(env, ex);
goto done;
}
/* Call into the VM. */
ATOMIC_INC(callbackEntryCount);
va_start(vl, index);
if (isArrayBased) {
int i;
jintLongArray argsArray = (*env)->NewIntLongArray(env, argCount);
if (argsArray != NULL) {
jintLong *elements = (*env)->GetIntLongArrayElements(env, argsArray, NULL);
if (elements != NULL) {
for (i=0; iReleaseIntLongArrayElements(env, argsArray, elements, 0);
if (isStatic) {
result = (*env)->CallStaticIntLongMethod(env, object, mid, argsArray);
} else {
result = (*env)->CallIntLongMethod(env, object, mid, argsArray);
}
}
/*
* This function may be called many times before returning to Java,
* explicitly delete local references to avoid GP's in certain VMs.
*/
(*env)->DeleteLocalRef(env, argsArray);
}
} else {
if (isStatic) {
result = (*env)->CallStaticIntLongMethodV(env, object, mid, vl);
} else {
result = (*env)->CallIntLongMethodV(env, object, mid, vl);
}
}
va_end(vl);
ATOMIC_DEC(callbackEntryCount);
done:
/* If an exception has occurred in Java, return the error result. */
if ((ex = (*env)->ExceptionOccurred(env))) {
(*env)->DeleteLocalRef(env, ex);
#ifdef DEBUG_CALL_PRINTS
fprintf(stderr, "* java exception occurred\n");
(*env)->ExceptionDescribe(env);
#endif
result = callbackData[index].errorResult;
}
if (detach) {
(*jvm)->DetachCurrentThread(jvm);
env = NULL;
}
noEnv:
#ifdef DEBUG_CALL_PRINTS
fprintf(stderr, "* callback exiting %d\n", --counter);
#endif
return result;
}
}
/* ------------- callback class calls end --------------- */