Subversion Repositories SmartDukaan

package com.spice.profitmandi.dao.service;

import com.spice.profitmandi.common.exception.ProfitMandiBusinessException;

import com.spice.profitmandi.common.model.CustomPaymentOption;

import com.spice.profitmandi.dao.entity.catalog.Item;

import com.spice.profitmandi.dao.entity.dtr.ScratchOffer;

import com.spice.profitmandi.dao.entity.fofo.FofoOrder;

import com.spice.profitmandi.dao.entity.fofo.FofoOrderItem;

import com.spice.profitmandi.dao.entity.scratch.GiftEntity;

import com.spice.profitmandi.dao.entity.scratch.OfferEntity;

import com.spice.profitmandi.dao.entity.scratch.ScratchRequest;

import com.spice.profitmandi.dao.repository.catalog.ItemRepository;

import com.spice.profitmandi.dao.repository.dtr.ScratchOfferRepository;

import com.spice.profitmandi.dao.repository.fofo.FofoOrderItemRepository;

import com.spice.profitmandi.dao.repository.fofo.FofoOrderRepository;

import com.spice.profitmandi.dao.repository.scratch.GiftRepository;

import com.spice.profitmandi.dao.repository.scratch.SeasonalOfferRepository;

import org.apache.logging.log4j.LogManager;

import org.apache.logging.log4j.Logger;

import org.springframework.beans.factory.annotation.Autowired;

import org.springframework.stereotype.Service;

import java.time.LocalDate;

import java.time.LocalDateTime;

import java.time.LocalTime;

import java.util.*;

import java.util.function.Function;

import java.util.stream.Collectors;

@Service

public class ScratchService {

    private static final Logger logger = LogManager.getLogger(ScratchService.class);

    @Autowired

    SeasonalOfferRepository seasonalOfferRepository;

    @Autowired

    GiftRepository giftRepository;

    @Autowired

    ScratchOfferRepository scratchOfferRepository;

    @Autowired

    FofoOrderItemRepository fofoOrderItemRepository;

    @Autowired

    ItemRepository itemRepository;

    @Autowired

    FofoOrderRepository fofoOrderRepository;

    public void processScratchOffer(int fofoOrderId, Set<CustomPaymentOption> paymentOptions, Set<Integer> fofoOrderItemIds) throws ProfitMandiBusinessException {

        List<OfferEntity> activeOffers = seasonalOfferRepository.getOffersByDate(LocalDate.now());

        if (activeOffers.isEmpty()) {

            return;

        }

        FofoOrder fofoOrder = fofoOrderRepository.selectByOrderId(fofoOrderId);

        OfferEntity eligibleOffer = findEligibleOffer(activeOffers, fofoOrder);

        if (eligibleOffer == null) {

            logger.info("No eligible offer for order {}", fofoOrderId);

            return;

        }

        ScratchOffer availedOffer = scratchOfferRepository.getScractchOfferByCustomerIdAndOfferId(fofoOrder.getCustomerId(), eligibleOffer.getId());

        if (availedOffer != null) {

            logger.info("Customer {} already availed offer {}", fofoOrder.getCustomerId(), eligibleOffer.getId());

            return;

        }

        this.processOffer(eligibleOffer, fofoOrder);

    }

    private OfferEntity findEligibleOffer(List<OfferEntity> activeOffers, FofoOrder fofoOrder) {

        int customerFofoId = fofoOrder.getFofoId();

        // Check PartnerWise offers first

        for (OfferEntity activeOffer : activeOffers) {

            if (!"PartnerWise".equals(activeOffer.getClassification())) {

                continue;

            }

            List<GiftEntity> gifts = giftRepository.findByOfferId(activeOffer.getId());

            for (GiftEntity gift : gifts) {

                if (gift.getFofoStore() == null || gift.getFofoStore().trim().isEmpty()) {

                    continue;

                }

                boolean matches = Arrays.stream(gift.getFofoStore().split(","))

                        .map(String::trim)

                        .filter(s -> !s.isEmpty())

                        .anyMatch(store -> {

                            try {

                                return Integer.parseInt(store) == customerFofoId;

                            } catch (NumberFormatException e) {

                                return false;

                            }

                        });

                if (matches) {

                    return activeOffer;

                }

            }

        }

        // Fallback to first non-PartnerWise offer

        return activeOffers.stream()

                .filter(offer -> !"PartnerWise".equals(offer.getClassification()))

                .findFirst()

                .orElse(null);

    }

