/*
 *   Famedly Matrix SDK
 *   Copyright (C) 2021 Famedly GmbH
 *
 *   This program is free software: you can redistribute it and/or modify
 *   it under the terms of the GNU Affero General License as
 *   published by the Free Software Foundation, either version 3 of the
 *   License, or (at your option) any later version.
 *
 *   This program is distributed in the hope that it will be useful,
 *   but WITHOUT ANY WARRANTY; without even the implied warranty of
 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
 *   GNU Affero General License for more details.
 *
 *   You should have received a copy of the GNU Affero General License
 *   along with this program.  If not, see <https://www.gnu.org/licenses/>.
 */

import 'dart:async';
import 'dart:core';

import 'package:collection/collection.dart';

import 'package:matrix/matrix.dart';
import 'package:matrix/src/utils/cached_stream_controller.dart';
import 'package:matrix/src/voip/models/call_reaction_payload.dart';
import 'package:matrix/src/voip/models/voip_id.dart';
import 'package:matrix/src/voip/utils/stream_helper.dart';

/// Holds methods for managing a group call. This class is also responsible for
/// holding and managing the individual `CallSession`s in a group call.
class GroupCallSession {
  // Config
  final Client client;
  final VoIP voip;
  final Room room;

  /// is a list of backend to allow passing multiple backend in the future
  /// we use the first backend everywhere as of now
  final CallBackend backend;

  /// something like normal calls or thirdroom
  final String? application;

  /// either room scoped or user scoped calls
  final String? scope;

  GroupCallState state = GroupCallState.localCallFeedUninitialized;

  CallParticipant? get localParticipant => voip.localParticipant;

  List<CallParticipant> get participants => List.unmodifiable(_participants);
  final Set<CallParticipant> _participants = {};

  String groupCallId;

  final CachedStreamController<GroupCallState> onGroupCallState =
      CachedStreamController();

  final CachedStreamController<GroupCallStateChange> onGroupCallEvent =
      CachedStreamController();

  final CachedStreamController<MatrixRTCCallEvent> matrixRTCEventStream =
      CachedStreamController();

  Timer? _resendMemberStateEventTimer;

  factory GroupCallSession.withAutoGenId(
    Room room,
    VoIP voip,
    CallBackend backend,
    String? application,
    String? scope,
    String? groupCallId,
  ) {
    return GroupCallSession(
      client: room.client,
      room: room,
      voip: voip,
      backend: backend,
      application: application ?? 'm.call',
      scope: scope ?? 'm.room',
      groupCallId: groupCallId ?? genCallID(),
    );
  }

  GroupCallSession({
    required this.client,
    required this.room,
    required this.voip,
    required this.backend,
    required this.groupCallId,
    required this.application,
    required this.scope,
  });

  String get avatarName =>
      _getUser().calcDisplayname(mxidLocalPartFallback: false);

  String? get displayName => _getUser().displayName;

  User _getUser() {
    return room.unsafeGetUserFromMemoryOrFallback(client.userID!);
  }

  void setState(GroupCallState newState) {
    state = newState;
    onGroupCallState.add(newState);
    onGroupCallEvent.add(GroupCallStateChange.groupCallStateChanged);
  }

  bool hasLocalParticipant() {
    return _participants.contains(localParticipant);
  }

  Timer? _reactionsTimer;
  int _reactionsTicker = 0;

  /// enter the group call.
  Future<void> enter({WrappedMediaStream? stream}) async {
    if (!(state == GroupCallState.localCallFeedUninitialized ||
        state == GroupCallState.localCallFeedInitialized)) {
      throw MatrixSDKVoipException('Cannot enter call in the $state state');
    }

    if (state == GroupCallState.localCallFeedUninitialized) {
      await backend.initLocalStream(this, stream: stream);
    }

    await sendMemberStateEvent();

    setState(GroupCallState.entered);

    Logs().v('Entered group call $groupCallId');

    // Set up _participants for the members currently in the call.
    // Other members will be picked up by the RoomState.members event.
    await onMemberStateChanged();

    await backend.setupP2PCallsWithExistingMembers(this);

    voip.currentGroupCID = VoipId(roomId: room.id, callId: groupCallId);

    await voip.delegate.handleNewGroupCall(this);

    _reactionsTimer = Timer.periodic(Duration(seconds: 1), (_) {
      if (_reactionsTicker > 0) _reactionsTicker--;
    });
  }

