package at.yawk.numaec;
import org.eclipse.collections.api.LongIterable;
import org.eclipse.collections.api.bag.MutableBag;
import org.eclipse.collections.api.bag.primitive.MutableIntBag;
import org.eclipse.collections.api.block.function.primitive.IntFunction;
import org.eclipse.collections.api.block.function.primitive.IntFunction0;
import org.eclipse.collections.api.block.function.primitive.IntToIntFunction;
import org.eclipse.collections.api.block.function.primitive.IntToObjectFunction;
import org.eclipse.collections.api.block.function.primitive.LongIntToIntFunction;
import org.eclipse.collections.api.block.function.primitive.LongToIntFunction;
import org.eclipse.collections.api.block.predicate.primitive.IntPredicate;
import org.eclipse.collections.api.block.predicate.primitive.LongIntPredicate;
import org.eclipse.collections.api.iterator.MutableIntIterator;
import org.eclipse.collections.api.map.primitive.MutableIntLongMap;
import org.eclipse.collections.api.map.primitive.MutableLongIntMap;
import org.eclipse.collections.api.map.primitive.LongIntMap;
class LongIntLinearHashMap extends BaseLongIntMap implements LongIntBufferMap {
private final float loadFactor;
private final long sipHashK0, sipHashK1;
private final long hashMask;
protected final LinearHashTable table;
protected int size;
LongIntLinearHashMap(LargeByteBufferAllocator allocator, LinearHashMapConfig config) {
this.sipHashK0 = config.sipHashK0.getAsLong();
this.sipHashK1 = config.sipHashK1.getAsLong();
this.loadFactor = config.loadFactor;
int hashLength = config.hashLength;
this.hashMask = hashLength == 0 ? -1L : ~(-1L >>> hashLength);
this.table = new LinearHashTable(allocator, config, hashLength + Long.BYTES + Integer.BYTES) {
@Override
protected void write(LargeByteBuffer lbb, long address, long hash, long key, long value) {
if (hashLength != 0) {
if ((hash & ~hashMask) != 0) {
throw new AssertionError();
}
BTree.uset(lbb, address, hashLength, Long.reverse(hash));
}
lbb.setLong(address + hashLength, fromKey(key));
lbb.setInt(address + hashLength + Long.BYTES, fromValue(value));
}
@Override
protected long readHash(LargeByteBuffer lbb, long address) {
if (hashLength == 0) {
return hash(fromKey(readKey(lbb, address)));
} else {
return Long.reverse(BTree.uget(lbb, address, hashLength));
}
}
@Override
protected long readKey(LargeByteBuffer lbb, long address) {
return toKey(lbb.getLong(address + hashLength));
}
@Override
protected long readValue(LargeByteBuffer lbb, long address) {
return toValue(lbb.getInt(address + hashLength + Long.BYTES));
}
};
}
protected void ensureCapacity(int capacity) {
table.expandToFullLoadCapacity((long) (capacity / loadFactor));
}
@Override
protected MapStoreCursor iterationCursor() {
return table.allocateCursor();
}
@Override
protected MapStoreCursor keyCursor(long key) {
LinearHashTable.Cursor cursor = table.allocateCursor();
cursor.seek(hash(key), toKey(key));
return cursor;
}
@DoNotMutate
@Override
void checkInvariants() {
super.checkInvariants();
table.checkInvariants();
}
protected long hash(long key) {
return SipHash.sipHash2_4_8_to_8(sipHashK0, sipHashK1, toKey(key)) & hashMask;
}
@Override
public void close() {
table.close();
}
@Override
public int size() {
return size;
}
public static class Mutable extends LongIntLinearHashMap implements MutableLongIntBufferMap {
Mutable(LargeByteBufferAllocator allocator, LinearHashMapConfig config) {
super(allocator, config);
}
@Override
public void put(long key, int value) {
ensureCapacity(1);
long h = hash(key);
long k = toKey(key);
long v = toValue(value);
try (LinearHashTable.Cursor cursor = table.allocateCursor()) {
cursor.seek(h, k);
if (cursor.elementFound()) {
cursor.setValue(v);
} else {
cursor.insert(h, k, v);
size++;
ensureCapacity(size);
}
}
}
@Override
public void putAll(LongIntMap map) {
ensureCapacity(size + map.size());
map.forEachKeyValue(this::put);
}
@Override
public void updateValues(LongIntToIntFunction function) {
try (LinearHashTable.Cursor cursor = table.allocateCursor()) {
while (cursor.next()) {
int updated = function.valueOf(fromKey(cursor.getKey()), fromValue(cursor.getValue()));
cursor.setValue(toValue(updated));
}
}
}
@Override
public void removeKey(long key) {
try (LinearHashTable.Cursor cursor = table.allocateCursor()) {
cursor.seek(hash(key), toKey(key));
if (cursor.elementFound()) {
cursor.remove();
size--;
}
}
}
@Override
public void remove(long key) {
removeKey(key);
}
@Override
public int removeKeyIfAbsent(long key, int value) {
try (LinearHashTable.Cursor cursor = table.allocateCursor()) {
cursor.seek(hash(key), toKey(key));
if (cursor.elementFound()) {
int v = fromValue(cursor.getValue());
cursor.remove();
size--;
return v;
} else {
return value;
}
}
}
@Override
public int getIfAbsentPut(long key, int value) {
ensureCapacity(1);
try (LinearHashTable.Cursor cursor = table.allocateCursor()) {
long hash = hash(key);
cursor.seek(hash, toKey(key));
if (cursor.elementFound()) {
return fromValue(cursor.getValue());
} else {
cursor.insert(hash, toKey(key), toValue(value));
size++;
ensureCapacity(size);
return value;
}
}
}
@Override
public int getIfAbsentPut(long key, IntFunction0 function) {
ensureCapacity(1);
try (LinearHashTable.Cursor cursor = table.allocateCursor()) {
long hash = hash(key);
cursor.seek(hash, toKey(key));
if (cursor.elementFound()) {
return fromValue(cursor.getValue());
} else {
int v = function.value();
cursor.insert(hash, toKey(key), toValue(v));
size++;
ensureCapacity(size);
return v;
}
}
}
@Override
public int getIfAbsentPutWithKey(long key, LongToIntFunction function) {
ensureCapacity(1);
try (LinearHashTable.Cursor cursor = table.allocateCursor()) {
long hash = hash(key);
cursor.seek(hash, toKey(key));
if (cursor.elementFound()) {
return fromValue(cursor.getValue());
} else {
int v = function.valueOf(key);
cursor.insert(hash, toKey(key), toValue(v));
size++;
ensureCapacity(size);
return v;
}
}
}
@Override
public <P> int getIfAbsentPutWith(long key, IntFunction<? super P> function, P parameter) {
ensureCapacity(1);
try (LinearHashTable.Cursor cursor = table.allocateCursor()) {
long hash = hash(key);
cursor.seek(hash, toKey(key));
if (cursor.elementFound()) {
return fromValue(cursor.getValue());
} else {
int v = function.intValueOf(parameter);
cursor.insert(hash, toKey(key), toValue(v));
size++;
ensureCapacity(size);
return v;
}
}
}
@Override
public int updateValue(long key, int initialValueIfAbsent, IntToIntFunction function) {
ensureCapacity(1);
try (LinearHashTable.Cursor cursor = table.allocateCursor()) {
long hash = hash(key);
cursor.seek(hash, toKey(key));
if (cursor.elementFound()) {
int updated = function.valueOf(fromValue(cursor.getValue()));
cursor.setValue(toValue(updated));
return updated;
} else {
int updated = function.valueOf(initialValueIfAbsent);
cursor.insert(hash, toKey(key), toValue(updated));
size++;
ensureCapacity(size);
return updated;
}
}
}
@Override
public MutableLongIntMap withKeyValue(long key, int value) {
put(key, value);
return this;
}
@Override
public MutableLongIntMap withoutKey(long key) {
removeKey(key);
return this;
}
@Override
public MutableLongIntMap withoutAllKeys(LongIterable keys) {
keys.forEach(this::removeKey);
return this;
}
@Override
public MutableLongIntMap asUnmodifiable() {
throw new UnsupportedOperationException("Mutable.asUnmodifiable not implemented yet");
}
@Override
public MutableLongIntMap asSynchronized() {
throw new UnsupportedOperationException("Mutable.asSynchronized not implemented yet");
}
@Override
public int addToValue(long key, int toBeAdded) {
ensureCapacity(1);
try (LinearHashTable.Cursor cursor = table.allocateCursor()) {
long hash = hash(key);
cursor.seek(hash, toKey(key));
if (cursor.elementFound()) {
int updated = (int) (fromValue(cursor.getValue()) + toBeAdded);
cursor.setValue(toValue(updated));
return updated;
} else {
cursor.insert(hash, toKey(key), toValue(toBeAdded));
size++;
ensureCapacity(size);
return toBeAdded;
}
}
}
@Override
public void clear() {
table.clear();
size = 0;
}
@Override
public MutableIntLongMap flipUniqueValues() {
throw new UnsupportedOperationException("LongIntBufferMap.Mutable.flipUniqueValues not implemented yet");
}
@Override
public MutableLongIntMap select(LongIntPredicate predicate) {
throw new UnsupportedOperationException("LongIntBufferMap.Mutable.select not implemented yet");
}
@Override
public MutableIntBag select(IntPredicate predicate) {
throw new UnsupportedOperationException("LongIntBufferMap.Mutable.select not implemented yet");
}
@Override
public MutableLongIntMap reject(LongIntPredicate predicate) {
throw new UnsupportedOperationException("LongIntBufferMap.Mutable.reject not implemented yet");
}
@Override
public MutableIntBag reject(IntPredicate predicate) {
throw new UnsupportedOperationException("LongIntBufferMap.Mutable.reject not implemented yet");
}
@Override
public <V> MutableBag<V> collect(IntToObjectFunction<? extends V> function) {
throw new UnsupportedOperationException("LongIntBufferMap.Mutable.collect not implemented yet");
}
@Override
public MutableIntIterator intIterator() {
return super.intIterator();
}
}
}