#include <bits/stdc++.h>
using namespace std;
const int N=100005,M=200005,mod=1000000007;
int ver[M*2],edge[M*2],nxt[M*2],head[N],tot;
int f[2][N],deg[2][N],d[N],pre[N],n,m,S,T,blen; //blen:length by bus
bool bridge[M*2];
int a[N],b[N],cnt; //长度,是不是桥
int sum[N],sum_bri[N],ds[N],dt[N];
queue<int> q;
void add(int x,int y,int z){
ver[++tot]=y,edge[tot]=z,nxt[tot]=head[x],head[x]=tot;
}
void topsort(int s,int bit){
if(bit==0)memset(d,0x3f,sizeof d),d[s]=0;
f[bit][s]=1;
for(int i=1;i<=n;i++)
if(deg[bit][i]==0)q.push(i);
while(q.size()){ //所以下次不用clear
auto x=q.front();
q.pop();
for(int i=head[x];i;i=nxt[i]){
if((i&1)!=bit)continue;
int y=ver[i];
f[bit][y]=(f[bit][y]+f[bit][x])%mod; //路径数
if(bit==0 && d[y]>d[x]+edge[i]) //顺带求最短路
d[y]=d[x]+edge[i], pre[y]=i;
if(--deg[bit][y]==0)q.push(y);
}
}
}
int main() {
int kase;
cin>>kase;
while(kase--){
memset(head,0,sizeof head);
memset(f,0,sizeof f);
memset(bridge,0,sizeof bridge);
memset(deg,0,sizeof deg);
tot=1, cnt=0;
cin>>n>>m>>S>>T>>blen;
S++,T++;
for(int i=1;i<=m;i++){
int x,y,z;
scanf("%d%d%d",&x,&y,&z);
x++,y++;
add(x,y,z), add(y,x,z); //前,偶数边是正图 //后,奇数边是反图
deg[0][y]++, deg[1][x]++; //0:入度,1:出度
}
topsort(S,0);
if(f[0][T]==0) { puts("-1"); continue;}
topsort(T,1);
for(int i=2;i<=tot;i+=2){
int x=ver[i^1],y=ver[i]; //用路径数判断桥,
if(1ll*f[0][x]*f[1][y]%mod==f[0][T]) //不用考虑重边,它一定不满足这个
bridge[i]=true;
}
while(T!=S){ //提取最短路
a[++cnt]=edge[pre[T]];
b[cnt]=bridge[pre[T]];
T=ver[pre[T]^1];
}
for(int i=1;i<=cnt;i++) //路径累计距离
sum[i]=sum[i-1]+a[i], sum_bri[i]=sum_bri[i-1]+a[i]*b[i];
ds[0]=1<<30;
for(int i=1,j=0;i<=cnt;i++){ //顺路径
while(sum[i]-sum[j]>blen)j++;
ds[i]=sum_bri[j];
if(j && b[j]) ds[i]-=min(a[j],blen-(sum[i]-sum[j]));
ds[i]=min(ds[i],ds[i-1]+a[i]*b[i]); //i搭一次车,i不搭车
}
for(int i=cnt,j=cnt+1;i;i--){ //逆路径
while(sum[j-1]-sum[i-1]>blen)j--;
dt[i]=sum_bri[cnt]-sum_bri[j-1];
if(j<=cnt && b[j]) dt[i]-=min(a[j],blen-(sum[j-1]-sum[i-1]));
//此处不用考虑,i不搭车,否则重复了
}
int ans=1<<30;
for(int i=1;i<=cnt;i++) //两段分开,也许在i处合在一起
ans=min(ans,dt[i]+ds[i-1]);
for(int i=1,j=0;i<=cnt;i++){ //合在一起,在中间换车
while(sum[i]-sum[j]>2*blen)j++;
int tmp=sum_bri[j];
if(j && b[j]) tmp-=min(a[j],2*blen-(sum[i]-sum[j]));
ans=min(ans,tmp+sum_bri[cnt]-sum_bri[i]);
}
cout<<ans<<endl;
}
return 0;
}