* make MulleObjCTAOKnownThreadSafeMethods the default for -mulleTAOStrategy for less friction (for now)

* turn MulleAutoLockingObject into a protolclass
fix some tests

Author: Your Name

.github/workflows/mulle-sde-ci.yml

@@ -35,7 +35,7 @@ jobs:
 
     - uses: actions/checkout@v4
 
-    - uses: mulle-sde/github-ci@v1
+    - uses: mulle-sde/github-ci@v2
 
     - uses: mulle-cc/github-ci@v5
 

src/class/MulleObject.h

@@ -47,8 +47,9 @@
 // of MulleObject will appear to be broken. This is basically the main
 // trick MulleAutolockingObject uses and it can't be avoided.
 //
-@protocol MulleAutolockingObject
-@end
+PROTOCOLCLASS_INTERFACE0( MulleAutolockingObject)
+PROTOCOLCLASS_END()
+
 
 #define MulleAutolockingObjectProtocols   MulleObjCThreadSafe, MulleAutolockingObject
 

src/class/MulleObject.m

@@ -10,6 +10,17 @@
 #import "MulleObject-Private.h"
 
 
+PROTOCOLCLASS_IMPLEMENTATION( MulleAutolockingObject)
+
+- (MulleObjCTAOStrategy) mulleTAOStrategy
+{
+   return( MulleObjCTAOKnownThreadSafe);
+}
+
+PROTOCOLCLASS_END()
+
+
+
 @implementation MulleObject
 
 static BOOL  is_a_locking_descriptor( struct _mulle_objc_descriptor *desc,

src/class/NSThread.m

@@ -1094,18 +1094,21 @@ void  MulleObjCTAOLogAndFail( struct _mulle_objc_object *obj,
                               mulle_thread_t osThread,
                               struct _mulle_objc_descriptor *desc)
 {
-   struct _mulle_objc_class      *cls;
-   struct _mulle_objc_universe   *universe;
-   int                           ismeta;
-   NSThread                      *currentThreadObject;
-   NSThread                      *osThreadObject;
-   char                          *s;
-   char                          *strategyName;
-   MulleObjCTAOStrategy          strategy;
-
-   cls           = _mulle_objc_object_get_isa( obj);
-   ismeta        = _mulle_objc_class_is_metaclass( cls);
-   universe      = _mulle_objc_class_get_universe( cls);
+   struct _mulle_objc_class              *cls;
+   struct _mulle_objc_universe           *universe;
+   int                                   ismeta;
+   NSThread                              *currentThreadObject;
+   NSThread                              *osThreadObject;
+   char                                  *s;
+   char                                  *strategyName;
+   MulleObjCTAOStrategy                  strategy;
+   struct _mulle_objc_searcharguments    args;
+   struct _mulle_objc_method             *method;
+   mulle_objc_implementation_t           imp;
+
+   cls      = _mulle_objc_object_get_isa( obj);
+   ismeta   = _mulle_objc_class_is_metaclass( cls);
+   universe = _mulle_objc_class_get_universe( cls);
 
    currentThreadObject = MulleThreadGetCurrentThread();
    osThreadObject      = _mulle_objc_universe_lookup_threadobject_for_thread( universe, osThread);   // try to retri
@@ -1129,13 +1132,17 @@ void  MulleObjCTAOLogAndFail( struct _mulle_objc_object *obj,
       else
          mulle_buffer_sprintf( buffer, "%p ", osThread);
 
-
-      strategyName = NULL;
-      if( [(id) obj respondsToSelector:@selector( mulleTAOStrategy)])
+      if( ! ismeta)
       {
-         strategy     = [(id) obj mulleTAOStrategy];
-         strategyName = NS_ENUM_LOOKUP( MulleObjCTAOStrategy, strategy);
-         mulle_buffer_sprintf( buffer, "and TAO strategy %s ", strategyName ? strategyName : "None");
+         args   = mulle_objc_searcharguments_make_default( @selector( mulleTAOStrategy));
+         method = mulle_objc_class_search_method( cls, &args, 0, NULL);
+         if( method)
+         {
+            imp          = mulle_objc_method_get_implementation( method);
+            strategy     = (uintptr_t) _mulle_objc_implementation_invoke( imp, obj, @selector( mulleTAOStrategy), obj);
+            strategyName = NS_ENUM_LOOKUP( MulleObjCTAOStrategy, strategy);
+            mulle_buffer_sprintf( buffer, "and TAO strategy %s ", strategyName ? strategyName : "None");
+         }
       }
 
       mulle_buffer_sprintf( buffer, "gets a %c%s call from thread ",

src/function/MulleObjCDebug.h

@@ -85,3 +85,6 @@ void   MulleObjCDotdumpMetaHierarchy( char *classname);
 MULLE_OBJC_GLOBAL
 void   MulleObjCDumpObject( id object);
 
+// string as help for debuggin
+MULLE_OBJC_GLOBAL
+char  *MulleObjCDebugHelp;

src/function/MulleObjCDebug.m

@@ -286,6 +286,12 @@ void   MulleObjCDumpObject( id obj)
 }
 
 
+char  *MulleObjCDebug = ""
+"x MulleObjCDumpObject( obj)   : dump current object to stderr\n"
+"x MulleObjCHTMLDumpUniverse() : dump default universe to PWD\n";
+
+
+
 #else
 
 void   MulleObjCHTMLDumpUniverseToDirectory( char *directory)

src/function/MulleObjCFunctions.m

@@ -884,7 +884,7 @@ static int   compare_ivar_by_name( void **p_a, void **p_b, void *userinfo)
 }
 
 
-void  MulleObjCDescribeIvars( struct mulle_buffer *buffer, id obj)
+void   MulleObjCDescribeIvars( struct mulle_buffer *buffer, id obj)
 {
    struct _mulle_objc_infraclass  *infra;
    struct _mulle_objc_ivar        *ivar;

src/protocol/MulleObjCProtocol.m

@@ -66,7 +66,7 @@ - (id) mulleThreadSafeCopy
 // So ensure that the strategy is back to the default
 //
 
-- (MulleObjCTAOStrategy) mulleTAOStrategy   MULLE_OBJC_THREADSAFE_METHOD
+- (MulleObjCTAOStrategy) mulleTAOStrategy
 {
    return( MulleObjCTAOCallerRemovesFromCurrentPool);
 }

src/protocol/MulleObjCRootObject.m

@@ -415,7 +415,14 @@ - (void) mulleRelinquishAccessWithTAOStrategy:(MulleObjCTAOStrategy) strategy
 //
 - (MulleObjCTAOStrategy) mulleTAOStrategy
 {
-   return( MulleObjCTAOCallerRemovesFromCurrentPool);
+   //
+   // So this default is MulleObjCTAOKnownThreadSafeMethods, because it doesn't
+   // break existing code. Known problematic subclasses like
+   // NSMutableDictionary then should actually reset this to some unsafe tag.
+   // In a future world where everything is a MulleObject, this would be unsafe
+   // and autolocking would promote this to ThreadSafe (?)
+   //
+   return( MulleObjCTAOKnownThreadSafeMethods);
 }
 
 

src/reflect/objc-loader.inc

@@ -1,3 +1,4 @@
+      { @selector( MulleAutolockingObject), MULLE_OBJC_NO_CATEGORYID },      // 6eb2f41b;MulleAutolockingObject;;
       { @selector( MulleDynamicObject), @selector( NSMutableCopying) },      // d9918780;MulleDynamicObject;4aa86031;NSMutableCopying
       { @selector( MulleDynamicObject), MULLE_OBJC_NO_CATEGORYID },      // d9918780;MulleDynamicObject;;
       { @selector( MulleObjCClassCluster), MULLE_OBJC_NO_CATEGORYID },      // 6ed73da1;MulleObjCClassCluster;;