#include<bits/stdc++.h>
using namespace std;
#define mid ((l+r)>>1)
inline int qread()
{
    int a=0,f=1;char ch=getchar();
    while(!isdigit(ch)){if(ch=='-')f=-1;ch=getchar();}
    while(isdigit(ch)){(a*=10)+=(ch^48);ch=getchar();}
    return a*f;
}
int n,m,pl,cnt[320],cl,c[100010],st[100010],ed[100010],id[100010],uid[320],op[100010];
long long ans[100010],tag[100010],X[100010],Y[100010],sum[100010],s[100010],pre[320][320],pres[320][320];
vector<int>U[100010],D[100010],Q[100010];
struct node
{
    long long cnt,num;
}que[320][320],qu[320];
inline void solve(int p)
{
    s[p]=sum[p]=cnt[p]=tag[p]=0;
    for(int i=st[p];i<=ed[p];++i)if(id[i])
    {
        if(Y[i])
        {
            que[p][++cnt[p]]=(node){X[i],Y[i]},sum[p]+=X[i]*Y[i],s[p]+=X[i];
            pre[p][cnt[p]]=pre[p][cnt[p]-1]+X[i];
            pres[p][cnt[p]]=pres[p][cnt[p]-1]+X[i]*Y[i];
        }
        else
        {
            long long cx=X[i];
            while(cnt[p])
            {
                if(cx>=que[p][cnt[p]].cnt)
                {
                    sum[p]-=que[p][cnt[p]].cnt*que[p][cnt[p]].num;
                    s[p]-=que[p][cnt[p]].cnt;
                    cx-=que[p][cnt[p]--].cnt;
                }
                else 
                {
                    sum[p]-=cx*que[p][cnt[p]].num;
                    s[p]-=cx;
                    que[p][cnt[p]].cnt-=cx;
                    pre[p][cnt[p]]-=cx;
                    pres[p][cnt[p]]-=cx*que[p][cnt[p]].num;
                    cx=0;
                    break;
                }
            }
            if(cx)tag[p]+=cx;
        }
    }
    return ;
}
inline long long Qs(long long x)
{
    long long an=0;int p=pl;
    for(;p;--p)
    {
        if(x>=qu[p].cnt)an+=qu[p].num,x-=qu[p].cnt;
        else break;
    }
    if(p)
    {
        for(int i=1;i<=cnt[uid[p]];++i)
        {
            if(x>=que[uid[p]][i].cnt)an+=que[uid[p]][i].cnt*que[uid[p]][i].num,x-=que[uid[p]][i].cnt;
            else 
			{
				an+=que[uid[p]][i].num*x,x=0;
				break;
			}
        }
    }
    return an;
}
int main()
{
    n=qread(),m=qread();
    cl=min(m,(int)sqrt(m)+1);
    for(int i=1;i<=m;++i)ed[c[i]=(i-1)/cl+1]=i;
    for(int i=m;i;--i)st[c[i]]=i;
    for(int i=1,op,l,r;i<=m;++i)
    {
        op=qread();
        if(op==1)
        {
            l=qread(),r=qread();
            U[l].emplace_back(i);
            D[r+1].emplace_back(i);
            X[i]=qread(),Y[i]=qread();
        }
        else if(op==2)
        {
            l=qread(),r=qread();
            U[l].emplace_back(i);
            D[r+1].emplace_back(i);
            X[i]=qread();
        }
        else
        {
            l=qread();
            Q[l].emplace_back(i);
            X[i]=qread(),Y[i]=qread();
        }
    }
    memset(ans,-1,(m+1)<<3);
    for(int i=1;i<=n;++i)
    {
        for(int j:U[i])id[j]=1,solve(c[j]);
        for(int j:D[i])id[j]=0,solve(c[j]);
        for(int J:Q[i])
        {
        	for(int k=st[c[J]];k<=ed[c[J]];++k)op[k]=id[k];
        	for(int k=J+1;k<=ed[c[J]];++k)id[k]=0;
        	solve(c[J]);
        	long long cx=0;pl=0;
	        for(int j=c[J],an;j;--j)
	        {
	            if(cx)
	            {
	                if(cx>=s[j])cx-=s[j];
	                else
	                {
	                    an=upper_bound(pre[j]+1,pre[j]+1+cnt[j],s[j]-cx)-pre[j];
	                    if(s[j]-pre[j][an-1]==cx)qu[++pl]=(node){pre[j][an-1],pres[j][an-1]};
	                    else qu[++pl]=(node){s[j]-cx,pres[j][an-1]+(s[j]-cx-pre[j][an-1])*que[j][an].num};
	                    uid[pl]=j;
	                }
	            }
	            else qu[++pl]=(node){s[j],sum[j]},uid[pl]=j;
	            cx+=tag[j];
	        }
        	ans[J]=Qs(Y[J])-Qs(X[J]-1);
        	for(int k=st[c[J]];k<=ed[c[J]];++k)id[k]=op[k];
        	solve(c[J]);
		}
    }
    for(int i=1;i<=m;++i)if(~ans[i])printf("%lld\n",ans[i]);
    return 0;
}