<br />
<b>Warning</b>:  session_start(): open(/var/lib/php/sessions/sess_cpk0vs43vnnh2ttac9939g6lto, O_RDWR) failed: No space left on device (28) in <b>/var/www/tb-usercake/models/config.php</b> on line <b>51</b><br />
<br />
<b>Warning</b>:  session_start(): Failed to read session data: files (path: /var/lib/php/sessions) in <b>/var/www/tb-usercake/models/config.php</b> on line <b>51</b><br />
sclass InvestigateNonTransientGraph {
  MetaTransformer mt;
  Map back = identityHashMap();
  new MultiSet<O> objectsBySize;
  new MultiMap<Class, O> objectsByClass;
  new MultiSet<S> objectsByDynClass;
  
  *() {
    mt = metaTransformer_collectionAndMap();
    mt.add(new MTSH_nonTransientFields);
    mt.avoidCycles();
    mt.markPointer = (a, b) -> {
      putIfNotThere(back, b, a);
    };
  }
  
  void scan(O root) {
    VStack.Computable v = mt.new visit_vstackComputable(o -> {
      objectsBySize.add(o.getClass(), clampToInt(unsafe_sizeOf(o)));
      objectsByClass.put(o.getClass(), o);
      if (o instanceof DynamicObject)
        objectsByDynClass.add(shortDynClassName(o));
    }, root);
    
    vstackCompute(v);
  }
  
  void printResults() {
    print("Seen objects: " + n2(mt.seen));
    print();
    print("Most popular classes:");
    print(multiSetToLines(multiMapToMultiSet(objectsByClass), 20));
    print();
    print("Total bytes per class:");
    print(multiSetToLines(objectsBySize, 20));
    if (!empty(objectsByDynClass)) {
      print("Popular dynamic classes:");
      print(multiSetToLines(objectsByDynClass, 20));
    }
  }
  
  <A> L<A> biggestOfClass(Class<A> c) {
    ret sortedByCalculatedFieldDesc unsafe_objectSize((Cl<A>) objectsByClass.get(c));
  }
  
  void printBiggestByteArrays() {
    for (var array : takeFirst(10, biggestOfClass(byteArrayType())))
      print("Byte array " + n2_l(array) + " <= " + back.get(array));
  }
}