mv pcs750.bin to /usr/src/etc/vax

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

/*
* Copyright (c) 1982, 1986, 1988 Regents of the University of California.
* All rights reserved.  The Berkeley software License Agreement
* specifies the terms and conditions for redistribution.
*
*      @(#)uba.c       7.4 (Berkeley) %G%
*/

#include "param.h"
#include "inode.h"
#include "vm.h"
#include "fs.h"

#include "../vax/pte.h"
#include "../vax/cpu.h"
#include "../vaxuba/ubareg.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 int 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_adapt)->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) {

#if VAX8200
       case VAX_8200:
               UBA_PURGEBUA(ubauba(io->i_adapt), bdp);
               break;
#endif

#if VAX780 || VAX8600
       case VAX_8600:
       case VAX_780:
               ubauba(io->i_adapt)->uba_dpr[bdp] |= UBADPR_BNE;
               break;
#endif

#if VAX750
       case VAX_750:
               ubauba(io->i_adapt)->uba_dpr[bdp] |=
                    UBADPR_PURGE|UBADPR_NXM|UBADPR_UCE;
               break;
#endif

       default:
               break;
       }
}