    private boolean checkGiftAvailability(LocalDate date, int perDayMaxQty, OfferEntity offer) {

        GiftEntity defaultGift = giftRepository.getDefaultGift(offer.getId());

        // No default gift configured -> no default-gift daily cap to enforce.

        // Return true so the caller skips the fallback and proceeds to the picker.

        if (defaultGift == null) return true;

        Integer giftCounts = scratchOfferRepository.countTodaysGiftDistribution(date.atStartOfDay(), date.atTime(LocalTime.MAX), defaultGift.getId());

        return giftCounts < perDayMaxQty;

    }

    private boolean isAppleItem(FofoOrder fofoOrder) {

        List<FofoOrderItem> fofoOrderItems = fofoOrderItemRepository.selectByOrderId(fofoOrder.getId());

        if (fofoOrderItems == null || fofoOrderItems.isEmpty()) {

            return false;

        }

        return fofoOrderItems.stream()

                .anyMatch(item -> item != null && "apple".equalsIgnoreCase(item.getBrand()));

    }

    private boolean processOffer(OfferEntity offer, FofoOrder fofoOrder) {

        logger.info("Processing offer {} for order {}", offer.getId(), fofoOrder.getId());

        List<GiftEntity> allGifts = giftRepository.findNonDefaultGIft(offer.getId());

        GiftEntity defaultGift = giftRepository.getDefaultGift(offer.getId());

        if (allGifts.isEmpty()) {

            logger.warn("Offer {} has no gifts", offer.getId());

            return false;

        }

        // Compute cart amount + item categories up-front so both the fast-paths (Apple,

        // daily-limit) and the main picker can consult them when deciding fallbacks.

        List<FofoOrderItem> orderItems = fofoOrderItemRepository.selectByOrderId(fofoOrder.getId());

        Set<Integer> itemCategoryIds = new HashSet<>();

        for (FofoOrderItem orderItem : orderItems) {

            try {

                Item item = itemRepository.selectById(orderItem.getItemId());

                if (item != null) {

                    itemCategoryIds.add(item.getCategoryId());

                }

            } catch (ProfitMandiBusinessException e) {

                logger.warn("Item {} not found", orderItem.getItemId());

            }

        }

        float totalAmount = fofoOrder.getTotalAmount();

        // Apple items always get the last gift

        if (isAppleItem(fofoOrder)) {

            GiftEntity lastGift = allGifts.get(allGifts.size() - 1);

            if (lastGift.getMaxRedemptions() > 0) {

                createScratchOffer(fofoOrder, offer, lastGift);

            } else {

                createBetterLuckNextTimeScratch(fofoOrder, offer);

            }

            return true;

        }

        // Check daily limit — if the default-gift daily cap is hit, we still need to

        // honour the default gift's own slab bounds (management rule: default EW must

        // not be awarded above its own max_cart_value, e.g. above 20K).

        if (!checkGiftAvailability(LocalDate.now(), offer.getUserLimit(), offer)) {

            awardDefaultOrBlnt(fofoOrder, offer, defaultGift, totalAmount, itemCategoryIds,

                    "daily-limit-reached");

            return true;

        }

        // Find eligible gifts by cart value and category

        List<GiftEntity> allOfferGifts = giftRepository.findByOfferId(offer.getId());

        List<GiftEntity> eligibleGifts = allOfferGifts.stream()

                .filter(gift -> gift.getMaxRedemptions() > 0

                        && totalAmount >= gift.getMinCartValue()

                        && totalAmount <= gift.getMaxCartValue()

                        && itemCategoryIds.stream().anyMatch(catId -> isItemCategoryEligible(gift.getProductCategory(), catId)))

                .collect(Collectors.toList());

        if (eligibleGifts.isEmpty()) {

            awardDefaultOrBlnt(fofoOrder, offer, defaultGift, totalAmount, itemCategoryIds,

                    "no-eligible-gifts");

            return true;

        }

        GiftEntity selectedGift = selectGiftByClassification(offer, eligibleGifts, fofoOrder);

        if (selectedGift == null || selectedGift.getMaxRedemptions() <= 0) {

            awardDefaultOrBlnt(fofoOrder, offer, defaultGift, totalAmount, itemCategoryIds,

                    "picker-returned-null-or-exhausted");

            return true;

        }

        createScratchOffer(fofoOrder, offer, selectedGift);

        return true;

    }