  Future<void> leave() async {
    await removeMemberStateEvent();
    await backend.dispose(this);
    setState(GroupCallState.localCallFeedUninitialized);
    voip.currentGroupCID = null;
    _participants.clear();
    voip.groupCalls.remove(VoipId(roomId: room.id, callId: groupCallId));
    await voip.delegate.handleGroupCallEnded(this);
    _resendMemberStateEventTimer?.cancel();
    _reactionsTimer?.cancel();
    setState(GroupCallState.ended);
  }

  Future<void> sendMemberStateEvent() async {
    // Get current member event ID to preserve permanent reactions
    final currentMemberships = room.getCallMembershipsForUser(
      client.userID!,
      client.deviceID!,
      voip,
    );

    final currentMembership = currentMemberships.firstWhereOrNull(
      (m) =>
          m.callId == groupCallId &&
          m.deviceId == client.deviceID! &&
          m.application == application &&
          m.scope == scope &&
          m.roomId == room.id,
    );

    // Store permanent reactions from the current member event if it exists
    List<MatrixEvent> permanentReactions = [];
    final membershipExpired = currentMembership?.isExpired ?? false;

    if (currentMembership?.eventId != null && !membershipExpired) {
      permanentReactions = await _getPermanentReactionsForEvent(
        currentMembership!.eventId!,
      );
    }

    final newEventId = await room.updateFamedlyCallMemberStateEvent(
      CallMembership(
        userId: client.userID!,
        roomId: room.id,
        callId: groupCallId,
        application: application,
        scope: scope,
        backend: backend,
        deviceId: client.deviceID!,
        expiresTs: DateTime.now()
            .add(voip.timeouts!.expireTsBumpDuration)
            .millisecondsSinceEpoch,
        membershipId: voip.currentSessionId,
        feeds: backend.getCurrentFeeds(),
        voip: voip,
      ),
    );

    // Copy permanent reactions to the new member event
    if (permanentReactions.isNotEmpty && newEventId != null) {
      await _copyPermanentReactionsToNewEvent(
        permanentReactions,
        newEventId,
      );
    }

    if (_resendMemberStateEventTimer != null) {
      _resendMemberStateEventTimer!.cancel();
    }
    _resendMemberStateEventTimer = Timer.periodic(
      voip.timeouts!.updateExpireTsTimerDuration,
      ((timer) async {
        Logs().d('sendMemberStateEvent updating member event with timer');
        if (state != GroupCallState.ended ||
            state != GroupCallState.localCallFeedUninitialized) {
          await sendMemberStateEvent();
        } else {
          Logs().d(
            '[VOIP] deteceted groupCall in state $state, removing state event',
          );
          await removeMemberStateEvent();
        }
      }),
    );
  }

  Future<void> removeMemberStateEvent() {
    if (_resendMemberStateEventTimer != null) {
      Logs().d('resend member event timer cancelled');
      _resendMemberStateEventTimer!.cancel();
      _resendMemberStateEventTimer = null;
    }
    return room.removeFamedlyCallMemberEvent(
      groupCallId,
      voip,
      application: application,
      scope: scope,
    );
  }

