package db

import (
	"context"
	"database/sql"
	"fmt"
	"log/slog"

	"bj_power_wms/ent"

	"entgo.io/ent/dialect"
	entsql "entgo.io/ent/dialect/sql"
	_ "github.com/jackc/pgx/v5/stdlib"
)

// rawDB 持有底层 *sql.DB，供迁移期清理孤儿表（如已下线的 package_boxes）使用
var rawDB *sql.DB

// MustNewDB 创建 Ent 客户端并验证连接
func MustNewDB(c DatabaseConf) *ent.Client {
	ec, err := NewDB(c)
	if err != nil {
		panic(fmt.Sprintf("数据库连接失败: %v", err))
	}
	return ec
}

func NewDB(c DatabaseConf) (*ent.Client, error) {
	dsn := fmt.Sprintf("postgresql://%s:%s@%s:%d/%s?sslmode=disable",
		c.User, c.Password, c.Host, c.Port, c.Dbname,
	)

	db, err := sql.Open("pgx", dsn)
	if err != nil {
		return nil, err
	}

	if err := db.Ping(); err != nil {
		return nil, fmt.Errorf("ping db: %w", err)
	}

	rawDB = db
	drv := entsql.OpenDB(dialect.Postgres, db)
	return ent.NewClient(ent.Driver(drv)), nil
}

// EnsureDB 若目标数据库不存在则自动创建（先连 postgres 维护库做检查/创建）
func EnsureDB(c DatabaseConf) error {
	maintenanceDSN := fmt.Sprintf("postgresql://%s:%s@%s:%d/%s?sslmode=disable",
		c.User, c.Password, c.Host, c.Port, "postgres")
	sqlDB, err := sql.Open("pgx", maintenanceDSN)
	if err != nil {
		return err
	}
	defer sqlDB.Close()

	var exists bool
	if err := sqlDB.QueryRow(
		`SELECT EXISTS(SELECT 1 FROM pg_database WHERE datname = $1)`, c.Dbname,
	).Scan(&exists); err != nil {
		return err
	}

	if exists {
		return nil
	}

	if _, err := sqlDB.Exec(`CREATE DATABASE "` + c.Dbname + `"`); err != nil {
		return err
	}
	slog.Info("已自动创建数据库 " + c.Dbname)
	return nil
}

// AutoMigrate 启动时自动建表/迁移
func AutoMigrate(client *ent.Client) error {
	ctx := contextBackdrop()
	if err := client.Schema.Create(ctx); err != nil {
		return fmt.Errorf("自动迁移失败: %w", err)
	}
	// ent 的 Schema.Create 只会"建新表"，不会给已存在的表补列（本项目已知约束）。
	// 新增字段统一在此以幂等 DDL 补齐（ADD COLUMN IF NOT EXISTS 可重复执行）。
	applyColumnPatches(ctx)
	// 清理历史独立装箱表：装箱已合并到统一的出库主表 OutboundOrder，
	// 原 package_boxes 表成为孤儿表，此处幂等删除（DROP TABLE IF EXISTS 可重复执行）。
	if rawDB != nil {
		if _, err := rawDB.ExecContext(ctx, "DROP TABLE IF EXISTS package_boxes"); err != nil {
			slog.Warn("清理旧装箱表 package_boxes 失败(可忽略): " + err.Error())
		} else {
			slog.Info("已清理旧装箱表 package_boxes")
		}
	}
	slog.Info("数据库迁移完成")
	return nil
}

