This is the mail archive of the
libc-alpha@sources.redhat.com
mailing list for the glibc project.
tls-macros.h for IA64
- From: Ian Wienand <ianw at gelato dot unsw dot edu dot au>
- To: libc-alpha at sources dot redhat dot com
- Date: Thu, 21 Nov 2002 12:39:26 +1100
- Subject: tls-macros.h for IA64
This adds in support for IA64 in libc's elf/tls-macros.h
--- elf/tls-macros.h.old 2002-11-21 10:03:02.000000000 +1100
+++ elf/tls-macros.h 2002-11-21 11:02:52.000000000 +1100
@@ -238,6 +238,55 @@
asm ("lda %0," #x "($gp)\t\t!tlsgd" : "=r" (__i) : "r"(__gp)); \
(int *) __tls_get_addr(__i); })
+
+#elif defined __ia64__
+
+# define TLS_LE(x) \
+ ({ void *__l; \
+ asm ("ld8 r2=tp\n\t" \
+ ";;\n\t" \
+ "addl %0=@tpre1(" #x "),r2\n\t" \
+ : "=r" (__l) : : "r2" ); __l; })
+
+# define TLS_IE(x) \
+ ({ void *__l; \
+ asm ("addl r16=@ltoff(@tprel(" #x ")),gp\n\t" \
+ ";;\n\t" \
+ "ld8 r17=[r16]\n\t" \
+ ";;\n\t" \
+ "add %0=tp,r17\n\t" \
+ : "=r" (__l) : : "r16", "r17" ); __l; })
+
+# define TLS_LD(x) \
+ ({ void *__l; \
+ asm ("mov loc0=gp\n\t" \
+ "addl r16=@ltoff(@dtpmod(" #x ")),gp\n\t" \
+ "addl out1=@dtprel(" #x "),r0\n\t" \
+ ";;\n\t" \
+ "ld8 out0=[r16]\n\t" \
+ "br.callrp=__tls_get_addr" \
+ ";;\n\t" \
+ "mov gp=loc0\n\t" \
+ "mov %0=r8\n\t" \
+ : "=r" (__l) : : "r16" , "loc0" , "out0" , "out1" , "r8" ); \
+ __l; })
+
+
+# define TLS_GD(x) \
+ ({ void *__l; \
+ asm ("mov loc0=gp\n\t" \
+ "addl r16=@ltoff(@dtpmod(" #x ")),gp\n\t" \
+ "addl r17=@ltoff(@dtprel(" #x ")),gp\n\t" \
+ ";;\n\t" \
+ "ld8 out0=[r16]\n\t" \
+ "ld8 out1=[r17]\n\t" \
+ "br.callrp=__tls_get_addr" \
+ ";;\n\t" \
+ "mov gp=loc0\n\t" \
+ "mov %0=r8\n\t" \
+ : "=r" (__l) : : "r16", "r17" , "loc0" , "out0", "out1" , "r8"); \
+ __l; })
+
#else
# error "No support for this architecture so far."
#endif