#include<bits/stdc++.h>
using namespace std;
#define TASK "bai3"
#define rep(i,x,y) for(int i=(x);i<=(y);++i)
template<class T> bool maximize(T &a, const T &b){ return (a < b) ? a = b, 1 : 0; }
template<class T> bool minimize(T &a, const T &b){ return (a > b) ? a = b, 1 : 0; }
typedef long long ll;
#define all(x) x.begin(),x.end()
#define ii pair<int,int>
#define fi first
#define se second
#define pb push_back
const int N = 3e5 + 5;
int n,m;
vector<ii> adj[N];
ll a[N],b[N];
priority_queue<ll> pq[N];
void dfs(int u, int pa, int w)
{
if(u>n)
{
pq[u].push(w);
pq[u].push(w);
a[u]=1;
b[u]=-w;
return;
}
for(ii p : adj[u])
{
int v=p.fi;
int c=p.se;
if(v!=pa)
{
dfs(v,u,c);
if((int)pq[v].size()>(int)pq[u].size()) swap(pq[u],pq[v]);
while(!pq[v].empty())
{
pq[u].push(pq[v].top());
pq[v].pop();
}
a[u]+=a[v];
b[u]+=b[v];
}
}
while(a[u]>1)
{
b[u]+=pq[u].top();
pq[u].pop();
--a[u];
}
// assert((int)pq[u].size()>1);
int x=pq[u].top();
pq[u].pop();
int y=pq[u].top();
pq[u].pop();
pq[u].push(y+w);
pq[u].push(x+w);
b[u]-=w;
// cout<<u<<' '<<pq[u].top()<<' '<<a[u]<<' '<<b[u]<<'\n';
}
void solve()
{
cin>>n>>m;
rep(i,2,n+m)
{
int p,c;
cin>>p>>c;
adj[i].pb({p,c});
adj[p].pb({i,c});
}
dfs(1,0,0);
// pq[1].pop();
// cout<<a[1]<<' '<<b[1]<<'\n';
// while(!pq[1].empty())
// {
// cout<<pq[1].top()<<'\n';
// pq[1].pop();
// }
// return;
cout<<a[1]*pq[1].top()+b[1];
}
int main(void)
{
// freopen(TASK".inp","r",stdin);
// freopen(TASK".out","w",stdout);
ios_base::sync_with_stdio(0);
cin.tie(0);
cout.tie(0);
int testcase=1;
// cin>>testcase;
while(testcase--)
solve();
return 0;
}
