//Author: Kevin
#include<bits/stdc++.h>
//#pragma GCC optimize("O2")
using namespace std;
#define ll long long
#define ull unsigned ll
#define pb emplace_back
#define mp make_pair
#define ALL(x) (x).begin(),(x).end()
#define rALL(x) (x).rbegin(),(x).rend()
#define srt(x) sort(ALL(x))
#define rev(x) reverse(ALL(x))
#define rsrt(x) sort(rALL(x))
#define sz(x) (int)(x.size())
#define inf 0x3f3f3f3f
#define pii pair<int,int>
#define lb(v,x) (int)(lower_bound(ALL(v),x)-v.begin())
#define ub(v,x) (int)(upper_bound(ALL(v),x)-v.begin())
#define uni(v) v.resize(unique(ALL(v))-v.begin())
#define longer __int128_t
void die(string S){puts(S.c_str());exit(0);}
ll val[400400],tag[400400];
int n,q;
const int B=500;
void update(int l,int r,ll v)
{
	int lb=l/B,rb=r/B;
	if(lb==rb)
	{
		for(int i=l;i<=r;i++)
			val[i]+=v;
		return ;
	}
	for(int i=l;i/B==lb;i++)
		val[i]+=v;
	for(int i=r;i/B==rb;i--)
		val[i]+=v;
	for(int i=lb+1;i<rb;i++)
		tag[i]+=v;
}
inline ll query(int p)
{
	if(p<=1) return 0;
	return max(1ll,val[p]+tag[p/B]);
}
int lst[400400];
int nxt[400400],prv[400400];
bool ok[400400];
int tp[400400];
inline int get_lst(int x)
{
	return query(tp[x]);
}
int main()
{
	ios_base::sync_with_stdio(false);
	cin.tie(0);
	cout.tie(0);
	cin>>n>>q;
	for(int i=2;i<=n;i++)
	{
		int f;
		cin>>f;
		update(i,i,f);
	}
	set<int> st;
	for(int i=2;i<=n;i++)
	{
		int f=query(i);
		if(f/B!=i/B)
		{
			lst[i]=f;
			ok[i]=1;
			tp[i]=i;
		}
		else
		{
			lst[i]=lst[f];
			tp[i]=tp[f];
			if(sz(st))
			{
				nxt[*st.rbegin()]=i;
				prv[i]=*st.rbegin();
			}
			st.insert(i);
		}
	}
	if(sz(st)) nxt[*st.rbegin()]=n+1;
	int lastans=0;
	while(q--)
	{
		int t;
		cin>>t;
		if(t==1)
		{
			int l,r,x;
			cin>>l>>r>>x;
			l^=lastans;
			r^=lastans;
			x^=lastans;
			update(l,r,-x);
			auto it=st.lower_bound(l);
			if(it==st.end()||*it>r) continue;
			int cur=*it;
			while(cur<=n&&cur/B<=r/B)
			{
				int f=query(cur);
				if(f/B!=cur/B)
				{
					lst[cur]=f;
					tp[cur]=cur;
					st.erase(cur);
					ok[cur]=1;
					prv[nxt[cur]]=prv[cur];
					nxt[prv[cur]]=nxt[cur];
				}
				else
				{
					lst[cur]=get_lst(f);
					tp[cur]=tp[f];
				}
				cur=nxt[cur];
			}
		}
		else
		{
			int u,v;
			cin>>u>>v;
			u^=lastans;
			v^=lastans;
			int u2=-1,v2=-1;
			while((u2=get_lst(u))!=(v2=get_lst(v))||u/B!=v/B)
			{
				if(u/B!=v/B)
				{
					if(u<v)
					{
						swap(u,v);
						swap(u2,v2);
					}
					u=u2;
					continue;
				}
				if(u2<v2)
				{
					swap(u,v);
					swap(u2,v2);
				}
				u=u2;
			}
			while(u!=v)
			{
				if(u<v) swap(u,v);
				u=query(u);
			}
			cout<<(lastans=u)<<'\n';
		}
	}
	return 0;
}