void*
xspanalloc(ulong size, int align, ulong span)
{
uintptr a, v, t;
a = PTR2UINT(xalloc(size+align+span));
if(a == 0)
panic("xspanalloc: %lud %d %lux\n", size, align, span);
if(span > 2) {
v = (a + span) & ~(span-1);
t = v - a;
if(t > 0)
xhole(PADDR(UINT2PTR(a)), t);
t = a + span - v;
if(t > 0)
xhole(PADDR(UINT2PTR(v+size+align)), t);
}
else
v = a;
if(align > 1)
v = (v + align) & ~(align-1);
return (void*)v;
}
void
xinit(void)
{
Hole *h, *eh;
eh = &xlists.hole[Nhole-1];
for(h = xlists.hole; h < eh; h++)
h->link = h+1;
xlists.flist = xlists.hole;
if(conf.npage1)
xhole(conf.base1, conf.npage1*BY2PG);
conf.npage1 = conf.base1+(conf.npage1*BY2PG);
if(conf.npage0)
xhole(conf.base0, conf.npage0*BY2PG);
conf.npage0 = conf.base0+(conf.npage0*BY2PG);
/* Save the bounds of kernel alloc memory for kernel mmu mapping */
conf.base0 = (ulong)KADDR(conf.base0);
conf.base1 = (ulong)KADDR(conf.base1);
conf.npage0 = (ulong)KADDR(conf.npage0);
conf.npage1 = (ulong)KADDR(conf.npage1);
debugkey('x', "xalloc/ialloc", ixprt, 0);
}
void
xfree(void *p)
{
Xhdr *x;
x = UINT2PTR((PTR2UINT(p) - offsetof(Xhdr, data[0])));
if(x->magix != Magichole) {
xsummary();
panic("xfree(%#p) %#ux != %#lux", p, Magichole, x->magix);
}
xhole(PADDR(x), x->size);
}
void
xfree(void *p)
{
Xhdr *x;
x = (Xhdr*)((ulong)p - datoff);
if(x->magix != Magichole) {
xsummary();
panic("xfree(0x%lux) 0x%lux!=0x%lux", p, (ulong)Magichole, x->magix);
}
xhole(PADDR(x), x->size);
}
void
xfree(void *p)
{
Xhdr *x;
x = (Xhdr*)((ulong)p - offsetof(Xhdr, data[0]));
if(x->magix != Magichole) {
xsummary();
panic("xfree(%#p) %#ux != %#lux", p, Magichole, x->magix);
}
xhole(PADDR((uintptr)x), x->size);
}
void
memholes(void)
{
Bank *b, *eb;
b = bootconf->bank;
eb = b+bootconf->nbank;
while(b < eb) {
if(b->min < (1LL<<32) && b->max < (1LL<<32))
xhole(b->min, b->max-b->min);
b++;
}
}
void
xinit(void)
{
int i, n, upages, kpages;
ulong maxkpa;
Confmem *m;
Pallocmem *pm;
Hole *h, *eh;
eh = &xlists.hole[Nhole-1];
for(h = xlists.hole; h < eh; h++)
h->link = h+1;
xlists.flist = xlists.hole;
upages = conf.upages;
kpages = conf.npage - upages;
pm = palloc.mem;
maxkpa = -KZERO;
for(i=0; i<nelem(conf.mem); i++){
m = &conf.mem[i];
n = m->npage;
if(n > kpages)
n = kpages;
if(m->base >= maxkpa)
n = 0;
else if(n > 0 && m->base+n*PGSZ >= maxkpa)
n = (maxkpa - m->base)/PGSZ;
/* first give to kernel */
if(n > 0){
m->kbase = PTR2UINT(KADDR(m->base));
m->klimit = PTR2UINT(KADDR(m->base+n*PGSZ));
xhole(m->base, n*PGSZ);
kpages -= n;
}
/* if anything left over, give to user */
if(n < m->npage){
if(pm >= palloc.mem+nelem(palloc.mem)){
print("xinit: losing %lud pages\n", m->npage-n);
continue;
}
pm->base = m->base+n*PGSZ;
pm->npage = m->npage - n;
pm++;
}
}
xsummary();
}
void
xinit(void)
{
int i, n, upages, kpages;
ulong maxpages;
Confmem *m;
Pallocmem *pm;
Hole *h, *eh;
eh = &xlists.hole[Nhole-1];
for(h = xlists.hole; h < eh; h++)
h->link = h+1;
xlists.flist = xlists.hole;
upages = conf.upages;
kpages = conf.npage - upages;
pm = palloc.mem;
for(i=0; i<nelem(conf.mem); i++){
m = &conf.mem[i];
n = m->npage;
if(n > kpages)
n = kpages;
/* don't try to use non-KADDR-able memory for kernel */
maxpages = cankaddr(m->base)/BY2PG;
if(n > maxpages)
n = maxpages;
/* first give to kernel */
if(n > 0){
m->kbase = (ulong)KADDR(m->base);
m->klimit = (ulong)KADDR(m->base+n*BY2PG);
xhole(m->base, n*BY2PG);
kpages -= n;
}
/* if anything left over, give to user */
if(n < m->npage){
if(pm >= palloc.mem+nelem(palloc.mem)){
print("xinit: losing %lud pages\n", m->npage-n);
continue;
}
pm->base = m->base+n*BY2PG;
pm->npage = m->npage - n;
pm++;
}
}
xsummary();
}
