#include<bits/stdc++.h>
using namespace std;

const int maxm=1e6+5, maxn=1e5+5, B=400;

int n;
int fa[20][maxn], dep[maxn], rk[maxn], lg[maxn], bl[maxn], ed[maxn];
vector<int> g[maxn], D[maxn], wn[maxn][20];

int lca(int u,int v) {
    if(dep[u]<dep[v]) swap(u,v);
    for(int i=19;i>=0;i--) if(dep[fa[i][u]]>=dep[v]) u=fa[i][u];
    if(u==v) return u;
    for(int i=19;i>=0;i--) if(fa[i][u]!=fa[i][v]) u=fa[i][u], v=fa[i][v];
    return fa[0][u];
}

void dfs(int x) {
    dep[x]=dep[fa[0][x]]+1;
    D[dep[x]].push_back(x);
    rk[x]=D[dep[x]].size()-1;
    for(int y:g[x]) dfs(y);
    return ;
}

int ask(int id,int l,int r) {
    int k=lg[r-l];
    return max(wn[id][k][l],wn[id][k][r-(1<<k)]);
}

struct node {
    int l;
    int r;
    int x;
    int id;
}e[maxm];

int ans[maxm];

bool cmp(node x,node y) {
    if(bl[x.l]!=bl[y.l]) return bl[x.l]<bl[y.l];
    return x.r<y.r;
}

int vis[maxn], pre[maxn], nxt[maxn];

struct Block {
    int s[maxn], s2[maxn];
    void add(int x,int v) {
        s[x]+= v, s2[bl[x]]+= v;
        return ;
    }
    int ask(int x) {
        int res=0;
        for(int i=1;i<bl[x];i++) res+= s2[i];
        for(int i=ed[bl[x]-1]+1;i<=x;i++) res+= s[i];
        return res;
    }
    void init() {
        for(int i=1;i<=n;i++) s[i]=s2[i]=0;
        return ;
    }
}T;

void add(int x,int o) {
    int v=0;
    if(!pre[x]&&!nxt[x]) v=dep[x];
    else if(!pre[x]) v=dep[x]-ask(dep[x],rk[x],rk[nxt[x]]);
    else if(!nxt[x]) v=dep[x]-ask(dep[x],rk[pre[x]],rk[x]);
    else v=dep[x]-max(ask(dep[x],rk[x],rk[nxt[x]]),ask(dep[x],rk[pre[x]],rk[x]));
    T.add(1,o), T.add(v,-o);
    return ;
}

struct node2 {
    int l;
    int m;
    int r;
};

vector<int> vec;

void del(int x,int t) {
    add(x,-1);
    if(!pre[x]&&!nxt[x]) ;
    else if(!pre[x]) {
        if(t) vec.push_back(x);
        pre[nxt[x]]=0;
    } else if(!nxt[x]) {
        if(t) vec.push_back(x);
        nxt[pre[x]]=0;
    } else {
        if(t) vec.push_back(x);
        nxt[pre[x]]=nxt[x];
        pre[nxt[x]]=pre[x];
    }
    return ;
}

int main() {
    ios::sync_with_stdio(false);
    cin.tie(0), cout.tie(0);
    int m; cin>>n>>m;
    int rt=0;
    for(int i=1;i<=n;i++) {
        cin>>fa[0][i];
        if(!fa[0][i]) rt=i;
        else g[fa[0][i]].push_back(i);
    }
    for(int i=1;i<20;i++) {
        for(int j=1;j<=n;j++) {
            fa[i][j]=fa[i-1][fa[i-1][j]];
        }
    }
    dfs(rt);
    for(int i=2;i<=n;i++) lg[i]=lg[i>>1]+1;
    for(int i=1;i<=n;i++) {
        if(!D[i].size()) continue;
        int sz=D[i].size()-1;
        wn[i][0].resize(sz);
        for(int j=0;j<sz;j++) wn[i][0][j]=dep[lca(D[i][j],D[i][j+1])];
        for(int j=1;(1<<j)<=sz;j++) {
            wn[i][j].resize(sz);
            for(int k=0;k+(1<<j)<=sz;k++) wn[i][j][k]=min(wn[i][j-1][k],wn[i][j-1][k+(1<<j-1)]);
        }
    }
    for(int i=1;i<=n;i++) bl[i]=(i-1)/B+1, ed[bl[i]]=i;
    for(int i=1;i<=m;i++) {
        cin>>e[i].l>>e[i].r>>e[i].x;
        e[i].id=i;
    }
    sort(e+1,e+m+1,cmp);
    int j=1;
    for(int i=1;i<=bl[n];i++) {
        int R=j;
        while(bl[e[R].l]==i) ++R;
        int l=ed[i-1]+1, r=n;
        for(int k=l;k<=r;k++) vis[k]=1;
        for(int k=1;k<=n;k++) {
            int lst=0;
            for(auto x:D[k]) if(vis[x]) pre[x]=lst, nxt[lst]=x, lst=x, add(x,1);
        }
        for(int k=R-1;k>=j;k--) {
            while(r>e[k].r) del(r--,0);
            while(l<e[k].l) del(l++,1);
            ans[e[k].id]=T.ask(e[k].x);
            while(vec.size()) {
                int x=vec.back(); vec.pop_back();
                nxt[pre[x]]=pre[nxt[x]]=x;
                add(x,1);
            }
            l=ed[i-1]+1;
        }
        j=R;
        for(int k=1;k<=n;k++) pre[k]=nxt[k]=vis[k]=0;
        T.init();
    }
    for(int i=1;i<=m;i++) cout<<ans[i]<<'\n';
    return 0;
}