BZOJ4317: Atm的树

Description

Atm有一段时间在虐qtree的题目，于是，他满脑子都是tree，tree，tree……

于是，一天晚上他梦到自己被关在了一个有根树中，每条路径都有边权，一个神秘的声音告诉他，每个点到其他的点有一个距离（什么是距离不用说吧），他需要对于每个点回答：从这个点出发的第k小距离是多少；

如果atm不能回答出来，那么明天4019的闹钟将不会响，4019全寝可能就迟到了，所以atm希望你帮帮他。

Input

第一行，两个正整数n，k，表示树的点数，询问的是第几小距离；

第二~n行，每行三个正整数x，y，w，表示x和y之间有一条边，x为父亲，边权为w；

Output

n行， 每行一个数，第i行输出从i开始第k小距离

Sample Input

5 2
1 5 2
1 2 4
2 3 6
2 4 5

Sample Output

4
5
10
9
6

HINT

100% n<=15000, 边权在1~10之间，为了方便，保证1为根；

动态树分治套Treap。。。

#include<cstdio>
#include<cctype>
#include<queue>
#include<cstring>
#include<algorithm>
#define rep(i,s,t) for(int i=s;i<=t;i++)
#define dwn(i,s,t) for(int i=s;i>=t;i--)
#define ren for(int i=first[x];i;i=next[i])
using namespace std;
inline int read() {
    int x=,f=;char c=getchar();
    for(;!isdigit(c);c=getchar()) if(c=='-') f=-;
    for(;isdigit(c);c=getchar()) x=x*+c-'';
    return x*f;
}
const int maxn=;
struct Node {
    Node* ch[];
    int r,s,v;
    void maintain() {s=ch[]->s+ch[]->s+;}
}nodes[maxn*],*null=&nodes[];
int ToT;queue<Node*> Q;
Node* newnode(int v) {
    Node* o;
    if(Q.empty()) o=&nodes[++ToT];
    else o=Q.front(),Q.pop();
    o->v=v;o->s=;o->ch[]=o->ch[]=null;o->r=rand();
    return o;
}
void del(Node* &o) {Q.push(o);o=null;}
void rotate(Node* &o,int d) {
    Node* k=o->ch[d^];o->ch[d^]=k->ch[d];k->ch[d]=o;
    o->maintain();k->maintain();o=k;
}
void insert(Node* &o,int v) {
    if(o==null) o=newnode(v);
    else {
        int d=v>o->v;insert(o->ch[d],v);
        if(o->ch[d]->r>o->r) rotate(o,d^);
        else o->maintain();
    }
}
int query(Node* &o,int v) {
    if(o==null) return ;
    if(v>o->v) return query(o->ch[],v)+o->ch[]->s+;
    return query(o->ch[],v);
}
int n,m,first[maxn],next[maxn<<],to[maxn<<],dis[maxn<<],e;
void AddEdge(int w,int v,int u) {
    dis[++e]=w;to[e]=v;next[e]=first[u];first[u]=e;
    dis[++e]=w;to[e]=u;next[e]=first[v];first[v]=e;
}
int dep[maxn],mn[maxn<<][],Log[maxn<<],cnt,pos[maxn];
void dfs(int x,int fa) {
    mn[++cnt][]=dep[x];pos[x]=cnt;
    ren if(to[i]!=fa) {
        dep[to[i]]=dep[x]+dis[i];
        dfs(to[i],x);
        mn[++cnt][]=dep[x];
    }
}
void pre() {
    Log[]=-;
    rep(i,,cnt) Log[i]=Log[i>>]+;
    for(int j=;(<<j)<=cnt;j++)
       for(int i=;i+(<<j)-<=cnt;i++)
          mn[i][j]=min(mn[i][j-],mn[i+(<<j-)][j-]);
}
int dist(int x,int y) {
    int ans=dep[x]+dep[y];
    x=pos[x];y=pos[y];if(x>y) swap(x,y);
    int k=Log[y-x+];
    return ans-*min(mn[x][k],mn[y-(<<k)+][k]);
}
int f[maxn],s[maxn],vis[maxn],size,rt;
void getroot(int x,int fa) {
    s[x]=;int maxs=;
    ren if(to[i]!=fa&&!vis[to[i]]) {
        getroot(to[i],x);
        s[x]+=s[to[i]];
        maxs=max(maxs,s[to[i]]);
    }
    f[x]=max(size-s[x],maxs);
    if(f[x]<f[rt]) rt=x;
}
int fa[maxn];
void solve(int x,int F) {
    vis[x]=;fa[x]=F;
    ren if(!vis[to[i]]) {
        f[]=size=s[to[i]];getroot(to[i],rt=);
        solve(rt,x);
    }
}
Node *root[maxn],*root2[maxn];
void turn_on(int x) {
    insert(root[x],);
    for(int i=x;fa[i];i=fa[i]) {
        int D=dist(x,fa[i]);
        insert(root[fa[i]],D);
        insert(root2[i],D);
    }
}
int query(int x,int v) {
    int ans=query(root[x],++v);
    for(int i=x;fa[i];i=fa[i]) {
        int D=dist(x,fa[i]);
        ans+=query(root[fa[i]],v-D)-query(root2[i],v-D);
    }
    return ans;
}
int mark[maxn];
int main() {
    n=read();int k=read();
    rep(i,,n) root[i]=root2[i]=null;
    rep(i,,n) AddEdge(read(),read(),read());
    dfs(,);pre();
    f[]=size=n;getroot(,rt=);
    solve(rt,);
    rep(i,,n) turn_on(i);
    rep(i,,n) {
        int l=,r=<<,mid;
        while(l<r) if(query(i,mid=l+r>>)>k) r=mid; else l=mid+;
        printf("%d\n",l);
    }
    return ;
}