【APIO2012】bzoj2809 dispatching

Description 在一个忍者的帮派里，一些忍者们被选中派遣给顾客，然后依据自己的工作获取报偿。在这个帮派里，有一名忍者被称之为
Master。除了
Master以外，每名忍者都有且仅有一个上级。为保密，同时增强忍者们的领导力，所有与他们工作相关的指令总是由上级发送给他的直接下属，而不允许通过其他的方式发送。现在你要招募一批忍者，并把它们派遣给顾客。你需要为每个被派遣的忍者
支付一定的薪水，同时使得支付的薪水总额不超过你的预算。另外，为了发送指令，你需要选择一名忍者作为管理者，要求这个管理者可以向所有被派遣的忍者
发送指令，在发送指令时，任何忍者（不管是否被派遣）都可以作为消息的传递
人。管理者自己可以被派遣，也可以不被派遣。当然，如果管理者没有被排遣，就不需要支付管理者的薪水。你的目标是在预算内使顾客的满意度最大。这里定义顾客的满意度为派遣的忍者总数乘以管理者的领导力水平，其中每个忍者的领导力水平也是一定的。写一个程序，给定每一个忍者
i的上级 Bi，薪水Ci，领导力L i，以及支付给忍者们的薪水总预算 M，输出在预算内满足上述要求时顾客满意度的最大值。

1 ≤N ≤ 100,000 忍者的个数； 1 ≤M ≤ 1,000,000,000 薪水总预算； 0 ≤Bi < i
忍者的上级的编号； 1 ≤Ci ≤ M 忍者的薪水； 1 ≤Li ≤ 1,000,000,000
忍者的领导力水平。

Input 从标准输入读入数据。 第一行包含两个整数 N和 M，其中 N表示忍者的个数，M表示薪水的总预算。 接下来
N行描述忍者们的上级、薪水以及领导力。其中的第 i 行包含三个整 Bi , C i , L
i分别表示第i个忍者的上级，薪水以及领导力。Master满足B i = 0，并且每一个忍者的老板的编号一定小于自己的编号 Bi < i。

Output 输出一个数，表示在预算内顾客的满意度的最大值。

问题就是找一个结点，使从自己和子树中找到尽量多的节点，总的权值1和不超过m，节点数 * 自己的权值2最大。
很明显，对于一个结点，应该在子树中选择权值1尽量小的结点。
如果已经得到了某个节点所有子节点的大根堆，只需要不断删除堆顶【很显然，现在用不到的之后更不会用到】直到和不超过m，用当前堆的大小更新答案。更新完之后，只要把这个堆合并到父节点就行了。
因为涉及堆的合并，需要用到左偏树。

#include<cstdio>
#include<cstring>
#include<algorithm>
using namespace std;
#define LL long long
int que[100010],du[100010],root[100010],ls[100010],rs[100010],
hei[100010],size[100010],l[100010],fa[100010],n;
LL sum[100010],m,val[100010];
void up(int x)
{
    sum[x]=sum[ls[x]]+sum[rs[x]]+val[x];
    size[x]=size[ls[x]]+size[rs[x]]+1;
    if (ls[x]*rs[x]==0) hei[x]=0;
    else hei[x]=min(hei[ls[x]],hei[rs[x]])+1;
}
int del(int x)
{
    int i,j,k,u,v;
    if (ls[x]*rs[x]==0) return ls[x]+rs[x];
    if (val[ls[x]]<val[rs[x]]) swap(ls[x],rs[x]);
    u=ls[x];
    v=rs[x];
    ls[x]=ls[u];
    rs[x]=rs[u];
    rs[u]=v;
    ls[u]=del(x);
    up(u);
    if (hei[ls[u]]<hei[rs[u]]) swap(ls[u],rs[u]);
    return u;
}
int merge(int x,int y)
{
    int u,v;
    if (x*y==0) return x+y;
    if (val[x]<val[y]) swap(x,y);
    rs[x]=merge(rs[x],y);
    up(x);
    if (hei[ls[x]]<hei[rs[x]]) swap(ls[x],rs[x]);
    return x;
}
int main()
{
    int i,j,k,p,q,u,v,hd,tl;
    LL x,y,z,ans=0;
    scanf("%d%lld",&n,&m);
    for (i=1;i<=n;i++)
    {
        scanf("%d%lld%d",&fa[i],&val[i],&l[i]);
        sum[i]=val[i];
        root[i]=i;
        hei[i]=0;
        size[i]=1;
        du[fa[i]]++;
    }
    hd=1;
    tl=0;
    for (i=1;i<=n;i++)
      if (!du[i])
        que[++tl]=i;
    while (hd<=tl)
    {
        u=que[hd++];
        while (sum[root[u]]>m) root[u]=del(root[u]);
        ans=max(ans,(LL)l[u]*size[root[u]]);
        root[fa[u]]=merge(root[fa[u]],root[u]);
        du[fa[u]]--;
        if (!du[fa[u]]) que[++tl]=fa[u];
    }
    printf("%lld\n",ans);
}