// applyColumnPatches 幂等补齐已有表的新增列。
// 背景：ent 的 Schema.Create 对已存在表不会 ADD COLUMN，故新增字段必须在此登记，
// 否则新库正常、存量库缺列导致运行时 500。
func applyColumnPatches(ctx context.Context) {
	if rawDB == nil {
		return
	}
	stmts := []string{
		// P0-2 不合格品处置（问题记录 L135-145）
		`ALTER TABLE inspection_records ADD COLUMN IF NOT EXISTS disposal_type text NOT NULL DEFAULT 'NONE'`,
		`ALTER TABLE inspection_records ADD COLUMN IF NOT EXISTS disposal_remark text`,
		`ALTER TABLE inspection_records ADD COLUMN IF NOT EXISTS return_tracking_no text`,
		// D5 区域库位：货架号 / 第几层 / 位置号（手填）
		`ALTER TABLE zones ADD COLUMN IF NOT EXISTS shelf_no text`,
		`ALTER TABLE zones ADD COLUMN IF NOT EXISTS layer_no text`,
		`ALTER TABLE zones ADD COLUMN IF NOT EXISTS position_no text`,
		// D6 其他入库：归属（工单号/科技项目号/无）
		`ALTER TABLE inbound_orders ADD COLUMN IF NOT EXISTS ownership_type text NOT NULL DEFAULT 'none'`,
		`ALTER TABLE inbound_orders ADD COLUMN IF NOT EXISTS ownership_no text`,
		// 缺货预警：物料安全库存
		`ALTER TABLE materials ADD COLUMN IF NOT EXISTS safety_stock bigint NOT NULL DEFAULT 0`,
		// 备料台账：目标工位（备料送到哪个装配工位）
		`ALTER TABLE order_material_ledgers ADD COLUMN IF NOT EXISTS target_station text`,
		// 备料台账：完成时间（最后一笔出库时间，问题记录 六.10）
		`ALTER TABLE order_material_ledgers ADD COLUMN IF NOT EXISTS completed_at bigint`,
		// 通用出库：出库类别/归属/目标工位（问题记录 二.2/二.3/二.4）
		`ALTER TABLE outbound_orders ADD COLUMN IF NOT EXISTS outbound_category text`,
		`ALTER TABLE outbound_orders ADD COLUMN IF NOT EXISTS ownership_type text`,
		`ALTER TABLE outbound_orders ADD COLUMN IF NOT EXISTS ownership_no text`,
		`ALTER TABLE outbound_orders ADD COLUMN IF NOT EXISTS target_station text`,
		// 库存明细：库位贯通 货架/层/位置（问题记录 一.4）
		`ALTER TABLE inventories ADD COLUMN IF NOT EXISTS shelf_no text`,
		`ALTER TABLE inventories ADD COLUMN IF NOT EXISTS layer_no text`,
		`ALTER TABLE inventories ADD COLUMN IF NOT EXISTS position_no text`,
		// 半成品/成品入库扩展（问题记录 L218/L222/L224/L230）
		`ALTER TABLE inventories ADD COLUMN IF NOT EXISTS ownership_type text`,
		`ALTER TABLE inventories ADD COLUMN IF NOT EXISTS ownership_no text`,
		`ALTER TABLE inventories ADD COLUMN IF NOT EXISTS product_status text`,
		`ALTER TABLE inventories ADD COLUMN IF NOT EXISTS related_standard text`,
		`ALTER TABLE inventories ADD COLUMN IF NOT EXISTS test_record_no text`,
		`ALTER TABLE inventories ADD COLUMN IF NOT EXISTS recorded_by text`,
		`ALTER TABLE inventories ADD COLUMN IF NOT EXISTS recorded_at bigint`,
		`ALTER TABLE inventories ADD COLUMN IF NOT EXISTS outbound_reason text`,
		// 检验记录扩展（问题记录 L107/L149/L150/L494：归属/相关标准/生产厂家/名称冗余）
		`ALTER TABLE inspection_records ADD COLUMN IF NOT EXISTS material_name text`,
		`ALTER TABLE inspection_records ADD COLUMN IF NOT EXISTS ownership_type text`,
		`ALTER TABLE inspection_records ADD COLUMN IF NOT EXISTS ownership_no text`,
		`ALTER TABLE inspection_records ADD COLUMN IF NOT EXISTS related_standard text`,
		`ALTER TABLE inspection_records ADD COLUMN IF NOT EXISTS manufacturer text`,
		// 入库单质量状态（问题记录 L129：入库记录增加 合格/不合格 列）
		`ALTER TABLE inbound_orders ADD COLUMN IF NOT EXISTS quality_status text`,
		// 入库单库位四级贯通（方案 E）：区域已有 zone_code，补货架/层/位置三列
		`ALTER TABLE inbound_orders ADD COLUMN IF NOT EXISTS shelf_no text`,
		`ALTER TABLE inbound_orders ADD COLUMN IF NOT EXISTS layer_no text`,
		`ALTER TABLE inbound_orders ADD COLUMN IF NOT EXISTS position_no text`,
		// 图号合并（问题记录 L18）：drawing_no 已并入 code，存量库丢弃旧列
		`ALTER TABLE materials DROP COLUMN IF EXISTS drawing_no`,
		// 「简称」已按 2026-09-19 用户裁决整体删除（新增/编辑表单不再出现），存量库丢弃旧列
		`ALTER TABLE materials DROP COLUMN IF EXISTS short_name`,
		// 批次号/SN 唯一约束（P2-1/P2-2）：并发导入防撞号。部分唯一索引只约束非空值——
		// 空串/NULL（电气件无批次、结构件无SN）不参与唯一性；batch_no 仅约束结构件(manage_mode=1)。
		// 注：存量若有重复数据会导致建索引失败（仅告警不阻断启动），上线前须先清理重复。
		`CREATE UNIQUE INDEX IF NOT EXISTS ux_inventories_batch_no ON inventories (batch_no) WHERE manage_mode = 1 AND batch_no IS NOT NULL AND batch_no <> ''`,
		`CREATE UNIQUE INDEX IF NOT EXISTS ux_inventories_sn_code ON inventories (sn_code) WHERE sn_code IS NOT NULL AND sn_code <> ''`,
		// 区域库位父子层级重构（统一主表 + 层级类型字段 level/code/name/parent_code）：
		// 在扁平 zones 表上加层级列，把"一行一货位"升级为 区域(level1)→货架(level2)→层(level3)→位置号(level4) 父子结构。
		`ALTER TABLE zones ADD COLUMN IF NOT EXISTS level integer NOT NULL DEFAULT 4`,
		`ALTER TABLE zones ADD COLUMN IF NOT EXISTS code text`,
		`ALTER TABLE zones ADD COLUMN IF NOT EXISTS name text`,
		`ALTER TABLE zones ADD COLUMN IF NOT EXISTS parent_code text`,
		// 删 ent 旧生成的 zone_code 单列唯一索引与旧组合索引，改建层级节点唯一索引（防同层级同父下编码重复）
		`DROP INDEX IF EXISTS zones_zone_code_key`,
		`DROP INDEX IF EXISTS ux_zones_location`,
		`CREATE UNIQUE INDEX IF NOT EXISTS ux_zones_node ON zones (level, zone_code, COALESCE(shelf_no, ''), COALESCE(layer_no, ''), code)`,
		// 存量数据回填（幂等，可重复执行）：扁平货位 → 父子层级
		// 1) 纯区域行（无货架/层/位置）→ 区域节点(level1)
		`UPDATE zones SET level = 1, code = zone_code, parent_code = '' WHERE (shelf_no IS NULL OR shelf_no = '') AND (layer_no IS NULL OR layer_no = '') AND (position_no IS NULL OR position_no = '') AND (code IS NULL OR code = '')`,
		// 2) 货位行（有 position_no）→ 位置节点(level4)，parent_code 取层号（默认位置 layer_no 为空）
		`UPDATE zones SET level = 4, code = position_no, parent_code = COALESCE(layer_no, ''), name = COALESCE(name, '') WHERE position_no IS NOT NULL AND position_no <> '' AND (code IS NULL OR code = '')`,
		// 3) 补货架节点(level2)：从货位行去重得到 (zone_code, shelf_no)
		`INSERT INTO zones (level, code, parent_code, zone_code, shelf_no, status, created_at, updated_at)
		   SELECT DISTINCT 2, z.shelf_no, z.zone_code, z.zone_code, z.shelf_no, '启用', EXTRACT(EPOCH FROM NOW())::bigint, EXTRACT(EPOCH FROM NOW())::bigint
		   FROM zones z WHERE z.shelf_no IS NOT NULL AND z.shelf_no <> ''
		     AND NOT EXISTS (SELECT 1 FROM zones s WHERE s.level = 2 AND s.zone_code = z.zone_code AND s.code = z.shelf_no)`,
		// 4) 补层节点(level3)：从货位行去重得到 (zone_code, shelf_no, layer_no)
		`INSERT INTO zones (level, code, parent_code, zone_code, shelf_no, layer_no, status, created_at, updated_at)
		   SELECT DISTINCT 3, z.layer_no, z.shelf_no, z.zone_code, z.shelf_no, z.layer_no, '启用', EXTRACT(EPOCH FROM NOW())::bigint, EXTRACT(EPOCH FROM NOW())::bigint
		   FROM zones z WHERE z.layer_no IS NOT NULL AND z.layer_no <> ''
		     AND NOT EXISTS (SELECT 1 FROM zones l WHERE l.level = 3 AND l.zone_code = z.zone_code AND l.shelf_no = z.shelf_no AND l.code = z.layer_no)`,
		// U18 盘点四级贯通：盘点快照冻结货架/层/位置，盘点差异可精确定位到货位。
		`ALTER TABLE stocktake_items ADD COLUMN IF NOT EXISTS shelf_no text`,
		`ALTER TABLE stocktake_items ADD COLUMN IF NOT EXISTS layer_no text`,
		`ALTER TABLE stocktake_items ADD COLUMN IF NOT EXISTS position_no text`,
		// 接驳台是独立主数据（不依附工位）：产线/库房/其他三类；与工位 1:1 绑定。
		// 部分唯一索引只约束产线接驳台（station_no > 0），库房/其他(station_no=0)不参与。
		`CREATE UNIQUE INDEX IF NOT EXISTS ux_docks_station_no ON docks (station_no) WHERE station_no > 0`,
		// 入库作废（2026-09-19）：入库单可作废，记录原因/人/时间；库存回滚后单仍保留供追溯
		`ALTER TABLE inbound_orders ADD COLUMN IF NOT EXISTS voided boolean NOT NULL DEFAULT false`,
		`ALTER TABLE inbound_orders ADD COLUMN IF NOT EXISTS void_reason text`,
		`ALTER TABLE inbound_orders ADD COLUMN IF NOT EXISTS voided_by text`,
		`ALTER TABLE inbound_orders ADD COLUMN IF NOT EXISTS voided_at bigint`,
		// 附件：新存储方案（年/月/日/文件类型/uuid.ext）——补文件类型/UUID名/相对路径/逻辑删除/归档列
		`ALTER TABLE attachments ADD COLUMN IF NOT EXISTS file_type text`,
		`ALTER TABLE attachments ADD COLUMN IF NOT EXISTS file_ext text`,
		`ALTER TABLE attachments ADD COLUMN IF NOT EXISTS file_md5 text`,
		`ALTER TABLE attachments ADD COLUMN IF NOT EXISTS archived boolean NOT NULL DEFAULT false`,
		`ALTER TABLE attachments ADD COLUMN IF NOT EXISTS archived_at bigint`,
		`ALTER TABLE attachments ADD COLUMN IF NOT EXISTS deleted boolean NOT NULL DEFAULT false`,
		`ALTER TABLE attachments ADD COLUMN IF NOT EXISTS deleted_at bigint`,
		`ALTER TABLE attachments ADD COLUMN IF NOT EXISTS deleted_by text`,
	}
	for _, s := range stmts {
		if _, err := rawDB.ExecContext(ctx, s); err != nil {
			slog.Warn("补齐列失败(可忽略): " + err.Error())
		}
	}
}