#include<bits/stdc++.h>
using namespace std;
using ll=long long;
template<typename T>
ostream& operator << (ostream &out,const vector<T>&x){
	if(x.empty())return out<<"[]";
	out<<'['<<x[0];
	for(int len=x.size(),i=1;i<len;i++)out<<','<<x[i];
	return out<<']';
}
template<typename T>
vector<T> ary(const T *a,int l,int r){
	return vector<T>{a+l,a+1+r};
}
template<typename T>
void debug(T x){
	cerr<<x<<'\n';
}
template<typename T,typename ...S>
void debug(T x,S ...y){
	cerr<<x<<' ',debug(y...);
}
const int N=2e5+10;
int n,m;
char a[N];
vector<pair<int,int> >to[N];
namespace EUR{
	const int V=N*2,K=__lg(V)+2;
	int dft,bg[N],ed[N],dep[N],f[K][V];
	ll dis[N];
	int Min(int x,int y){
		return dep[x]<dep[y]?x:y;
	}
	#define v e.first
	#define w e.second
	void dfs(int u,int fa=0){
		dep[u]=dep[fa]+1;
		f[0][bg[u]=++dft]=u;
		for(auto e:to[u])if(v^fa){
			dis[v]=dis[u]+w,dfs(v,u);
			f[0][++dft]=u;
		}
		ed[u]=dft;
	}
	#undef v
	#undef w
	void init(){
		dfs(1);
		for(int i=1;(1<<i)<=dft;i++){
			for(int j=1;j+(1<<i)-1<=dft;j++){
				f[i][j]=Min(f[i-1][j],f[i-1][j+(1<<i-1)]);
			}
		}
	}
	int LCA(int l,int r){
		if(l=bg[l],r=bg[r],l>r)swap(l,r);
		int k=__lg(r-l+1);
		return Min(f[k][l],f[k][r-(1<<k)+1]);
	}
	ll dist(int u,int v){
		// debug("dist",u,v,dis[u]+dis[v]-dis[LCA(u,v)]*2);
		return dis[u]+dis[v]-dis[LCA(u,v)]*2;
	}
	bool isin(int u,int t){
		return bg[t]<=bg[u]&&bg[u]<=ed[t];
	}
}
using EUR::LCA;
using EUR::dist;
using EUR::isin;
using EUR::bg;
using vi=vector<int>;
vi t[N<<2];
bool cmp(const int &x,const int &y){
	return bg[x]<bg[y];
}
void reduce(vi &A){
	int len=1,n=A.size();
	if(n<2)return;
	for(int i=2;i<n;i++){
		if(isin(A[i],A[len]))A[len]=A[i];
		else A[++len]=A[i];
	}
	A.erase(A.begin()+len+1,A.end());
}
vi merge(const vi &A,const vi &B){
	vi C(A.size()+B.size());
	merge(A.begin(),A.end(),B.begin(),B.end(),C.begin(),cmp);
	// debug(A,B,C);
	reduce(C);
	return C;
}
void pushup(int rt){
	t[rt]=merge(t[rt<<1],t[rt<<1|1]);
}
void build(int l=1,int r=n,int rt=1){
	if(l==r){
		if(a[l]&1)t[rt]={l};
		else t[rt]={};
		return;
	}
	int mid=(l+r)>>1;
	build(l,mid,rt<<1);
	build(mid+1,r,rt<<1|1);
	pushup(rt);
}
void update(int x,int l=1,int r=n,int rt=1){
	if(l==r){
		if(a[x]&1)t[rt]={x};
		else t[rt]={};
		return;
	}
	int mid=(l+r)>>1;
	if(x<=mid)update(x,l,mid,rt<<1);
	else update(x,mid+1,r,rt<<1|1);
	pushup(rt);
}
void query(int L,int R,vi &ans,int l=1,int r=n,int rt=1){
	if(L<=l&&r<=R){
		ans=merge(ans,t[rt]);return;
	}
	int mid=(l+r)>>1;
	if(L<=mid)query(L,R,ans,l,mid,rt<<1);
	if(mid<R)query(L,R,ans,mid+1,r,rt<<1|1);
}
int main(){
	scanf("%d%d%s",&n,&m,a+1);
	for(int i=1,u,v,w;i<n;i++){
		scanf("%d%d%d",&u,&v,&w);
		to[u].push_back({v,w}),to[v].push_back({u,w});
	}
	EUR::init();
	build();
	// debug(ary(bg,1,n));
	for(int op,x,y;m--;){
		scanf("%d%d",&op,&x);
		if(op==1){
			a[x]^=1,update(x);
		}else{
			scanf("%d",&y);
			vi ans;
			query(x,y,ans);
			int len=ans.size();
			// debug(a+1,x,y,ans);
			if(ans.empty()){
				puts("-1");continue;
			}
			ll sum=0;
			for(int i=0;i<len;i++)sum+=dist(ans[i],ans[(i+1)%len]);
			// sum*=2;
			// debug(sum);
			// for(int i=0;i<len;i++){
			// 	for(int j=i+1;j<len;j++){
			// 		mx=max(mx,dist(ans[i],ans[j]));
			// 	}
			// }
			printf("%lld\n",sum);
		}
	}
	return 0;
}