    /**

     * Fallback awarder that respects the default gift's own slab bounds and category.

     * If the default gift is genuinely eligible for this cart (cart within its

     * min/max, category matches, stock left), award it. Otherwise award Better Luck

     * Next Time — this prevents the "EW awarded above 20K" management rule violation

     * that could happen when a slab gap or exhausted pool caused the picker to fall

     * through with no eligible gift.

     */

    private void awardDefaultOrBlnt(FofoOrder order, OfferEntity offer, GiftEntity defaultGift,

                                    float totalAmount, Set<Integer> itemCategoryIds, String reason) {

        // 1) Default gift — only if truly eligible for this cart (respects its slab).

        boolean defaultEligible = defaultGift != null

                && defaultGift.getMaxRedemptions() != null

                && defaultGift.getMaxRedemptions() > 0

                && defaultGift.getMinCartValue() != null

                && defaultGift.getMaxCartValue() != null

                && totalAmount >= defaultGift.getMinCartValue()

                && totalAmount <= defaultGift.getMaxCartValue()

                && itemCategoryIds.stream().anyMatch(catId ->

                isItemCategoryEligible(defaultGift.getProductCategory(), catId));

        if (defaultEligible) {

            logger.info("Fallback fired for order {} ({}) — default gift {} eligible, awarding it",

                    order.getId(), reason, defaultGift.getId());

            createDefaultGiftScratch(order, offer, defaultGift);

            return;

        }

        // 2) Neckband safety net — management rule: when EW isn't allowed for this cart

        //    (i.e. default fell through), award a Neckband from this offer's config.

        //    Prefer a Neckband whose OWN slab covers this cart amount (so stock

        //    decrements from the correct slab, matching per-slab quota intent).

        //    Only if no slab-matching Neckband exists do we cross-slab pick.

        List<GiftEntity> allGifts = giftRepository.findByOfferId(offer.getId());

        List<GiftEntity> neckbandCandidates = allGifts.stream()

                .filter(g -> g.getName() != null && "neckband".equalsIgnoreCase(g.getName().trim()))

                .filter(g -> g.getMaxRedemptions() != null && g.getMaxRedemptions() > 0)

                .filter(g -> itemCategoryIds.stream().anyMatch(catId ->

                        isItemCategoryEligible(g.getProductCategory(), catId)))

                .collect(Collectors.toList());

        // First pass — slab-matching Neckband (this cart's own slab).

        GiftEntity neckband = neckbandCandidates.stream()

                .filter(g -> g.getMinCartValue() != null && g.getMaxCartValue() != null

                        && totalAmount >= g.getMinCartValue()

                        && totalAmount <= g.getMaxCartValue())

                .findFirst()

                .orElse(null);

        // Second pass — cross-slab pick only if the correct slab has no Neckband left.

        if (neckband == null && !neckbandCandidates.isEmpty()) {

            neckband = neckbandCandidates.get(0);

            logger.info("Fallback for order {} ({}) — no slab-matching Neckband for cart={}; cross-slab picking row {}",

                    order.getId(), reason, totalAmount, neckband.getId());

        }

        if (neckband != null) {

            logger.info("Fallback fired for order {} ({}) — awarding Neckband row {} (slab {}-{}) for cart={}",

                    order.getId(), reason, neckband.getId(),

                    neckband.getMinCartValue(), neckband.getMaxCartValue(), totalAmount);

            createScratchOffer(order, offer, neckband);

            return;

        }

        // 3) Absolute last resort — no default, no Neckband available anywhere.

        logger.warn("Fallback fired for order {} ({}) — no default gift AND no Neckband in stock; awarding Better Luck Next Time",

                order.getId(), reason);

        createBetterLuckNextTimeScratch(order, offer);

    }

