#include <bits/stdc++.h>
#define pii pair<int, int>
#define fir first
#define sec second
#define ull unsigned long long
using namespace std;

namespace IO {
	#if ONLINE_JUDGE
	#define getc() (IS == IT && (IT = (IS = ibuf) + fread(ibuf, 1, IL, stdin), IS == IT) ? EOF : *IS++)
	#else
	#define getc() getchar()
	#endif
	const int IL = 1 << 21, OL = 1 << 21;
	int olen = 0;
	char ibuf[IL], *IS = ibuf, *IT = ibuf, obuf[OL];
	inline int read() {
		register char ch = getc(); register int x = 0, f = 1;
		while(!isdigit(ch)) { if(ch == '-') f = -1; ch = getc(); }
		while(isdigit(ch)) x = x * 10 + ch - 48, ch = getc();
		return x * f;
	}
	inline double readdb() {
		register char ch = getc(); register double x = 0, f = 1;
		while(!isdigit(ch)) { if(ch == '-') f = -1; ch = getc(); }
		while(isdigit(ch)) x = x * 10 + ch - 48, ch = getc();
		if(ch == '.') {
			register double b = 0.1;
			ch = getc();
			while(isdigit(ch)) x += (ch - 48) * b, b *= 0.1, ch = getc();
		}
		return x * f;
	}
	inline int readstr(char *s) {
		register char ch = getc(); register int len = 0;
		while(!isalpha(ch)) ch = getc();
		while(isalpha(ch)) s[++len] = ch, ch = getc();
		return len;
	}
	inline void flush() { fwrite(obuf, 1, olen, stdout); olen = 0; }
	inline void putc(register char ch) { obuf[olen++] = ch; }
	template<class T>
	inline void write(register T x) {
		if(x < 0) obuf[olen++] = '-', x = -x;
		if(x > 9) write(x / 10);
		obuf[olen++] = x % 10 + 48;
	}
} using namespace IO;
const int N = 2e5 + 10;
int n, k, q, tim;
int fa[N], dep[N], siz[N], dfn[N], id[N], top[N];
namespace bit {
	ull t1[N], t2[N];
	void add1(int x, ull k) {
		for(int i = x; i <= n; i += i & -i)
			t1[i] += k;
	}
	void add2(int x, ull k) {
		for(int i = x; i <= n; i += i & -i)
			t2[i] += k;
	}
	ull qry1(int x) {
		ull res = 0;
		for(int i = x; i; i -= i & -i)
			res += t1[i];
		return res;
	}
	ull qry2(int x) {
		ull res = 0;
		for(int i = x; i; i -= i & -i)
			res += t2[i];
		return res;
	}
	ull qry(int l, int r) {
		return qry2(r) * r + qry1(r) - qry2(l - 1) * (l - 1) - qry1(l - 1);
	}
	void add(int l, int r, ull k) {
//		cout << "add:" << l << " " << r << " " << k << endl;
		add1(l, -k * (l - 1)), add1(r + 1, k * r);
		add2(l, k), add2(r + 1, -k);
//		cout << qry(1, 7) << endl;
	}
} using namespace bit;
vector<int> E[N], e[N];
vector<pii> son[N][4], ans[N][4], fk[N][4], lf[N][4], st[N];
bool cmp(int x, int y) { return siz[x] > siz[y]; }
void dfs1(int u, int f) {
	fa[u] = f, dep[u] = dep[f] + 1, siz[u] = 1;
	for(auto v : E[u]) {
		if(v == f) continue;
		e[u].push_back(v);
		dfs1(v, u);
		siz[u] += siz[v];
	}
	sort(e[u].begin(), e[u].end(), cmp);
}
void merge(vector<pii> &x) {
	vector<pii> vc;
	sort(x.begin(), x.end());
	for(auto r : x) {
		if(vc.size() && r.fir == vc.back().sec + 1) vc[vc.size() - 1].sec = r.second;
		else vc.push_back(r);
	}
	x = vc;
}
void merge(vector<pii> &x, vector<pii> y) {
	for(auto r : y) x.push_back(r);
	merge(x);
}
void nt(int u, int d) {
	if(!d) {
		if(!dfn[u]) dfn[u] = ++tim, id[tim] = u;
		return;
	}
	for(auto v : e[u]) nt(v, d - 1);
}
void dfs2(int u) {
	vector<int> vc;
	int v = u;
	while(1) {
		top[v] = u;
		if(!dfn[v]) dfn[v] = ++tim, id[tim] = v;
		vc.push_back(v);
		if(!e[v].size()) break;
		v = e[v][0];
	}
	for(int i = 1; i <= k; i++)
		for(auto x : vc)
			nt(x, i);
	for(int i = vc.size() - 1; ~i; i--)
		for(int j = 1; j < e[vc[i]].size(); j++)
			dfs2(e[vc[i]][j]);
}
void dfs3(int u) {
	son[u][0].push_back({dfn[u], dfn[u]});
	st[u].push_back({dfn[u], dfn[u]});
	for(auto v : e[u]) {
		dfs3(v);
		merge(st[u], st[v]);
		for(int i = 0; i <= k; i++)
			merge(fk[v][i], son[u][i]);
		for(int i = 1; i <= k; i++)
			merge(son[u][i], son[v][i - 1]);
	}
	vector<pii> tmp[11];
	for(int i = e[u].size() - 1, v; ~i; i--) {
		v = e[u][i];
		for(int i = 1; i <= k; i++)
			merge(fk[v][i], tmp[i]);
		for(int i = 1; i <= k; i++)
			merge(tmp[i], son[v][i - 1]);
	}
}
void dfs4(int u) {
	ans[u][0].push_back({dfn[u], dfn[u]});
	for(int i = 0; i <= k; i++)
		lf[u][i] = lf[fa[u]][i];
	if(u == 1) {
		lf[u][0] = son[u][0];
		for(int i = 1; i <= k; i++)
			lf[u][i] = lf[u][i - 1], merge(lf[u][i], son[u][i]);
	}
	else
		for(int i = 0; i <= k; i++)
			merge(lf[u][i], son[u][i]);
	for(int i = 1; i <= k; i++) {
		ans[u][i] = son[u][i];
		for(int j = 1, f = u; fa[f] && j <= i; f = fa[f], j++)
			merge(ans[u][i], fk[f][i - j]);
	}
	for(auto v : e[u]) dfs4(v);
}
int LCA(int u, int v) {
	while(top[u] != top[v]) {
		if(dep[top[u]] < dep[top[v]]) swap(u, v);
		u = fa[top[u]];
	}
	return dep[u] < dep[v] ? u : v;
}
int main() {
	n = read(), q = read();
	k = 3;
	for(int i = 1; i < n; i++) {
		int u = read(), v = read();
		E[u].push_back(v);
		E[v].push_back(u);
	}
	dfs1(1, 0);
	dfs2(1);
	dfs3(1);
	dfs4(1);
	for(int i = 1; i <= n; i++)
		for(int j = 1; j <= k; j++)
			merge(ans[i][j], ans[i][j - 1]);
//	for(int i =1; i <= n;i++)
//		cout<< "dfn:" << i << " " << dfn[i] << endl;
//	for(int i = 1; i <= n; i++) {
//		cout << i << "\n\n";
//		for(int j = 0; j <= 0; puts(""), j++)
//			for(auto x : lf[i])
//				cout << "["<<x.fir << " " << x.sec << "]"<< endl; 
//	} 
//			printf("%d\n", query(1, 1, n, dfn[1]));
//	for(int i =1; i <= n; puts(""), i++)
//		for(auto x : lf[i][3])
//			cout << "pos:"<<i<<" " << "["<<x.fir << " "<<x.sec <<"]"<< endl;
	while(q--) {
		int op = read();
		if(op == 1) {
			int u = read(), v = read(), k = read(), t = read();
			int f = LCA(u, v);
			for(auto x : lf[u][k])
				add(x.fir, x.sec, t);
			for(auto x : lf[v][k])
				add(x.fir, x.sec, t);
			for(auto x : lf[f][k])
				add(x.fir, x.sec, -t);
			for(auto x : lf[fa[f]][k])
				add(x.fir, x.sec, -t);
		}
		if(op == 2) {
			int u = read(), v = read();
//			cout << "!!!:" << st[u].size() << endl;
			for(auto x : st[u])
				add(x.fir, x.sec, v);
		}
		if(op == 3) {
			int u = read(), v = read(), k = read();
			int f = LCA(u, v);
			ull ans = 0;
			for(auto x : lf[u][k])
				ans += qry(x.fir, x.sec);
			for(auto x : lf[v][k])
				ans += qry(x.fir, x.sec);
			for(auto x : lf[f][k])
				ans -= qry(x.fir, x.sec);
			for(auto x : lf[fa[f]][k])
				ans -= qry(x.fir, x.sec);
			printf("%llu\n", ans);
		}
		if(op == 4) {
			int u = read();
			ull ans = 0;
			for(auto x : st[u])
				ans += qry(x.fir, x.sec);
			printf("%llu\n", ans);
		}
	}
	return 0;
}
/*
7 6
1 2
2 3
1 4
4 5
1 6
6 7
1 1 5 3 4
2 3 5
3 1 5 3
4 5
4 3
4 2
*/