  /// compltetely rebuilds the local _participants list
  Future<void> onMemberStateChanged() async {
    // The member events may be received for another room, which we will ignore.
    final mems = room
        .getCallMembershipsFromRoom(voip)
        .values
        .expand((element) => element);
    final memsForCurrentGroupCall = mems.where((element) {
      return element.callId == groupCallId &&
          !element.isExpired &&
          element.application == application &&
          element.scope == scope &&
          element.roomId == room.id; // sanity checks
    }).toList();

    final Set<CallParticipant> newP = {};

    for (final mem in memsForCurrentGroupCall) {
      final rp = CallParticipant(
        voip,
        userId: mem.userId,
        deviceId: mem.deviceId,
      );

      newP.add(rp);

      if (rp.isLocal) continue;

      if (state != GroupCallState.entered) continue;

      await backend.setupP2PCallWithNewMember(this, rp, mem);
    }
    final newPcopy = Set<CallParticipant>.from(newP);
    final oldPcopy = Set<CallParticipant>.from(_participants);
    final anyJoined = newPcopy.difference(oldPcopy);
    final anyLeft = oldPcopy.difference(newPcopy);

    if (anyJoined.isNotEmpty || anyLeft.isNotEmpty) {
      if (anyJoined.isNotEmpty) {
        final nonLocalAnyJoined = Set<CallParticipant>.from(anyJoined)
          ..remove(localParticipant);
        if (nonLocalAnyJoined.isNotEmpty && state == GroupCallState.entered) {
          Logs().v(
            'nonLocalAnyJoined: ${nonLocalAnyJoined.map((e) => e.id).toString()} roomId: ${room.id} groupCallId: $groupCallId',
          );
          await backend.onNewParticipant(this, nonLocalAnyJoined.toList());
        }
        _participants.addAll(anyJoined);
        matrixRTCEventStream
            .add(ParticipantsJoinEvent(participants: anyJoined.toList()));
      }
      if (anyLeft.isNotEmpty) {
        final nonLocalAnyLeft = Set<CallParticipant>.from(anyLeft)
          ..remove(localParticipant);
        if (nonLocalAnyLeft.isNotEmpty && state == GroupCallState.entered) {
          Logs().v(
            'nonLocalAnyLeft: ${nonLocalAnyLeft.map((e) => e.id).toString()} roomId: ${room.id} groupCallId: $groupCallId',
          );
          await backend.onLeftParticipant(this, nonLocalAnyLeft.toList());
        }
        _participants.removeAll(anyLeft);
        matrixRTCEventStream
            .add(ParticipantsLeftEvent(participants: anyLeft.toList()));
      }

      onGroupCallEvent.add(GroupCallStateChange.participantsChanged);
    }
  }

  /// Send a reaction event to the group call
  ///
  /// [emoji] - The reaction emoji (e.g., '🖐️' for hand raise)
  /// [name] - The reaction name (e.g., 'hand raise')
  /// [isEphemeral] - Whether the reaction is ephemeral (default: true)
  ///
  /// Returns the event ID of the sent reaction event
  Future<String> sendReactionEvent({
    required String emoji,
    bool isEphemeral = true,
  }) async {
    if (isEphemeral && _reactionsTicker > 10) {
      throw Exception(
        '[sendReactionEvent] manual throttling, too many ephemral reactions sent',
      );
    }

    Logs().d('Group call reaction selected: $emoji');

    final memberships =
        room.getCallMembershipsForUser(client.userID!, client.deviceID!, voip);
    final membership = memberships.firstWhereOrNull(
      (m) =>
          m.callId == groupCallId &&
          m.deviceId == client.deviceID! &&
          m.roomId == room.id &&
          m.application == application &&
          m.scope == scope,
    );

    if (membership == null) {
      throw Exception(
        '[sendReactionEvent] No matching membership found to send group call emoji reaction from ${client.userID!}',
      );
    }

    final payload = ReactionPayload(
      key: emoji,
      isEphemeral: isEphemeral,
      callId: groupCallId,
      deviceId: client.deviceID!,
      relType: RelationshipTypes.reference,
      eventId: membership.eventId!,
    );

    // Send reaction as unencrypted event to avoid decryption issues
    final txid = client.generateUniqueTransactionId();
    _reactionsTicker++;
    return await client.sendMessage(
      room.id,
      EventTypes.GroupCallMemberReaction,
      txid,
      payload.toJson(),
    );
  }

  /// Remove a reaction event from the group call
  ///
  /// [eventId] - The event ID of the reaction to remove
  ///
  /// Returns the event ID of the removed reaction event
  Future<String?> removeReactionEvent({required String eventId}) async {
    return await client.redactEventWithMetadata(
      room.id,
      eventId,
      client.generateUniqueTransactionId(),
      metadata: {
        'device_id': client.deviceID,
        'call_id': groupCallId,
        'redacts_type': EventTypes.GroupCallMemberReaction,
      },
    );
  }

