#pragma once
#include <vector>
#include <map>
#include "optional.h"
#include "rect.h"
#include <iostream>
using namespace std;

namespace LEF
{

struct via
{
    int m1;
    rect viaRect;
    rect m1Rect;
    rect m2Rect;
};

struct metal
{
    int ID;
    float minWidth;
    float maxNeedWidth=0.6;
    float spacing;
    float area=-1; //-1为无约束
    bool vertical; //false为horizontal

    qstring getName() { return "METAL"+qstring::number(ID); }
    bool operator==(const metal &m) { return this->ID==m.ID; }
    bool operator!=(const metal &m) { return this->ID!=m.ID; }
};

struct pin
{
    qstring name;
    LEF::metal metal;
    vector<pinRect> allRect;

    void setToLayout(float setX, float setY, qstring dire)
    {
        for(pinRect &r : this->allRect)
            r.setToLayout(setX,setY,dire);
    }
};

typedef map<qstring,vector<rect>> obs; //金属,obs块

struct cell
{
    qstring cellName;
    qstring instName; //用于在layout中反查使用
    float sizeA1;
    float sizeA2;
    float setX=-1;
    float setY=-1;
    vector<pin> allPin;
    obs o;

    void setToLayout(float setX, float setY, qstring dire="N")
    {
        this->setX=setX;
        this->setY=setY;
        for(pin &p : this->allPin)
            p.setToLayout(setX,setY,dire);
        for(auto &p : this->o)
        {
            vector<rect> &allRect=p.second;
            for(rect &r : allRect)
                r.setToLayout(setX,setY,dire);
        }
    }

    void setDire(qstring dire) //禁止在未调用setToLayout的情况下调用
    {
        this->setToLayout(this->setX,this->setY,dire);
    }

    void plusDbu(int dbu)
    {
        sizeA1*=dbu;
        sizeA2*=dbu;
    }
};

}


class line
{
public:
    float x1;
    float y1;
    float x2;
    float y2;
    LEF::metal metal;
    float startPosX;
    float startPosY;
    float endPosX;
    float endPosY;
    float width;

    line(){}
    line(float x1,float y1,float x2,float y2,LEF::metal metal,
         float startPosX, float startPosY, float endPosX, float endPosY,float width=-1) :
        x1(x1), y1(y1), x2(x2), y2(y2), metal(metal),
        startPosX(startPosX), startPosY(startPosY), endPosX(endPosX), endPosY(endPosY)
    {
        if(width==-1)
            this->width=metal.minWidth;
        else
            this->width=width;

        if(this->y1<1 || this->y2<1 ||this->x1<1 || this->x2<1)
            cout<<y2<<endl;
    }

    line(float x,float y,float y2,LEF::metal metal,
         float startPosX, float startPosY, float endPosX, float endPosY,bool isVertical=true,float width=-1) :
        metal(metal), startPosX(startPosX), startPosY(startPosY), endPosX(endPosX), endPosY(endPosY)
    {
        if(width==-1)
            this->width=metal.minWidth;
        else
            this->width=width;

        float w=this->width/2;
        if(isVertical)
        {
            this->x1=x-w; //x是左边的
            this->x2=x+w;
            this->y1=y;
            this->y2=y2;
        }
        else //x y反转
        {
            this->y1=x-w; //x是下边的
            this->y2=x+w;
            this->x1=y;
            this->x2=y2;
        }

        if(this->y1<1 || this->y2<1 || this->x1<1 || this->x2<1)
            cout<<y<<endl;
    }

    rect toRect()
    {
        return rect(pos(x1,y1),pos(x2,y2));
    }

    optional<rect> checkPinRect(LEF::cell &c, pinRect* r1, pinRect* r2)
    {
        //检查pin里的rect
        for(LEF::pin &p : c.allPin)
        {
            if(p.metal==this->metal)
            {
                for(pinRect &r : p.allRect)
                {
                    if(&r==r1 || &r==r2)
                        continue;
                    if(r.isIntersect(this->toRect(),this->metal.spacing,this->width))
                        return r;
                }
            }
        }
        return optional<rect>();
    }

