merge 4.1b with 4.1c

[unix-history] / usr / src / sys / vax / stand / uba.c

/*      uba.c   4.6     82/07/15        */

#include "../h/param.h"
#include "../h/inode.h"
#include "../h/cpu.h"
#include "../h/pte.h"
#include "../h/ubareg.h"
#include "../h/vm.h"
#include "../h/fs.h"
#include "saio.h"
#include "savax.h"

/*
* Note... this routine does not
* really allocate; unless bdp == 2
* you always get the same space.
* When bdp == 2 you get some other space.
*/
ubasetup(io, bdp)
       register struct iob *io;
       int bdp;
{
       int npf;
       unsigned v;
       register struct pte *pte;
       int o, temp, reg;
       static int lastreg = 128+64;

       v = btop(io->i_ma);
       o = (int)io->i_ma & PGOFSET;
       npf = btoc(io->i_cc + o) +1;
       if (bdp == 2) {
               reg = lastreg;
               lastreg += npf;
               bdp = 0;
       } else
               reg = 0;
       pte = &ubauba(io->i_unit)->uba_map[reg];
       temp = (bdp << 21) | UBAMR_MRV;
       if (bdp && (o & 01))
               temp |= UBAMR_BO;
       v &= 0x1fffff;                  /* drop to physical addr */
       while (--npf != 0)
               *(int *)pte++ = v++ | temp;
       *(int *)pte++ = 0;
       return ((bdp << 28) | (reg << 9) | o);
}

ubafree(io, mr)
       struct iob *io;
       int mr;
{
       register int bdp;

       bdp = (mr >> 28) & 0x0f;
       if (bdp == 0)
               return;
       switch (cpu) {

       case VAX_780:
               ubauba(io->i_unit)->uba_dpr[bdp] |= UBADPR_BNE;
               break;

       case VAX_750:
               ubauba(io->i_unit)->uba_dpr[bdp] |=
                    UBADPR_PURGE|UBADPR_NXM|UBADPR_UCE;
               break;
       case VAX_730:
               break;
       }
}