【bzoj 3669】[Noi2014]魔法森林

Description

为了得到书法大家的真传，小E同学下定决心去拜访住在魔法森林中的隐士。魔法森林可以被看成一个包含个N节点M条边的无向图，节点标号为1..N，边标号为1..M。初始时小E同学在号节点1，隐士则住在号节点N。小E需要通过这一片魔法森林，才能够拜访到隐士。

魔法森林中居住了一些妖怪。每当有人经过一条边的时候，这条边上的妖怪就会对其发起攻击。幸运的是，在号节点住着两种守护精灵：A型守护精灵与B型守护精灵。小E可以借助它们的力量，达到自己的目的。

只要小E带上足够多的守护精灵，妖怪们就不会发起攻击了。具体来说，无向图中的每一条边Ei包含两个权值Ai与Bi。若身上携带的A型守护精灵个数不少于Ai，且B型守护精灵个数不少于Bi，这条边上的妖怪就不会对通过这条边的人发起攻击。当且仅当通过这片魔法森林的过程中没有任意一条边的妖怪向小E发起攻击，他才能成功找到隐士。

由于携带守护精灵是一件非常麻烦的事，小E想要知道，要能够成功拜访到隐士，最少需要携带守护精灵的总个数。守护精灵的总个数为A型守护精灵的个数与B型守护精灵的个数之和。

Input

第1行包含两个整数N,M，表示无向图共有N个节点，M条边。 接下来M行，第行包含4个正整数Xi,Yi,Ai,Bi，描述第i条无向边。其中Xi与Yi为该边两个端点的标号，Ai与Bi的含义如题所述。 注意数据中可能包含重边与自环。

Output

输出一行一个整数：如果小E可以成功拜访到隐士，输出小E最少需要携带的守护精灵的总个数；如果无论如何小E都无法拜访到隐士，输出“-1”（不含引号）。

Sample Input

【输入样例1】
4 5
1 2 19 1
2 3 8 12
2 4 12 15
1 3 17 8
3 4 1 17

【输入样例2】
3 1
1 2 1 1

Sample Output

【输出样例1】
32
【样例说明1】
如果小E走路径1→2→4，需要携带19+15=34个守护精灵；
如果小E走路径1→3→4，需要携带17+17=34个守护精灵；
如果小E走路径1→2→3→4，需要携带19+17=36个守护精灵；
如果小E走路径1→3→2→4，需要携带17+15=32个守护精灵。
综上所述，小E最少需要携带32个守护精灵。

【输出样例2】
-1
【样例说明2】
小E无法从1号节点到达3号节点，故输出-1。

HINT

2<=n<=50,000；0<=m<=100,000；1<=ai ,bi<=50,000

因为在access时忘了up调了一个晚上……

惨剧现场。我好菜啊。

 #include<cstdio>
 #include<cstring>
 #include<algorithm>
 #include<iostream>
 using namespace std;
 const int N=;
 const int inf=0x3f3f3f3f;
 int n,m,ans=inf,st[N];
 struct edge{int u,v,a,b;}e[N];
 struct node{int fa,c[],mx,val,p;bool rev;}tr[N];
 int read()
 {
     int x=,f=;char c=getchar();
     while(c<''||c>''){if(c=='-')f=-;c=getchar();}
     while(c>=''&&c<=''){x=x*+c-'';c=getchar();}
     return x*f;
 }
 bool cmp(edge a,edge b){return a.a<b.a;}
 int find(int k){return k==tr[k].p?k:tr[k].p=find(tr[k].p);}
 bool isroot(int k){return tr[tr[k].fa].c[]!=k&&tr[tr[k].fa].c[]!=k;}
 void up(int k)
 {
     int l=tr[k].c[],r=tr[k].c[];tr[k].mx=k;
     if(tr[tr[l].mx].val>tr[tr[k].mx].val)tr[k].mx=tr[l].mx;
     if(tr[tr[r].mx].val>tr[tr[k].mx].val)tr[k].mx=tr[r].mx;
 }
 void down(int k)
 {
     if(tr[k].rev)
     {
         int l=tr[k].c[],r=tr[k].c[];
         tr[k].rev^=;tr[l].rev^=;tr[r].rev^=;
         swap(tr[k].c[],tr[k].c[]);
     }
 }
 void rotate(int x)
 {
     int y=tr[x].fa,z=tr[y].fa,l,r;
     if(tr[y].c[]==x)l=;else l=;r=l^;
     if(!isroot(y)){if(tr[z].c[]==y)tr[z].c[]=x;else tr[z].c[]=x;}
     tr[x].fa=z;tr[y].fa=x;tr[tr[x].c[r]].fa=y;
     tr[y].c[l]=tr[x].c[r];tr[x].c[r]=y;
     up(y);up(x);
 }
 void splay(int x)
 {
     int top=;st[++top]=x;
     for(int i=x;!isroot(i);i=tr[i].fa)st[++top]=tr[i].fa;
     for(int i=top;i;i--)down(st[i]);
     while(!isroot(x))
     {
         int y=tr[x].fa,z=tr[y].fa;
         if(!isroot(y))
         {
             if((tr[y].c[]==x)^(tr[z].c[]==y))rotate(x);
             else rotate(y);
         }
         rotate(x);
     }
 }
 void acs(int x){int t=;while(x){splay(x);tr[x].c[]=t;up(x);t=x;x=tr[x].fa;}}
 void mkroot(int x){acs(x);splay(x);tr[x].rev^=;}
 void link(int x,int y){mkroot(x);tr[x].fa=y;splay(x);}
 void cut(int x,int y){mkroot(x);acs(y);splay(y);tr[x].fa=tr[y].c[]=;}
 int query(int x,int y){mkroot(x);acs(y);splay(y);return tr[y].mx;}
 int main()
 {
     n=read();m=read();
     for(int i=;i<=n;i++)tr[i].p=i;
     for(int i=;i<=m;i++){e[i].u=read();e[i].v=read();e[i].a=read();e[i].b=read();}
     sort(e+,e+m+,cmp);
     for(int i=;i<=m;i++)
     {
         int u=e[i].u,v=e[i].v,a=e[i].a,b=e[i].b;
         if(find(u)==find(v))
         {
             int t=query(u,v);
             if(tr[t].val>b){cut(t,e[t-n].u);cut(t,e[t-n].v);}
             else{if(find()==find(n))ans=min(ans,a+tr[query(,n)].val);continue;}
         }
         else tr[find(u)].p=find(v);
         tr[i+n].val=b;tr[i+n].mx=i+n;link(u,i+n);link(v,i+n);
         if(find()==find(n))ans=min(ans,a+tr[query(,n)].val);
     }
     if(ans==inf)printf("-1");
     else printf("%d\n",ans);
     return ;
 }