    private boolean isItemCategoryEligible(String giftCategories, Integer itemCategoryId) {

        if (giftCategories == null || giftCategories.trim().isEmpty()) {

            return false;

        }

        return Arrays.stream(giftCategories.split(","))

                .map(String::trim)

                .filter(s -> !s.isEmpty())

                .map(category -> {

                    try {

                        return Integer.parseInt(category);

                    } catch (NumberFormatException e) {

                        return -1;

                    }

                })

                .anyMatch(itemCategoryId::equals);

    }

    private GiftEntity selectGiftByClassification(OfferEntity offer, List<GiftEntity> eligibleGifts, FofoOrder fofoOrder) {

        switch (offer.getClassification()) {

            case "Serial":

                return eligibleGifts.get(0);

            case "Random":

                List<GiftEntity> shuffled = new ArrayList<>(eligibleGifts);

                Collections.shuffle(shuffled);

                return shuffled.get(0);

            case "PartnerWise":

                int fofoId = fofoOrder.getFofoId();

                return eligibleGifts.stream()

                        .filter(gift -> gift.getFofoStore() != null

                                && Arrays.stream(gift.getFofoStore().split(","))

                                .map(String::trim)

                                .anyMatch(s -> {

                                    try { return Integer.parseInt(s) == fofoId; }

                                    catch (NumberFormatException e) { return false; }

                                }))

                        .findFirst()

                        .orElse(null);

            default:

                logger.warn("Unknown classification: {}", offer.getClassification());

                return null;

        }

    }

    public void createBetterLuckNextTimeScratch(FofoOrder order, OfferEntity offer) {

        ScratchOffer so = new ScratchOffer();

        so.setCustomerId(order.getCustomerId());

        so.setOfferId(offer.getId());

        so.setGiftId(1);

        so.setInvoiceNumber(order.getInvoiceNumber());

        so.setCreatedTimestamp(LocalDateTime.now());

        so.setOfferName(offer.getName());

        scratchOfferRepository.persist(so);

    }

    public void createScratchOffer(FofoOrder order, OfferEntity offer, GiftEntity gift) {

        int updated = giftRepository.decrementMaxRedemptions(gift.getId());

        if (updated == 0) {

            logger.warn("Gift {} has no remaining redemptions", gift.getId());

            return;

        }

        ScratchOffer so = new ScratchOffer();

        so.setCustomerId(order.getCustomerId());

        so.setOfferId(offer.getId());

        so.setGiftId(gift.getId());

        so.setInvoiceNumber(order.getInvoiceNumber());

        so.setCreatedTimestamp(LocalDateTime.now());

        so.setOfferName(gift.getName());

        scratchOfferRepository.persist(so);

        logger.info("Created scratch offer for order {} gift {}", order.getId(), gift.getId());

    }

    public void createDefaultGiftScratch(FofoOrder order, OfferEntity offer, GiftEntity gift) {

        ScratchOffer so = new ScratchOffer();

        so.setCustomerId(order.getCustomerId());

        so.setOfferId(offer.getId());

        so.setGiftId(gift.getId());

        so.setInvoiceNumber(order.getInvoiceNumber());

        so.setCreatedTimestamp(LocalDateTime.now());

        so.setOfferName(gift.getName());

        scratchOfferRepository.persist(so);

    }

    public boolean createOffer(ScratchRequest request) {

        OfferEntity offer = mapToOfferEntity(request);

        seasonalOfferRepository.save(offer);

        List<GiftEntity> gifts = mapToGiftEntities(request.getGifts(), offer.getId());

        gifts.forEach(giftRepository::save);

        return offer.getId() > 0 && giftRepository.findByOfferId(offer.getId()).size() == request.getGifts().size();

    }

    public boolean updateOffer(Integer offerId, ScratchRequest request) {

        OfferEntity existingOffer = seasonalOfferRepository.findById(offerId);

        boolean res = false;

        if (existingOffer != null) {

            updateOfferEntity(existingOffer, request);

            updateGifts(existingOffer.getId(), request.getGifts());

            res = true;

        }

        return res;

    }

    //update offer

