Obsah
1. Pohled pod kapotu JVM – sledování činnosti virtuálního stroje Javy přes rozhraní JVM TI (2.část)
2. Alokace a dealokace paměti v agentech využívajících rozhraní JVM TI
3. Zjištění jmen a signatur volaných metod
4. Čtvrtý demonstrační příklad: výpis signatur všech volaných metod
5. Použití zámků v agentech využívajících rozhraní JVM TI
6. Funkce CreateRawMonitor, RawMonitorEnter a RawMonitorExit
7. Pátý demonstrační příklad: agent pro výpis volaných metod využívající zámky
8. Šestý demonstrační příklad: agent registrující práci garbage collectoru
1. Pohled pod kapotu JVM – sledování činnosti virtuálního stroje Javy přes rozhraní JVM TI (2.část)
V dnešní části seriálu o programovacím jazyku Java i o jeho virtuálním stroji budeme pokračovat v popisu rozhraní JVM TI. Navážeme na předchozí část, v níž byl na konci (osmá kapitola) ukázán JVM TI agent, který dokázal ve virtuálním stroji Javy detekovat volání každé metody. Nyní si řekneme, jak lze tento příklad rozšířit takovým způsobem, aby se vypisovalo i jméno metody a současně i její signatura, což je zajisté mnohem užitečnější. Termínem signatura je zde myšlen jednoznačný zápis počtu a typů parametrů metody i jejího návratového typu. Náš nový agent by měl vypisovat informace o volaných metodách v tomto formátu:
called method method1 with signature (Ljava/lang/String;Ljava/lang/String;)V called method <init> with signature ()V called method <init> with signature (I)V called method <init> with signature ()V called method append with signature (Ljava/lang/String;)Ljava/lang/StringBuilder; called method append with signature (Ljava/lang/String;)Ljava/lang/AbstractStringBuilder; called method length with signature ()I called method getChars with signature (II[CI)V called method arraycopy with signature (Ljava/lang/Object;ILjava/lang/Object;II)V called method append with signature (Ljava/lang/String;)Ljava/lang/StringBuilder; called method append with signature (Ljava/lang/String;)Ljava/lang/AbstractStringBuilder; called method length with signature ()I called method getChars with signature (II[CI)V called method arraycopy with signature (Ljava/lang/Object;ILjava/lang/Object;II)V called method append with signature (Ljava/lang/String;)Ljava/lang/StringBuilder; called method append with signature (Ljava/lang/String;)Ljava/lang/AbstractStringBuilder; called method length with signature ()I called method getChars with signature (II[CI)V called method arraycopy with signature (Ljava/lang/Object;ILjava/lang/Object;II)V called method toString with signature ()Ljava/lang/String; called method <init> with signature ([CII)V called method <init> with signature ()V called method copyOfRange with signature ([CII)[C called method min with signature (II)I called method arraycopy with signature (Ljava/lang/Object;ILjava/lang/Object;II)V called method method2 with signature (Ljava/lang/String;)V called method method3 with signature (Ljava/lang/String;)V called method println with signature (Ljava/lang/String;)V
Jméno metody má jasný význam (ještě ho příště doplníme o jméno příslušné třídy), ovšem signatura metody může v některých případech vypadat poněkud nečitelně. Vzhledem k tomu, že se programátoři se signaturami metod mohou setkat i v dalších částech JVM (v bajtkódu atd.), bude vhodné si ozřejmit, jak se signatury vlastně zapisují. Obecný tvar jejich zápisu je následující:
(typy_parametrů)návratový_typ
Všechny typy, tj. jak typy parametrů metody, tak i její návratový typ, jsou v případě jednoduchých (primitivních) datových typů zapisovány jedním znakem (viz též následující tabulka). V případě polí se používá znak [, popř. u vícedimenzionálních polí se zapisuje více znaků [ za sebe. Za těmito znaky následuje specifikace typů prvků polí. Pokud je typem třída či rozhraní, je před její jméno zapsán znak L a jméno třídy/rozhraní je ukončeno středníkem:
| # | Znak/řetězec | Datový typ | Význam |
|---|---|---|---|
| 1 | B | byte | osmibitové celé číslo se znaménkem |
| 2 | C | char | znak reprezentovaný v Unikódu |
| 3 | D | double | číslo s plovoucí řádovou čárkou s dvojitou přesností |
| 4 | F | float | číslo s plovoucí řádovou čárkou s jednoduchou přesností |
| 5 | I | int | 32bitové celé číslo se znaménkem |
| 6 | J | long | 64bitové celé číslo se znaménkem |
| 7 | Ljméno_třídy; | reference | instance třídy zadaného jména |
| 8 | S | short | 16bitové celé číslo se znaménkem |
| 9 | Z | boolean | pravdivostní hodnota true/false |
| 10 | V | void | void – pouze u návratového typu |
| 11 | [ | reference | jednodimenzionální pole |
Podívejme se nyní na několik jednoduchých příkladů zápisu signatur:
void foo() ()V int foo() ()I int foo(int, int) (II)I float foo() ()F double foo() ()D void foo(int) (I)V int[] foo() ()[I int[][] foo() ()[[I String foo() ()Ljava.lang.String; void foo(String) (Ljava/lang/String;)V String foo(String) (Ljava/lang/String;)Ljava.lang.String;
2. Alokace a dealokace paměti v agentech využívajících rozhraní JVM TI
Ještě předtím, než si ve čtvrté kapitole ukážeme zdrojový text čtvrtého demonstračního agenta, se musíme dozvědět základní informace o dvou funkcích nazvaných Allocate a Deallocate z rozhraní JVM TI určených pro alokaci a dealokaci paměti přímo za běhu agenta (runtime). Tato dvojice funkcí obecně provádí správu paměti odlišným způsobem než céčkové funkce malloc/calloc/alloca/free a samozřejmě se taktéž liší od dvojice operátorů new/delete používaných v programovacím jazyce C++. Z tohoto důvodu budu v případě demonstračních agentů při alokacích a dealokacích paměti většinou používat funkce nabízené přímo rozhraním JVM TI, což má tu výhodu, že není nutné složitě zjišťovat, jakým způsobem se má provést dealokace (uvolnění) bloku paměti ve funkci, které se „odněkud z neznáma“ předává ukazatel na dříve alokovaný paměťový region. Pojďme si tedy nyní obě zmiňované funkce popsat.
Pro alokaci paměťového regionu (typicky se jedná o řetězce – názvy tříd, metod, atributů atd.) je vhodné namísto funkcí ze standardní céčkové knihovny použít funkci nazvanou Allocate, které se předá požadovaná velikost alokované paměti (zde je použit typ jlong z rozhraní JNI – Java Native Interface, který většinou odpovídá datovému typu long int či long long int) a taktéž ukazatel na řetězec, který je po zavolání funkce Allocate naplněn adresou, na níž začíná oblast vyhrazená pro nově alokovaný řetězec/paměťový blok. Za řetězec považujme v céčku pro jednoduchost typ char*, ukazatel na řetězec má potom typ char**. Je nutné mít na paměti, že návratovou hodnotou této funkce NENÍ ukazatel na vytvořený řetězec/paměťový region (jako je tomu například u funkcí malloc, calloc či alloca ze standardní céčkové knihovny), ale chybový kód, podobně jako je tomu u většiny funkcí z rozhraní JVM TI. Ukazatel na alokovaný paměťový region je nutné vždy získat přes druhý parametr této funkce:
jvmtiError
Allocate(
jvmtiEnv* env,
jlong size,
unsigned char** mem_ptr)
Opakem funkce Allocate je funkce Deallocate, která naopak provede uvolnění dříve naalokovaného paměťového regionu. Této funkci se opět předává odkaz na strukturu jvmtiEnv a ukazatel na oblast paměti alokovanou dříve pomocí funkce Allocate:
jvmtiError
Deallocate(
jvmtiEnv* env,
unsigned char* mem)
3. Zjištění jmen a signatur volaných metod
Se znalostí funkce Allocate() a především pak funkce Deallocate() je již možné upravit demonstrační příklad ze závěru předchozího článku takovým způsobem, aby mohl vypisovat jména a signatury všech volaných metod. Pro tyto účely může náš testovací agent použít funkci nazvanou GetMethodName(), jejíž hlavička vypadá následovně:
jvmtiError
GetMethodName(
jvmtiEnv* env,
jmethodID method,
char** name_ptr,
char** signature_ptr,
char** generic_ptr)
Prvním parametrem této funkce je odkaz na strukturu jvmtiEnv, který je použit ve většině funkcí rozhraní JVM TI, takže se pro nás nejedná o žádnou novinku. Druhým parametrem funkce je identifikátor metody, který je typu jmethodID. Tento typ je většinou v hlavičkovém souboru jvmti.h deklarován jako long int či long long int v závislosti na architektuře počítače a použitém systému. Další tři parametry jsou již mnohem zajímavější, protože jejich datový typ je char**, tj. jedná se o ukazatele na „řetězce“, kde řetězce jsou v céčku představovány typem char*, popř. const char *. Důvod, proč se do funkce GetMethodName předávají ukazatele na řetězce, je prostý – tato funkce totiž sama provede alokaci těchto řetězců, které budou mít vždy vhodnou délku, nezávisle na tom, jak dlouhé je jméno metody a jaký je počet a typ jejich parametrů (to samozřejmě ovlivňuje délku signatury). Vrácené řetězce jsou v UTF-8, což by však neměl být pro moderní systémy (a jejich konzole) žádný problém :-). Pouze je zapotřebí s tímto kódováním počítat v těch případech, kdy by se provádělo další zpracování řetězců (regulární výrazy atd.).
Oproti mnoha funkcím ze standardní knihovny céčka tak nemusíme složitě přemýšlet, jak dlouhé řetězce je zapotřebí alokovat, pamatovat si maximální délku řetězců atd. Musíme však dodržet jednu podmínku – řetězce vrácené funkcí GetMethodName je nutné (ideálně co nejdříve) dealokovat zavoláním funkce Deallocate(), nelze tedy použít funkci free() ze standardní céčkové knihovny či delete v C++. Pokud se do třetího až pátého parametru funkce GetMethodName předá hodnota NULL, nebude se příslušný řetězec alokovat, což využijeme u posledního parametru, jenž nás (prozatím) nezajímá.
S využitím funkcí GetMethodName a Deallocate můžeme napsat upravenou variantu callback funkce callback_on_method_entry:
/*
* Callback funkce zavolana pri zavolani metody.
*/
static void JNICALL callback_on_method_entry(jvmtiEnv *jvmti, JNIEnv* env,
jthread thread, jmethodID method)
{
char *name_ptr;
char *signature_ptr;
/* MSG("Got Method Entry event"); */
(*jvmti)->GetMethodName(jvmti, method, &name_ptr, &signature_ptr, NULL);
printf("called method %s with signature %s\n", name_ptr, signature_ptr);
(*jvmti)->Deallocate(jvmti, (unsigned char *)name_ptr);
(*jvmti)->Deallocate(jvmti, (unsigned char *)signature_ptr);
}
Tato funkce bude využita ve čtvrtém demonstračním příkladu, jehož zdrojový kód je popsán v následující kapitole.
4. Čtvrtý demonstrační příklad: výpis signatur všech volaných metod
S využitím informací získaných v předchozích třech kapitolách je již poměrně jednoduché upravit demonstrační příklad ukázaný v závěru předchozího článku takovým způsobem, aby vypisoval jména a současně i signatury volaných metod. Připomeňme si, že pro implementaci této funkcionality agenta je zapotřebí provést čtyři kroky:
- Nastavit požadovanou speciální schopnost agenta pomocícapabilities.can_generate_method_entry_events = 1; ve funkci set_capabilities() a otestovat, zda daný virtuální stroj tuto schopnost nabízí.
- Vytvořit callback funkci callback_on_method_entry (jméno se samozřejmě může lišit, typy parametrů však nikoli) s hlavičkou static void JNICALL callback_on_method_entry(jvmtiEnv *jvmti, JNIEnv* env, jthread thread, jmethodID method).
- Zaregistrovat tuto callback funkci pomocí callbacks.MethodEntry = &callback_on_method_entry;, což se v našich demonstračních agentech provádí ve funkci register_all_callback_functions().
- Nastavit zachytávání tohoto typu události s využitím funkceSetEventNotificationMode() volané v našich demonstračních agentech z funkce set_event_notification_mode.
Následuje výpis celého zdrojového kódu čtvrtého demonstračního JVM TI agenta:
/*
* JVM TI agent, ktery dokaze registrovat vstup do metody
* a nasledne vypsat i jeji signaturu.
*/
#include <stdlib.h>
#include <string.h>
/* Nutno nastavit cestu pres volbu -Icesta_k_jvm */
#include <jvmti.h>
#define AGENT_NAME "Agent4:"
/*
* Vypis zpravy na standardni vystup.
*/
#define MSG(message) puts(AGENT_NAME " " message)
/*
* Vypis kodu chyby a chybove zpravy.
*/
static void print_jvmti_error(jvmtiEnv *jvmti, jvmtiError error_code, const char *str)
{
char *error_code_str = NULL;
const char *msg_str = str == NULL ? "" : str;
char *msg_err = NULL;
(*jvmti)->GetErrorName(jvmti, error_code, &error_code_str);
msg_err = error_code_str == NULL ? "Unknown" : error_code_str;
printf(AGENT_NAME " ERROR: JVMTI: %d(%s): %s\n", error_code, msg_err, msg_str);
}
/*
* Pokud je predany navratovy kod chybovym kodem, vypise se hlaseni.
*/
static void check_jvmti_error(jvmtiEnv *jvmti, jvmtiError error_code, const char *str)
{
if ( error_code != JVMTI_ERROR_NONE )
{
print_jvmti_error(jvmti, error_code, str);
}
}
/*
* Nastaveni pozadovanych schopnosti agenta.
*/
jvmtiError set_capabilities(jvmtiEnv *jvmti)
{
jvmtiCapabilities capabilities;
jvmtiError error_code;
memset(&capabilities, 0, sizeof(jvmtiCapabilities));
/* jedna specialni schopnost agenta */
capabilities.can_generate_method_entry_events = 1;
error_code = (*jvmti)->AddCapabilities(jvmti, &capabilities);
check_jvmti_error(jvmti, error_code, "Unable to get necessary JVMTI capabilities.");
return error_code;
}
/*
* Callback funkce zavolana pri inicializaci virtualniho stroje.
*/
static void JNICALL callback_on_vm_init(jvmtiEnv *jvmti_env, JNIEnv* env, jthread thread)
{
MSG("Got VM init event");
}
/*
* Callback funkce zavolana pri ukonceni cinnosti virtualniho stroje.
*/
static void JNICALL callback_on_vm_death(jvmtiEnv *jvmti_env, JNIEnv* env)
{
MSG("Got VM Death event");
}
/*
* Callback funkce zavolana pri zavolani metody.
*/
static void JNICALL callback_on_method_entry(jvmtiEnv *jvmti, JNIEnv* env,
jthread thread, jmethodID method)
{
char *name_ptr;
char *signature_ptr;
/* MSG("Got Method Entry event"); */
(*jvmti)->GetMethodName(jvmti, method, &name_ptr, &signature_ptr, NULL);
printf("called method %s with signature %s\n", name_ptr, signature_ptr);
(*jvmti)->Deallocate(jvmti, (unsigned char *)name_ptr);
(*jvmti)->Deallocate(jvmti, (unsigned char *)signature_ptr);
}
/*
* Registrace vsech callback funkci.
*/
jvmtiError register_all_callback_functions(jvmtiEnv *jvmti)
{
jvmtiEventCallbacks callbacks;
jvmtiError error_code;
memset(&callbacks, 0, sizeof(callbacks));
/* JVMTI_EVENT_VM_INIT */
callbacks.VMInit = &callback_on_vm_init;
/* JVMTI_EVENT_VM_DEATH */
callbacks.VMDeath = &callback_on_vm_death;
/* JVMTI_EVENT_METHOD_ENTRY */
callbacks.MethodEntry = &callback_on_method_entry;
error_code = (*jvmti)->SetEventCallbacks(jvmti, &callbacks, (jint)sizeof(callbacks));
check_jvmti_error(jvmti, error_code, "Cannot set JVM TI callbacks");
return error_code;
}
/*
* Nastaveni jedne udalosti, pro nez se ma zavolat callback funkce.
*/
jvmtiError set_event_notification_mode(jvmtiEnv *jvmti, int event)
{
jvmtiError error_code;
error_code = (*jvmti)->SetEventNotificationMode(jvmti, JVMTI_ENABLE, event, (jthread)NULL);
check_jvmti_error(jvmti, error_code, "Cannot set event notification");
return error_code;
}
/*
* Nastaveni udalosti, pro nez se maji zavolat callback funkce.
*/
jvmtiError set_event_notification_modes(jvmtiEnv *jvmti)
{
jvmtiError error_code;
/* Potrebujeme zachytavat udalost inicializace virtualniho stroje. */
if ((error_code = set_event_notification_mode(jvmti, JVMTI_EVENT_VM_INIT)) != JNI_OK)
{
return error_code;
}
/* Potrebujeme zachytavat udalost ukonceni prace virtualniho stroje. */
if ((error_code = set_event_notification_mode(jvmti, JVMTI_EVENT_VM_DEATH)) != JNI_OK)
{
return error_code;
}
/* Potrebujeme zachytavat udalost pri vstupu do metody. */
if ((error_code = set_event_notification_mode(jvmti, JVMTI_EVENT_METHOD_ENTRY)) != JNI_OK)
{
return error_code;
}
return error_code;
}
/*
* Funkce zavolana ve chvili nacitani agenta do JVM.
*/
JNIEXPORT jint JNICALL Agent_OnLoad(JavaVM *jvm, char *options, void *reserved)
{
jvmtiEnv *jvmti = NULL;
jint result;
jvmtiError error_code;
MSG("Agent_OnLoad");
result = (*jvm)->GetEnv(jvm, (void **) &jvmti, JVMTI_VERSION_1_0);
if (result != JNI_OK || jvmti == NULL)
{
printf("ERROR: Unable to access JVMTI Version 1 (0x%x),"
" is your J2SE a 1.5 or newer version? JNIEnv's GetEnv() returned %d\n",
JVMTI_VERSION_1, (int)result);
return result;
}
MSG("JVM TI version is correct");
/* nastaveni pozadovanych schopnosti agenta */
if ((error_code = set_capabilities(jvmti)) != JNI_OK)
{
return error_code;
}
/* registrace vsech (dvou) callback funkci */
if ((error_code = register_all_callback_functions(jvmti)) != JNI_OK)
{
return error_code;
}
/* nastaveni udalosti, pro nez se maji zavolat callback funkce */
if ((error_code = set_event_notification_modes(jvmti)) != JNI_OK)
{
return error_code;
}
return JNI_OK;
}
/*
* Funkce zavolana ve chvili odstranovani agenta z JVM.
*/
JNIEXPORT void JNICALL Agent_OnUnload(JavaVM *vm)
{
MSG("Agent_OnUnload");
}
Funkcionalitu tohoto agenta si můžeme snadno odzkoušet například na následujícím testu:
public class Test4 {
public static void method1(String s1, String s2) {
method2(s1 + " " + s2);
}
public static void method2(String s) {
method3(s);
}
public static void method3(String s) {
System.err.println(s);
}
public static void main(String[] args) {
method1("Hello", "world");
method1("Hello", "world");
}
}
Způsob překladu i spuštění je shodný se způsobem popsaným v předchozí části tohoto seriálu, liší se jen název agenta i název testovacího javovského programu:
# překlad agenta gcc -Wall -ansi -I/usr/lib/jvm/java-1.6.0-openjdk/include/ -shared -o libagent4.so agent4.c # překlad testu javac Test4.java # spuštění JVM s agentem a testem java -agentpath:./libagent4.so Test4
Na konzoli by se měl vypsat následující text:
Agent4: Agent_OnLoad Agent4: JVM TI version is correct Agent4: Got VM init event ... ... ... called method method2 with signature (Ljava/lang/String;)V called method method3 with signature (Ljava/lang/String;)V called method println with signature (Ljava/lang/String;)V ... ... ... Agent4: Got VM Death event Agent4: Agent_OnUnload
Počet skutečně volaných metod se liší v závislosti na použitém virtuálním stroji Javy, ale prakticky vždy půjde o několik set až několik tisíc (!) metod, což je i jeden z důvodů, proč je start JVM poměrně pomalý.
5. Použití zámků v agentech využívajících rozhraní JVM TI
V některých případech je nutné zajistit, aby se nějaká callback funkce v agentovi prováděla v daný okamžik pouze v jednom vláknu. U některých typů callback funkcí to zajišťuje samotný virtuální stroj Javy, u dalších callback funkcí je zajištění synchronizace plně v rukou vývojáře, který vytváří agenta. Ve skutečnosti není zajištění synchronizace nic složitého, protože nám příslušné prostředky nabízí samotné rozhraní JVM TI. V něm lze totiž využít zámek představovaný (z hlediska agenta) objektem typu jrawMonitorID. Těchto zámků lze vytvořit prakticky libovolné množství, ovšem pokud se v callback funkcích současně použije více zámků, musí si programátor pohlídat, aby nedošlo k dead locku. Aby jsme tomu zabránili, bude se v demonstračních agentech používat pouze jeden zámek, což sice nemusí být optimální z hlediska celkového výkonu JVM, ale je to bezpečnější postup. Pro práci se zámky se používá několik funkcí nazvaných CreateRawMonitor, DestroyRawMonitor, RawMonitorEnter, RawMonitorExit, RawMonitorWait atd. My si prozatím vystačíme jen se třemi funkcemi popsanými v dalších odstavcích.
6. Funkce CreateRawMonitor, RawMonitorEnter a RawMonitorExit
V demonstračním agentovi budeme používat jeden globální zámek, který bude reprezentován objektem typu jrawMonitorID:
jrawMonitorID global_lock;
Pro vytvoření zámku se používá funkce CreateRawMonitor, které se předá textový identifikátor zámku a taktéž ukazatel na naši globální proměnnou. Funkce CreateRawMonitor samozřejmě vrací stavový kód, který je vhodné otestovat:
/*
* Vytvoreni zamku.
*/
jvmtiError create_raw_monitor(jvmtiEnv *jvmti)
{
jvmtiError error_code;
error_code = (*jvmti)->CreateRawMonitor(jvmti, "agent data", &global_lock);
check_jvmti_error(jvmti, error_code, "Cannot create raw monitor");
return error_code;
}
Pro vstup do kritické sekce (hlídané monitorem/zámkem) se používá funkce nazvaná RawMonitorEnter. Tato funkce zajistí, že do sekce může vstoupit pouze jedno vlákno, ostatní vlákna budou čekat, až aktuální vlákno sekci opustí:
/*
* Vstup do kriticke sekce.
*/
static void enter_critical_section(jvmtiEnv *jvmti)
{
jvmtiError error_code;
error_code = (*jvmti)->RawMonitorEnter(jvmti, global_lock);
check_jvmti_error(jvmti, error_code, "Cannot enter with raw monitor");
}
Výstup z kritické sekce hlídané monitorem/zámkem se oznamuje zavoláním funkce RawMonitorExit:
/*
* Vystup z kriticke sekce
*/
static void exit_critical_section(jvmtiEnv *jvmti)
{
jvmtiError error_code;
error_code = (*jvmti)->RawMonitorExit(jvmti, global_lock);
check_jvmti_error(jvmti, error_code, "Cannot exit with raw monitor");
}
Pro větší čitelnost zdrojového kódu agenta je vhodné celou kritickou sekci omezenou voláním našich funkcí enter_critical_section() a exit_critical_section() uzavřít do samostatného bloku. Programový kód zapsaný v kritické sekci by měl být co nejkratší (z hlediska doby provedení) a v žádném případě by se neměl výstup z kritické sekce přeskakovat pomocí lokálních (goto) či globálních (longjmp) skoků:
/*
* Callback funkce zavolana pri zavolani metody.
*/
static void JNICALL callback_on_method_entry(jvmtiEnv *jvmti, JNIEnv* env,
jthread thread, jmethodID method)
{
char *name_ptr;
char *signature_ptr;
enter_critical_section(jvmti);
{
/* MSG("Got Method Entry event"); */
(*jvmti)->GetMethodName(jvmti, method, &name_ptr, &signature_ptr, NULL);
printf("called method %s with signature %s\n", name_ptr, signature_ptr);
(*jvmti)->Deallocate(jvmti, (unsigned char *)name_ptr);
(*jvmti)->Deallocate(jvmti, (unsigned char *)signature_ptr);
}
exit_critical_section(jvmti);
}
7. Pátý demonstrační příklad: agent pro výpis volaných metod využívající zámky
Pátý demonstrační agent se od čtvrtého agenta liší pouze v jedné maličkosti – využívá se zde globální zámek podle postupu popsaného v předchozí kapitole. Žádné další odlišnosti od předchozího příkladu zde nenalezneme:
/*
* JVM TI agent, ktery dokaze registrovat vstup do metody
* a nasledne vypsat i jeji signaturu.
*
* Zdrojovy kod byl doplnen o pouziti zamku.
*/
#include <stdlib.h>
#include <string.h>
/* Nutno nastavit cestu pres volbu -Icesta_k_jvm */
#include <jvmti.h>
#define AGENT_NAME "Agent5:"
/*
* Vypis zpravy na standardni vystup.
*/
#define MSG(message) puts(AGENT_NAME " " message)
/* Zamek pouzivany agentem */
jrawMonitorID global_lock;
/*
* Vypis kodu chyby a chybove zpravy.
*/
static void print_jvmti_error(jvmtiEnv *jvmti, jvmtiError error_code, const char *str)
{
char *error_code_str = NULL;
const char *msg_str = str == NULL ? "" : str;
char *msg_err = NULL;
(*jvmti)->GetErrorName(jvmti, error_code, &error_code_str);
msg_err = error_code_str == NULL ? "Unknown" : error_code_str;
printf(AGENT_NAME " ERROR: JVMTI: %d(%s): %s\n", error_code, msg_err, msg_str);
}
/*
* Pokud je predany navratovy kod chybovym kodem, vypise se hlaseni.
*/
static void check_jvmti_error(jvmtiEnv *jvmti, jvmtiError error_code, const char *str)
{
if ( error_code != JVMTI_ERROR_NONE )
{
print_jvmti_error(jvmti, error_code, str);
}
}
/*
* Vytvoreni zamku.
*/
jvmtiError create_raw_monitor(jvmtiEnv *jvmti)
{
jvmtiError error_code;
error_code = (*jvmti)->CreateRawMonitor(jvmti, "agent data", &global_lock);
check_jvmti_error(jvmti, error_code, "Cannot create raw monitor");
return error_code;
}
/*
* Vstup do kriticke sekce.
*/
static void enter_critical_section(jvmtiEnv *jvmti)
{
jvmtiError error_code;
error_code = (*jvmti)->RawMonitorEnter(jvmti, global_lock);
check_jvmti_error(jvmti, error_code, "Cannot enter with raw monitor");
}
/*
* Vystup z kriticke sekce
*/
static void exit_critical_section(jvmtiEnv *jvmti)
{
jvmtiError error_code;
error_code = (*jvmti)->RawMonitorExit(jvmti, global_lock);
check_jvmti_error(jvmti, error_code, "Cannot exit with raw monitor");
}
/*
* Nastaveni pozadovanych schopnosti agenta.
*/
jvmtiError set_capabilities(jvmtiEnv *jvmti)
{
jvmtiCapabilities capabilities;
jvmtiError error_code;
memset(&capabilities, 0, sizeof(jvmtiCapabilities));
/* jedna specialni schopnost agenta */
capabilities.can_generate_method_entry_events = 1;
error_code = (*jvmti)->AddCapabilities(jvmti, &capabilities);
check_jvmti_error(jvmti, error_code, "Unable to get necessary JVMTI capabilities.");
return error_code;
}
/*
* Callback funkce zavolana pri inicializaci virtualniho stroje.
*/
static void JNICALL callback_on_vm_init(jvmtiEnv *jvmti_env, JNIEnv* env, jthread thread)
{
MSG("Got VM init event");
}
/*
* Callback funkce zavolana pri ukonceni cinnosti virtualniho stroje.
*/
static void JNICALL callback_on_vm_death(jvmtiEnv *jvmti_env, JNIEnv* env)
{
MSG("Got VM Death event");
}
/*
* Callback funkce zavolana pri zavolani metody.
*/
static void JNICALL callback_on_method_entry(jvmtiEnv *jvmti, JNIEnv* env,
jthread thread, jmethodID method)
{
char *name_ptr;
char *signature_ptr;
enter_critical_section(jvmti);
{
/* MSG("Got Method Entry event"); */
(*jvmti)->GetMethodName(jvmti, method, &name_ptr, &signature_ptr, NULL);
printf("called method %s with signature %s\n", name_ptr, signature_ptr);
(*jvmti)->Deallocate(jvmti, (unsigned char *)name_ptr);
(*jvmti)->Deallocate(jvmti, (unsigned char *)signature_ptr);
}
exit_critical_section(jvmti);
}
/*
* Registrace vsech callback funkci.
*/
jvmtiError register_all_callback_functions(jvmtiEnv *jvmti)
{
jvmtiEventCallbacks callbacks;
jvmtiError error_code;
memset(&callbacks, 0, sizeof(callbacks));
/* JVMTI_EVENT_VM_INIT */
callbacks.VMInit = &callback_on_vm_init;
/* JVMTI_EVENT_VM_DEATH */
callbacks.VMDeath = &callback_on_vm_death;
/* JVMTI_EVENT_METHOD_ENTRY */
callbacks.MethodEntry = &callback_on_method_entry;
error_code = (*jvmti)->SetEventCallbacks(jvmti, &callbacks, (jint)sizeof(callbacks));
check_jvmti_error(jvmti, error_code, "Cannot set JVM TI callbacks");
return error_code;
}
/*
* Nastaveni jedne udalosti, pro nez se ma zavolat callback funkce.
*/
jvmtiError set_event_notification_mode(jvmtiEnv *jvmti, int event)
{
jvmtiError error_code;
error_code = (*jvmti)->SetEventNotificationMode(jvmti, JVMTI_ENABLE, event, (jthread)NULL);
check_jvmti_error(jvmti, error_code, "Cannot set event notification");
return error_code;
}
/*
* Nastaveni udalosti, pro nez se maji zavolat callback funkce.
*/
jvmtiError set_event_notification_modes(jvmtiEnv *jvmti)
{
jvmtiError error_code;
/* Potrebujeme zachytavat udalost inicializace virtualniho stroje. */
if ((error_code = set_event_notification_mode(jvmti, JVMTI_EVENT_VM_INIT)) != JNI_OK)
{
return error_code;
}
/* Potrebujeme zachytavat udalost ukonceni prace virtualniho stroje. */
if ((error_code = set_event_notification_mode(jvmti, JVMTI_EVENT_VM_DEATH)) != JNI_OK)
{
return error_code;
}
/* Potrebujeme zachytavat udalost pri vstupu do metody. */
if ((error_code = set_event_notification_mode(jvmti, JVMTI_EVENT_METHOD_ENTRY)) != JNI_OK)
{
return error_code;
}
return error_code;
}
/*
* Funkce zavolana ve chvili nacitani agenta do JVM.
*/
JNIEXPORT jint JNICALL Agent_OnLoad(JavaVM *jvm, char *options, void *reserved)
{
jvmtiEnv *jvmti = NULL;
jint result;
jvmtiError error_code;
MSG("Agent_OnLoad");
result = (*jvm)->GetEnv(jvm, (void **) &jvmti, JVMTI_VERSION_1_0);
if (result != JNI_OK || jvmti == NULL)
{
printf("ERROR: Unable to access JVMTI Version 1 (0x%x),"
" is your J2SE a 1.5 or newer version? JNIEnv's GetEnv() returned %d\n",
JVMTI_VERSION_1, (int)result);
return result;
}
MSG("JVM TI version is correct");
/* nastaveni pozadovanych schopnosti agenta */
if ((error_code = set_capabilities(jvmti)) != JNI_OK)
{
return error_code;
}
/* registrace vsech (dvou) callback funkci */
if ((error_code = register_all_callback_functions(jvmti)) != JNI_OK)
{
return error_code;
}
/* nastaveni udalosti, pro nez se maji zavolat callback funkce */
if ((error_code = set_event_notification_modes(jvmti)) != JNI_OK)
{
return error_code;
}
/* vytvoreni zamku */
if ((error_code = create_raw_monitor(jvmti)) != JNI_OK)
{
return error_code;
}
return JNI_OK;
}
/*
* Funkce zavolana ve chvili odstranovani agenta z JVM.
*/
JNIEXPORT void JNICALL Agent_OnUnload(JavaVM *vm)
{
MSG("Agent_OnUnload");
}
8. Šestý demonstrační příklad: agent registrující práci garbage collectoru
Dnes si ukážeme ještě jeden poměrně praktický příklad – agenta, který dokáže registrovat začátek a konec činnosti správce paměti (garbage collectoru). Tento agent sice nemusí správně fungovat se všemi správci paměti, ovšem u těch základních (Mark and Sweep atd.) je jeho funkce zaručena. Činnost agenta zajišťuje dvojice callback funkcí zavolaných při startu GC a ukončení GC. Ve chvíli volání těchto callback funkcí je činnost celého virtuálního stroje pozastavena, i přesto je však lepší tělo těchto dvou callback funkcí uzavřít do kritické sekce.
V šestém demonstračním agentovi jsou použity dvě nové globální proměnné nazvané gc_start a gc_total, které slouží ke sledování aktuální i celkové doby běhu správce paměti. Proměnná gc_start je nastavována v callback funkci callback_on_gc_start na aktuální hodnotu (počet tiků interních systémových hodin) vrácenou funkcí clock(). Tímto způsobem zaznamenaná hodnota je použita ve druhé callback funkci callback_on_gc_finish pro výpočet doby běhu správce paměti i pro výpočet celkové doby aktivního běhu vlákna (vláken) se správcem paměti:
/*
* JVM TI agent, ktery dokaze registrovat praci GC.
*/
#include <stdlib.h>
#include <string.h>
#include <time.h>
/* Nutno nastavit cestu pres volbu -Icesta_k_jvm */
#include <jvmti.h>
#define AGENT_NAME "Agent6:"
/*
* Vypis zpravy na standardni vystup.
*/
#define MSG(message) puts(AGENT_NAME " " message)
/* Zamek pouzivany agentem */
jrawMonitorID global_lock;
/* Zacatek behu GC */
clock_t gc_start;
/* Celkovy cas behu GC */
clock_t gc_total = 0;
/*
* Vypis kodu chyby a chybove zpravy.
*/
static void print_jvmti_error(jvmtiEnv *jvmti, jvmtiError error_code, const char *str)
{
char *error_code_str = NULL;
const char *msg_str = str == NULL ? "" : str;
char *msg_err = NULL;
(*jvmti)->GetErrorName(jvmti, error_code, &error_code_str);
msg_err = error_code_str == NULL ? "Unknown" : error_code_str;
printf(AGENT_NAME " ERROR: JVMTI: %d(%s): %s\n", error_code, msg_err, msg_str);
}
/*
* Pokud je predany navratovy kod chybovym kodem, vypise se hlaseni.
*/
static void check_jvmti_error(jvmtiEnv *jvmti, jvmtiError error_code, const char *str)
{
if ( error_code != JVMTI_ERROR_NONE )
{
print_jvmti_error(jvmti, error_code, str);
}
}
/*
* Vytvoreni zamku.
*/
jvmtiError create_raw_monitor(jvmtiEnv *jvmti)
{
jvmtiError error_code;
error_code = (*jvmti)->CreateRawMonitor(jvmti, "agent data", &global_lock);
check_jvmti_error(jvmti, error_code, "Cannot create raw monitor");
return error_code;
}
/*
* Vstup do kriticke sekce.
*/
static void enter_critical_section(jvmtiEnv *jvmti)
{
jvmtiError error_code;
error_code = (*jvmti)->RawMonitorEnter(jvmti, global_lock);
check_jvmti_error(jvmti, error_code, "Cannot enter with raw monitor");
}
/*
* Vystup z kriticke sekce
*/
static void exit_critical_section(jvmtiEnv *jvmti)
{
jvmtiError error_code;
error_code = (*jvmti)->RawMonitorExit(jvmti, global_lock);
check_jvmti_error(jvmti, error_code, "Cannot exit with raw monitor");
}
/*
* Nastaveni pozadovanych schopnosti agenta.
*/
jvmtiError set_capabilities(jvmtiEnv *jvmti)
{
jvmtiCapabilities capabilities;
jvmtiError error_code;
memset(&capabilities, 0, sizeof(jvmtiCapabilities));
/* vyuzivame jednu specialni schopnost agenta */
capabilities.can_generate_garbage_collection_events = 1;
error_code = (*jvmti)->AddCapabilities(jvmti, &capabilities);
check_jvmti_error(jvmti, error_code, "Unable to get necessary JVMTI capabilities.");
return error_code;
}
/*
* Callback funkce zavolana pri inicializaci virtualniho stroje.
*/
static void JNICALL callback_on_vm_init(jvmtiEnv *jvmti_env, JNIEnv* env, jthread thread)
{
MSG("Got VM init event");
}
/*
* Callback funkce zavolana pri ukonceni cinnosti virtualniho stroje.
*/
static void JNICALL callback_on_vm_death(jvmtiEnv *jvmti_env, JNIEnv* env)
{
MSG("Got VM Death event");
}
/*
* Zacatek behu GC.
*/
static void JNICALL callback_on_gc_start(jvmtiEnv *jvmti_env)
{
enter_critical_section(jvmti_env);
{
gc_start = clock();
printf("gc start\n");
}
exit_critical_section(jvmti_env);
}
/*
* Konec behu GC.
*/
static void JNICALL callback_on_gc_finish(jvmtiEnv *jvmti_env)
{
enter_critical_section(jvmti_env);
{
clock_t gc_end = clock();
clock_t diff = gc_end - gc_start;
gc_total += diff;
printf("gc end: %f sec\n", (double)diff/CLOCKS_PER_SEC);
}
exit_critical_section(jvmti_env);
}
/*
* Registrace vsech callback funkci.
*/
jvmtiError register_all_callback_functions(jvmtiEnv *jvmti)
{
jvmtiEventCallbacks callbacks;
jvmtiError error_code;
memset(&callbacks, 0, sizeof(callbacks));
/* JVMTI_EVENT_VM_INIT */
callbacks.VMInit = &callback_on_vm_init;
/* JVMTI_EVENT_VM_DEATH */
callbacks.VMDeath = &callback_on_vm_death;
/* JVMTI_EVENT_GARBAGE_COLLECTION_START */
callbacks.GarbageCollectionStart = &callback_on_gc_start;
/* JVMTI_EVENT_GARBAGE_COLLECTION_FINISH */
callbacks.GarbageCollectionFinish = &callback_on_gc_finish;
error_code = (*jvmti)->SetEventCallbacks(jvmti, &callbacks, (jint)sizeof(callbacks));
check_jvmti_error(jvmti, error_code, "Cannot set JVM TI callbacks");
return error_code;
}
/*
* Nastaveni jedne udalosti, pro nez se ma zavolat callback funkce.
*/
jvmtiError set_event_notification_mode(jvmtiEnv *jvmti, int event)
{
jvmtiError error_code;
error_code = (*jvmti)->SetEventNotificationMode(jvmti, JVMTI_ENABLE, event, (jthread)NULL);
check_jvmti_error(jvmti, error_code, "Cannot set event notification");
return error_code;
}
/*
* Nastaveni udalosti, pro nez se maji zavolat callback funkce.
*/
jvmtiError set_event_notification_modes(jvmtiEnv *jvmti)
{
jvmtiError error_code;
/* Potrebujeme zachytavat udalost inicializace virtualniho stroje. */
if ((error_code = set_event_notification_mode(jvmti, JVMTI_EVENT_VM_INIT)) != JNI_OK)
{
return error_code;
}
/* Potrebujeme zachytavat udalost ukonceni prace virtualniho stroje. */
if ((error_code = set_event_notification_mode(jvmti, JVMTI_EVENT_VM_DEATH)) != JNI_OK)
{
return error_code;
}
/* Potrebujeme zachytavat udalost pri zacatku behu GC. */
if ((error_code = set_event_notification_mode(jvmti, JVMTI_EVENT_GARBAGE_COLLECTION_START)) != JNI_OK)
{
return error_code;
}
/* Potrebujeme zachytavat udalost pri ukonceni behu GC. */
if ((error_code = set_event_notification_mode(jvmti, JVMTI_EVENT_GARBAGE_COLLECTION_FINISH)) != JNI_OK)
{
return error_code;
}
return error_code;
}
/*
* Funkce zavolana ve chvili nacitani agenta do JVM.
*/
JNIEXPORT jint JNICALL Agent_OnLoad(JavaVM *jvm, char *options, void *reserved)
{
jvmtiEnv *jvmti = NULL;
jint result;
jvmtiError error_code;
MSG("Agent_OnLoad");
result = (*jvm)->GetEnv(jvm, (void **) &jvmti, JVMTI_VERSION_1_0);
if (result != JNI_OK || jvmti == NULL)
{
printf("ERROR: Unable to access JVMTI Version 1 (0x%x),"
" is your J2SE a 1.5 or newer version? JNIEnv's GetEnv() returned %d\n",
JVMTI_VERSION_1, (int)result);
return result;
}
MSG("JVM TI version is correct");
/* nastaveni pozadovanych schopnosti agenta */
if ((error_code = set_capabilities(jvmti)) != JNI_OK)
{
return error_code;
}
/* registrace vsech callback funkci */
if ((error_code = register_all_callback_functions(jvmti)) != JNI_OK)
{
return error_code;
}
/* nastaveni udalosti, pro nez se maji zavolat callback funkce */
if ((error_code = set_event_notification_modes(jvmti)) != JNI_OK)
{
return error_code;
}
/* vytvoreni zamku */
if ((error_code = create_raw_monitor(jvmti)) != JNI_OK)
{
return error_code;
}
return JNI_OK;
}
/*
* Funkce zavolana ve chvili odstranovani agenta z JVM.
*/
JNIEXPORT void JNICALL Agent_OnUnload(JavaVM *vm)
{
MSG("Agent_OnUnload");
printf("Total GC time: %f sec\n", (double)gc_total/CLOCKS_PER_SEC);
}
Funkci agenta otestujeme na velmi jednoduchém javovském programu, který i přes svoji jednoduchost správce paměti docela hodně „potrápí“, protože každé použití operátoru + nad řetězcem vede k vytvoření nového objektu:
public class Test6 {
public static void main(String[] args) {
String s = "";
for (int i=0; i < 10000; i++)
{
s = s + " " + i;
}
}
}
Skript pro překlad agenta a spuštění JVM s agentem:
# překlad agenta gcc -Wall -ansi -I/usr/lib/jvm/java-1.6.0-openjdk/include/ -shared -o libagent6.so agent6.c # překlad testu javac Test6.java # spuštění JVM s agentem java -agentpath:./libagent6.so Test6
Po spuštění JVM s agentem a testem by se na konzoli měly vypsat zprávy podobající se následujícímu výpisu:
Agent6: Agent_OnLoad Agent6: JVM TI version is correct Agent6: Got VM init event gc start gc end: 0.010000 sec ... ... ... gc start gc end: 0.000000 sec gc start gc end: 0.000000 sec gc start gc end: 0.000000 sec gc start gc end: 0.000000 sec ... ... ... Agent6: Got VM Death event Agent6: Agent_OnUnload Total GC time: 0.220000 sec
Z tohoto výpisu je patrné, že správce paměti je spouštěn (nad young generation) s poměrně velkou frekvencí takovým způsobem, aby nemuselo docházet k pozastavení běhu vláken aplikace po delší dobu, což by se mohlo negativně promítnout do doby odezvy aplikace.
9. Odkazy na Internetu
- The JVM Tool Interface (JVM TI): How VM Agents Work
http://www.oracle.com/technetwork/articles/javase/jvm-ti-141370.html - JVM Tool Interface Version 1.2
http://docs.oracle.com/javase/7/docs/platform/jvmti/jvmti.html - Creating a Debugging and Profiling Agent with JVMTI
http://www.oracle.com/technetwork/articles/javase/jvmti-136367.html - JVM TI (Wikipedia)
http://en.wikipedia.org/wiki/JVM_TI - IBM JVMTI extensions
http://publib.boulder.ibm.com/infocenter/realtime/v2r0/index.jsp?topic=%2Fcom.ibm.softrt.doc%2Fdiag%2Ftools%2Fjvmti_extensions.html - ClojureScript One: Index
http://clojurescriptone.com/index.html - ClojureScript One: Documentation
http://clojurescriptone.com/documentation.html - ClojureScript One: Wiki
https://github.com/brentonashworth/one/wiki - ClojureScript: Quick Start
https://github.com/clojure/clojurescript/wiki/Quick-Start - Getting Started with ClojureScript (and FW/1)
http://corfield.org/entry/getting-started-with-clojurescript-and-fw-1 - First ClojureScript experiences: using Raphaël
http://maurits.wordpress.com/2012/02/13/first-clojurescript-experiences-using-raphael/ - Raphaël-JavaScript Library
http://raphaeljs.com/ - A detailed installation Guide for VimClojure 2.2
http://www.duenas.at/new_homepage/vimclojure - VimClojure : A filetype, syntax and indent plugin for Clojure
http://www.vim.org/scripts/script.php?script_id=2501 - Nailgun server
http://www.martiansoftware.com/nailgun/background.html - SLIME (Wikipedia)
http://en.wikipedia.org/wiki/SLIME - slime.vim
http://s3.amazonaws.com/mps/slime.vim - Textový editor Vim jako IDE: 1. část
http://www.root.cz/clanky/textovy-editor-vim-jako-ide/ - Textový editor Vim jako IDE: 2. část
http://www.root.cz/clanky/textovy-editor-vim-jako-ide-2-cast/ - Textový editor Vim jako IDE: 3. část (omni completion)
http://www.root.cz/clanky/textovy-editor-vim-jako-ide-3-cast/ - Textový editor Vim jako IDE: 4. část
http://www.root.cz/clanky/textovy-editor-vim-jako-ide-4-cast/ - Textový editor Vim jako IDE: 5. část
http://www.root.cz/clanky/textovy-editor-vim-jako-ide-5-cast/ - Textový editor Vim jako IDE: 6. část – Vim Script
http://www.root.cz/clanky/textovy-editor-vim-jako-ide-6-cast-vim-script/ - Textový editor Vim jako IDE: 7. část – Vim Script
http://www.root.cz/clanky/textovy-editor-vim-jako-ide-7-cast-vim-script/ - Textový editor Vim jako IDE: 8. část
http://www.root.cz/clanky/textovy-editor-vim-jako-ide-8-cast/ - Textový editor Vim jako IDE: 9. část – pluginy Netrw a snipMate
http://www.root.cz/clanky/textovy-editor-vim-jako-ide-9-cast-pluginy-netrw-a-snipmate/ - Textový editor Vim jako IDE: 10. část – různé tipy a triky
http://www.root.cz/clanky/textovy-editor-vim-jako-ide-10-cast-ruzne-tipy-a-triky/ - Přenos textů mezi Vimem a dalšími aplikacemi
http://www.root.cz/clanky/prenos-textu-mezi-vimem-a-dalsimi-aplikacemi/ - Textový editor Vim: konfigurace pravítka a stavového řádku
http://www.root.cz/clanky/textovy-editor-vim-jako-ide-12-cast-konfigurace-pravitka-a-stavoveho-radku/ - Textový editor Vim: automatické formátování textů
http://www.root.cz/clanky/textovy-editor-vim-jako-ide-14-cast-automaticke-formatovani-textu/ - Textový editor Vim: automatické formátování textů
http://www.root.cz/clanky/textovy-editor-vim-jako-ide-automaticke-formatovani-textu-dokonceni/ - Textový editor Vim: editace XML a HTML
http://www.root.cz/clanky/textovy-editor-vim-jako-ide-15-cast-editace-xml-a-html/ - Textový editor Vim: kooperace mezi Vimem a skripty
http://www.root.cz/clanky/textovy-editor-vim-jako-ide-16-cast-kooperace-mezi-vimem-a-skriptovacimi-jazyky/ - Textový editor Vim: kooperace mezi Vimem a jazykem Perl
http://www.root.cz/clanky/textovy-editor-vim-jako-ide-17-cast-kooperace-mezi-vimem-a-jazykem-perl/ - Textový editor Vim: konfigurace a překlad Vimu
http://www.root.cz/clanky/textovy-editor-vim-jako-ide-18-cast-konfigurace-a-preklad-vimu/ - Counterclockwise
http://code.google.com/p/counterclockwise/ - Clojure IDEs – The Grand Tour
http://www.bestinclass.dk/index.clj/2010/03/clojure-ides-the-grand-tour-getting-started.html - Light Table – a new IDE concept
http://www.chris-granger.com/2012/04/12/light-table---a-new-ide-concept/ - SICP (The Structure and Interpretation of Computer Programs)
http://mitpress.mit.edu/sicp/ - Pure function
http://en.wikipedia.org/wiki/Pure_function - Funkcionální programování
http://cs.wikipedia.org/wiki/Funkcionální_programování - Čistě funkcionální (datové struktury, jazyky, programování)
http://cs.wikipedia.org/wiki/Čistě_funkcionální - Clojure Macro Tutorial (Part I, Getting the Compiler to Write Your Code For You)
http://www.learningclojure.com/2010/09/clojure-macro-tutorial-part-i-getting.html - Clojure Macro Tutorial (Part II: The Compiler Strikes Back)
http://www.learningclojure.com/2010/09/clojure-macro-tutorial-part-ii-compiler.html - Clojure Macro Tutorial (Part III: Syntax Quote)
http://www.learningclojure.com/2010/09/clojure-macro-tutorial-part-ii-syntax.html - Tech behind Tech: Clojure Macros Simplified
http://techbehindtech.com/2010/09/28/clojure-macros-simplified/ - Fatvat – Exploring functional programming: Clojure Macros
http://www.fatvat.co.uk/2009/02/clojure-macros.html - Eulerovo číslo
http://cs.wikipedia.org/wiki/Eulerovo_číslo - List comprehension
http://en.wikipedia.org/wiki/List_comprehension - List Comprehensions in Clojure
http://asymmetrical-view.com/2008/11/18/list-comprehensions-in-clojure.html - Clojure Programming Concepts: List Comprehension
http://en.wikibooks.org/wiki/Clojure_Programming/Concepts#List_Comprehension - Clojure core API: for macro
http://clojure.github.com/clojure/clojure.core-api.html#clojure.core/for - cirrus machina – The Clojure for macro
http://www.cirrusmachina.com/blog/comment/the-clojure-for-macro/ - Clojure.org: Clojure home page
http://clojure.org/downloads - Clojure.org: Vars and the Global Environment
http://clojure.org/Vars - Clojure.org: Refs and Transactions
http://clojure.org/Refs - Clojure.org: Atoms
http://clojure.org/Atoms - Clojure.org: Agents as Asynchronous Actions
http://clojure.org/agents - A Couple of Clojure Agent Examples
http://lethain.com/a-couple-of-clojure-agent-examples/ - Clojure – Functional Programming for the JVM
http://java.ociweb.com/mark/clojure/article.html - Clojure quick reference
http://faustus.webatu.com/clj-quick-ref.html - 4Clojure
http://www.4clojure.com/ - ClojureDoc
http://clojuredocs.org/ - Clojure (Wikipedia EN)
http://en.wikipedia.org/wiki/Clojure - Clojure (Wikipedia CS)
http://cs.wikipedia.org/wiki/Clojure - Riastradh's Lisp Style Rules
http://mumble.net/~campbell/scheme/style.txt - Dynamic Languages Strike Back
http://steve-yegge.blogspot.cz/2008/05/dynamic-languages-strike-back.html - Scripting: Higher Level Programming for the 21st Century
http://www.tcl.tk/doc/scripting.html - Java Virtual Machine Support for Non-Java Languages
http://docs.oracle.com/javase/7/docs/technotes/guides/vm/multiple-language-support.html - New JDK 7 Feature: Support for Dynamically Typed Languages in the Java Virtual Machine
http://java.sun.com/developer/technicalArticles/DynTypeLang/ - JSR 223: Scripting for the JavaTM Platform
http://jcp.org/en/jsr/detail?id=223 - JSR 292: Supporting Dynamically Typed Languages on the JavaTM Platform
http://jcp.org/en/jsr/detail?id=292 - Java 7: A complete invokedynamic example
http://niklasschlimm.blogspot.com/2012/02/java-7-complete-invokedynamic-example.html - InvokeDynamic: Actually Useful?
http://blog.headius.com/2007/01/invokedynamic-actually-useful.html - A First Taste of InvokeDynamic
http://blog.headius.com/2008/09/first-taste-of-invokedynamic.html - Java 6 try/finally compilation without jsr/ret
http://cliffhacks.blogspot.com/2008/02/java-6-tryfinally-compilation-without.html - An empirical study of Java bytecode programs
http://www.mendeley.com/research/an-empirical-study-of-java-bytecode-programs/ - Java quick guide: JVM Instruction Set (tabulka všech instrukcí JVM)
http://www.mobilefish.com/tutorials/java/java_quickguide_jvm_instruction_set.html - The JVM Instruction Set
http://mpdeboer.home.xs4all.nl/scriptie/node14.html - Control Flow in the Java Virtual Machine
http://www.artima.com/underthehood/flowP.html - Root.cz: Využití komprimovaných ukazatelů na objekty v JVM
http://www.root.cz/clanky/vyuziti-komprimovanych-ukazatelu-na-objekty-v-nbsp-jvm/ - Root.cz: JamVM aneb alternativa k HotSpotu nejenom pro embedded zařízení a chytré telefony
http://www.root.cz/clanky/jamvm-aneb-alternativa-k-hotspotu-nejenom-pro-embedded-zarizeni-tablety-a-chytre-telefony/ - The JavaTM Virtual Machine Specification, Second Edition
http://java.sun.com/docs/books/jvms/second_edition/html/VMSpecTOC.doc.html - The class File Format
http://java.sun.com/docs/books/jvms/second_edition/html/ClassFile.doc.html - javap – The Java Class File Disassembler
http://docs.oracle.com/javase/1.4.2/docs/tooldocs/windows/javap.html - javap-java-1.6.0-openjdk(1) – Linux man page
http://linux.die.net/man/1/javap-java-1.6.0-openjdk - Using javap
http://www.idevelopment.info/data/Programming/java/miscellaneous_java/Using_javap.html - Examine class files with the javap command
http://www.techrepublic.com/article/examine-class-files-with-the-javap-command/5815354 - BCEL Home page
http://commons.apache.org/bcel/ - BCEL Manual
http://commons.apache.org/bcel/manual.html - Byte Code Engineering Library (Wikipedia)
http://en.wikipedia.org/wiki/BCEL - Java programming dynamics, Part 7: Bytecode engineering with BCEL
http://www.ibm.com/developerworks/java/library/j-dyn0414/ - Bytecode Engineering
http://book.chinaunix.net/special/ebook/Core_Java2_Volume2AF/0131118269/ch13lev1sec6.html - BCEL Tutorial
http://www.smfsupport.com/support/java/bcel-tutorial!/ - ASM Home page
http://asm.ow2.org/ - Seznam nástrojů využívajících projekt ASM
http://asm.ow2.org/users.html - ObjectWeb ASM (Wikipedia)
http://en.wikipedia.org/wiki/ObjectWeb_ASM - Java Bytecode BCEL vs ASM
http://james.onegoodcookie.com/2005/10/26/java-bytecode-bcel-vs-asm/ - Bytecode Outline plugin for Eclipse (screenshoty + info)
http://asm.ow2.org/eclipse/index.html - aspectj (Eclipse)
http://www.eclipse.org/aspectj/ - Aspect-oriented programming (Wikipedia)
http://en.wikipedia.org/wiki/Aspect_oriented_programming - AspectJ (Wikipedia)
http://en.wikipedia.org/wiki/AspectJ - EMMA: a free Java code coverage tool
http://emma.sourceforge.net/ - Cobertura
http://cobertura.sourceforge.net/ - FindBugs
http://findbugs.sourceforge.net/ - GNU Classpath
www.gnu.org/s/classpath/ - Java VMs Compared
http://bugblogger.com/java-vms-compared-160/ - JSRs: Java Specification Requests – JSR 223: Scripting for the Java Platform
http://www.jcp.org/en/jsr/detail?id=223 - Scripting for the Java Platform
http://java.sun.com/developer/technicalArticles/J2SE/Desktop/scripting/ - Scripting for the Java Platform (Wikipedia)
http://en.wikipedia.org/wiki/Scripting_for_the_Java_Platform - Java Community Process
http://en.wikipedia.org/wiki/Java_Specification_Request - Java HotSpot VM Options
http://www.oracle.com/technetwork/java/javase/tech/vmoptions-jsp-140102.html - Great Computer Language Shootout
http://c2.com/cgi/wiki?GreatComputerLanguageShootout - Java performance
http://en.wikipedia.org/wiki/Java_performance - Trying the prototype
http://mail.openjdk.java.net/pipermail/lambda-dev/2010-August/002179.html - Better closures (for Java)
http://blogs.sun.com/jrose/entry/better_closures - Lambdas in Java: An In-Depth Analysis
http://www.infoq.com/articles/lambdas-java-analysis - Class ReflectiveOperationException
http://download.java.net/jdk7/docs/api/java/lang/ReflectiveOperationException.html - Scala Programming Language
http://www.scala-lang.org/ - Run Scala in Apache Tomcat in 10 minutes
http://www.softwaresecretweapons.com/jspwiki/run-scala-in-apache-tomcat-in-10-minutes - Fast Web Development With Scala
http://chasethedevil.blogspot.cz/2007/09/fast-web-development-with-scala.html - Top five scripting languages on the JVM
http://www.infoworld.com/d/developer-world/top-five-scripting-languages-the-jvm-855 - Proposal: Indexing access syntax for Lists and Maps
http://mail.openjdk.java.net/pipermail/coin-dev/2009-March/001108.html - Proposal: Elvis and Other Null-Safe Operators
http://mail.openjdk.java.net/pipermail/coin-dev/2009-March/000047.html - Java 7 : Oracle pushes a first version of closures
http://www.baptiste-wicht.com/2010/05/oracle-pushes-a-first-version-of-closures/ - Groovy: An agile dynamic language for the Java Platform
http://groovy.codehaus.org/Operators - Better Strategies for Null Handling in Java
http://www.slideshare.net/Stephan.Schmidt/better-strategies-for-null-handling-in-java - Control Flow in the Java Virtual Machine
http://www.artima.com/underthehood/flowP.html - Java Virtual Machine
http://en.wikipedia.org/wiki/Java_virtual_machine - ==, .equals(), compareTo(), and compare()
http://leepoint.net/notes-java/data/expressions/22compareobjects.html - New JDK7 features
http://openjdk.java.net/projects/jdk7/features/ - Project Coin: Bringing it to a Close(able)
http://blogs.sun.com/darcy/entry/project_coin_bring_close - CloseableFinder source code
http://blogs.sun.com/darcy/resource/ProjectCoin/CloseableFinder.java - Joe Darcy blog about JDK
http://blogs.sun.com/darcy - Java 7 – more dynamics
http://www.baptiste-wicht.com/2010/04/java-7-more-dynamics/ - New JDK 7 Feature: Support for Dynamically Typed Languages in the Java Virtual Machine
http://java.sun.com/developer/technicalArticles/DynTypeLang/index.html
