text: # -*- coding: utf-8 -*-
  # Copyright 2015, 2016 OpenMarket Ltd
  #
  # Licensed under the Apache License, Version 2.0 (the "License");
  # you may not use this file except in compliance with the License.
  # You may obtain a copy of the License at
  #
  #     http://www.apache.org/licenses/LICENSE-2.0
  #
  # Unless required by applicable law or agreed to in writing, software
  # distributed under the License is distributed on an "AS IS" BASIS,
  # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  # See the License for the specific language governing permissions and
  # limitations under the License.
  import logging
  from typing import TYPE_CHECKING, Dict, List, Optional, Union
  
  from prometheus_client import Counter
  
  from twisted.internet import defer
  
  import synapse
  from synapse.api.constants import EventTypes
  from synapse.appservice import ApplicationService
  from synapse.events import EventBase
  from synapse.handlers.presence import format_user_presence_state
  from synapse.logging.context import make_deferred_yieldable, run_in_background
  from synapse.metrics import (
      event_processing_loop_counter,
      event_processing_loop_room_count,
  )
  from synapse.metrics.background_process_metrics import (
      run_as_background_process,
      wrap_as_background_process,
  )
  from synapse.storage.databases.main.directory import RoomAliasMapping
  from synapse.types import Collection, JsonDict, RoomAlias, RoomStreamToken, UserID
  from synapse.util.metrics import Measure
  
  if TYPE_CHECKING:
      from synapse.server import HomeServer
  
  logger = logging.getLogger(__name__)
  
  events_processed_counter = Counter("synapse_handlers_appservice_events_processed", "")
  
  
  class ApplicationServicesHandler:
      def __init__(self, hs: "HomeServer"):
          self.store = hs.get_datastore()
          self.is_mine_id = hs.is_mine_id
          self.appservice_api = hs.get_application_service_api()
          self.scheduler = hs.get_application_service_scheduler()
          self.started_scheduler = False
          self.clock = hs.get_clock()
          self.notify_appservices = hs.config.notify_appservices
          self.event_sources = hs.get_event_sources()
  
          self.current_max = 0
          self.is_processing = False
  
      def notify_interested_services(self, max_token: RoomStreamToken):
          """Notifies (pushes) all application services interested in this event.
  
          Pushing is done asynchronously, so this method won't block for any
          prolonged length of time.
          """
          # We just use the minimum stream ordering and ignore the vector clock
          # component. This is safe to do as long as we *always* ignore the vector
          # clock components.
          current_id = max_token.stream
  
          services = self.store.get_app_services()
          if not services or not self.notify_appservices:
              return
  
          self.current_max = max(self.current_max, current_id)
          if self.is_processing:
              return
  
          # We only start a new background process if necessary rather than
          # optimistically (to cut down on overhead).
          self._notify_interested_services(max_token)
  
      @wrap_as_background_process("notify_interested_services")
      async def _notify_interested_services(self, max_token: RoomStreamToken):
          with Measure(self.clock, "notify_interested_services"):
              self.is_processing = True
              try:
                  limit = 100
                  while True:
                      (
                          upper_bound,
                          events,
                      ) = await self.store.get_new_events_for_appservice(
                          self.current_max, limit
                      )
  
                      if not events:
                          break
  
                      events_by_room = {}  # type: Dict[str, List[EventBase]]
                      for event in events:
                          events_by_room.setdefault(event.room_id, []).append(event)
  
                      async def handle_event(event):
                          # Gather interested services
                          services = await self._get_services_for_event(event)
                          if len(services) == 0:
                              return  # no services need notifying
  
                          # Do we know this user exists? If not, poke the user
                          # query API for all services which match that user regex.
                          # This needs to block as these user queries need to be
                          # made BEFORE pushing the event.
                          await self._check_user_exists(event.sender)
                          if event.type == EventTypes.Member:
                              await self._check_user_exists(event.state_key)
  
                          if not self.started_scheduler:
  
                              async def start_scheduler():
                                  try:
                                      return await self.scheduler.start()
                                  except Exception:
                                      logger.error("Application Services Failure")
  
                              run_as_background_process("as_scheduler", start_scheduler)
                              self.started_scheduler = True
  
                          # Fork off pushes to these services
                          for service in services:
                              self.scheduler.submit_event_for_as(service, event)
  
                          now = self.clock.time_msec()
                          ts = await self.store.get_received_ts(event.event_id)
                          synapse.metrics.event_processing_lag_by_event.labels(
                              "appservice_sender"
                          ).observe((now - ts) / 1000)
  
                      async def handle_room_events(events):
                          for event in events:
                              await handle_event(event)
  
                      await make_deferred_yieldable(
                          defer.gatherResults(
                              [
                                  run_in_background(handle_room_events, evs)
                                  for evs in events_by_room.values()
                              ],
                              consumeErrors=True,
                          )
                      )
  
                      await self.store.set_appservice_last_pos(upper_bound)
  
                      now = self.clock.time_msec()
                      ts = await self.store.get_received_ts(events[-1].event_id)
  
                      synapse.metrics.event_processing_positions.labels(
                          "appservice_sender"
                      ).set(upper_bound)
  
                      events_processed_counter.inc(len(events))
  
                      event_processing_loop_room_count.labels("appservice_sender").inc(
                          len(events_by_room)
                      )
  
                      event_processing_loop_counter.labels("appservice_sender").inc()
  
                      synapse.metrics.event_processing_lag.labels(
                          "appservice_sender"
                      ).set(now - ts)
                      synapse.metrics.event_processing_last_ts.labels(
                          "appservice_sender"
                      ).set(ts)
              finally:
                  self.is_processing = False
  
      def notify_interested_services_ephemeral(
          self,
          stream_key: str,
          new_token: Optional[int],
          users: Collection[Union[str, UserID]] = [],
      ):
          """This is called by the notifier in the background
          when a ephemeral event handled by the homeserver.
  
          This will determine which appservices
          are interested in the event, and submit them.
  
          Events will only be pushed to appservices
          that have opted into ephemeral events
  
          Args:
              stream_key: The stream the event came from.
              new_token: The latest stream token
              users: The user(s) involved with the event.
          """
          if not self.notify_appservices:
              return
  
          if stream_key not in ("typing_key", "receipt_key", "presence_key"):
              return
  
          services = [
              service
              for service in self.store.get_app_services()
              if service.supports_ephemeral
          ]
          if not services:
              return
  
          # We only start a new background process if necessary rather than
          # optimistically (to cut down on overhead).
          self._notify_interested_services_ephemeral(
              services, stream_key, new_token, users
          )
  
      @wrap_as_background_process("notify_interested_services_ephemeral")
      async def _notify_interested_services_ephemeral(
          self,
          services: List[ApplicationService],
          stream_key: str,
          new_token: Optional[int],
          users: Collection[Union[str, UserID]],
      ):
          logger.debug("Checking interested services for %s" % (stream_key))
          with Measure(self.clock, "notify_interested_services_ephemeral"):
              for service in services:
                  # Only handle typing if we have the latest token
                  if stream_key == "typing_key" and new_token is not None:
                      events = await self._handle_typing(service, new_token)
                      if events:
                          self.scheduler.submit_ephemeral_events_for_as(service, events)
                      # We don't persist the token for typing_key for performance reasons
                  elif stream_key == "receipt_key":
                      events = await self._handle_receipts(service)
                      if events:
                          self.scheduler.submit_ephemeral_events_for_as(service, events)
                      await self.store.set_type_stream_id_for_appservice(
                          service, "read_receipt", new_token
                      )
                  elif stream_key == "presence_key":
                      events = await self._handle_presence(service, users)
                      if events:
                          self.scheduler.submit_ephemeral_events_for_as(service, events)
                      await self.store.set_type_stream_id_for_appservice(
                          service, "presence", new_token
                      )
  
      async def _handle_typing(
          self, service: ApplicationService, new_token: int
      ) -> List[JsonDict]:
          typing_source = self.event_sources.sources["typing"]
          # Get the typing events from just before current
          typing, _ = await typing_source.get_new_events_as(
              service=service,
              # For performance reasons, we don't persist the previous
              # token in the DB and instead fetch the latest typing information
              # for appservices.
              from_key=new_token - 1,
          )
          return typing
  
      async def _handle_receipts(self, service: ApplicationService) -> List[JsonDict]:
          from_key = await self.store.get_type_stream_id_for_appservice(
              service, "read_receipt"
          )
          receipts_source = self.event_sources.sources["receipt"]
          receipts, _ = await receipts_source.get_new_events_as(
              service=service, from_key=from_key
          )
          return receipts
  
      async def _handle_presence(
          self, service: ApplicationService, users: Collection[Union[str, UserID]]
      ) -> List[JsonDict]:
          events = []  # type: List[JsonDict]
          presence_source = self.event_sources.sources["presence"]
          from_key = await self.store.get_type_stream_id_for_appservice(
              service, "presence"
          )
          for user in users:
              if isinstance(user, str):
                  user = UserID.from_string(user)
  
              interested = await service.is_interested_in_presence(user, self.store)
              if not interested:
                  continue
              presence_events, _ = await presence_source.get_new_events(
                  user=user,
                  service=service,
                  from_key=from_key,
              )
              time_now = self.clock.time_msec()
              events.extend(
                  {
                      "type": "m.presence",
                      "sender": event.user_id,
                      "content": format_user_presence_state(
                          event, time_now, include_user_id=False
                      ),
                  }
                  for event in presence_events
              )
  
          return events
  
      async def query_user_exists(self, user_id: str) -> bool:
          """Check if any application service knows this user_id exists.
  
          Args:
              user_id: The user to query if they exist on any AS.
          Returns:
              True if this user exists on at least one application service.
          """
          user_query_services = self._get_services_for_user(user_id=user_id)
          for user_service in user_query_services:
              is_known_user = await self.appservice_api.query_user(user_service, user_id)
              if is_known_user:
                  return True
          return False
  
      async def query_room_alias_exists(
          self, room_alias: RoomAlias
      ) -> Optional[RoomAliasMapping]:
          """Check if an application service knows this room alias exists.
  
          Args:
              room_alias: The room alias to query.
          Returns:
              namedtuple: with keys "room_id" and "servers" or None if no
              association can be found.
          """
          room_alias_str = room_alias.to_string()
          services = self.store.get_app_services()
          alias_query_services = [
              s for s in services if (s.is_interested_in_alias(room_alias_str))
          ]
          for alias_service in alias_query_services:
              is_known_alias = await self.appservice_api.query_alias(
                  alias_service, room_alias_str
              )
              if is_known_alias:
                  # the alias exists now so don't query more ASes.
                  return await self.store.get_association_from_room_alias(room_alias)
  
          return None
  
      async def query_3pe(
          self, kind: str, protocol: str, fields: Dict[bytes, List[bytes]]
      ) -> List[JsonDict]:
          services = self._get_services_for_3pn(protocol)
  
          results = await make_deferred_yieldable(
              defer.DeferredList(
                  [
                      run_in_background(
                          self.appservice_api.query_3pe, service, kind, protocol, fields
                      )
                      for service in services
                  ],
                  consumeErrors=True,
              )
          )
  
          ret = []
          for (success, result) in results:
              if success:
                  ret.extend(result)
  
          return ret
  
      async def get_3pe_protocols(
          self, only_protocol: Optional[str] = None
      ) -> Dict[str, JsonDict]:
          services = self.store.get_app_services()
          protocols = {}  # type: Dict[str, List[JsonDict]]
  
          # Collect up all the individual protocol responses out of the ASes
          for s in services:
              for p in s.protocols:
                  if only_protocol is not None and p != only_protocol:
                      continue
  
                  if p not in protocols:
                      protocols[p] = []
  
                  info = await self.appservice_api.get_3pe_protocol(s, p)
  
                  if info is not None:
                      protocols[p].append(info)
  
          def _merge_instances(infos: List[JsonDict]) -> JsonDict:
              if not infos:
                  return {}
  
              # Merge the 'instances' lists of multiple results, but just take
              # the other fields from the first as they ought to be identical
              # copy the result so as not to corrupt the cached one
              combined = dict(infos[0])
              combined["instances"] = list(combined["instances"])
  
              for info in infos[1:]:
                  combined["instances"].extend(info["instances"])
  
              return combined
  
          return {p: _merge_instances(protocols[p]) for p in protocols.keys()}
  
      async def _get_services_for_event(
          self, event: EventBase
      ) -> List[ApplicationService]:
          """Retrieve a list of application services interested in this event.
  
          Args:
              event: The event to check. Can be None if alias_list is not.
          Returns:
              A list of services interested in this event based on the service regex.
          """
          services = self.store.get_app_services()
  
          # we can't use a list comprehension here. Since python 3, list
          # comprehensions use a generator internally. This means you can't yield
          # inside of a list comprehension anymore.
          interested_list = []
          for s in services:
              if await s.is_interested(event, self.store):
                  interested_list.append(s)
  
          return interested_list
  
      def _get_services_for_user(self, user_id: str) -> List[ApplicationService]:
          services = self.store.get_app_services()
          return [s for s in services if (s.is_interested_in_user(user_id))]
  
      def _get_services_for_3pn(self, protocol: str) -> List[ApplicationService]:
          services = self.store.get_app_services()
          return [s for s in services if s.is_interested_in_protocol(protocol)]
  
      async def _is_unknown_user(self, user_id: str) -> bool:
          if not self.is_mine_id(user_id):
              # we don't know if they are unknown or not since it isn't one of our
              # users. We can't poke ASes.
              return False
  
          user_info = await self.store.get_user_by_id(user_id)
          if user_info:
              return False
  
          # user not found; could be the AS though, so check.
          services = self.store.get_app_services()
          service_list = [s for s in services if s.sender == user_id]
          return len(service_list) == 0
  
      async def _check_user_exists(self, user_id: str) -> bool:
          unknown_user = await self._is_unknown_user(user_id)
          if unknown_user:
              return await self.query_user_exists(user_id)
          return True
  