]> git.saurik.com Git - apple/icu.git/blobdiff - icuSources/test/intltest/tsmthred.cpp
ICU-551.51.tar.gz
[apple/icu.git] / icuSources / test / intltest / tsmthred.cpp
index 90e8c9fd9ce62bdc54fdfc2178fe28e3029507a5..c9df4373d9a06eff47d504a9c8a27768bec394c0 100644 (file)
@@ -1,6 +1,6 @@
 /********************************************************************
- * COPYRIGHT: 
- * Copyright (c) 1999-2004, International Business Machines Corporation and
+ * COPYRIGHT:
+ * Copyright (c) 1999-2014, International Business Machines Corporation and
  * others. All Rights Reserved.
  ********************************************************************/
 
 # endif
 #endif
 
+#include "simplethread.h"
+
 #include "unicode/utypes.h"
 #include "unicode/ustring.h"
 #include "umutex.h"
 #include "cmemory.h"
 #include "cstring.h"
 #include "uparse.h"
+#include "unicode/localpointer.h"
 #include "unicode/resbund.h"
 #include "unicode/udata.h"
 #include "unicode/uloc.h"
 #include "unicode/locid.h"
 #include "putilimp.h"
-#if !defined(WIN32) && !defined(XP_MAC) && !defined(U_RHAPSODY)
-#define POSIX 1
+#include "intltest.h"
+#include "tsmthred.h"
+#include "unicode/ushape.h"
+#include "unicode/translit.h"
+#include "sharedobject.h"
+#include "unifiedcache.h"
+#include "uassert.h"
+
+#if U_PLATFORM_USES_ONLY_WIN32_API
+    /* Prefer native Windows APIs even if POSIX is implemented (i.e., on Cygwin). */
+#   undef POSIX
+#elif U_PLATFORM_IMPLEMENTS_POSIX
+#   define POSIX
+#else
+#   undef POSIX
 #endif
 
-#if defined(POSIX) || defined(U_SOLARIS) || defined(U_AIX) || defined(U_HPUX)
+/* Needed by z/OS to get usleep */
+#if U_PLATFORM == U_PF_OS390
+#define __DOT1 1
+#define __UU
+#ifndef _XPG4_2
+#define _XPG4_2
+#endif
+#include <unistd.h>
+#endif
+#if defined(POSIX)
 
 #define HAVE_IMP
 
 #define __EXTENSIONS__
 #endif
 
+#if U_PLATFORM == U_PF_OS390
+#include <sys/types.h>
+#endif
+
+#if U_PLATFORM != U_PF_OS390
 #include <signal.h>
+#endif
 
 /* Define _XPG4_2 for Solaris and friends. */
 #ifndef _XPG4_2
@@ -53,7 +84,7 @@
 
 /* Define __USE_XOPEN_EXTENDED for Linux and glibc. */
 #ifndef __USE_XOPEN_EXTENDED
-#define __USE_XOPEN_EXTENDED 
+#define __USE_XOPEN_EXTENDED
 #endif
 
 /* Define _INCLUDE_XOPEN_SOURCE_EXTENDED for HP/UX (11?). */
 #undef sleep
 #endif
 
