#include<bits/stdc++.h>
using namespace std;
#define IOS {cin.tie(0);cout.tie(0);ios::sync_with_stdio(0);}
#define rep(i,j,k) for(int i=j;i<=k;++i)
#define per(i,j,k) for(int i=j;i>=k;--i)
#define P pair<int,int>
#define ll long long
#define vi vector<int>
#define ilr int i,int l,int r
#define ls i<<1,l,mid
#define rs i<<1|1,mid+1,r
#define md int mid=l+r>>1;
const int N=2e5+5,V=19;
int n,bel[N],sz[N],vis[N],dep[N],fa[N],tp[N];
int lg2[N*2],dfn[N*2],st[V+1][N*2],tot,pos[N];
ll sw[N];
vector<P>tu[N];
int q[200],top;
struct Tree{
    int mi[N<<2],ma[N<<2]; 
    int mat[N];//dep->id
    void init(){
        rep(i,1,n*4)mi[i]=N;
    }
    void ins(ilr,int x){
        if(l==r){
            mi[i]=dep[x]; ma[i]=dep[x]; return;
        }
        md
        if(mid>=x)ins(ls,x);
        else ins(rs,x);
        mi[i]=min(mi[i<<1],mi[i<<1|1]); ma[i]=max(ma[i<<1],ma[i<<1|1]);
    }
    void del(ilr,int x){
        if(l==r){
            mi[i]=N; ma[i]=0; return;
        }
        md
        if(mid>=x)del(ls,x);
        else del(rs,x);
        mi[i]=min(mi[i<<1],mi[i<<1|1]); ma[i]=max(ma[i<<1],ma[i<<1|1]);
    }
    void ins(int x){
        ins(1,1,n,x);
    }
    void del(int x){
        del(1,1,n,x);
    }
    P qu(ilr,int x,int y){
        if(l>=x && r<=y){return {mi[i],ma[i]};}
        int vmi=N,vma=0;
        md
        if(mid>=x){
            auto [v1,v2]=qu(ls,x,y); vmi=v1; vma=v2;
        }
        if(y>mid){
            auto [v1,v2]=qu(rs,x,y); vmi=min(vmi,v1); vma=max(vma,v2);
        }
        return {vmi,vma};
    }
    void wk(int l,int r){
        auto [vmi,vma]=qu(1,1,n,l,r);
        auto addq=[&](int x){
            if(x!=N && x!=0)q[++top]=mat[x];
        };
        addq(vmi); if(vmi!=vma)addq(vma);
    }
}T[51];
void dfs(int now,int pre){
    sz[now]=1; dep[now]=dep[pre]+1; fa[now]=pre;
    dfn[++tot]=now; pos[now]=tot;
    for(auto [son,w]:tu[now]){
        if(son==pre)continue;
        sw[son]=sw[now]+w;
        dfs(son,now);
        sz[now]+=sz[now]; dfn[++tot]=now; 
    }
}
int cp(int x,int y){
    return dep[x]<dep[y]?x:y;
}
int LCA(int l,int r){
    l=pos[l],r=pos[r]; if(l>r)swap(l,r);
    int t=lg2[r-l+1];
    return cp(st[t][l],st[t][r-(1<<t)+1]);
}
bool cmp(int x,int y){return pos[x]<pos[y];}
int q1[200];
void xushu(){
    sort(q+1,q+top+1,cmp);
    int cnt=1; q1[1]=q[1];
    rep(i,2,top){
        q1[++cnt]=LCA(q[i],q[i-1]);
        q1[++cnt]=q[i];
    }
    rep(i,1,cnt)q[i]=q1[i];
    sort(q+1,q+cnt+1,cmp);
    top=unique(q+1,q+cnt+1)-q-1;
    ll sum=0;
    rep(i,2,top){
        int lca=LCA(q[i],q[i-1]);
        // cout<<"("<<q[i]<<" "<<q[i-1]<<' '<<lca<<")";
        sum+=sw[q[i]]-sw[lca];
    }
    cout<<sum*2<<'\n';
}
signed main(){
    IOS
    int Q;cin>>n>>Q;
    string S;cin>>S;
    rep(i,2,n){
        int u,v,w;cin>>u>>v>>w;
        tu[u].push_back({v,w}); tu[v].push_back({u,w});
    }
    dfs(1,0);
    rep(i,1,tot)st[0][i]=dfn[i], lg2[i]=log2(i);
    // rep(i,1,tot)cout<<dfn[i]<<' '; cout<<'\n';
    // rep(i,1,n)cout<<pos[i]<<' '; cout<<"#########\n";
    rep(j,1,V){
        rep(i,1,tot){
            if(i+(1<<j-1)>tot)st[j][i]=st[j-1][i];
            else st[j][i]=cp(st[j-1][i],st[j-1][i+(1<<j-1)]);
        }
    }
    vis[0]=1; int cnt=0;
    rep(i,1,n){
        if(!(sz[i]==1))continue;
        int now=i; ++cnt;
        while(!vis[now]){
            bel[now]=cnt; T[cnt].mat[dep[now]]=now;
            vis[now]=1; now=fa[now]; 
        }
    }
    rep(i,1,cnt)T[i].init();
    
    rep(i,1,n){
        if(S[i-1]=='1')T[bel[i]].ins(i),tp[i]=1;
    }
    while(Q--){
        int op;cin>>op;
        if(op==1){
            int x;cin>>x;
            if(tp[x]){
                T[bel[x]].del(x); tp[x]=0;
            }
            else{
                T[bel[x]].ins(x); tp[x]=1;
            }
        }
        else{
            int l,r;cin>>l>>r; top=0;
            rep(i,1,cnt)T[i].wk(l,r);
            if(top==0){
                cout<<"-1\n";continue;
            }
            xushu();
        }
    }
}
/*
5 6
10110
1 2 1
1 3 10
2 4 100
3 5 1000
2 1 5
1 3
2 1 5
2 2 4
2 5 5
2 1 1
*/