import io
import re
import streamlit as st
from PIL import Image, ImageOps

# Единая современная библиотека для распознавания и генерации DataMatrix
try:
    from pylibdmtx.pylibdmtx import decode as dmtx_decode, encode as dmtx_encode
except ImportError:
    dmtx_decode = None
    dmtx_encode = None

# ================= НАСТРОЙКИ ПЕЧАТИ =================
DPI = 203
LABEL_SIZE_MM = 20
TOTAL_DOTS = int((LABEL_SIZE_MM / 25.4) * DPI)  # 160 пикселей

def parse_cz_mark_to_parts(raw_string):
    """
    1. Исправляет русскую раскладку, ТОЛЬКО если обнаружен русский язык.
    2. Разделяет марку на логические блоки.
    """
    if re.search(r'[А-Яа-яЁё]', raw_string):
        ru_lower = "йцукенгшщзхъфывапролджэячсмитьбюё"
        en_lower = "qwertyuiop[]asdfghjkl;'zxcvbnm,.`"
        ru_upper = "ЙЦУКЕНГШЩЗХЪФЫВАПРОЛДЖЭЯЧСМИТЬБЮЁ"
        en_upper = "QWERTYUIOP{}ASDFGHJKL:\"ZXCVBNM<>~"
        ru_spec = ".,\"№;:?"
        en_spec = "/?@#$^&"
        
        layout_map = str.maketrans(
            ru_lower + ru_upper + ru_spec,
            en_lower + en_upper + en_spec
        )
        raw_string = raw_string.translate(layout_map)
        
    raw_string = raw_string.replace('<GS>', '\x1d').replace('[GS]', '\x1d')
    
    if '\x1d' in raw_string or '\u001d' in raw_string:
        return raw_string.replace('\u001d', '\x1d').split('\x1d')
        
    if len(raw_string) < 16:
        return [raw_string]
        
    parts = []
    current_part = raw_string[:16] 
    remaining = raw_string[16:]
    
    i = 0
    while i < len(remaining):
        if i + 2 <= len(remaining):
            pair = remaining[i:i+2]
            if pair in ("91", "92", "93"):
                parts.append(current_part)
                current_part = pair
                i += 2
                continue
        
        current_part += remaining[i]
        i += 1
        
    parts.append(current_part)
    return parts

def create_duplicate_label(raw_dm_string):
    parts = parse_cz_mark_to_parts(raw_dm_string)
    
    # В Python 3.12+ мы используем стандартный байт-разделитель <GS> (\x1d)
    # вместо устаревшего объекта FNC1 из удаленной библиотеки pyStrich.
    payload = '\x1d'.join(parts)
    
    if dmtx_encode is None:
        raise RuntimeError("Библиотека pylibdmtx не установлена.")

    # Генерируем DataMatrix через C-библиотеку libdmtx
    encoded = dmtx_encode(payload.encode('utf-8'))
    dm_img = Image.frombytes('RGB', (encoded.width, encoded.height), encoded.pixels)
    
    img = Image.new('RGB', (TOTAL_DOTS, TOTAL_DOTS), 'white')
    PAD = 16 
    
    gray = dm_img.convert('L')
    inverted = ImageOps.invert(gray)
    bbox = inverted.getbbox()
    if bbox: 
        dm_img = dm_img.crop(bbox)
        
    pixels = dm_img.convert('L').load()
    module_size = next((x for x in range(1, dm_img.width) if pixels[x, 0] != pixels[0, 0]), 1)
            
    modules_x = dm_img.width // module_size
    modules_y = dm_img.height // module_size
    small_dm = dm_img.resize((modules_x, modules_y), Image.NEAREST)
    
    max_dm_space = TOTAL_DOTS - (PAD * 2)
    scale = max_dm_space // modules_x
    if scale < 1: scale = 1
    
    final_dm_size = modules_x * scale
    final_dm = small_dm.resize((final_dm_size, final_dm_size), Image.NEAREST)
    
    x_pos = (TOTAL_DOTS - final_dm_size) // 2
    y_pos = (TOTAL_DOTS - final_dm_size) // 2
    img.paste(final_dm, (x_pos, y_pos))

    return img.convert('1')

def run(plugin_info):
    with st.container(border=True):
        tabs = st.tabs(["⌨️ Ручной сканер / Текст", "📸 Камера устройства"])
        
        scanned_code = None
        
        with tabs[0]:
            text_input = st.text_input("Отсканируйте марку или вставьте код:", key="scanned_text").strip()
            if text_input:
                scanned_code = text_input
                
        with tabs[1]:
            st.info("Сфокусируйте камеру на DataMatrix и сделайте снимок. Убедитесь, что штрихкод хорошо освещен и находится в фокусе.")
            camera_photo = st.camera_input("Сделать снимок штрихкода", key="camera_scan")
            
            if camera_photo:
                if dmtx_decode is None:
                    st.error("Библиотека pylibdmtx не установлена. Распознавание с камеры недоступно.")
                else:
                    with st.spinner("Анализ изображения..."):
                        img = Image.open(camera_photo)
                        decoded = dmtx_decode(img)
                        
                        if decoded:
                            scanned_code = decoded[0].data.decode('utf-8', errors='ignore')
                            st.success("✓ Штрихкод успешно распознан!")
                        else:
                            st.error("✖ Штрихкод не найден. Попробуйте поднести камеру ближе или улучшить освещение.")

        if scanned_code:
            st.divider()
            with st.spinner("Генерация дубликата..."):
                try:
                    label_img = create_duplicate_label(scanned_code)
                    display_img = label_img.resize((label_img.width * 3, label_img.height * 3), Image.NEAREST)
                    
                    st.success("✓ Идеальный дубликат создан и готов к использованию.")
                    
                    col1, col2 = st.columns([1, 2])
                    with col1:
                        st.image(display_img, caption="Сгенерированная марка")
                        
                    buf = io.BytesIO()
                    label_img.save(buf, format="PNG")
                    
                    with col2:
                        st.text_input("Распознанные данные (исходник):", value=scanned_code, disabled=True)
                        st.download_button(
                            label="📥 Скачать марку (PNG)",
                            data=buf.getvalue(),
                            file_name="duplicate_label.png",
                            mime="image/png",
                            use_container_width=True
                        )
                        
                except Exception as e:
                    st.error(f"✖ Ошибка генерации: {e}")