BSOJ 4490 避难向导

#include<iostream>
#include<iomanip>
#include<cstring>
#include<cstdio>
#include<cmath>
#include<algorithm>
using namespace std;
#define INF 0x3f3f3f3f
#define int long long
inline int read() {
    char ch;
    bool bj=0;
    while(!isdigit(ch=getchar()))
        bj|=(ch==‘-‘);
    int res=ch^(3<<4);
    while(isdigit(ch=getchar()))
        res=(res<<1)+(res<<3)+(ch^(3<<4));
    return bj?-res:res;
}
void printnum(int x) {
    if(x>9)printnum(x/10);
    putchar(x%10+‘0‘);
}
inline void print(int x,char ch) {
    if(x<0) {
        putchar(‘-‘);
        x=-x;
    }
    printnum(x);
    putchar(ch);
}
const int MAXN=1e5+5;
int n,m,A,B,C,p[MAXN][30],cnt,h[MAXN],g[MAXN][30],log_2[MAXN],dep[MAXN];
int d1[MAXN],d2[MAXN],s[MAXN];
struct Edge {
    int to,nxt,v;
} w[MAXN<<1];
inline void AddEdge(int x,int y,int z) {
    w[++cnt].to=y;
    w[cnt].nxt=h[x];
    w[cnt].v=z;
    h[x]=cnt;
}
void DFS(int x,int fa,int d[],int depth) {
    d[x]=depth;
    for(int i=h[x]; i; i=w[i].nxt) {
        int v=w[i].to;
        if(v==fa)continue;
        DFS(v,x,d,depth+w[i].v);
    }
}
void DFS1(int x,int fa,int depth) {
    p[x][0]=fa;
    g[x][0]=s[fa];
    dep[x]=depth;
    for(int i=h[x]; i; i=w[i].nxt) {
        int v=w[i].to;
        if(v==fa)continue;
        DFS1(v,x,depth+1);
    }
}
inline void Init() {//预处理出d[i]和s[i] 
    int st,ed,maxn=-INF;
    DFS(1,0,d1,0);//从任意节点开始DFS 
    for(int i=1; i<=n; i++)
        if(maxn<d1[i]) {
            maxn=d1[i];
            st=i;//找到直径一端 
        }
    DFS(st,0,d1,0);//从一端DFS
    maxn=-INF;
    for(int i=1; i<=n; i++)
        if(maxn<d1[i]) {
            maxn=d1[i];
            ed=i;//找到直径另一端
        }
    DFS(ed,0,d2,0);//从另一端DFS
    for(int i=1; i<=n; i++) {
        d1[i]=max(d1[i],d2[i]);//取max 
        s[i]=(d1[i]+A)*B%C;
    }
}
inline void ST() {//倍增预处理 
    for(int j=1; j<=log_2[n]; j++)
        for(int i=1; i<=n; i++)
            if(p[i][j-1]) {
                p[i][j]=p[p[i][j-1]][j-1];
                g[i][j]=max(g[i][j-1],g[p[i][j-1]][j-1]);
            }
}
inline int LCA(int x,int y) {//倍增LCA 
    if(dep[x]<dep[y])swap(x,y);
    for(int i=log_2[dep[x]]; ~i; i--)
        if(dep[x]-(1<<i)>=dep[y])x=p[x][i];
    if(x==y)return x;
    for(int i=log_2[dep[x]]; ~i; i--)
        if(p[x][i]&&p[y][i]&&p[x][i]!=p[y][i]) {
            x=p[x][i];
            y=p[y][i];
        }
    return p[x][0];
}
inline int Askx(int x,int k,int q) {//左链的Ask函数，与定义一样 
    if(!k)return g[x][k]>=q?p[x][0]:-1;
    if(g[x][k]>=q) {
        int tmp=Askx(x,k-1,q);
        return tmp!=-1?tmp:Askx(p[x][k-1],k-1,q);
    }
    return -1;
}
inline int Asky(int x,int k,int q) {//同上 
    if(!k)return g[x][k]>=q?p[x][0]:-1;
    if(g[x][k]>=q) {
        int tmp=Asky(p[x][k-1],k-1,q);
        return tmp!=-1?tmp:Asky(x,k-1,q);
    }
    return -1;
}
signed main() {
    n=read();
    m=read();
    A=read();
    B=read();
    C=read();
    for(int i=2; i<=n; i++)log_2[i]=log_2[i>>1]+1;
    int x,y,z;
    for(int i=1; i<n; i++) {
        x=read();
        y=read();
        z=read();
        AddEdge(x,y,z);
        AddEdge(y,x,z);
    }
    Init();
    DFS1(1,0,1);
    ST();
    while(m--) {
        x=read();
        y=read();
        z=read();
        if(s[x]>=z) {//特判x 
            print(x,‘\n‘);
            continue;
        }
        int u=LCA(x,y),ans=-1,tmpy=y;
        for(int i=log_2[dep[x]]; ~i; i--)
            if(dep[x]-(1<<i)>=dep[u]) {//二进制拆分 
                ans=Askx(x,i,z);
                if(ans!=-1) {//有答案直接输出 
                    print(ans,‘\n‘);
                    break;
                }
                x=p[x][i];
            }
        if(ans!=-1)continue;
        for(int i=log_2[dep[y]]; ~i; i--)
            if(dep[y]-(1<<i)>=dep[u]) {//二进制拆分 
                int r=Asky(y,i,z);
                if(ans==-1||(r!=-1&&dep[r]<dep[ans]))ans=r;//有答案不能直接输出，换成更新当前答案 
                y=p[y][i];
            }
        if(ans==-1)print(s[tmpy]>=z?tmpy:-1,‘\n‘);
        else print(ans,‘\n‘);
    }
    return 0;
}