<?php

namespace App\Http\Controllers;

use App\CommodityMaterialBoxModel;
use App\Components\AsyncResponse;
use App\MaterialBox;
use App\Station;
use App\StationTask;
use App\StationTaskMaterialBox;
use App\Storage;
use App\StoreItem;
use App\TaskTransaction;
use Illuminate\Database\Eloquent\Builder;
use Illuminate\Support\Collection;
use Illuminate\Support\Facades\Auth;
use Illuminate\Support\Facades\DB;

class StorageController extends Controller
{
    use AsyncResponse;

    public function putShelf()
    {
        $asn = \request("asn");
        $ide = \request("ide");
        $barCode = \request("barCode");
        $amount = (int)\request("amount");
        //check info
        if (!$asn || !$ide || !$barCode || !$amount)$this->error("信息不完整");
        $fromLocation = app("MaterialBoxService")->getBoxLocation($ide);
        if (!$fromLocation)$this->error("WAS无此库位信息");
        $box = MaterialBox::query()->select("id")->where("code",$ide)->first();
        if (!$box)$this->error("WAS无此料箱");

        //库存相关信息
        /** @var Station|\stdClass $station */
        $station = Station::query()->firstOrCreate(["code"=>$fromLocation],[
            'name' => $fromLocation, 'code' => $fromLocation, 'station_type_id' => 5
        ]);
        $item = StoreItem::query()->whereHas("store",function (Builder $query){
            $query->where("asn_code",request("asn"));
        })->whereHas("commodity",function (Builder $query)use($barCode){
            $query->whereHas("barcodes",function (Builder $query)use($barCode){
                $query->where("code",$barCode);
            });
        })->first();
        //get flux
        $tasks = app("StorageService")->getFluxTask($asn,$barCode,$amount);
        if (!$tasks)$this->error("改单无上架任务或不存在");
        //此处嵌套三层事务 以最高层级为准
        DB::beginTransaction(); //总体事务 回滚WAS错误操作
        try{
            //库存记录
            if (!app("StorageService")->enterWarehouse($station->id, $box->id, $item->commodity_id ?? null, $amount, $box->material_box_model_id))$this->error("库存异常");

            DB::connection("oracle")->transaction(function ()use($tasks,$ide){ //单体嵌套事务 回滚FLUX失败任务
                foreach ($tasks as $task)if (!app("StorageService")->fluxPA($task,$ide)){
                    DB::connection("oracle")->rollBack();
                    $this->error("FLUX上架失败");
                };
            });
            DB::commit();
        }catch (\Exception $e){
            DB::rollBack();
            $this->error($e->getMessage());
        }
        //亮灯
        app("CacheShelfService")->_stationCacheLightOn($fromLocation,$ide);

        $maximum = app("CommodityMaterialBoxModelService")->getMaximum($box->material_box_model_id,$item->commodity_id ?? null);
        if ($maximum && $maximum<$amount)app("CommodityMaterialBoxModelService")->setMaximum($box->material_box_model_id,$item->commodity_id ?? null,$amount);
        $this->success(["model" => $box->material_box_model_id,"commodity" => $item->commodity_id ?? null, "maximum" => $maximum]);
    }

    public function setMaximum()
    {
        app("CommodityMaterialBoxModelService")->setMaximum(request("model"),request("commodity"),request("maximum"));
        $this->success();
    }

    /**
     * 检查最大限值并返回
     *
     */
    public function checkMaximum()
    {
        $item = StoreItem::query()->whereHas("store",function (Builder $query){
            $query->where("asn_code",request("asn"));
        })->whereHas("commodity",function (Builder $query){
            $query->whereHas("barcodes",function (Builder $query){
                $query->where("code",request("barCode"));
            });
        })->first();
        if (!$item)$this->error("WAS无此单据记录");
        $models = CommodityMaterialBoxModel::query()->where("commodity_id",$item->commodity_id)->get();
        if ($models->count()==0)$this->error("商品首入，请使用缓存架空箱入库");
        foreach ($models as $model){
            $result = app("StorageService")->getHalfBoxLocation($model,$item,request("asn"));
            if ($result){
                $result->maximum = $model->maximum-$result->amount;
                $this->success($result);
            }
        }
        $this->success(["need"=>$models[0]->maximum,"material_box_model_id"=>$models[0]->material_box_model_id,"commodity_id"=>$item->commodity_id]);
    }