  /// Get all reactions of a specific type for all participants in the call
  ///
  /// [emoji] - The reaction emoji to filter by (e.g., '🖐️')
  ///
  /// Returns a list of [MatrixEvent] objects representing the reactions
  Future<List<MatrixEvent>> getAllReactions({required String emoji}) async {
    final reactions = <MatrixEvent>[];

    final memberships = room
        .getCallMembershipsFromRoom(
          voip,
        )
        .values
        .expand((e) => e);

    final membershipsForCurrentGroupCall = memberships
        .where(
          (m) =>
              m.callId == groupCallId &&
              m.application == application &&
              m.scope == scope &&
              m.roomId == room.id,
        )
        .toList();

    for (final membership in membershipsForCurrentGroupCall) {
      if (membership.eventId == null) continue;

      // this could cause a problem in large calls because it would make
      // n number of /relations requests where n is the number of participants
      // but turns our synapse does not rate limit these so should be fine?
      final eventsToProcess =
          (await client.getRelatingEventsWithRelTypeAndEventType(
        room.id,
        membership.eventId!,
        RelationshipTypes.reference,
        EventTypes.GroupCallMemberReaction,
        recurse: false,
        limit: 100,
      ))
              .chunk;

      reactions.addAll(
        eventsToProcess.where((event) => event.content['key'] == emoji),
      );
    }

    return reactions;
  }

  /// Get all permanent reactions for a specific member event ID
  ///
  /// [eventId] - The member event ID to get reactions for
  ///
  /// Returns a list of [MatrixEvent] objects representing permanent reactions
  Future<List<MatrixEvent>> _getPermanentReactionsForEvent(
    String eventId,
  ) async {
    final permanentReactions = <MatrixEvent>[];

    try {
      final events = await client.getRelatingEventsWithRelTypeAndEventType(
        room.id,
        eventId,
        RelationshipTypes.reference,
        EventTypes.GroupCallMemberReaction,
        recurse: false,
        // makes sure that if you make too many reactions, permanent reactions don't miss out
        // hopefully 100 is a good value
        limit: 100,
      );

      for (final event in events.chunk) {
        final content = event.content;
        final isEphemeral = content['is_ephemeral'] as bool? ?? false;
        final isRedacted = event.redacts != null;

        if (!isEphemeral && !isRedacted) {
          permanentReactions.add(event);
          Logs().d(
            '[VOIP] Found permanent reaction to preserve: ${content['key']} from ${event.senderId}',
          );
        }
      }
    } catch (e, s) {
      Logs().e(
        '[VOIP] Failed to get permanent reactions for event $eventId',
        e,
        s,
      );
    }

    return permanentReactions;
  }

  /// Copy permanent reactions to the new member event
  ///
  /// [permanentReactions] - List of permanent reaction events to copy
  /// [newEventId] - The event ID of the new membership event
  Future<void> _copyPermanentReactionsToNewEvent(
    List<MatrixEvent> permanentReactions,
    String newEventId,
  ) async {
    // Re-send each permanent reaction with the new event ID
    for (final reactionEvent in permanentReactions) {
      try {
        final content = reactionEvent.content;
        final reactionKey = content['key'] as String?;

        if (reactionKey == null) {
          Logs().w(
            '[VOIP] Skipping permanent reaction copy: missing reaction key',
          );
          continue;
        }

        // Build new reaction event with updated event ID
        final payload = ReactionPayload(
          key: reactionKey,
          isEphemeral: false,
          callId: groupCallId,
          deviceId: client.deviceID!,
          relType: RelationshipTypes.reference,
          eventId: newEventId,
        );

        // Send the permanent reaction with new event ID
        final txid = client.generateUniqueTransactionId();
        await client.sendMessage(
          room.id,
          EventTypes.GroupCallMemberReaction,
          txid,
          payload.toJson(),
        );

        Logs().d(
          '[VOIP] Copied permanent reaction $reactionKey to new member event $newEventId',
        );
      } catch (e, s) {
        Logs().e(
          '[VOIP] Failed to copy permanent reaction',
          e,
          s,
        );
      }
    }
  }
}