X-Git-Url: https://notaz.gp2x.de/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=deps%2Flightning%2Fcheck%2Fcatomic.c;h=50ddd0d20c8999bf58dc6eff1cd951fdb1afaf49;hb=6727b94fd887ddeddb35f782350b0c992a3069de;hp=04a2f89d8a1c7fe6f8d1659794b0688f7dc00960;hpb=ba3814c189d3bd2332b66fb6c633a7d028e618fe;p=pcsx_rearmed.git

diff --git a/deps/lightning/check/catomic.c b/deps/lightning/check/catomic.c
index 04a2f89d..50ddd0d2 100644
--- a/deps/lightning/check/catomic.c
+++ b/deps/lightning/check/catomic.c
@@ -4,6 +4,83 @@
 #include <unistd.h>
 #include <signal.h>
 
+/* FIXME Remove the "0 &&"  below to make the test pass.
+ * This should not be a Lightning issue. It is crashing
+ * like this at exit:
+ *	Thread 2 "catomic" received signal SIGSEGV, Segmentation fault.
+ *	[Switching to Thread 0xf6acc480 (LWP 2561)]
+ *	_IO_acquire_lock_fct (p=<synthetic pointer>) at libioP.h:797
+ *	797	libioP.h: No such file or directory.
+ *	(gdb) bt
+ *	#0  _IO_acquire_lock_fct (p=<synthetic pointer>) at libioP.h:797
+ *	#1  _IO_puts (str=0x1 <error: Cannot access memory at address 0x1>)
+ *	    at ioputs.c:36
+ *	#2  0xf8eca180 in ?? ()
+ * unless using these hacks, to not use stdio.
+ * Note that the problem will still happen on purpose, to not risk hiding
+ * a problem.
+ */
+#if 0 && defined(__hppa__)
+#  if DEBUG
+#    define DEBUG 0
+#  define PRINT_OK()						\
+    do {							\
+	jit_prepare();						\
+	jit_pushargi(STDOUT_FILENO);				\
+	jit_pushargi((jit_word_t)"ok\n");			\
+	jit_pushargri(3);					\
+	jit_finishi(write);					\
+    } while (0)
+#  endif
+#else
+#  define PRINT_OK()						\
+    do {							\
+	jit_prepare();						\
+	jit_pushargi((jit_word_t)"ok");				\
+	jit_finishi(puts);					\
+    } while (0)
+#endif
+
+#if DEBUG
+volatile
+#endif
+jit_word_t	lock;
+pthread_t	tids[4];
+
+#if DEBUG
+int debug_offset(void)
+{
+    int		i;
+    pthread_t	self = pthread_self();
+    for (i = 0; i < 4; ++i)
+	if (tids[i] == self)
+	    return i;
+    return -1;
+}
+
+void debug_spin(void)
+{
+    printf("  spin %d : %ld\n", debug_offset(), lock);
+}
+
+void debug_lock(void)
+{
+    printf("  lock %d : %ld\n", debug_offset(), lock);
+}
+
+void debug_unlock(void)
+{
+    printf("unlock %d : %ld\n", debug_offset(), lock);
+}
+#define DEBUG_SPIN()	jit_calli(debug_spin)
+#define DEBUG_LOCK()	jit_calli(debug_lock)
+#define DEBUG_UNLOCK()	jit_calli(debug_unlock)
+#else
+#define DEBUG_SPIN()	/**/
+#define DEBUG_LOCK()	/**/
+#define DEBUG_UNLOCK()	/**/
+#endif
+
 void alarm_handler(int unused)
 {
     _exit(1);
@@ -17,8 +94,6 @@ main(int argc, char *argv[])
     jit_node_t		 *jmpi_main, *label;
     jit_node_t		 *func0, *func1, *func2, *func3;
     jit_node_t		 *patch0, *patch1, *patch2, *patch3;
-    jit_word_t		  lock;
-    pthread_t		  tids[4];
 
     /* If there is any bug, do not hang in "make check" */
     signal(SIGALRM, alarm_handler);
@@ -35,42 +110,44 @@ main(int argc, char *argv[])
     name = jit_label();						\
      jit_prolog();						\
     jit_movi(JIT_V0, (jit_word_t)&lock);			\
-    jit_movi(JIT_R1, 0);					\
-    jit_movi(JIT_R2, line);					\
+    jit_movi(JIT_V1, 0);					\
+    jit_movi(JIT_V2, line);					\
     /* spin until get the lock */				\
+    DEBUG_SPIN();						\
     label = jit_label();					\
-    jit_casr(JIT_R0, JIT_V0, JIT_R1, JIT_R2);			\
+    jit_casr(JIT_R0, JIT_V0, JIT_V1, JIT_V2);			\
     jit_patch_at(jit_beqi(JIT_R0, 0), label);			\
     /* lock acquired */						\
+    DEBUG_LOCK();						\
     jit_prepare();						\
-    /* pretend to be doing something useful for 0.01 usec
+    /* pretend to be doing something useful for 0.01 sec
      * while holding the lock */				\
     jit_pushargi(10000);					\
     jit_finishi(usleep);					\
     /* release lock */						\
-    jit_movi(JIT_R1, 0);					\
-    jit_str(JIT_V0, JIT_R1);					\
+    DEBUG_UNLOCK();						\
+    jit_movi(JIT_V1, 0);					\
+    jit_str(JIT_V0, JIT_V1);					\
     /* Now test casi */						\
-    jit_movi(JIT_R1, 0);					\
-    jit_movi(JIT_R2, line);					\
+    jit_movi(JIT_V1, 0);					\
+    jit_movi(JIT_V2, line);					\
     /* spin until get the lock */				\
+    DEBUG_SPIN();						\
     label = jit_label();					\
-    jit_casi(JIT_R0, (jit_word_t)&lock, JIT_R1, JIT_R2);	\
+    jit_casi(JIT_R0, (jit_word_t)&lock, JIT_V1, JIT_V2);	\
     jit_patch_at(jit_beqi(JIT_R0, 0), label);			\
     /* lock acquired */						\
+    DEBUG_LOCK();						\
     jit_prepare();						\
-    /* pretend to be doing something useful for 0.01 usec
+    /* pretend to be doing something useful for 0.01 sec
      * while holding the lock */				\
     jit_pushargi(10000);					\
     jit_finishi(usleep);					\
-    jit_prepare();						\
-    /* for make check, just print "ok" */			\
-    jit_pushargi((jit_word_t)"ok");				\
-    /*jit_pushargi((jit_word_t)#name);*/			\
-    jit_finishi(puts);						\
+    PRINT_OK();							\
     /* release lock */						\
-    jit_movi(JIT_R1, 0);					\
-    jit_str(JIT_V0, JIT_R1);					\
+    DEBUG_UNLOCK();						\
+    jit_movi(JIT_V1, 0);					\
+    jit_str(JIT_V0, JIT_V1);					\
     jit_ret();							\
     jit_epilog();
     defun(func0, __LINE__);
@@ -106,7 +183,10 @@ main(int argc, char *argv[])
 #define join(tid)						\
     /* load pthread_t value in JIT_R0 */			\
     jit_movi(JIT_R0, (jit_word_t)tids);				\
-    jit_ldxi(JIT_R0, JIT_R0, tid * sizeof(pthread_t));		\
+    if (__WORDSIZE == 64 && sizeof(pthread_t) == 4)		\
+	jit_ldxi_i(JIT_R0, JIT_R0, tid * sizeof(pthread_t));	\
+    else							\
+	jit_ldxi(JIT_R0, JIT_R0, tid * sizeof(pthread_t));	\
     jit_prepare();						\
     jit_pushargr(JIT_R0);					\
     jit_pushargi((jit_word_t)NULL);				\
@@ -117,16 +197,14 @@ main(int argc, char *argv[])
     join(2);
     join(3);
 
-    jit_prepare();
-    jit_pushargi((jit_word_t)"ok");
-    jit_finishi(puts);
+    PRINT_OK();
 
     jit_ret();
     jit_epilog();
 
     code = jit_emit();
 
-#if 1
+#if DEBUG
     jit_disassemble();
 #endif