    private void updateOfferEntity(OfferEntity existingOffer, ScratchRequest request) {

        existingOffer.setName(request.getName());

        existingOffer.setDescription(request.getDescription());

        existingOffer.setStartDate(request.getStartDate());

        existingOffer.setEndDate(request.getEndDate());

        existingOffer.setTermsCondition(request.getTermsCondition());

        existingOffer.setUserLimit(request.getUserLimit());

        existingOffer.setScratchValidity(request.getScratchValidity());

        existingOffer.setProductCategory(request.getProductCategory());

        existingOffer.setPaymentMethod(request.getPaymentMethod());

        existingOffer.setClassification(request.getClassification());

    }

    //update gift

    private void updateGifts(Integer offerId, List<ScratchRequest.GiftData> giftsData) {

        Map<Integer, GiftEntity> existingGifts = giftRepository.findByOfferId(offerId).stream().collect(Collectors.toMap(GiftEntity::getId, Function.identity()));

        for (ScratchRequest.GiftData giftData : giftsData) {

            if (giftData.getId() != null && existingGifts.containsKey(giftData.getId())) {

                GiftEntity existingGift = existingGifts.get(giftData.getId());

                updateGiftEntity(existingGift, giftData);

                existingGifts.remove(giftData.getId());

            } else {

                GiftEntity gift = new GiftEntity();

                gift.setName(giftData.getName());

                gift.setThumbnailUrl(giftData.getThumbnailUrl());

                gift.setMinCartValue(giftData.getMinCartValue());

                gift.setMaxRedemptions(giftData.getMaxRedemptions());

                gift.setOfferId(offerId);

                gift.setMaxCartValue(giftData.getMaxCartValue());

                gift.setFofoStore(giftData.getFofoStore());

                gift.setProductCategory(giftData.getProductCategory());

                gift.setIsDefault(giftData.isDefault());

                giftRepository.save(gift);

            }

        }

    }

    private void updateGiftEntity(GiftEntity gift, ScratchRequest.GiftData data) {

        gift.setName(data.getName());

        gift.setThumbnailUrl(data.getThumbnailUrl());

        gift.setMinCartValue(data.getMinCartValue());

        gift.setMaxRedemptions(data.getMaxRedemptions());

        gift.setMaxCartValue(data.getMaxCartValue());

        gift.setFofoStore(data.getFofoStore());

        gift.setProductCategory(data.getProductCategory());

        gift.setIsDefault(data.isDefault());

    }

    //offer

    private OfferEntity mapToOfferEntity(ScratchRequest request) {

        OfferEntity offer = new OfferEntity();

        offer.setName(request.getName());

        offer.setDescription(request.getDescription());

        offer.setOfferImage(request.getOfferImage());

        offer.setOfferType(request.getOfferType());

        offer.setStartDate(request.getStartDate());

        offer.setEndDate(request.getEndDate());

        offer.setTermsCondition(request.getTermsCondition());

        offer.setUserLimit(request.getUserLimit());

        offer.setScratchValidity(request.getScratchValidity());

        offer.setProductCategory(request.getProductCategory());

        offer.setPaymentMethod(request.getPaymentMethod());

        offer.setClassification(request.getClassification());

        logger.info("active flag - " + request.isActive());

        offer.setActive(request.isActive());

        return offer;

    }

    //gift

    private List<GiftEntity> mapToGiftEntities(List<ScratchRequest.GiftData> giftsData, Integer offerId) {

        return giftsData.stream().map(giftData -> {

            logger.info("giftData: {}", giftData);

            GiftEntity gift = new GiftEntity();

            gift.setName(giftData.getName());

            gift.setThumbnailUrl(giftData.getThumbnailUrl());

            gift.setMinCartValue(giftData.getMinCartValue());

            gift.setMaxRedemptions(giftData.getMaxRedemptions());

            gift.setOfferId(offerId);

            gift.setMaxCartValue(giftData.getMaxCartValue());

            gift.setFofoStore(giftData.getFofoStore());

            gift.setProductCategory(giftData.getProductCategory());

            gift.setIsDefault(giftData.isDefault());

            return gift;

        }).collect(Collectors.toList());

    }

}