    optional<rect> checkOBS(LEF::cell &c)
    {
        qstring metalName=this->metal.getName();

        //检查obs
        if (!(c.o.find(metalName) == c.o.end())) //这一层存在obs
        {
            vector<rect> &allRect=c.o[metalName];
            for(rect r : allRect)
            {
                if(r.isIntersect(this->toRect(),this->metal.spacing,this->width))
                    return r;
            }
        }

        return optional<rect>();
    }

    tuple<float,float> getCrossCenter(rect l)
    {
        float x,y;
        //计算中心坐标
        float this_center_x = (this->x1 + this->x2)/2;
        float this_center_y = (this->y1 + this->y2)/2;
        float l_center_x    = (l.p1.x     + l.p2.x    )/2;
        float l_center_y    = (l.p1.y     + l.p2.y    )/2;
        //中心的相对位置
        float location_x = this_center_x - l_center_x;
        float location_y = this_center_y - l_center_y;
        //根据相对位置判断相交区域
        if((location_x > 0) && (location_y > 0))    //this在右上
        {
            x = (l.p2.x + this->x1)/2;
            y = (l.p2.y + this->y1)/2;
        }
        else if((location_x < 0) && (location_y > 0))   //在左上
        {
            x = (l.p1.x + this->x2)/2;
            y = (l.p2.y + this->y1)/2;
        }
        else if((location_x > 0) && (location_y < 0))   //在右下
        {
            x = (l.p2.x + this->x1)/2;
            y = (l.p1.y + this->y2)/2;
        }
        else   //在左下
        {
            x = (l.p1.x + this->x2)/2;
            y = (l.p1.y + this->y2)/2;
        }

        return make_tuple(x,y);
    }
	
    tuple<float,float> getCrossCenter(line &l)
    {
        return this->getCrossCenter(rect(pos(l.x1,l.y1),pos(l.x2,l.y2)));
    }

    tuple<pos,pos> getMidLine()
    {
        float dx=this->x2-this->x1;
        float dy=this->y2-this->y1;
        if(dx<dy)
        {
            if(this->y1<1)
                cout<<y1<<endl;

            float xMid=(x2+x1)/2;
            return make_tuple(pos(xMid,this->y1),pos(xMid,this->y2));
        }
        else
        {
            float yMid=(y2+y1)/2;

            if(yMid<1)
                cout<<yMid<<endl;

            return make_tuple(pos(this->x1,yMid),pos(this->x2,yMid));
        }
    }

    void expendCrossRegion(line &l)
    {
        //计算中心坐标
        float this_center_x = (this->x1 + this->x2)/2;
        float this_center_y = (this->y1 + this->y2)/2;
        float l_center_x    = (l.x1     + l.x2    )/2;
        float l_center_y    = (l.y1     + l.y2    )/2;
        //中心的相对位置
        float location_x = this_center_x - l_center_x;
        float location_y = this_center_y - l_center_y;
        //计算长宽
        float this_x = this->x2 - this->x1;
        float this_y = this->y2 - this->y1;
        //根据相对位置判断相交区域
        if((location_x > 0) && (location_y > 0))    //this在右上
        {
            if(this_x > this_y) //this横l竖
            {
                this->x1 = l.x1    ;
                l.y2     = this->y2;
            }
            else    //this竖l横
            {
                this->y1 = l.y1    ;
                l.x2     = this->x2;
            }
        }
        else if((location_x < 0) && (location_y > 0))   //在左上
        {
            if(this_x > this_y) //this横l竖
            {
                this->x2 = l.x2    ;
                l.y2     = this->y2;
            }
            else    //this竖l横
            {
                this->y1 = l.y1    ;
                l.x1     = this->x1;
            }
        }
        else if((location_x > 0) && (location_y < 0))   //在右下
        {
            if(this_x > this_y) //this横l竖
            {
                this->x1 = l.x1    ;
                l.y1     = this->y1;
            }
            else    //this竖l横
            {
                this->y2 = l.y2    ;
                l.x2     = this->x2;
            }
        }
        else   //在左下
        {
            if(this_x > this_y) //this横l竖
            {
                this->x2 = l.x2    ;
                l.y1     = this->y1;
            }
            else    //this竖l横
            {
                this->y2 = l.y2    ;
                l.x1     = this->x1;
            }
        }
    }
};