# # This file is licensed under the Affero General Public License (AGPL) version 3. # # Copyright 2015, 2016 OpenMarket Ltd # Copyright (C) 2023 New Vector, Ltd # # This program is free software: you can redistribute it and/or modify # it under the terms of the GNU Affero General Public License as # published by the Free Software Foundation, either version 3 of the # License, or (at your option) any later version. # # See the GNU Affero General Public License for more details: # . # # Originally licensed under the Apache License, Version 2.0: # . # # [This file includes modifications made by New Vector Limited] # # import logging import math import threading import weakref from enum import Enum from functools import wraps from typing import ( TYPE_CHECKING, Any, Callable, Collection, Dict, Generic, Iterable, List, Optional, Set, Tuple, Type, TypeVar, Union, cast, overload, ) from typing_extensions import Literal from twisted.internet import reactor from twisted.internet.interfaces import IReactorTime from synapse.config import cache as cache_config from synapse.metrics.background_process_metrics import wrap_as_background_process from synapse.metrics.jemalloc import get_jemalloc_stats from synapse.util import Clock, caches from synapse.util.caches import CacheMetric, EvictionReason, register_cache from synapse.util.caches.treecache import ( TreeCache, iterate_tree_cache_entry, iterate_tree_cache_items, ) from synapse.util.linked_list import ListNode if TYPE_CHECKING: from synapse.server import HomeServer logger = logging.getLogger(__name__) try: from pympler.asizeof import Asizer def _get_size_of(val: Any, *, recurse: bool = True) -> int: """Get an estimate of the size in bytes of the object. Args: val: The object to size. recurse: If true will include referenced values in the size, otherwise only sizes the given object. """ # Ignore singleton values when calculating memory usage. if val in ((), None, ""): return 0 sizer = Asizer() sizer.exclude_refs((), None, "") return sizer.asizeof(val, limit=100 if recurse else 0) except ImportError: def _get_size_of(val: Any, *, recurse: bool = True) -> int: return 0 # Function type: the type used for invalidation callbacks FT = TypeVar("FT", bound=Callable[..., Any]) # Key and Value type for the cache KT = TypeVar("KT") VT = TypeVar("VT") # a general type var, distinct from either KT or VT T = TypeVar("T") class _TimedListNode(ListNode[T]): """A `ListNode` that tracks last access time.""" __slots__ = ["last_access_ts_secs"] def update_last_access(self, clock: Clock) -> None: self.last_access_ts_secs = int(clock.time()) # Whether to insert new cache entries to the global list. We only add to it if # time based eviction is enabled. USE_GLOBAL_LIST = False # A linked list of all cache entries, allowing efficient time based eviction. GLOBAL_ROOT = ListNode["_Node"].create_root_node() @wrap_as_background_process("LruCache._expire_old_entries") async def _expire_old_entries( clock: Clock, expiry_seconds: float, autotune_config: Optional[dict] ) -> None: """Walks the global cache list to find cache entries that haven't been accessed in the given number of seconds, or if a given memory threshold has been breached. """ if autotune_config: max_cache_memory_usage = autotune_config["max_cache_memory_usage"] target_cache_memory_usage = autotune_config["target_cache_memory_usage"] min_cache_ttl = autotune_config["min_cache_ttl"] / 1000 now = int(clock.time()) node = GLOBAL_ROOT.prev_node assert node is not None i = 0 logger.debug("Searching for stale caches") evicting_due_to_memory = False # determine if we're evicting due to memory jemalloc_interface = get_jemalloc_stats() if jemalloc_interface and autotune_config: try: jemalloc_interface.refresh_stats() mem_usage = jemalloc_interface.get_stat("allocated") if mem_usage > max_cache_memory_usage: logger.info("Begin memory-based cache eviction.") evicting_due_to_memory = True except Exception: logger.warning( "Unable to read allocated memory, skipping memory-based cache eviction." ) while node is not GLOBAL_ROOT: # Only the root node isn't a `_TimedListNode`. assert isinstance(node, _TimedListNode) # if node has not aged past expiry_seconds and we are not evicting due to memory usage, there's # nothing to do here if ( node.last_access_ts_secs > now - expiry_seconds and not evicting_due_to_memory ): break # if entry is newer than min_cache_entry_ttl then do not evict and don't evict anything newer if evicting_due_to_memory and now - node.last_access_ts_secs < min_cache_ttl: break cache_entry = node.get_cache_entry() next_node = node.prev_node # The node should always have a reference to a cache entry and a valid # `prev_node`, as we only drop them when we remove the node from the # list. assert next_node is not None assert cache_entry is not None cache_entry.drop_from_cache() # Check mem allocation periodically if we are evicting a bunch of caches if jemalloc_interface and evicting_due_to_memory and (i + 1) % 100 == 0: try: jemalloc_interface.refresh_stats() mem_usage = jemalloc_interface.get_stat("allocated") if mem_usage < target_cache_memory_usage: evicting_due_to_memory = False logger.info("Stop memory-based cache eviction.") except Exception: logger.warning( "Unable to read allocated memory, this may affect memory-based cache eviction." ) # If we've failed to read the current memory usage then we # should stop trying to evict based on memory usage evicting_due_to_memory = False # If we do lots of work at once we yield to allow other stuff to happen. if (i + 1) % 10000 == 0: logger.debug("Waiting during drop") if node.last_access_ts_secs > now - expiry_seconds: await clock.sleep(0.5) else: await clock.sleep(0) logger.debug("Waking during drop") node = next_node # If we've yielded then our current node may have been evicted, so we # need to check that its still valid. if node.prev_node is None: break i += 1 logger.info("Dropped %d items from caches", i) def setup_expire_lru_cache_entries(hs: "HomeServer") -> None: """Start a background job that expires all cache entries if they have not been accessed for the given number of seconds, or if a given memory usage threshold has been breached. """ if not hs.config.caches.expiry_time_msec and not hs.config.caches.cache_autotuning: return if hs.config.caches.expiry_time_msec: expiry_time = hs.config.caches.expiry_time_msec / 1000 logger.info("Expiring LRU caches after %d seconds", expiry_time) else: expiry_time = math.inf global USE_GLOBAL_LIST USE_GLOBAL_LIST = True clock = hs.get_clock() clock.looping_call( _expire_old_entries, 30 * 1000, clock, expiry_time, hs.config.caches.cache_autotuning, ) class _Node(Generic[KT, VT]): __slots__ = [ "_list_node", "_global_list_node", "_cache", "key", "value", "callbacks", "memory", ] def __init__( self, root: "ListNode[_Node]", key: KT, value: VT, cache: "weakref.ReferenceType[LruCache[KT, VT]]", clock: Clock, callbacks: Collection[Callable[[], None]] = (), prune_unread_entries: bool = True, ): self._list_node = ListNode.insert_after(self, root) self._global_list_node: Optional[_TimedListNode] = None if USE_GLOBAL_LIST and prune_unread_entries: self._global_list_node = _TimedListNode.insert_after(self, GLOBAL_ROOT) self._global_list_node.update_last_access(clock) # We store a weak reference to the cache object so that this _Node can # remove itself from the cache. If the cache is dropped we ensure we # remove our entries in the lists. self._cache = cache self.key = key self.value = value # Set of callbacks to run when the node gets deleted. We store as a list # rather than a set to keep memory usage down (and since we expect few # entries per node, the performance of checking for duplication in a # list vs using a set is negligible). # # Note that we store this as an optional list to keep the memory # footprint down. Storing `None` is free as its a singleton, while empty # lists are 56 bytes (and empty sets are 216 bytes, if we did the naive # thing and used sets). self.callbacks: Optional[List[Callable[[], None]]] = None self.add_callbacks(callbacks) self.memory = 0 if caches.TRACK_MEMORY_USAGE: self.memory = ( _get_size_of(key) + _get_size_of(value) + _get_size_of(self._list_node, recurse=False) + _get_size_of(self.callbacks, recurse=False) + _get_size_of(self, recurse=False) ) self.memory += _get_size_of(self.memory, recurse=False) if self._global_list_node: self.memory += _get_size_of(self._global_list_node, recurse=False) self.memory += _get_size_of(self._global_list_node.last_access_ts_secs) def add_callbacks(self, callbacks: Collection[Callable[[], None]]) -> None: """Add to stored list of callbacks, removing duplicates.""" if not callbacks: return if not self.callbacks: self.callbacks = [] for callback in callbacks: if callback not in self.callbacks: self.callbacks.append(callback) def run_and_clear_callbacks(self) -> None: """Run all callbacks and clear the stored list of callbacks. Used when the node is being deleted. """ if not self.callbacks: return for callback in self.callbacks: callback() self.callbacks = None def drop_from_cache(self) -> None: """Drop this node from the cache. Ensures that the entry gets removed from the cache and that we get removed from all lists. """ cache = self._cache() if ( cache is None or cache.pop(self.key, _Sentinel.sentinel) is _Sentinel.sentinel ): # `cache.pop` should call `drop_from_lists()`, unless this Node had # already been removed from the cache. self.drop_from_lists() def drop_from_lists(self) -> None: """Remove this node from the cache lists.""" self._list_node.remove_from_list() if self._global_list_node: self._global_list_node.remove_from_list() def move_to_front(self, clock: Clock, cache_list_root: ListNode) -> None: """Moves this node to the front of all the lists its in.""" self._list_node.move_after(cache_list_root) if self._global_list_node: self._global_list_node.move_after(GLOBAL_ROOT) self._global_list_node.update_last_access(clock) class _Sentinel(Enum): # defining a sentinel in this way allows mypy to correctly handle the # type of a dictionary lookup. sentinel = object() class LruCache(Generic[KT, VT]): """ Least-recently-used cache, supporting prometheus metrics and invalidation callbacks. If cache_type=TreeCache, all keys must be tuples. """ def __init__( self, max_size: int, cache_name: Optional[str] = None, cache_type: Type[Union[dict, TreeCache]] = dict, size_callback: Optional[Callable[[VT], int]] = None, metrics_collection_callback: Optional[Callable[[], None]] = None, apply_cache_factor_from_config: bool = True, clock: Optional[Clock] = None, prune_unread_entries: bool = True, extra_index_cb: Optional[Callable[[KT, VT], KT]] = None, ): """ Args: max_size: The maximum amount of entries the cache can hold cache_name: The name of this cache, for the prometheus metrics. If unset, no metrics will be reported on this cache. cache_type: type of underlying cache to be used. Typically one of dict or TreeCache. size_callback: metrics_collection_callback: metrics collection callback. This is called early in the metrics collection process, before any of the metrics registered with the prometheus Registry are collected, so can be used to update any dynamic metrics. Ignored if cache_name is None. apply_cache_factor_from_config: If true, `max_size` will be multiplied by a cache factor derived from the homeserver config clock: prune_unread_entries: If True, cache entries that haven't been read recently will be evicted from the cache in the background. Set to False to opt-out of this behaviour. extra_index_cb: If provided, the cache keeps a second index from a (different) key to a cache entry based on the return value of the callback. This can then be used to invalidate entries based on the second type of key. For example, for the event cache this would be a callback that maps an event to its room ID, allowing invalidation of all events in a given room. Note: Though the two types of key have the same type, they are in different namespaces. Note: The new key does not have to be unique. """ # Default `clock` to something sensible. Note that we rename it to # `real_clock` so that mypy doesn't think its still `Optional`. if clock is None: real_clock = Clock(cast(IReactorTime, reactor)) else: real_clock = clock cache: Union[Dict[KT, _Node[KT, VT]], TreeCache] = cache_type() self.cache = cache # Used for introspection. self.apply_cache_factor_from_config = apply_cache_factor_from_config # Save the original max size, and apply the default size factor. self._original_max_size = max_size # We previously didn't apply the cache factor here, and as such some caches were # not affected by the global cache factor. Add an option here to disable applying # the cache factor when a cache is created if apply_cache_factor_from_config: self.max_size = int(max_size * cache_config.properties.default_factor_size) else: self.max_size = int(max_size) # register_cache might call our "set_cache_factor" callback; there's nothing to # do yet when we get resized. self._on_resize: Optional[Callable[[], None]] = None if cache_name is not None: metrics: Optional[CacheMetric] = register_cache( "lru_cache", cache_name, self, collect_callback=metrics_collection_callback, ) else: metrics = None # this is exposed for access from outside this class self.metrics = metrics # We create a single weakref to self here so that we don't need to keep # creating more each time we create a `_Node`. weak_ref_to_self = weakref.ref(self) list_root = ListNode[_Node[KT, VT]].create_root_node() lock = threading.Lock() extra_index: Dict[KT, Set[KT]] = {} def evict() -> None: while cache_len() > self.max_size: # Get the last node in the list (i.e. the oldest node). todelete = list_root.prev_node # The list root should always have a valid `prev_node` if the # cache is not empty. assert todelete is not None # The node should always have a reference to a cache entry, as # we only drop the cache entry when we remove the node from the # list. node = todelete.get_cache_entry() assert node is not None evicted_len = delete_node(node) cache.pop(node.key, None) if metrics: metrics.inc_evictions(EvictionReason.size, evicted_len) def synchronized(f: FT) -> FT: @wraps(f) def inner(*args: Any, **kwargs: Any) -> Any: with lock: return f(*args, **kwargs) return cast(FT, inner) cached_cache_len = [0] if size_callback is not None: def cache_len() -> int: return cached_cache_len[0] else: def cache_len() -> int: return len(cache) self.len = synchronized(cache_len) def add_node( key: KT, value: VT, callbacks: Collection[Callable[[], None]] = () ) -> None: node: _Node[KT, VT] = _Node( list_root, key, value, weak_ref_to_self, real_clock, callbacks, prune_unread_entries, ) cache[key] = node if size_callback: cached_cache_len[0] += size_callback(node.value) if extra_index_cb: index_key = extra_index_cb(node.key, node.value) mapped_keys = extra_index.setdefault(index_key, set()) mapped_keys.add(node.key) if caches.TRACK_MEMORY_USAGE and metrics: metrics.inc_memory_usage(node.memory) def move_node_to_front(node: _Node[KT, VT]) -> None: node.move_to_front(real_clock, list_root) def delete_node(node: _Node[KT, VT]) -> int: node.drop_from_lists() deleted_len = 1 if size_callback: deleted_len = size_callback(node.value) cached_cache_len[0] -= deleted_len node.run_and_clear_callbacks() if extra_index_cb: index_key = extra_index_cb(node.key, node.value) mapped_keys = extra_index.get(index_key) if mapped_keys is not None: mapped_keys.discard(node.key) if not mapped_keys: extra_index.pop(index_key, None) if caches.TRACK_MEMORY_USAGE and metrics: metrics.dec_memory_usage(node.memory) return deleted_len @overload def cache_get( key: KT, default: Literal[None] = None, callbacks: Collection[Callable[[], None]] = ..., update_metrics: bool = ..., update_last_access: bool = ..., ) -> Optional[VT]: ... @overload def cache_get( key: KT, default: T, callbacks: Collection[Callable[[], None]] = ..., update_metrics: bool = ..., update_last_access: bool = ..., ) -> Union[T, VT]: ... @synchronized def cache_get( key: KT, default: Optional[T] = None, callbacks: Collection[Callable[[], None]] = (), update_metrics: bool = True, update_last_access: bool = True, ) -> Union[None, T, VT]: """Look up a key in the cache Args: key default callbacks: A collection of callbacks that will fire when the node is removed from the cache (either due to invalidation or expiry). update_metrics: Whether to update the hit rate metrics update_last_access: Whether to update the last access metrics on a node if successfully fetched. These metrics are used to determine when to remove the node from the cache. Set to False if this fetch should *not* prevent a node from being expired. """ node = cache.get(key, None) if node is not None: if update_last_access: move_node_to_front(node) node.add_callbacks(callbacks) if update_metrics and metrics: metrics.inc_hits() return node.value else: if update_metrics and metrics: metrics.inc_misses() return default @overload def cache_get_multi( key: tuple, default: Literal[None] = None, update_metrics: bool = True, ) -> Union[None, Iterable[Tuple[KT, VT]]]: ... @overload def cache_get_multi( key: tuple, default: T, update_metrics: bool = True, ) -> Union[T, Iterable[Tuple[KT, VT]]]: ... @synchronized def cache_get_multi( key: tuple, default: Optional[T] = None, update_metrics: bool = True, ) -> Union[None, T, Iterable[Tuple[KT, VT]]]: """Returns a generator yielding all entries under the given key. Can only be used if backed by a tree cache. Example: cache = LruCache(10, cache_type=TreeCache) cache[(1, 1)] = "a" cache[(1, 2)] = "b" cache[(2, 1)] = "c" items = cache.get_multi((1,)) assert list(items) == [((1, 1), "a"), ((1, 2), "b")] Returns: Either default if the key doesn't exist, or a generator of the key/value pairs. """ assert isinstance(cache, TreeCache) node = cache.get(key, None) if node is not None: if update_metrics and metrics: metrics.inc_hits() # We store entries in the `TreeCache` with values of type `_Node`, # which we need to unwrap. return ( (full_key, lru_node.value) for full_key, lru_node in iterate_tree_cache_items(key, node) ) else: if update_metrics and metrics: metrics.inc_misses() return default @synchronized def cache_set( key: KT, value: VT, callbacks: Collection[Callable[[], None]] = () ) -> None: node = cache.get(key, None) if node is not None: # We sometimes store large objects, e.g. dicts, which cause # the inequality check to take a long time. So let's only do # the check if we have some callbacks to call. if value != node.value: node.run_and_clear_callbacks() # We don't bother to protect this by value != node.value as # generally size_callback will be cheap compared with equality # checks. (For example, taking the size of two dicts is quicker # than comparing them for equality.) if size_callback: cached_cache_len[0] -= size_callback(node.value) cached_cache_len[0] += size_callback(value) node.add_callbacks(callbacks) move_node_to_front(node) node.value = value else: add_node(key, value, set(callbacks)) evict() @synchronized def cache_set_default(key: KT, value: VT) -> VT: node = cache.get(key, None) if node is not None: return node.value else: add_node(key, value) evict() return value @overload def cache_pop(key: KT, default: Literal[None] = None) -> Optional[VT]: ... @overload def cache_pop(key: KT, default: T) -> Union[T, VT]: ... @synchronized def cache_pop(key: KT, default: Optional[T] = None) -> Union[None, T, VT]: node = cache.get(key, None) if node: evicted_len = delete_node(node) cache.pop(node.key, None) if metrics: metrics.inc_evictions(EvictionReason.invalidation, evicted_len) return node.value else: return default @synchronized def cache_del_multi(key: KT) -> None: """Delete an entry, or tree of entries If the LruCache is backed by a regular dict, then "key" must be of the right type for this cache If the LruCache is backed by a TreeCache, then "key" must be a tuple, but may be of lower cardinality than the TreeCache - in which case the whole subtree is deleted. """ popped = cache.pop(key, None) if popped is None: return # for each deleted node, we now need to remove it from the linked list # and run its callbacks. for leaf in iterate_tree_cache_entry(popped): delete_node(leaf) @synchronized def cache_clear() -> None: for node in cache.values(): node.run_and_clear_callbacks() node.drop_from_lists() assert list_root.next_node == list_root assert list_root.prev_node == list_root cache.clear() if size_callback: cached_cache_len[0] = 0 extra_index.clear() if caches.TRACK_MEMORY_USAGE and metrics: metrics.clear_memory_usage() @synchronized def cache_contains(key: KT) -> bool: return key in cache @synchronized def cache_invalidate_on_extra_index(index_key: KT) -> None: """Invalidates all entries that match the given extra index key. This can only be called when `extra_index_cb` was specified. """ assert extra_index_cb is not None keys = extra_index.pop(index_key, None) if not keys: return for key in keys: node = cache.pop(key, None) if not node: continue evicted_len = delete_node(node) if metrics: metrics.inc_evictions(EvictionReason.invalidation, evicted_len) # make sure that we clear out any excess entries after we get resized. self._on_resize = evict self.get = cache_get self.set = cache_set self.setdefault = cache_set_default self.pop = cache_pop self.del_multi = cache_del_multi if cache_type is TreeCache: self.get_multi = cache_get_multi # `invalidate` is exposed for consistency with DeferredCache, so that it can be # invalidated by the cache invalidation replication stream. self.invalidate = cache_del_multi self.len = synchronized(cache_len) self.contains = cache_contains self.clear = cache_clear self.invalidate_on_extra_index = cache_invalidate_on_extra_index def __getitem__(self, key: KT) -> VT: result = self.get(key, _Sentinel.sentinel) if result is _Sentinel.sentinel: raise KeyError() else: return result def __setitem__(self, key: KT, value: VT) -> None: self.set(key, value) def __delitem__(self, key: KT, value: VT) -> None: result = self.pop(key, _Sentinel.sentinel) if result is _Sentinel.sentinel: raise KeyError() def __len__(self) -> int: return self.len() def __contains__(self, key: KT) -> bool: return self.contains(key) def set_cache_factor(self, factor: float) -> None: """ Set the cache factor for this individual cache. This will trigger a resize if it changes, which may require evicting items from the cache. """ if not self.apply_cache_factor_from_config: return new_size = int(self._original_max_size * factor) if new_size != self.max_size: self.max_size = new_size if self._on_resize: self._on_resize() def __del__(self) -> None: # We're about to be deleted, so we make sure to clear up all the nodes # and run callbacks, etc. # # This happens e.g. in the sync code where we have an expiring cache of # lru caches. self.clear() class AsyncLruCache(Generic[KT, VT]): """ An asynchronous wrapper around a subset of the LruCache API. On its own this doesn't change the behaviour but allows subclasses that utilize external cache systems that require await behaviour to be created. """ def __init__(self, *args: Any, **kwargs: Any): self._lru_cache: LruCache[KT, VT] = LruCache(*args, **kwargs) async def get( self, key: KT, default: Optional[T] = None, update_metrics: bool = True ) -> Optional[VT]: return self._lru_cache.get(key, update_metrics=update_metrics) async def get_external( self, key: KT, default: Optional[T] = None, update_metrics: bool = True, ) -> Optional[VT]: # This method should fetch from any configured external cache, in this case noop. return None def get_local( self, key: KT, default: Optional[T] = None, update_metrics: bool = True ) -> Optional[VT]: return self._lru_cache.get(key, update_metrics=update_metrics) async def set(self, key: KT, value: VT) -> None: # This will add the entries in the correct order, local first external second self.set_local(key, value) await self.set_external(key, value) async def set_external(self, key: KT, value: VT) -> None: # This method should add an entry to any configured external cache, in this case noop. pass def set_local(self, key: KT, value: VT) -> None: self._lru_cache.set(key, value) async def invalidate(self, key: KT) -> None: # This method should invalidate any external cache and then invalidate the LruCache. return self._lru_cache.invalidate(key) def invalidate_on_extra_index_local(self, index_key: KT) -> None: self._lru_cache.invalidate_on_extra_index(index_key) def invalidate_local(self, key: KT) -> None: """Remove an entry from the local cache This variant of `invalidate` is useful if we know that the external cache has already been invalidated. """ return self._lru_cache.invalidate(key) async def contains(self, key: KT) -> bool: return self._lru_cache.contains(key) def clear(self) -> None: self._lru_cache.clear()