#include<bits/stdc++.h>
#define re 
#define N 300005
#define P 998244353
#define ll long long
using namespace std; 
int n,m,K,q;
inline void Rd(int &res){
	re char c;res=0;
	while(c=getchar(),c<48);
	do res=(res<<3)+(res<<1)+(c^48);
	while(c=getchar(),c>47);
}
int fa[N],head[N],to[N<<1],nxt[N<<1],cnt1;
inline void adde(int x,int y){to[++cnt1]=y;nxt[cnt1]=head[x];head[x]=cnt1;}
int L[N],R[N],totid,cnt[N][20],u;
void dfs(int x){
	L[x]=++totid;
	cnt[x][0]=1;
	for(re int i=head[x];i;i=nxt[i]){
		int y=to[i];
		dfs(y);
		for(re int k=0;k<u;k++)
			cnt[x][k+1]+=cnt[y][k];
		
	}
	
	R[x]=totid;
}
struct BIT{
	ll tree[N];
	inline void add(int x,ll v){while(x<=n)tree[x]+=v,x+=x&-x;}
	ll query(int x){ll res=0;while(x)res+=tree[x],x-=x&-x;return res;}
	ll calc(int l,int r){return query(r)-query(l-1);}
}V;
struct BIT2{
	BIT T[2];
	inline void add(int l,int r,ll v){
		T[0].add(l,v);T[0].add(r+1,-v);
		T[1].add(l,l*v);T[1].add(r+1,-(r+1)*v);
	}
	ll query(int l,int r){return (r-l+1)*T[0].query(l-1)+(r+1)*T[0].calc(l,r)-T[1].calc(l,r);}
}T;
ll A[N][20];
int main(){
	Rd(n),Rd(q);
	for(re int i=2;i<=n;i++){
		Rd(fa[i]);
		adde(fa[i],i);
	}
	u=1;
	while((1<<u)<=n)u++;
	dfs(1);
	while(q--){
		int opt;Rd(opt);
		if(opt==1){
			int x,y,k;
			Rd(x),Rd(y),Rd(k);
			if(k==1){
				T.add(L[x],R[x],y);
				continue;
			}
			ll res=0;
			int v=y;
			for(re int i=0;i<u;i++){
				A[x][i]+=v;
				res+=1ll*cnt[x][i]*v;
				v/=k;
				if(v==0)break;
			}
			V.add(L[x],res);
			
			
		}
		else{
			int x;Rd(x);
			ll ans0=T.query(L[x],R[x]);
			ans0+=V.calc(L[x],R[x]);
			int t=x;
			for(re int i1=1;i1<=u;i1++){
				t=fa[t];
				for(re int i=0;i1+i<=u;i++){
					ans0+=1ll*cnt[x][i]*A[t][i1+i];
				}
			}
			printf("%lld\n",ans0);
			
			
		}
		
		
		
		
	}
	
	return 0;
}