#include <algorithm>
#include <iostream>
#include <climits>
#include <cstdio>
#include <cctype>

using namespace std;

typedef long long LL;

inline int read()
{
	int x=0,f=1;
	char ch=getchar();
	while (!isdigit(ch)) f=ch=='-'?-1:f,ch=getchar();
	while (isdigit(ch)) x=x*10+ch-'0',ch=getchar();
	return x*f;
}

const LL INF=LLONG_MAX>>2;
const int N=100005;
const int M=N<<1;

int a[N],st[N],en[N];
int real[M];
bool b[N];
int n,K,idx,cnt;
LL ans;

struct segment_tree
{
	LL mi[M<<2];
	bool tag[M<<2];

	inline void update(int x){mi[x]=min(mi[x<<1],mi[x<<1|1]);}

	inline void C(int x){mi[x]=INF,tag[x]|=1;}

	inline void clear(int x,int l,int r)
	{
		if (tag[x])
		{
			if (l!=r) C(x<<1),C(x<<1|1);
			tag[x]=0;
		}
	}

	void modify(int x,int y,int l,int r,LL edit)
	{
		clear(x,l,r);
		if (l==r)
		{
			mi[x]=min(mi[x],edit);
			return;
		}
		int mid=l+r>>1;
		if (y<=mid) modify(x<<1,y,l,mid,edit);
		else modify(x<<1|1,y,mid+1,r,edit);
		update(x);
	}

	void cover(int x,int st,int en,int l,int r)
	{
		if (st>en) return;
		clear(x,l,r);
		if (st==l&&en==r)
		{
			C(x);
			return;
		}
		int mid=l+r>>1;
		if (en<=mid) cover(x<<1,st,en,l,mid);
		else if (mid+1<=st) cover(x<<1|1,st,en,mid+1,r);
		else cover(x<<1,st,mid,l,mid),cover(x<<1|1,mid+1,en,mid+1,r);
		update(x);
	}

	LL query(int x,int st,int en,int l,int r)
	{
		if (st>en) return INF;
		clear(x,l,r);
		if (st==l&&en==r) return mi[x];
		int mid=l+r>>1;
		if (en<=mid) return query(x<<1,st,en,l,mid);
		else if (mid+1<=st) return query(x<<1|1,st,en,mid+1,r);
		else return min(query(x<<1,st,mid,l,mid),query(x<<1|1,mid+1,en,mid+1,r));
	}

	void build(int x,int l,int r)
	{
		tag[x]=0;
		if (l==r)
		{
			mi[x]=-real[l];
			return;
		}
		int mid=l+r>>1;
		build(x<<1,l,mid),build(x<<1|1,mid+1,r),update(x);
	}

	LL getmin(int x,int l,int r)
	{
		clear(x,l,r);
		if (l==r) return mi[x]==INF?INF:mi[x]+real[l];
		int mid=l+r>>1;
		return min(getmin(x<<1,l,mid),getmin(x<<1|1,mid+1,r));
	}
}t;

struct data
{
	int key,id;
	bool tp;

	inline data (int key_=0,int id_=0,bool tp_=0){key=key_,id=id_,tp=tp_;}

	inline bool operator<(data const d)const{return key<d.key;}
}srt[M];

void pre()
{
	int sum=0,lst;
	for (int i=1;i<=n;++i)
	{
		lst=sum,(((sum+=K-(a[i]<<1))%=K)+=K)%=K;
		srt[++cnt]=data(st[i]=(b[i]?K-1:sum),i,0),srt[++cnt]=data(en[i]=(b[i]?0:lst),i,1);
	}
	srt[++cnt]=data(0,0,0);
	sort(srt+1,srt+cnt+1),idx=0;
	for (int i=1;i<=cnt;++i)
	{
		real[idx+=i==1||srt[i].key!=srt[i-1].key]=srt[i].key;
		if (srt[i].id) srt[i].tp?en[srt[i].id]=idx:st[srt[i].id]=idx;
	}
}

void dp()
{
	t.build(1,1,idx);
	for (int i=1;i<=n;++i)
	{
		LL tmp1=min(t.query(1,1,st[i],1,idx),t.query(1,st[i]+1,idx,1,idx)+K)+real[st[i]];
		LL tmp2=min(t.query(1,1,en[i],1,idx),t.query(1,en[i]+1,idx,1,idx)+K)+real[en[i]];
		if (tmp1<INF) t.modify(1,st[i],1,idx,tmp1-real[st[i]]);
		if (tmp2<INF) t.modify(1,en[i],1,idx,tmp2-real[en[i]]);
		if (st[i]<en[i]) t.cover(1,st[i]+1,en[i]-1,1,idx);
		else t.cover(1,st[i]+1,idx,1,idx),t.cover(1,1,en[i]-1,1,idx);
	}
	ans=t.getmin(1,1,idx);
	if (ans>=INF) ans=-1;
}

int main()
{
	//freopen("train.in","r",stdin),freopen("train.out","w",stdout);
	n=read(),K=read();
	for (int i=1;~ans&&i<=n;++i)
	{
		a[i]=read(),b[i]=read()-1;
		if ((a[i]<<1)>K&&!b[i]) ans=-1;
	}
	if (~ans)
	{
		pre(),dp();
		if (~ans) for (int i=1;i<=n;++i) ans+=a[i]<<1;
	}
	printf("%lld\n",ans);
	//fclose(stdin),fclose(stdout);
	return 0;
}

Measured memory_bytes: 9728