#pragma once
#include "bits/stdc++.h"
using namespace std;
#define all(x) begin(x), end(x)
#define sz(x) (int) (x).size()

const int mxn = 2e5+5;
const int bsz = 300; //change
const int nbk = mxn/bsz+1;

int n,m;
int fa[mxn];
int nx[mxn];
int lz[nbk];

inline int nex(int v) {
	if (lz[v/bsz] >= bsz) {
		return max(fa[v]+lz[v/bsz],0);
	}
	return nx[v];
}

inline void manual_update(int v) {
	int f = max(fa[v]+lz[v/bsz],0);
	if (f/bsz != v/bsz) {
		nx[v] = f;
	} else {
		nx[v] = nex(f);
	}
}

int lca(int a, int b) {
	while (1) {
		if (a < b) swap(a,b);
		//a > b
		int na = nex(a);
		int nb = nex(b);
		if (na != nb) {
			a = na;
		} else {
			break;
		}
	}
	while (1) {
		if (a==b) return a;
		if (a < b) swap(a,b);
		a = max(fa[a]+lz[a/bsz],0);
	}
	exit(1);
}

void quake(int l, int r, int d) {
	for (int i=l; i%bsz && i<=r; i++) {
		fa[i] -= d;
		manual_update(i);
	}
	
	int lb = (l+bsz-1)/bsz;
	int rb = r/bsz-1;
	for (int i=lb; i<=rb; i++) {
		lz[i] -= d;
		if (-lz[i] < bsz) {
			//manual update
			for (int j=i*bsz; j<(i+1)*bsz; j++) {
				manual_update(j);
			}
		}
	}
	//do right update
	if (r/bsz != l/bsz) {
		for (int i=bsz*(r/bsz); i<=r; i++) {
			fa[i] -= d;
			manual_update(i);
		}
	}
}

void rebuild(vector<int> &val) {
	set<int> ans;
	sort(all(val));
	val.erase(unique(all(val)),val.end());
	for (int i=0; i<sz(val); i++) {
		for (int j=i+1; j<sz(val); j++) {
			int R = lca(val[i],val[j]);
			int v = val[i];			
			ans.insert(R);
			while (v != R) {
				ans.insert(v);
				v = max(fa[v]+lz[v/bsz],0);
			}
			v = val[j];
			while (v != R) {
				ans.insert(v);
				v = max(fa[v]+lz[v/bsz],0);
			}
		}
	}
	cout<<sz(ans)<<"\n";
}

signed main() {
	ios::sync_with_stdio(false); cin.tie(nullptr);
	
	cin>>n>>m;
	
	for (int i=1; i<n; i++) {
		cin>>fa[i]; --fa[i];
	}
	
	//build nx
	for (int i=0; i<n; i++) {
		if (fa[i]/bsz == i/bsz) {
			nx[i] = nx[fa[i]];
		} else {
			nx[i] = fa[i];
		}
	}
	
	while (m--) {
		int t; cin>>t;
		if (t==1) {
			//quake
			int l,r,d; cin>>l>>r>>d;
			quake(l-1,r-1,d);
		} else {
			int k; cin>>k;
			vector<int> val;
			for (int i=0; i<k; i++) {
				int x; cin>>x; --x;
				val.push_back(x);
			}
			rebuild(val);
		}
	}
	
	return 0;
}