    /**
     * 重置缓存架指定格口
     */
    public function resetCacheShelf()
    {
        $boxes = request("boxes");
        //清理任务
        $data = '';
        $occupy = Storage::query()->with("station:id,code")->whereIn("station_id",Station::query()->select("id")->whereIn("code",$boxes))->where("status",1)->get();
        foreach ($occupy as $item){
            unset($boxes[array_search($item->station->code,$boxes)]);
            $data .= '“'.$item->station->code.'”,';
        }
        if ($occupy->count()>0){
            $data .= "存在任务待处理,无法调取";
            $boxes = array_values($boxes);
        }
        //重新调取料箱
        $result = app("ForeignHaiRoboticsService")->paddingCacheShelf(Station::query()->whereIn("code",$boxes)->get());
        if ($result===null)$this->error("任务下发错误，检查日志");
        if ($result===false)$this->error("已无可用料箱，部分库位填充失败");
        $this->success(["data"=>$data,"boxes"=>$boxes]);
    }

    /**
     * 取得料箱
     */
    public function acquireBox()
    {
        $boxId = request("material_box_id");
        $modelId = request("material_box_model_id");
        //获取目标库位
        $station = app("StationService")->getMirrorMappingLocation(request("station"));
        if (!$station)$this->error("未知库位");
        //获取料箱
        if ($boxId && !app("MaterialBoxService")->checkUsableBox($boxId)){
            $blacklist = [$boxId];
            $boxId = null;
            //料箱存在且不可用
            $models = CommodityMaterialBoxModel::query()->where("commodity_id",request("commodity_id"))->get();
            $item = StoreItem::query()->whereHas("store",function (Builder $query){
                $query->where("asn_code",request("asn"));
            })->whereHas("commodity",function (Builder $query){
                $query->whereHas("barcodes",function (Builder $query){
                    $query->where("code",request("barCode"));
                });
            })->first();
            if (!$item)$this->error("WAS无此单据记录");
            foreach ($models as $model){
                //料箱不可用寻找新料箱
                $result = app("StorageService")->getHalfBoxLocation($model,$item,request("asn"),$blacklist);
                while ($result){
                    //料箱可用并且数量符合本次半箱数量 跳出
                    if (app("MaterialBoxService")->checkUsableBox($result->material_box_id)
                        && $model->maximum-$result->amount>=request("amount")){$boxId = $result->material_box_id;break;}
                    else $blacklist[] = $result->material_box_id;
                    //否则黑名单此料箱继续查找 直至料箱为空
                    $result = app("StorageService")->getHalfBoxLocation($model,$item,request("asn"),$blacklist);
                }
            }
        }
        //料箱不存在且该商品有过入库记录 拿取空箱
        if (!$boxId){
            if (!$modelId){
                $box = null;
                $models = CommodityMaterialBoxModel::query()->where("commodity_id",request("commodity_id"))->get();
                foreach ($models as $model){
                    $box = app("MaterialBoxService")->getAnEmptyBox([],$model->material_box_model_id);
                    if($box)break;
                }
            }else $box = app("MaterialBoxService")->getAnEmptyBox([],$modelId);
            if (!$box)$this->error("无可用料箱");
            $boxId = $box->id;
        }
        //发起取箱任务
        DB::beginTransaction();
        $collection = new Collection();
        $task = StationTask::query()->create([
            'status' => "待处理",
            'station_id' => $station->id,
        ]);
        $collection->add(StationTaskMaterialBox::query()->create([
            'station_id' => $station->id,
            'material_box_id'=>$boxId,
            'status'=>"待处理",
            'type' => '取',
            'station_task_id' => $task->id,
        ]));
        if (!app("ForeignHaiRoboticsService")->fetchGroup($station->code,$collection,'','立架出至缓存架'))$this->error("呼叫机器人失败");
        //生成临时任务事务
        TaskTransaction::query()->create([
            "doc_code" => request("asn"),
            "bar_code" => request("barCode"),
            "fm_station_id" => $station->id,
            "material_box_id" => $boxId,
            "commodity_id" => request("commodity_id"),
            "amount" => request("amount"),
            "type" => "入库",
            "user_id" => Auth::id(),
            "mark" => 1
        ]);
        DB::commit();
        //亮灯
        app("CacheShelfService")->stationLightUp($station->code,null,'2');
        $this->success();
    }

    /**
     * 溢出校正
     */
    public function overflowRevision()
    {
        $station = request("station");
        $amount = request("amount");
        //获取目标库位
        $station = app("StationService")->getMirrorMappingLocation($station);
        if (!$station)$this->error("未知库位");
        $task = TaskTransaction::query()->with("materialBox")->where("fm_station_id",$station->id)->where("amount",">",$amount)
            ->where("type","入库")->where("mark",1)->where("status",0)->first();
        if (!$task)$this->error("无任务存在");
        $task->update(["amount" => DB::raw("amount - {$amount}")]);
        $storage = Storage::query()->where("material_box_id",$task->material_box_id)->first();
        $maximum = (($storage->amount ?? 0)+$task->amount)-$amount;
        CommodityMaterialBoxModel::query()->where("material_box_model_id",$task->materialBox->material_box_model_id)
            ->where("commodity_id",$task->commodity_id)->update(["maximum"=>$maximum]);
        $this->success("校正成功");
    }
}