Code-Kata: Cache-Klasse. Wer produziert den besten Code

[Dejan Vu]

Moin

Ausgehend von dieser Anregung möchte ich alle Programmierer auffordern, für folgende Problemstellung den aus ihrer Sicht bestmöglichen Code zu erstellen, und zwar unter den Gesichtspunkten: Lesbarkeit und Performance.

Ich benötige einen Cache, der Objekte verwaltet, die über einen eindeutigen Bezeichner (ID) identifiziert werden können. Der Cache soll maximal N Elemente im Speicher halten. Dabei soll die Wahrscheinlichkeit eines Treffers im Cache umso höher sein, je häufiger ich ein Element verwende.

Obwohl so eine Klasse nach Generics schreit, wollen wir darauf verzichten und als ID-Type einen Integer verwenden. Der Cache soll beliebige TObject-Referenzen verwalten.

Die Klasse (Interface) sieht so aus:

Delphi-Quellcode:

Type
  TCache = Class
  //... was auch immer 
  public
     Constructor Create (MaxSize : Integer);
     Function Contains (ID : Integer) : Boolean;
     Function Get (ID : Integer) : TObject;
     Procedure Put (ID : Integer; Item : TObject);
     Procedure Remove(ID : Integer);
     Property MaxSize : Integer Read GetSize;
     Property CurrentNumberOfElements : Integer Read GetCurrentNumberOfElements;
  end;

Als Verwendung kann man sich einen Lademechanismus vorstellen:

Delphi-Quellcode:

Procedure Load (ID : Integer; var item : TItem);
Begin
  If Cache.Contains (ID) then 
    item := Cache.Get (ID)
  else begin
    item := LoadFromExternalResource(ID);
    Cache.Put (ID, item);
  end
end;

Ich möchte naturgemäß die Anzahl der Aufrufe von 'LoadFromExternalResource' verringern, so gut es eben geht. Die ExternalResource ist mindestens 1000x langsamer als der Cache. Insofern wird kein Assembler benötigt.

So, bin gespannt, was dabei rauskommt.