-
-
-#include "tsmthred.h"
-
+#define TSMTHREAD_FAIL(msg) errln("%s at file %s, line %d", msg, __FILE__, __LINE__)
+#define TSMTHREAD_ASSERT(expr) {if (!(expr)) {TSMTHREAD_FAIL("Fail");}}
 
 MultithreadTest::MultithreadTest()
 {
@@ -85,8 +114,8 @@ MultithreadTest::~MultithreadTest()
 
 
 #if (ICU_USE_THREADS==0)
-void MultithreadTest::runIndexedTest( int32_t index, UBool exec, 
-                const char* &name, char* par ) {
+void MultithreadTest::runIndexedTest( int32_t index, UBool exec,
+                const char* &name, char* /*par*/ ) {
   if (exec) logln("TestSuite MultithreadTest: ");
 
   if(index == 0)
@@ -99,381 +128,26 @@ void MultithreadTest::runIndexedTest( int32_t index, UBool exec,
 }
 #else
 
-
-
-// Note: A LOT OF THE FUNCTIONS IN THIS FILE SHOULD LIVE ELSEWHERE!!!!!
-// Note: A LOT OF THE FUNCTIONS IN THIS FILE SHOULD LIVE ELSEWHERE!!!!!
-//   -srl
-
 #include <stdio.h>
 #include <string.h>
 #include <ctype.h>    // tolower, toupper
 
 #include "unicode/putil.h"
 
-/* for mthreadtest*/
+// for mthreadtest
 #include "unicode/numfmt.h"
 #include "unicode/choicfmt.h"
 #include "unicode/msgfmt.h"
 #include "unicode/locid.h"
-#include "unicode/ucol.h"
+#include "unicode/coll.h"
 #include "unicode/calendar.h"
 #include "ucaconf.h"
 
-//-----------------------------------------------------------------------------------
-//
-//      class SimpleThread   Of course we need a thread class first..
-//                           This wrapper has a ported implementation.
-//
-//-----------------------------------------------------------------------------------
-class SimpleThread
-{
-public:
-    SimpleThread();
-    virtual  ~SimpleThread();
-    int32_t   start(void);        // start the thread
-    UBool     isRunning();        // return true if a started thread has exited.
-
-    virtual void run(void) = 0;   // Override this to provide the code to run
-                                  //   in the thread.
-    void *fImplementation;
-
-public:
-    static void sleep(int32_t millis); // probably shouldn't go here but oh well.
-    static void errorFunc();      // Empty function, provides a single convenient place
-                                  //   to break on errors.
-};
-
 void SimpleThread::errorFunc() {
     // *(char *)0 = 3;            // Force entry into a debugger via a crash;
 }
 
-
-
-
-#ifdef WIN32
-#define HAVE_IMP
-
-#   define VC_EXTRALEAN
-#   define WIN32_LEAN_AND_MEAN
-#   define NOUSER
-#   define NOSERVICE
-#   define NOIME
-#   define NOMCX
-#include <windows.h>
-#include <process.h>
-
-
-
-//-----------------------------------------------------------------------------------
-//
-//   class SimpleThread   Windows Implementation
-//
-//-----------------------------------------------------------------------------------
-struct Win32ThreadImplementation
-{
-    HANDLE         fHandle;
-    unsigned int   fThreadID;
-};
-
-
-extern "C" unsigned int __stdcall SimpleThreadProc(void *arg)
-{
-    ((SimpleThread*)arg)->run();
-    return 0;
-}
-
-SimpleThread::SimpleThread()
-:fImplementation(0)
-{
-    Win32ThreadImplementation *imp = new Win32ThreadImplementation;
-    imp->fHandle = 0;
-    fImplementation = imp;
-}
-
-SimpleThread::~SimpleThread()
-{
-    // Destructor.  Because we start the thread running with _beginthreadex(),
-    //              we own the Windows HANDLE for the thread and must 
-    //              close it here.
-    Win32ThreadImplementation *imp = (Win32ThreadImplementation*)fImplementation;
-    if (imp != 0) {
-        if (imp->fHandle != 0) {
-            CloseHandle(imp->fHandle);
-            imp->fHandle = 0;
-        }
-    }
-    delete (Win32ThreadImplementation*)fImplementation;
-}
-
-int32_t SimpleThread::start()
-{
-    Win32ThreadImplementation *imp = (Win32ThreadImplementation*)fImplementation;
-    if(imp->fHandle != NULL) {
-        // The thread appears to have already been started.
-        //   This is probably an error on the part of our caller.
-        return -1;
-    }
-
-    imp->fHandle = (HANDLE) _beginthreadex(
-        NULL,                                 // Security    
-        0x20000,                              // Stack Size 
-        SimpleThreadProc,                     // Function to Run
-        (void *)this,                         // Arg List
-        0,                                    // initflag.  Start running, not suspended
-        &imp->fThreadID                       // thraddr
-        );
-
-    if (imp->fHandle == 0) {
-        // An error occured
-        int err = errno;
-        if (err == 0) {
-            err = -1;
-        }
-        return err;
-    }
-    return 0;
-}
-
-
-UBool  SimpleThread::isRunning() {
-    //
-    //  Test whether the thread associated with the SimpleThread object is
-    //    still actually running.  
-    //
-    //  NOTE:  on Win64 on Itanium processors, a crashes
-    //    occur if the main thread of a process exits concurrently with some
-    //    other thread(s) exiting.  To avoid the possibility, we wait until the
-    //    OS indicates that all threads have  terminated, rather than waiting
-    //    only until the end of the user's Run function has been reached.
-    //
-    //   I don't know whether the crashes represent a Windows bug, or whether
-    //    main() programs are supposed to have to wait for their threads.
-    //
-    Win32ThreadImplementation *imp = (Win32ThreadImplementation*)fImplementation;
-    
-    bool      success;
-    DWORD     threadExitCode;
-
-    if (imp->fHandle == 0) {
-        // No handle, thread must not be running.
-        return FALSE;
-    }
-    success = GetExitCodeThread(imp->fHandle,   &threadExitCode) != 0;
-    if (! success) {
-        // Can't get status, thread must not be running.
-        return FALSE;
-    }
-    return (threadExitCode == STILL_ACTIVE);
-}
-
-
-void SimpleThread::sleep(int32_t millis)
-{
-    ::Sleep(millis);
-}
-
-//-----------------------------------------------------------------------------------
-//
-//   class SimpleThread   NULL  Implementation
-//
-//-----------------------------------------------------------------------------------
-#elif defined XP_MAC
-
-// since the Mac has no preemptive threading (at least on MacOS 8), only
-// cooperative threading, threads are a no-op.  We have no yield() calls
-// anywhere in the ICU, so we are guaranteed to be thread-safe.
-
-#define HAVE_IMP
-
-SimpleThread::SimpleThread()
-{}
-
-SimpleThread::~SimpleThread()
-{}
-
-int32_t 
-SimpleThread::start()
-{ return 0; }
-
-void 
-SimpleThread::run()
-{}
-
-void 
-SimpleThread::sleep(int32_t millis)
-{}
-
-UBool  
-SimpleThread::isRunning() {
-    return FALSE;
-}
-
-#endif
-
-
-//-----------------------------------------------------------------------------------
-//
-//   class SimpleThread   POSIX implementation
-//
-//        A note on the POSIX vs the Windows implementations of this class..
-//        On Windows, the main thread must verify that other threads have finished
-//        before exiting, or crashes occasionally occur.  (Seen on Itanium Win64 only)
-//        The function SimpleThread::isRunning() is used for this purpose.
-//
-//        On POSIX, there is NO reliable non-blocking mechanism to determine
-//        whether a thread has exited.  pthread_kill(thread, 0) almost works,
-//        but the system can recycle thread ids immediately, so seeing that a
-//        thread exists with this call could mean that the original thread has
-//        finished and a new one started with the same ID.  Useless.
-//
-//        So we need to do the check with user code, by setting a flag just before
-//        the thread function returns.  A technique that is guaranteed to fail
-//        on Windows, because it indicates that the thread is done before all
-//        system level cleanup has happened.
-//
-//-----------------------------------------------------------------------------------
-#if defined(POSIX)||defined(U_SOLARIS)||defined(U_AIX)||defined(U_HPUX)
-#define HAVE_IMP
-
-struct PosixThreadImplementation
-{
-    pthread_t        fThread;
-    UBool            fRunning;
-    UBool            fRan;          /* True if the thread was successfully started   */
-};
-
-extern "C" void* SimpleThreadProc(void *arg)
-{
-    // This is the code that is run in the new separate thread.
-    SimpleThread *This = (SimpleThread *)arg;
-    This->run();      // Run the user code.
-
-    // The user function has returned.  Set the flag indicating that this thread
-    // is done.  Need a mutex for memory barrier purposes only, so that other thread
-    //   will reliably see that the flag has changed.
-    PosixThreadImplementation *imp = (PosixThreadImplementation*)This->fImplementation;
-    umtx_lock(NULL);
-    imp->fRunning = FALSE;
-    umtx_unlock(NULL);
-    return 0;
-}
-
-SimpleThread::SimpleThread() 
-{
-    PosixThreadImplementation *imp = new PosixThreadImplementation;
-    imp->fRunning   = FALSE;
-    imp->fRan       = FALSE;
-    fImplementation = imp;
-}
-
-SimpleThread::~SimpleThread()
-{
-    PosixThreadImplementation *imp = (PosixThreadImplementation*)fImplementation;
-    if (imp->fRan) {
-        pthread_join(imp->fThread, NULL);
-    }
-    delete imp;
-    fImplementation = (void *)0xdeadbeef;
-}
-
-int32_t SimpleThread::start()
-{
-    int32_t        rc;
-    static pthread_attr_t attr;
-    static UBool attrIsInitialized = FALSE;
-
-    PosixThreadImplementation *imp = (PosixThreadImplementation*)fImplementation;
-    imp->fRunning = TRUE;
-    imp->fRan     = TRUE;
-
-#ifdef HPUX_CMA
-    if (attrIsInitialized == FALSE) {
-        rc = pthread_attr_create(&attr);
-        attrIsInitialized = TRUE;
-    }
-    rc = pthread_create(&(imp->fThread),attr,&SimpleThreadProc,(void*)this);
-#else
-    if (attrIsInitialized == FALSE) {
-        rc = pthread_attr_init(&attr);
-#if defined(OS390)
-        {
-            int detachstate = 0;  /* jdc30: detach state of zero causes
-                                  threads created with this attr to be in
-                                  an undetached state.  An undetached
-                                  thread will keep its resources after
-                                  termination.   */
-            pthread_attr_setdetachstate(&attr, &detachstate);
-        }
-#else
-        // pthread_attr_setdetachstate(&attr, PTHREAD_CREATE_DETACHED);
-        pthread_attr_setdetachstate(&attr, PTHREAD_CREATE_JOINABLE);
-#endif
-        attrIsInitialized = TRUE;
-    }
-    rc = pthread_create(&(imp->fThread),&attr,&SimpleThreadProc,(void*)this);
-#endif
-    
-    if (rc != 0) {
-        // some kind of error occured, the thread did not start.
-        imp->fRan     = FALSE;
-        imp->fRunning = FALSE;
-    }
-
-    return rc;
-}
-
-
-UBool  
-SimpleThread::isRunning() {
-    // Note:  Mutex functions are used here not for synchronization, 
-    //        but to force memory barriors to exist, to ensure that one thread
-    //        can see changes made by another when running on processors
-    //        with memory models having weak coherency.
-    PosixThreadImplementation *imp = (PosixThreadImplementation*)fImplementation;
-    umtx_lock(NULL);
-    UBool retVal = imp->fRunning;
-    umtx_unlock(NULL);
-    return retVal;
-}
-
-
-void SimpleThread::sleep(int32_t millis)
-{
-#ifdef U_SOLARIS
-    sigignore(SIGALRM);
-#endif
-
-#ifdef HPUX_CMA
-    cma_sleep(millis/100);
-#elif defined(U_HPUX) || defined(OS390)
-    millis *= 1000;
-    while(millis >= 1000000) {
-        usleep(999999);
-        millis -= 1000000;
-    }
-    if(millis > 0) {
-        usleep(millis);
-    }
-#else
-    usleep(millis * 1000);
-#endif
-}
-
-#endif
-// end POSIX
-
-
-#ifndef HAVE_IMP
-#error  No implementation for threads! Cannot test.
-0 = 216; //die
-#endif
-
-
-// *************** end fluff ******************
-
-/* now begins the real test. */
-void MultithreadTest::runIndexedTest( int32_t index, UBool exec, 
+void MultithreadTest::runIndexedTest( int32_t index, UBool exec,
                 const char* &name, char* /*par*/ ) {
     if (exec)
         logln("TestSuite MultithreadTest: ");
@@ -509,12 +183,38 @@ void MultithreadTest::runIndexedTest( int32_t index, UBool exec,
       break;
 
     case 4:
-        name = "TestString"; 
+        name = "TestString";
         if (exec) {
             TestString();
         }
         break;
 
+    case 5:
+        name = "TestArabicShapingThreads";
+        if (exec) {
+            TestArabicShapingThreads();
+        }
+        break;
+
+    case 6:
+        name = "TestAnyTranslit";
+        if (exec) {
+            TestAnyTranslit();
+        }
+        break;
+
+    case 7:
+        name = "TestConditionVariables";
+        if (exec) {
+            TestConditionVariables();
+        }
+        break;
+    case 8:
+        name = "TestUnifiedCache";
+        if (exec) {
+            TestUnifiedCache();
+        }
+        break;
     default:
         name = "";
         break; //needed to end loop
@@ -532,23 +232,94 @@ void MultithreadTest::runIndexedTest( int32_t index, UBool exec,
 //
 //-----------------------------------------------------------------------------------
 #define THREADTEST_NRTHREADS 8
+#define ARABICSHAPE_THREADTEST 30
 
 class TestThreadsThread : public SimpleThread
 {
 public:
     TestThreadsThread(char* whatToChange) { fWhatToChange = whatToChange; }
-    virtual void run() { SimpleThread::sleep(1000); 
+    virtual void run() { SimpleThread::sleep(1000);
                          Mutex m;
-                         *fWhatToChange = '*'; 
+                         *fWhatToChange = '*';
     }
 private:
     char *fWhatToChange;
+};
+//-----------------------------------------------------------------------------------
+//
+//   TestArabicShapeThreads -- see if calls to u_shapeArabic in many threads works successfully
+//
+//   Set up N threads pointing at N chars. When they are started, they will make calls to doTailTest which tests
+//   u_shapeArabic, if the calls are successful it will the set * chars.
+//   At the end we make sure all threads managed to run u_shapeArabic successfully.
+//   This is a unit test for ticket 9473
+//
+//-----------------------------------------------------------------------------------
+class TestArabicShapeThreads : public SimpleThread
+{
+public:
+    TestArabicShapeThreads(char* whatToChange) { fWhatToChange = whatToChange;}
+    virtual void run() {
+           if(doTailTest()==TRUE)
+                       *fWhatToChange = '*';
+    }
+private:
+    char *fWhatToChange;
+       
+       UBool doTailTest(void) {
+  static const UChar src[] = { 0x0020, 0x0633, 0 };
+  static const UChar dst_old[] = { 0xFEB1, 0x200B,0 };
+  static const UChar dst_new[] = { 0xFEB1, 0xFE73,0 };
+  UChar dst[3] = { 0x0000, 0x0000,0 };
+  int32_t length;
+  UErrorCode status;
+  IntlTest inteltst =  IntlTest();
+
+  status = U_ZERO_ERROR;
+  length = u_shapeArabic(src, -1, dst, UPRV_LENGTHOF(dst),
+                         U_SHAPE_LETTERS_SHAPE|U_SHAPE_SEEN_TWOCELL_NEAR, &status);
+  if(U_FAILURE(status)) {
+          inteltst.errln("Fail: status %s\n", u_errorName(status));
+       return FALSE;
+  } else if(length!=2) {
+    inteltst.errln("Fail: len %d expected 3\n", length);
+       return FALSE;
+  } else if(u_strncmp(dst,dst_old,UPRV_LENGTHOF(dst))) {
+    inteltst.errln("Fail: got U+%04X U+%04X expected U+%04X U+%04X\n",
+            dst[0],dst[1],dst_old[0],dst_old[1]);
+       return FALSE;
+  }
+
+
+  //"Trying new tail
+  status = U_ZERO_ERROR;
+  length = u_shapeArabic(src, -1, dst, UPRV_LENGTHOF(dst),
+                         U_SHAPE_LETTERS_SHAPE|U_SHAPE_SEEN_TWOCELL_NEAR|U_SHAPE_TAIL_NEW_UNICODE, &status);
+  if(U_FAILURE(status)) {
+    inteltst.errln("Fail: status %s\n", u_errorName(status));
+       return FALSE;
+  } else if(length!=2) {
+    inteltst.errln("Fail: len %d expected 3\n", length);
+       return FALSE;
+  } else if(u_strncmp(dst,dst_new,UPRV_LENGTHOF(dst))) {
+    inteltst.errln("Fail: got U+%04X U+%04X expected U+%04X U+%04X\n",
+            dst[0],dst[1],dst_new[0],dst_new[1]);
+       return FALSE;
+  }
+
+
+  return TRUE;
+
+}
+       
+
 };
 
 void MultithreadTest::TestThreads()
 {
     char threadTestChars[THREADTEST_NRTHREADS + 1];
     SimpleThread *threads[THREADTEST_NRTHREADS];
+    int32_t numThreadsStarted = 0;
 
     int32_t i;
     for(i=0;i<THREADTEST_NRTHREADS;i++)
@@ -564,11 +335,18 @@ void MultithreadTest::TestThreads()
         if (threads[i]->start() != 0) {
             errln("Error starting thread %d", i);
         }
-        SimpleThread::sleep(200);
+        else {
+            numThreadsStarted++;
+        }
+        SimpleThread::sleep(100);
         logln(" Subthread started.");
     }
 
     logln("Waiting for threads to be set..");
+    if (numThreadsStarted == 0) {
+        errln("No threads could be started for testing!");
+        return;
+    }
 
     int32_t patience = 40; // seconds to wait
 
@@ -584,7 +362,7 @@ void MultithreadTest::TestThreads()
             }
         }
         umtx_unlock(NULL);
-        
+
         if(count == THREADTEST_NRTHREADS)
         {
             logln("->" + UnicodeString(threadTestChars) + "<- Got all threads! cya");
@@ -607,96 +385,196 @@ void MultithreadTest::TestThreads()
 }
 
 
-class TestMutexThread1 : public SimpleThread
+void MultithreadTest::TestArabicShapingThreads()
 {
-public:
-    TestMutexThread1() : fDone(FALSE) {}
-    virtual void run()
+    char threadTestChars[ARABICSHAPE_THREADTEST + 1];
+    SimpleThread *threads[ARABICSHAPE_THREADTEST];
+    int32_t numThreadsStarted = 0;
+
+    int32_t i;
+
+    for(i=0;i<ARABICSHAPE_THREADTEST;i++)
     {
-        Mutex m;                        // grab the lock first thing
-        SimpleThread::sleep(900);      // then wait
-        fDone = TRUE;                   // finally, set our flag
+        threadTestChars[i] = ' ';
+        threads[i] = new TestArabicShapeThreads(&threadTestChars[i]);
     }
-public:
-    UBool fDone;
-};
+    threadTestChars[ARABICSHAPE_THREADTEST] = '\0';
 
-class TestMutexThread2 : public SimpleThread
-{
-public:
-    TestMutexThread2(TestMutexThread1& r) : fOtherThread(r), fDone(FALSE), fErr(FALSE) {}
-    virtual void run()
+    logln("-> do TestArabicShapingThreads <- Firing off threads.. ");
+    for(i=0;i<ARABICSHAPE_THREADTEST;i++)
     {
-        SimpleThread::sleep(500);          // wait, make sure they aquire the lock
-        fElapsed = uprv_getUTCtime();
-        {
-            Mutex m;                        // wait here
+        if (threads[i]->start() != 0) {
+            errln("Error starting thread %d", i);
+        }
+        else {
+            numThreadsStarted++;
+        }
+        //SimpleThread::sleep(100);
+        logln(" Subthread started.");
+    }
 
-            fElapsed = uprv_getUTCtime() - fElapsed;
+    logln("Waiting for threads to be set..");
+    if (numThreadsStarted == 0) {
+        errln("No threads could be started for testing!");
+        return;
+    }
 
-            if(fOtherThread.fDone == FALSE) 
-                fErr = TRUE;                // they didnt get to it yet
+    int32_t patience = 100; // seconds to wait
 
-            fDone = TRUE;               // we're done.
+    while(patience--)
+    {
+        int32_t count = 0;
+        umtx_lock(NULL);
+        for(i=0;i<ARABICSHAPE_THREADTEST;i++)
+        {
+            if(threadTestChars[i] == '*')
+            {
+                count++;
+            }
         }
+        umtx_unlock(NULL);
+
+        if(count == ARABICSHAPE_THREADTEST)
+        {
+            logln("->TestArabicShapingThreads <- Got all threads! cya");
+            for(i=0;i<ARABICSHAPE_THREADTEST;i++)
+            {
+                delete threads[i];
+            }
+            return;
+        }
+
+        logln("-> TestArabicShapingThreads <- Waiting..");
+        SimpleThread::sleep(500);
+    }
+
+    errln("-> TestArabicShapingThreads <- PATIENCE EXCEEDED!! Still missing some.");
+    for(i=0;i<ARABICSHAPE_THREADTEST;i++)
+    {
+        delete threads[i];
     }
+       
+}
+
+
+//-----------------------------------------------------------------------
+//
+//  TestMutex  - a simple (non-stress) test to verify that ICU mutexes
+//               are actually mutexing.  Does not test the use of
+//               mutexes within ICU services, but rather that the
+//               platform's mutex support is at least superficially there.
+//
+//----------------------------------------------------------------------
+static UMutex    gTestMutexA = U_MUTEX_INITIALIZER;
+static UMutex    gTestMutexB = U_MUTEX_INITIALIZER;
+
+static int     gThreadsStarted = 0;
+static int     gThreadsInMiddle = 0;
+static int     gThreadsDone = 0;
+
+static const int TESTMUTEX_THREAD_COUNT = 4;
+
+static int safeIncr(int &var, int amt) {
+    // Thread safe (using global mutex) increment of a variable.
+    // Return the updated value.
+    // Can also be used as a safe load of a variable by incrementing it by 0.
+    Mutex m;
+    var += amt;
+    return var;
+}
+
+class TestMutexThread : public SimpleThread
+{
 public:
-    TestMutexThread1 & fOtherThread;
-    UBool fDone, fErr;
-    UDate fElapsed;
-private:
-    /**
-     * The assignment operator has no real implementation.
-     * It is provided to make the compiler happy. Do not call.
-     */
-    TestMutexThread2& operator=(const TestMutexThread2&) { return *this; }
+    virtual void run()
+    {
+        // This is the code that each of the spawned threads runs.
+        // All of the spawned threads bunch up together at each of the two mutexes
+        // because the main holds the mutexes until they do.
+        //
+        safeIncr(gThreadsStarted, 1);
+        umtx_lock(&gTestMutexA);
+        umtx_unlock(&gTestMutexA);
+        safeIncr(gThreadsInMiddle, 1);
+        umtx_lock(&gTestMutexB);
+        umtx_unlock(&gTestMutexB);
+        safeIncr(gThreadsDone, 1);
+    }
 };
 
 void MultithreadTest::TestMutex()
 {
-    /* this test uses printf so that we don't hang by calling UnicodeString inside of a mutex. */
-    //logln("Bye.");
-    //  printf("Warning: MultiThreadTest::Testmutex() disabled.\n");
-    //  return; 
-
-    if(verbose)
-        printf("Before mutex.\n");
-    {
-        Mutex m;
-        if(verbose)
-            printf(" Exited 2nd mutex\n");
+    // Start up the test threads.  They should all pile up waiting on
+    // gTestMutexA, which we (the main thread) hold until the test threads
+    //   all get there.
+    gThreadsStarted = 0;
+    gThreadsInMiddle = 0;
+    gThreadsDone = 0;
+    umtx_lock(&gTestMutexA);
+    TestMutexThread  *threads[TESTMUTEX_THREAD_COUNT];
+    int i;
+    int32_t numThreadsStarted = 0;
+    for (i=0; i<TESTMUTEX_THREAD_COUNT; i++) {
+        threads[i] = new TestMutexThread;
+        if (threads[i]->start() != 0) {
+            errln("Error starting thread %d", i);
+        }
+        else {
+            numThreadsStarted++;
+        }
     }
-    if(verbose)
-        printf("exited 1st mutex. Now testing with threads:");
-
-    TestMutexThread1  thread1;
-    TestMutexThread2  thread2(thread1);
-    if (thread2.start() != 0  || 
-        thread1.start() != 0 ) {
-        errln("Error starting threads.");
+    if (numThreadsStarted == 0) {
+        errln("No threads could be started for testing!");
+        return;
     }
 
-    for(int32_t patience = 12; patience > 0;patience--)
-    {
-        // TODO:  Possible memory coherence issue in looking at fDone values
-        //        that are set in another thread without the mutex here.
-        if(thread1.fDone && verbose)
-            printf("Thread1 done\n");
-
-        if(thread1.fDone && thread2.fDone)
-        {
-            if(thread2.fErr)
-                errln("Thread 2 says: thread1 didn't run before I aquired the mutex.");
-            logln("took %lu seconds for thread2 to aquire the mutex.", (int)(thread2.fElapsed/U_MILLIS_PER_DAY));
+    int patience = 0;
+    while (safeIncr(gThreadsStarted, 0) != TESTMUTEX_THREAD_COUNT) {
+        if (patience++ > 24) {
+            TSMTHREAD_FAIL("Patience Exceeded");
             return;
         }
-        SimpleThread::sleep(1000);
+        SimpleThread::sleep(500);
+    }
+    // None of the test threads should have advanced past the first mutex.
+    TSMTHREAD_ASSERT(gThreadsInMiddle==0);
+    TSMTHREAD_ASSERT(gThreadsDone==0);
+
+    //  All of the test threads have made it to the first mutex.
+    //  We (the main thread) now let them advance to the second mutex,
+    //   where they should all pile up again.
+    umtx_lock(&gTestMutexB);
+    umtx_unlock(&gTestMutexA);
+
+    patience = 0;
+    while (safeIncr(gThreadsInMiddle, 0) != TESTMUTEX_THREAD_COUNT) {
+        if (patience++ > 24) {
+            TSMTHREAD_FAIL("Patience Exceeded");
+            return;
+        }
+        SimpleThread::sleep(500);
+    }
+    TSMTHREAD_ASSERT(gThreadsDone==0);
+
+    //  All test threads made it to the second mutex.
+    //   Now let them proceed from there.  They will all terminate.
+    umtx_unlock(&gTestMutexB);
+    patience = 0;
+    while (safeIncr(gThreadsDone, 0) != TESTMUTEX_THREAD_COUNT) {
+        if (patience++ > 24) {
+            TSMTHREAD_FAIL("Patience Exceeded");
+            return;
+        }
+        SimpleThread::sleep(500);
     }
-    if(verbose)
-        printf("patience exceeded. [WARNING mutex may still be acquired.] ");
-}
 
+    // All threads made it by both mutexes.
 
+    for (i=0; i<TESTMUTEX_THREAD_COUNT; i++) {
+        delete threads[i];
+    }
+
+}
 
 
 //-------------------------------------------------------------------------------------------
@@ -707,14 +585,14 @@ void MultithreadTest::TestMutex()
 class ThreadWithStatus : public SimpleThread
 {
 public:
-    UBool  getError() { return (fErrors > 0); } 
-    UBool  getError(UnicodeString& fillinError) { fillinError = fErrorString; return (fErrors > 0); } 
+    UBool  getError() { return (fErrors > 0); }
+    UBool  getError(UnicodeString& fillinError) { fillinError = fErrorString; return (fErrors > 0); }
     virtual ~ThreadWithStatus(){}
 protected:
     ThreadWithStatus() :  fErrors(0) {}
-    void error(const UnicodeString &error) { 
-        fErrors++; fErrorString = error; 
-        SimpleThread::errorFunc();  
+    void error(const UnicodeString &error) {
+        fErrors++; fErrorString = error;
+        SimpleThread::errorFunc();
     }
     void error() { error("An error occured."); }
 private:
@@ -726,7 +604,7 @@ private:
 
 //-------------------------------------------------------------------------------------------
 //
-//   TestMultithreadedIntl.  Test ICU Formatting n a multi-threaded environment 
+//   TestMultithreadedIntl.  Test ICU Formatting n a multi-threaded environment
 //
 //-------------------------------------------------------------------------------------------
 
@@ -768,9 +646,8 @@ UnicodeString showDifference(const UnicodeString& expected, const UnicodeString&
 //
 //-------------------------------------------------------------------------------------------
 
-const int kFormatThreadIterations = 20;  // # of iterations per thread
-const int kFormatThreadThreads    = 10;  // # of threads to spawn   
-const int kFormatThreadPatience   = 60;  // time in seconds to wait for all threads
+const int kFormatThreadIterations = 100;  // # of iterations per thread
+const int kFormatThreadThreads    = 10;  // # of threads to spawn
 
 #if !UCONFIG_NO_FORMATTING
 
@@ -784,22 +661,16 @@ struct FormatThreadTestData
 } ;
 
 
-void errorToString(UErrorCode theStatus, UnicodeString &string)
-{
-    string=u_errorName(theStatus);
-}
-
 // "Someone from {2} is receiving a #{0} error - {1}. Their telephone call is costing {3 number,currency}."
 
-void formatErrorMessage(UErrorCode &realStatus, const UnicodeString& pattern, const Locale& theLocale,
+static void formatErrorMessage(UErrorCode &realStatus, const UnicodeString& pattern, const Locale& theLocale,
                      UErrorCode inStatus0, /* statusString 1 */ const Locale &inCountry2, double currency3, // these numbers are the message arguments.
                      UnicodeString &result)
 {
     if(U_FAILURE(realStatus))
         return; // you messed up
 
-    UnicodeString errString1;
-    errorToString(inStatus0, errString1);
+    UnicodeString errString1(u_errorName(inStatus0));
 
     UnicodeString countryName2;
     inCountry2.getDisplayCountry(theLocale,countryName2);
@@ -814,19 +685,116 @@ void formatErrorMessage(UErrorCode &realStatus, const UnicodeString& pattern, co
     MessageFormat *fmt = new MessageFormat("MessageFormat's API is broken!!!!!!!!!!!",realStatus);
     fmt->setLocale(theLocale);
     fmt->applyPattern(pattern, realStatus);
-    
+
     if (U_FAILURE(realStatus)) {
         delete fmt;
         return;
     }
 
-    FieldPosition ignore = 0;                      
+    FieldPosition ignore = 0;
     fmt->format(myArgs,4,result,ignore,realStatus);
 
     delete fmt;
+}
+
+/**
+  * Shared formatters &  data used by instances of ThreadSafeFormat.
+  * Exactly one instance of this class is created, and it is then shared concurrently
+  * by the multiple instances of ThreadSafeFormat.
+  */
+class ThreadSafeFormatSharedData {
+  public:
+    ThreadSafeFormatSharedData(UErrorCode &status);
+    ~ThreadSafeFormatSharedData();
+    LocalPointer<NumberFormat>  fFormat;
+    Formattable    fYDDThing;
+    Formattable    fBBDThing;
+    UnicodeString  fYDDStr;
+    UnicodeString  fBBDStr;
+};
+
+const ThreadSafeFormatSharedData *gSharedData = NULL;
+
+ThreadSafeFormatSharedData::ThreadSafeFormatSharedData(UErrorCode &status) {
+    fFormat.adoptInstead(NumberFormat::createCurrencyInstance(Locale::getUS(), status));
+    static const UChar kYDD[] = { 0x59, 0x44, 0x44, 0x00 };
+    static const UChar kBBD[] = { 0x42, 0x42, 0x44, 0x00 };
+    fYDDThing.adoptObject(new CurrencyAmount(123.456, kYDD, status));
+    fBBDThing.adoptObject(new CurrencyAmount(987.654, kBBD, status));
+    if (U_FAILURE(status)) {
+        return;
+    }
+    fFormat->format(fYDDThing, fYDDStr, NULL, status);
+    fFormat->format(fBBDThing, fBBDStr, NULL, status);
+    gSharedData = this;
+}
+
+ThreadSafeFormatSharedData::~ThreadSafeFormatSharedData() {
+    gSharedData = NULL;
+}
+
+/**
+ * Class for thread-safe testing of format.
+ *   Instances of this class appear as members of class FormatThreadTest.
+ *   Multiple instances of FormatThreadTest coexist.
+ *   ThreadSafeFormat::doStuff() is called concurrently to test the thread safety of
+ *   various shared format operations.
+ */
+class ThreadSafeFormat {
+public:
+  /* give a unique offset to each thread */
+  ThreadSafeFormat(UErrorCode &status);
+  UBool doStuff(int32_t offset, UnicodeString &appendErr, UErrorCode &status) const;
+private:
+  LocalPointer<NumberFormat> fFormat; // formatter - en_US constructed currency
 };
 
 
+ThreadSafeFormat::ThreadSafeFormat(UErrorCode &status) {
+  fFormat.adoptInstead(NumberFormat::createCurrencyInstance(Locale::getUS(), status));
+}
+
+static const UChar kUSD[] = { 0x55, 0x53, 0x44, 0x00 };
+
+UBool ThreadSafeFormat::doStuff(int32_t offset, UnicodeString &appendErr, UErrorCode &status) const {
+  UBool okay = TRUE;
+
+  if(u_strcmp(fFormat->getCurrency(), kUSD)) {
+    appendErr.append("fFormat currency != ")
+      .append(kUSD)
+      .append(", =")
+      .append(fFormat->getCurrency())
+      .append("! ");
+    okay = FALSE;
+  }
+
+  if(u_strcmp(gSharedData->fFormat->getCurrency(), kUSD)) {
+    appendErr.append("gFormat currency != ")
+      .append(kUSD)
+      .append(", =")
+      .append(gSharedData->fFormat->getCurrency())
+      .append("! ");
+    okay = FALSE;
+  }
+  UnicodeString str;
+  const UnicodeString *o=NULL;
+  Formattable f;
+  const NumberFormat *nf = NULL; // only operate on it as const.
+  switch(offset%4) {
+  case 0:  f = gSharedData->fYDDThing;  o = &gSharedData->fYDDStr;  nf = gSharedData->fFormat.getAlias();  break;
+  case 1:  f = gSharedData->fBBDThing;  o = &gSharedData->fBBDStr;  nf = gSharedData->fFormat.getAlias();  break;
+  case 2:  f = gSharedData->fYDDThing;  o = &gSharedData->fYDDStr;  nf = fFormat.getAlias();  break;
+  case 3:  f = gSharedData->fBBDThing;  o = &gSharedData->fBBDStr;  nf = fFormat.getAlias();  break;
+  }
+  nf->format(f, str, NULL, status);
+
+  if(*o != str) {
+    appendErr.append(showDifference(*o, str));
+    okay = FALSE;
+  }
+  return okay;
+}
+
 UBool U_CALLCONV isAcceptable(void *, const char *, const char *, const UDataInfo *) {
     return TRUE;
 }
@@ -841,13 +809,18 @@ public:
     int     fNum;
     int     fTraceInfo;
 
+    LocalPointer<ThreadSafeFormat> fTSF;
+
     FormatThreadTest() // constructor is NOT multithread safe.
         : ThreadWithStatus(),
         fNum(0),
         fTraceInfo(0),
+        fTSF(NULL),
         fOffset(0)
         // the locale to use
     {
+        UErrorCode status = U_ZERO_ERROR;      // TODO: rearrange code to allow checking of status.
+        fTSF.adoptInstead(new ThreadSafeFormat(status));
         static int32_t fgOffset = 0;
         fgOffset += 3;
         fOffset = fgOffset;
@@ -857,12 +830,11 @@ public:
     virtual void run()
     {
         fTraceInfo                     = 1;
-        NumberFormat *formatter        = NULL;
-        NumberFormat *percentFormatter = NULL;
+        LocalPointer<NumberFormat> percentFormatter;
         UErrorCode status = U_ZERO_ERROR;
 
 #if 0
-        // debugging code, 
+        // debugging code,
         for (int i=0; i<4000; i++) {
             status = U_ZERO_ERROR;
             UDataMemory *data1 = udata_openChoice(0, "res", "en_US", isAcceptable, 0, &status);
@@ -877,8 +849,8 @@ public:
         return;
 #endif
 
-#if 1
-        // debugging code, 
+#if 0
+        // debugging code,
         int m;
         for (m=0; m<4000; m++) {
             status         = U_ZERO_ERROR;
@@ -908,7 +880,7 @@ public:
 #endif
 
         // Keep this data here to avoid static initialization.
-        FormatThreadTestData kNumberFormatTestData[] = 
+        FormatThreadTestData kNumberFormatTestData[] =
         {
             FormatThreadTestData((double)5.0, UnicodeString("5", "")),
                 FormatThreadTestData( 6.0, UnicodeString("6", "")),
@@ -918,74 +890,72 @@ public:
                 FormatThreadTestData( 12345, UnicodeString("12,345", "")),
                 FormatThreadTestData( 81890.23, UnicodeString("81,890.23", "")),
         };
-        int32_t kNumberFormatTestDataLength = (int32_t)(sizeof(kNumberFormatTestData) / 
-                                                        sizeof(kNumberFormatTestData[0]));
-        
+        int32_t kNumberFormatTestDataLength = UPRV_LENGTHOF(kNumberFormatTestData);
+
         // Keep this data here to avoid static initialization.
-        FormatThreadTestData kPercentFormatTestData[] = 
+        FormatThreadTestData kPercentFormatTestData[] =
         {
-            FormatThreadTestData((double)5.0, UnicodeString("500%", "")),
-                FormatThreadTestData( 1.0, UnicodeString("100%", "")),
-                FormatThreadTestData( 0.26, UnicodeString("26%", "")),
-                FormatThreadTestData( 
-                   16384.99, CharsToUnicodeString("1\\u00a0638\\u00a0499%") ), // U+00a0 = NBSP
-                FormatThreadTestData( 
-                    81890.23, CharsToUnicodeString("8\\u00a0189\\u00a0023%" )),
+            FormatThreadTestData((double)5.0, CharsToUnicodeString("500\\u00a0%")),
+                FormatThreadTestData( 1.0, CharsToUnicodeString("100\\u00a0%")),
+                FormatThreadTestData( 0.26, CharsToUnicodeString("26\\u00a0%")),
+                FormatThreadTestData(
+                   16384.99, CharsToUnicodeString("1\\u00a0638\\u00a0499\\u00a0%")), // U+00a0 = NBSP
+                FormatThreadTestData(
+                    81890.23, CharsToUnicodeString("8\\u00a0189\\u00a0023\\u00a0%")),
         };
-        int32_t kPercentFormatTestDataLength = 
-                (int32_t)(sizeof(kPercentFormatTestData) / sizeof(kPercentFormatTestData[0]));
+        int32_t kPercentFormatTestDataLength = UPRV_LENGTHOF(kPercentFormatTestData);
         int32_t iteration;
-        
+
         status = U_ZERO_ERROR;
-        formatter = NumberFormat::createInstance(Locale::getEnglish(),status);
+        LocalPointer<NumberFormat> formatter(NumberFormat::createInstance(Locale::getEnglish(),status));
         if(U_FAILURE(status)) {
-            error("Error on NumberFormat::createInstance()");
+            error("Error on NumberFormat::createInstance().");
             goto cleanupAndReturn;
         }
-        
-        percentFormatter = NumberFormat::createPercentInstance(Locale::getFrench(),status);
+
+        percentFormatter.adoptInstead(NumberFormat::createPercentInstance(Locale::getFrench(),status));
         if(U_FAILURE(status))             {
-            error("Error on NumberFormat::createPercentInstance()");
+            error("Error on NumberFormat::createPercentInstance().");
             goto cleanupAndReturn;
         }
-        
+
         for(iteration = 0;!getError() && iteration<kFormatThreadIterations;iteration++)
         {
-            
+
             int32_t whichLine = (iteration + fOffset)%kNumberFormatTestDataLength;
-            
+
             UnicodeString  output;
-            
+
             formatter->format(kNumberFormatTestData[whichLine].number, output);
-            
+
             if(0 != output.compare(kNumberFormatTestData[whichLine].string)) {
-                error("format().. expected " + kNumberFormatTestData[whichLine].string 
+                error("format().. expected " + kNumberFormatTestData[whichLine].string
                         + " got " + output);
                 goto cleanupAndReturn;
             }
-            
+
             // Now check percent.
             output.remove();
             whichLine = (iteration + fOffset)%kPercentFormatTestDataLength;
-            
+
             percentFormatter->format(kPercentFormatTestData[whichLine].number, output);
             if(0 != output.compare(kPercentFormatTestData[whichLine].string))
             {
-                error("percent format().. \n" + 
+                error("percent format().. \n" +
                         showDifference(kPercentFormatTestData[whichLine].string,output));
                 goto cleanupAndReturn;
             }
-            
-            // Test message error 
+
+            // Test message error
             const int       kNumberOfMessageTests = 3;
             UErrorCode      statusToCheck;
             UnicodeString   patternToCheck;
             Locale          messageLocale;
             Locale          countryToCheck;
             double          currencyToCheck;
-            
+
             UnicodeString   expected;
-            
+
             // load the cases.
             switch((iteration+fOffset) % kNumberOfMessageTests)
             {
@@ -1003,11 +973,14 @@ public:
                 break;
             case 1:
                 statusToCheck=                      U_INDEX_OUTOFBOUNDS_ERROR;
-                patternToCheck=                     "1:A customer in {2} is receiving a #{0} error - {1}. Their telephone call is costing {3,number,currency}."; // number,currency
+                patternToCheck=                     "1:A customer in {2} is receiving a #{0} error - {1}. "
+                                                    "Their telephone call is costing {3,number,currency}."; // number,currency
                 messageLocale=                      Locale("de","DE@currency=DEM");
                 countryToCheck=                     Locale("","BF");
                 currencyToCheck=                    2.32;
-                expected=                           "1:A customer in Burkina Faso is receiving a #8 error - U_INDEX_OUTOFBOUNDS_ERROR. Their telephone call is costing 2,32 DM.";
+                expected=                           CharsToUnicodeString(
+                                                    "1:A customer in Burkina Faso is receiving a #8 error - U_INDEX_OUTOFBOUNDS_ERROR. "
+                                                    "Their telephone call is costing 2,32\\u00A0DM.");
                 break;
             case 2:
                 statusToCheck=                      U_MEMORY_ALLOCATION_ERROR;
@@ -1020,38 +993,42 @@ public:
                 expected=       CharsToUnicodeString(
                             "2:user in Vereinigte Staaten is receiving a #7 error"
                             " - U_MEMORY_ALLOCATION_ERROR. They insist they just spent"
-                            " \\u00f6S 40.193,12 on memory.");
+                            " \\u00f6S\\u00A040.193,12 on memory.");
                 break;
             }
-            
+
             UnicodeString result;
             UErrorCode status = U_ZERO_ERROR;
             formatErrorMessage(status,patternToCheck,messageLocale,statusToCheck,
                                 countryToCheck,currencyToCheck,result);
             if(U_FAILURE(status))
             {
-                UnicodeString tmp;
-                errorToString(status,tmp);
+                UnicodeString tmp(u_errorName(status));
                 error("Failure on message format, pattern=" + patternToCheck +
                         ", error = " + tmp);
                 goto cleanupAndReturn;
             }
-            
+
             if(result != expected)
             {
                 error("PatternFormat: \n" + showDifference(expected,result));
                 goto cleanupAndReturn;
             }
+            // test the Thread Safe Format
+            UnicodeString appendErr;
+            if(!fTSF->doStuff(fNum, appendErr, status)) {
+              error(appendErr);
+              goto cleanupAndReturn;
+            }
         }   /*  end of for loop */
-        
+
+
+
 cleanupAndReturn:
-        delete formatter;
-        delete percentFormatter;
-        
         //  while (fNum == 4) {SimpleThread::sleep(10000);}   // Force a failure by preventing thread from finishing
         fTraceInfo = 2;
     }
-    
+
 private:
     int32_t fOffset; // where we are testing from.
 };
@@ -1063,39 +1040,61 @@ void MultithreadTest::TestThreadedIntl()
     int i;
     UnicodeString theErr;
     UBool   haveDisplayedInfo[kFormatThreadThreads];
+    static const int32_t PATIENCE_SECONDS = 45;
+
+    UErrorCode threadSafeErr = U_ZERO_ERROR;
+
+    ThreadSafeFormatSharedData sharedData(threadSafeErr);
+    assertSuccess("initializing ThreadSafeFormat", threadSafeErr, TRUE);
 
     //
     //  Create and start the test threads
     //
     logln("Spawning: %d threads * %d iterations each.",
                 kFormatThreadThreads, kFormatThreadIterations);
-    FormatThreadTest  *tests = new FormatThreadTest[kFormatThreadThreads];
+    LocalArray<FormatThreadTest> tests(new FormatThreadTest[kFormatThreadThreads]);
     for(int32_t j = 0; j < kFormatThreadThreads; j++) {
         tests[j].fNum = j;
         int32_t threadStatus = tests[j].start();
         if (threadStatus != 0) {
             errln("System Error %d starting thread number %d.", threadStatus, j);
             SimpleThread::errorFunc();
-            goto cleanupAndReturn;
+            return;
         }
         haveDisplayedInfo[j] = FALSE;
     }
 
 
     // Spin, waiting for the test threads to finish.
-    //   (An earlier version used a wait in this loop, but that seems to trigger
-    //    a bug in some versions of AIX.)
     UBool   stillRunning;
+    UDate startTime, endTime;
+    startTime = Calendar::getNow();
+    double lastComplaint = 0;
     do {
         /*  Spin until the test threads  complete. */
         stillRunning = FALSE;
+        endTime = Calendar::getNow();
+        double elapsedSeconds =  ((int32_t)(endTime - startTime)/U_MILLIS_PER_SECOND);
+        if (elapsedSeconds > PATIENCE_SECONDS) {
+            errln("Patience exceeded. Test is taking too long.");
+            return;
+        } else if((elapsedSeconds-lastComplaint) > 2.0) {
+            infoln("%.1f seconds elapsed (still waiting..)", elapsedSeconds);
+            lastComplaint = elapsedSeconds;
+        }
+        /*
+         The following sleep must be here because the *BSD operating systems
+         have a brain dead thread scheduler. They starve the child threads from
+         CPU time.
+        */
+        SimpleThread::sleep(1); // yield
         for(i=0;i<kFormatThreadThreads;i++) {
             if (tests[i].isRunning()) {
                 stillRunning = TRUE;
             } else if (haveDisplayedInfo[i] == FALSE) {
                 logln("Thread # %d is complete..", i);
                 if(tests[i].getError(theErr)) {
-                    errln(UnicodeString("#") + i + ": " + theErr);
+                    dataerrln(UnicodeString("#") + i + ": " + theErr);
                     SimpleThread::errorFunc();
                 }
                 haveDisplayedInfo[i] = TRUE;
@@ -1106,10 +1105,7 @@ void MultithreadTest::TestThreadedIntl()
     //
     //  All threads have finished.
     //
-cleanupAndReturn:
-    delete [] tests;
-    return;
-
+    assertSuccess("finalizing ThreadSafeFormat", threadSafeErr, TRUE);
 }
 #endif /* #if !UCONFIG_NO_FORMATTING */
 
@@ -1125,85 +1121,104 @@ cleanupAndReturn:
 #if !UCONFIG_NO_COLLATION
 
 #define kCollatorThreadThreads   10  // # of threads to spawn
-#define kCollatorThreadPatience kCollatorThreadThreads*100
+#define kCollatorThreadPatience kCollatorThreadThreads*30
 
 struct Line {
     UChar buff[25];
     int32_t buflen;
 } ;
 
+static UBool
+skipLineBecauseOfBug(const UChar *s, int32_t length) {
+    // TODO: Fix ICU ticket #8052
+    if(length >= 3 &&
+            (s[0] == 0xfb2 || s[0] == 0xfb3) &&
+            s[1] == 0x334 &&
+            (s[2] == 0xf73 || s[2] == 0xf75 || s[2] == 0xf81)) {
+        return TRUE;
+    }
+    return FALSE;
+}
+
+static UCollationResult
+normalizeResult(int32_t result) {
+    return result<0 ? UCOL_LESS : result==0 ? UCOL_EQUAL : UCOL_GREATER;
+}
+
 class CollatorThreadTest : public ThreadWithStatus
 {
-private: 
-    const UCollator *coll;
+private:
+    const Collator *coll;
     const Line *lines;
     int32_t noLines;
+    UBool isAtLeastUCA62;
 public:
     CollatorThreadTest()  : ThreadWithStatus(),
         coll(NULL),
         lines(NULL),
-        noLines(0)
+        noLines(0),
+        isAtLeastUCA62(TRUE)
     {
     };
-    void setCollator(UCollator *c, Line *l, int32_t nl) 
+    void setCollator(Collator *c, Line *l, int32_t nl, UBool atLeastUCA62)
     {
         coll = c;
         lines = l;
         noLines = nl;
+        isAtLeastUCA62 = atLeastUCA62;
     }
     virtual void run() {
-        //sleep(10000);
-        int32_t line = 0;
-        
         uint8_t sk1[1024], sk2[1024];
         uint8_t *oldSk = NULL, *newSk = sk1;
-        int32_t resLen = 0, oldLen = 0;
+        int32_t oldLen = 0;
+        int32_t prev = 0;
         int32_t i = 0;
-        
+
         for(i = 0; i < noLines; i++) {
-            resLen = ucol_getSortKey(coll, lines[i].buff, lines[i].buflen, newSk, 1024);
-            
-            int32_t res = 0, cmpres = 0, cmpres2 = 0;
-            
+            if(lines[i].buflen == 0) { continue; }
+
+            if(skipLineBecauseOfBug(lines[i].buff, lines[i].buflen)) { continue; }
+
+            int32_t resLen = coll->getSortKey(lines[i].buff, lines[i].buflen, newSk, 1024);
+
             if(oldSk != NULL) {
-                res = strcmp((char *)oldSk, (char *)newSk);
-                cmpres = ucol_strcoll(coll, lines[i-1].buff, lines[i-1].buflen, lines[i].buff, lines[i].buflen);
-                cmpres2 = ucol_strcoll(coll, lines[i].buff, lines[i].buflen, lines[i-1].buff, lines[i-1].buflen);
-                //cmpres = res;
-                //cmpres2 = -cmpres;
-                
+                int32_t skres = strcmp((char *)oldSk, (char *)newSk);
+                int32_t cmpres = coll->compare(lines[prev].buff, lines[prev].buflen, lines[i].buff, lines[i].buflen);
+                int32_t cmpres2 = coll->compare(lines[i].buff, lines[i].buflen, lines[prev].buff, lines[prev].buflen);
+
                 if(cmpres != -cmpres2) {
-                    error("Compare result not symmetrical on line "+ line);
+                    error(UnicodeString("Compare result not symmetrical on line ") + (i + 1));
                     break;
                 }
-                
-                if(((res&0x80000000) != (cmpres&0x80000000)) || (res == 0 && cmpres != 0) || (res != 0 && cmpres == 0)) {
-                    error(UnicodeString("Difference between ucol_strcoll and sortkey compare on line ")+ UnicodeString(line));
+
+                if(cmpres != normalizeResult(skres)) {
+                    error(UnicodeString("Difference between coll->compare and sortkey compare on line ") + (i + 1));
                     break;
                 }
-                
+
+                int32_t res = cmpres;
+                if(res == 0 && !isAtLeastUCA62) {
+                    // Up to UCA 6.1, the collation test files use a custom tie-breaker,
+                    // comparing the raw input strings.
+                    res = u_strcmpCodePointOrder(lines[prev].buff, lines[i].buff);
+                    // Starting with UCA 6.2, the collation test files use the standard UCA tie-breaker,
+                    // comparing the NFD versions of the input strings,
+                    // which we do via setting strength=identical.
+                }
                 if(res > 0) {
-                    error(UnicodeString("Line %i is not greater or equal than previous line ")+ UnicodeString(i));
+                    error(UnicodeString("Line is not greater or equal than previous line, for line ") + (i + 1));
                     break;
-                } else if(res == 0) { /* equal */
-                    res = u_strcmpCodePointOrder(lines[i-1].buff, lines[i].buff);
-                    if (res == 0) {
-                        error(UnicodeString("Probable error in test file on line %i (comparing identical strings)")+ UnicodeString(i));
-                        break;
-                    } else if (res > 0) {
-                        error(UnicodeString("Sortkeys are identical, but code point comapare gives >0 on line ")+ UnicodeString(i));
-                        break;
-                    }
                 }
             }
-            
+
             oldSk = newSk;
             oldLen = resLen;
-            
+            (void)oldLen;   // Suppress set but not used warning.
+            prev = i;
+
             newSk = (newSk == sk1)?sk2:sk1;
         }
     }
-    
 };
 
 void MultithreadTest::TestCollators()
@@ -1252,65 +1267,70 @@ void MultithreadTest::TestCollators()
 
             if (testFile == 0) {
                 *(buffer+bufLen) = 0;
-                errln("ERROR: could not open any of the conformance test files, tried opening base %s", buffer);
-                return;        
+                dataerrln("could not open any of the conformance test files, tried opening base %s", buffer);
+                return;
             } else {
                 infoln(
                     "INFO: Working with the stub file.\n"
                     "If you need the full conformance test, please\n"
                     "download the appropriate data files from:\n"
-                    "http://oss.software.ibm.com/cvs/icu4j/unicodetools/com/ibm/text/data/");
+                    "http://source.icu-project.org/repos/icu/tools/trunk/unicodetools/com/ibm/text/data/");
             }
         }
     }
 
-    Line *lines = new Line[200000];
-    memset(lines, 0, sizeof(Line)*200000);
+    LocalArray<Line> lines(new Line[200000]);
+    memset(lines.getAlias(), 0, sizeof(Line)*200000);
     int32_t lineNum = 0;
 
     UChar bufferU[1024];
-    int32_t buflen = 0;
     uint32_t first = 0;
-    uint32_t offset = 0;
 
     while (fgets(buffer, 1024, testFile) != NULL) {
-        offset = 0;
         if(*buffer == 0 || buffer[0] == '#') {
-            continue;
+            // Store empty and comment lines so that errors are reported
+            // for the real test file lines.
+            lines[lineNum].buflen = 0;
+            lines[lineNum].buff[0] = 0;
+        } else {
+            int32_t buflen = u_parseString(buffer, bufferU, 1024, &first, &status);
+            lines[lineNum].buflen = buflen;
+            u_memcpy(lines[lineNum].buff, bufferU, buflen);
+            lines[lineNum].buff[buflen] = 0;
         }
-        offset = u_parseString(buffer, bufferU, 1024, &first, &status);
-        buflen = offset;
-        bufferU[offset++] = 0;
-        lines[lineNum].buflen = buflen;
-        //lines[lineNum].buff = new UChar[buflen+1];
-        u_memcpy(lines[lineNum].buff, bufferU, buflen);
         lineNum++;
     }
     fclose(testFile);
+    if(U_FAILURE(status)) {
+      dataerrln("Couldn't read the test file!");
+      return;
+    }
 
+    UVersionInfo uniVersion;
+    static const UVersionInfo v62 = { 6, 2, 0, 0 };
+    u_getUnicodeVersion(uniVersion);
+    UBool isAtLeastUCA62 = uprv_memcmp(uniVersion, v62, 4) >= 0;
 
-
-    UCollator *coll = ucol_open("root", &status);
+    LocalPointer<Collator> coll(Collator::createInstance(Locale::getRoot(), status));
     if(U_FAILURE(status)) {
-        errln("Couldn't open UCA collator");
+        errcheckln(status, "Couldn't open UCA collator");
         return;
     }
-    ucol_setAttribute(coll, UCOL_NORMALIZATION_MODE, UCOL_ON, &status);
-    ucol_setAttribute(coll, UCOL_CASE_FIRST, UCOL_OFF, &status);
-    ucol_setAttribute(coll, UCOL_CASE_LEVEL, UCOL_OFF, &status);
-    ucol_setAttribute(coll, UCOL_STRENGTH, UCOL_TERTIARY, &status);
-    ucol_setAttribute(coll, UCOL_ALTERNATE_HANDLING, UCOL_NON_IGNORABLE, &status);
+    coll->setAttribute(UCOL_NORMALIZATION_MODE, UCOL_ON, status);
+    coll->setAttribute(UCOL_CASE_FIRST, UCOL_OFF, status);
+    coll->setAttribute(UCOL_CASE_LEVEL, UCOL_OFF, status);
+    coll->setAttribute(UCOL_STRENGTH, isAtLeastUCA62 ? UCOL_IDENTICAL : UCOL_TERTIARY, status);
+    coll->setAttribute(UCOL_ALTERNATE_HANDLING, UCOL_NON_IGNORABLE, status);
 
     int32_t noSpawned = 0;
     int32_t spawnResult = 0;
-    CollatorThreadTest *tests;
-    tests = new CollatorThreadTest[kCollatorThreadThreads];
+    LocalArray<CollatorThreadTest> tests(new CollatorThreadTest[kCollatorThreadThreads]);
 
     logln(UnicodeString("Spawning: ") + kCollatorThreadThreads + " threads * " + kFormatThreadIterations + " iterations each.");
     int32_t j = 0;
     for(j = 0; j < kCollatorThreadThreads; j++) {
         //logln("Setting collator %i", j);
-        tests[j].setCollator(coll, lines, lineNum);
+        tests[j].setCollator(coll.getAlias(), lines.getAlias(), lineNum, isAtLeastUCA62);
     }
     for(j = 0; j < kCollatorThreadThreads; j++) {
         log("%i ", j);
@@ -1322,9 +1342,12 @@ void MultithreadTest::TestCollators()
         noSpawned++;
     }
     logln("Spawned all");
+    if (noSpawned == 0) {
+        errln("No threads could be spawned.");
+        return;
+    }
 
-    //for(int32_t patience = kCollatorThreadPatience;patience > 0; patience --)
-    for(;;)
+    for(int32_t patience = kCollatorThreadPatience;patience > 0; patience --)
     {
         logln("Waiting...");
 
@@ -1360,13 +1383,6 @@ void MultithreadTest::TestCollators()
                 errln("There were errors.");
                 SimpleThread::errorFunc();
             }
-            ucol_close(coll);
-            delete[] tests;
-            //for(i = 0; i < lineNum; i++) {
-            //delete[] lines[i].buff;
-            //}
-            delete[] lines;
-
             return;
         }
 
@@ -1374,7 +1390,6 @@ void MultithreadTest::TestCollators()
     }
     errln("patience exceeded. ");
     SimpleThread::errorFunc();
-    ucol_close(coll);
 }
 
 #endif /* #if !UCONFIG_NO_COLLATION */
@@ -1384,7 +1399,7 @@ void MultithreadTest::TestCollators()
 
 //-------------------------------------------------------------------------------------------
 //
-//   StringThreadTest2 
+//   StringThreadTest2
 //
 //-------------------------------------------------------------------------------------------
 
@@ -1431,7 +1446,7 @@ public:
         //  while (fNum == 4) {SimpleThread::sleep(10000);}   // Force a failure by preventing thread from finishing
         fTraceInfo = 2;
     }
-    
+
 };
 
 // ** The actual test function.
@@ -1444,17 +1459,20 @@ void MultithreadTest::TestString()
 
     UnicodeString *testString = new UnicodeString("This is the original test string.");
 
+    // Not using LocalArray<StringThreadTest2> tests[kStringThreadThreads];
+    // because we don't always want to delete them.
+    // See the comments below the cleanupAndReturn label.
     StringThreadTest2  *tests[kStringThreadThreads];
     for(j = 0; j < kStringThreadThreads; j++) {
         tests[j] = new StringThreadTest2(testString, j);
     }
+
     logln(UnicodeString("Spawning: ") + kStringThreadThreads + " threads * " + kStringThreadIterations + " iterations each.");
     for(j = 0; j < kStringThreadThreads; j++) {
         int32_t threadStatus = tests[j]->start();
         if (threadStatus != 0) {
             errln("System Error %d starting thread number %d.", threadStatus, j);
-            SimpleThread::errorFunc();  
+            SimpleThread::errorFunc();
             goto cleanupAndReturn;
         }
     }
@@ -1471,9 +1489,9 @@ void MultithreadTest::TestString()
             if (tests[i]->isRunning() == FALSE)
             {
                 completed++;
-                
+
                 logln(UnicodeString("Test #") + i + " is complete.. ");
-                
+
                 UnicodeString theErr;
                 if(tests[i]->getError(theErr))
                 {
@@ -1483,7 +1501,7 @@ void MultithreadTest::TestString()
                 // print out the error, too, if any.
             }
         }
-        
+
         if(completed == kStringThreadThreads)
         {
             logln("Done!");
@@ -1503,7 +1521,7 @@ void MultithreadTest::TestString()
     }
 
     if (terrs > 0) {
-        SimpleThread::errorFunc();  
+        SimpleThread::errorFunc();
     }
 
 cleanupAndReturn:
@@ -1522,8 +1540,265 @@ cleanupAndReturn:
 }
 
 
+// Test for ticket #10673, race in cache code in AnyTransliterator.
+// It's difficult to make the original unsafe code actually fail, but
+// this test will fairly reliably take the code path for races in
+// populating the cache.
+
+#if !UCONFIG_NO_TRANSLITERATION
+class TxThread: public SimpleThread {
+  private:
+    Transliterator *fSharedTranslit;
+  public:
+    UBool fSuccess;
+    TxThread(Transliterator *tx) : fSharedTranslit(tx), fSuccess(FALSE) {};
+    ~TxThread();
+    void run();
+};
 
+TxThread::~TxThread() {}
+void TxThread::run() {
+    UnicodeString greekString("\\u03B4\\u03B9\\u03B1\\u03C6\\u03BF\\u03C1\\u03B5\\u03C4\\u03B9\\u03BA\\u03BF\\u03CD\\u03C2");
+    greekString = greekString.unescape();
+    fSharedTranslit->transliterate(greekString);
+    fSuccess = greekString[0] == 0x64; // 'd'. The whole transliterated string is "diaphoretikous" (accented u).
+}
+#endif
 
 
-#endif // ICU_USE_THREADS
+void MultithreadTest::TestAnyTranslit() {
+#if !UCONFIG_NO_TRANSLITERATION
+    UErrorCode status = U_ZERO_ERROR;
+    LocalPointer<Transliterator> tx(Transliterator::createInstance("Any-Latin", UTRANS_FORWARD, status));
+    if (U_FAILURE(status)) {
+        dataerrln("File %s, Line %d: Error, status = %s", __FILE__, __LINE__, u_errorName(status));
+        return;
+    }
+    TxThread * threads[4];
+    int32_t i;
+    for (i=0; i<4; i++) {
+        threads[i] = new TxThread(tx.getAlias());
+    }
+    for (i=0; i<4; i++) {
+        threads[i]->start();
+    }
+    int32_t patience = 100;
+    UBool success;
+    UBool someThreadRunning;
+    do {
+        someThreadRunning = FALSE;
+        success = TRUE;
+        for (i=0; i<4; i++) {
+            if (threads[i]->isRunning()) {
+                someThreadRunning = TRUE;
+                SimpleThread::sleep(10);
+                break;
+            } else {
+                if (threads[i]->fSuccess == FALSE) {
+                    success = FALSE;
+                }
+            }
+        }
+    } while (someThreadRunning && --patience > 0);
+
+    if (patience <= 0) {
+        errln("File %s, Line %d: Error, one or more threads did not complete.", __FILE__, __LINE__);
+    }
+    if (success == FALSE) {
+        errln("File %s, Line %d: Error, transliteration result incorrect.", __FILE__, __LINE__);
+    }
 
+    for (i=0; i<4; i++) {
+        delete threads[i];
+    }
+#endif  // !UCONFIG_NO_TRANSLITERATION
+}
+
+
+// Condition Variables Test
+//   Create a swarm of threads.
+//   Using a mutex and a condition variables each thread
+//     Increments a global count of started threads.
+//     Broadcasts that it has started.
+//     Waits on the condition that all threads have started.
+//     Increments a global count of finished threads.
+//     Waits on the condition that all threads have finished.
+//     Exits.
+
+class CondThread: public SimpleThread {
+  public:
+    CondThread() :fFinished(false)  {};
+    ~CondThread() {};
+    void run();
+    bool  fFinished;
+};
+
+static UMutex gCTMutex = U_MUTEX_INITIALIZER;
+static UConditionVar gCTConditionVar = U_CONDITION_INITIALIZER;
+int gConditionTestOne = 1;   // Value one. Non-const, extern linkage to inhibit
+                             //   compiler assuming a known value.
+int gStartedThreads;
+int gFinishedThreads;
+static const int NUMTHREADS = 10;
+
+static MultithreadTest *gThisTest = NULL; // Make test frame work functions available to
+                                          //   non-member functions.
+
+// Worker thread function.
+void CondThread::run() {
+    umtx_lock(&gCTMutex);
+    gStartedThreads += gConditionTestOne;
+    umtx_condBroadcast(&gCTConditionVar);
+
+    while (gStartedThreads < NUMTHREADS) {
+        if (gFinishedThreads != 0) {
+            gThisTest->errln("File %s, Line %d: Error, gStartedThreads = %d, gFinishedThreads = %d",
+                             __FILE__, __LINE__, gStartedThreads, gFinishedThreads);
+        }
+        umtx_condWait(&gCTConditionVar, &gCTMutex);
+    }
+
+    gFinishedThreads += gConditionTestOne;
+    fFinished = true;
+    umtx_condBroadcast(&gCTConditionVar);
+
+    while (gFinishedThreads < NUMTHREADS) {
+        umtx_condWait(&gCTConditionVar, &gCTMutex);
+    }
+    umtx_unlock(&gCTMutex);
+}
+
+void MultithreadTest::TestConditionVariables() {
+    gThisTest = this;
+    gStartedThreads = 0;
+    gFinishedThreads = 0;
+    int i;
+
+    umtx_lock(&gCTMutex);
+    CondThread *threads[NUMTHREADS];
+    for (i=0; i<NUMTHREADS; ++i) {
+        threads[i] = new CondThread;
+        threads[i]->start();
+    }
+
+    while (gStartedThreads < NUMTHREADS) {
+        umtx_condWait(&gCTConditionVar, &gCTMutex);
+    }
+
+    while (gFinishedThreads < NUMTHREADS) {
+        umtx_condWait(&gCTConditionVar, &gCTMutex);
+    }
+
+    umtx_unlock(&gCTMutex);
+
+    for (i=0; i<NUMTHREADS; ++i) {
+        if (!threads[i]->fFinished) {
+            errln("File %s, Line %d: Error, threads[%d]->fFinished == false", __FILE__, __LINE__, i);
+        }
+        delete threads[i];
+    }
+}
+
+static const char *gCacheLocales[] = {"en_US", "en_GB", "fr_FR", "fr"};
+static int32_t gObjectsCreated = 0;
+static const int32_t CACHE_LOAD = 3;
+
+class UCTMultiThreadItem : public SharedObject {
+  public:
+    char *value;
+    UCTMultiThreadItem(const char *x) : value(NULL) {
+        value = uprv_strdup(x);
+    }
+    virtual ~UCTMultiThreadItem() {
+        uprv_free(value);
+    }
+};
+
+U_NAMESPACE_BEGIN
+
+template<> U_EXPORT
+const UCTMultiThreadItem *LocaleCacheKey<UCTMultiThreadItem>::createObject(
+        const void * /*unused*/, UErrorCode & /* status */) const {
+    // Since multiple threads are hitting the cache for the first time,
+    // no objects should be created yet.
+    umtx_lock(&gCTMutex);
+    if (gObjectsCreated != 0) {
+        gThisTest->errln("Expected no objects to be created yet.");
+    }
+    umtx_unlock(&gCTMutex);
+
+    // Big, expensive object that takes 1 second to create.
+    SimpleThread::sleep(1000);
+
+    // Log that we created an object.
+    umtx_lock(&gCTMutex);
+    ++gObjectsCreated;
+    umtx_unlock(&gCTMutex);
+    UCTMultiThreadItem *result = new UCTMultiThreadItem(fLoc.getName());
+    result->addRef();
+    return result;
+}
+
+U_NAMESPACE_END
+
+class UnifiedCacheThread: public SimpleThread {
+  public:
+    UnifiedCacheThread(const char *loc) : fLoc(loc) {};
+    ~UnifiedCacheThread() {};
+    void run();
+    const char *fLoc;
+};
+
+void UnifiedCacheThread::run() {
+    UErrorCode status = U_ZERO_ERROR;
+    const UnifiedCache *cache = UnifiedCache::getInstance(status);
+    U_ASSERT(status == U_ZERO_ERROR);
+    const UCTMultiThreadItem *item = NULL;
+    cache->get(LocaleCacheKey<UCTMultiThreadItem>(fLoc), item, status);
+    U_ASSERT(item != NULL);
+    if (uprv_strcmp(fLoc, item->value)) {
+      gThisTest->errln("Expected %s, got %s", fLoc, item->value);
+    }
+    item->removeRef();
+
+    // Mark this thread as finished
+    umtx_lock(&gCTMutex);
+    ++gFinishedThreads;
+    umtx_condBroadcast(&gCTConditionVar);
+    umtx_unlock(&gCTMutex);
+}
+
+void MultithreadTest::TestUnifiedCache() {
+    UErrorCode status = U_ZERO_ERROR;
+    const UnifiedCache *cache = UnifiedCache::getInstance(status);
+    U_ASSERT(cache != NULL);
+    cache->flush();
+    gThisTest = this;
+    gFinishedThreads = 0;
+    gObjectsCreated = 0;
+
+    UnifiedCacheThread *threads[CACHE_LOAD][UPRV_LENGTHOF(gCacheLocales)];
+    for (int32_t i=0; i<CACHE_LOAD; ++i) {
+        for (int32_t j=0; j<UPRV_LENGTHOF(gCacheLocales); ++j) {
+            threads[i][j] = new UnifiedCacheThread(gCacheLocales[j]);
+            threads[i][j]->start();
+        }
+    }
+    // Wait on all the threads to complete verify that LENGTHOF(gCacheLocales)
+    // objects were created.
+    umtx_lock(&gCTMutex);
+    while (gFinishedThreads < CACHE_LOAD*UPRV_LENGTHOF(gCacheLocales)) {
+        umtx_condWait(&gCTConditionVar, &gCTMutex);
+    }
+    assertEquals("Objects created", UPRV_LENGTHOF(gCacheLocales), gObjectsCreated);
+    umtx_unlock(&gCTMutex);
+
+    // clean up threads
+    for (int32_t i=0; i<CACHE_LOAD; ++i) {
+        for (int32_t j=0; j<UPRV_LENGTHOF(gCacheLocales); ++j) {
+            delete threads[i][j];
+        }
+    }
+}
+
+#endif // ICU_USE_THREADS