152 lines
2.4 KiB
Awk
152 lines
2.4 KiB
Awk
#!/usr/bin/awk -f
|
|
#
|
|
# $NetBSD: mkoldconf.awk,v 1.4 1995/12/16 15:05:03 ragge Exp $
|
|
#
|
|
|
|
/tmscd/{
|
|
tmsplats[ntms]=$2;
|
|
tmsaddr[ntms]=$5;
|
|
ntms++;
|
|
}
|
|
|
|
/tscd/{
|
|
tsplats[nts]=$2;
|
|
tsaddr[nts]=$5;
|
|
nts++;
|
|
}
|
|
|
|
/racd/{
|
|
raplats[nra]=$2;
|
|
raaddr[nra]=$5;
|
|
nra++;
|
|
}
|
|
|
|
{
|
|
if(savenext==1){
|
|
l=sprintf("%d",$2)
|
|
udanummer[l-1]=nuda-1
|
|
savenext=0;
|
|
}
|
|
}
|
|
|
|
|
|
{
|
|
if(tmssavenext==1){
|
|
l=sprintf("%d",$2)
|
|
tmsnummer[l-1]=ntmscp-1
|
|
tmssavenext=0;
|
|
}
|
|
if(tssavenext==1){
|
|
l=sprintf("%d",$2)
|
|
tsnummer[l-1]=nts-1
|
|
tssavenext=0;
|
|
}
|
|
}
|
|
|
|
/tmscpcd/{
|
|
tmscpplats[ntmscp]=$2;
|
|
tmscpaddr[ntmscp]=$5;
|
|
ntmscp++;
|
|
tmssavenext=1;
|
|
}
|
|
|
|
/udacd/{
|
|
udaplats[nuda]=$2;
|
|
udaddr[nuda]=$5;
|
|
nuda++;
|
|
savenext=1;
|
|
}
|
|
|
|
|
|
/};/{
|
|
k=0;
|
|
m=0;
|
|
}
|
|
|
|
{
|
|
if (k==1){
|
|
for(i=1;i<NF+1;i++){
|
|
loc[loccnt+i]=$i;
|
|
}
|
|
loccnt+=NF;
|
|
}
|
|
}
|
|
|
|
/static int loc/{
|
|
k=1;
|
|
loccnt=0;
|
|
}
|
|
|
|
{
|
|
if(m==1){
|
|
for(i=1;i<NF+1;i++){
|
|
pv[i]=$i;
|
|
}
|
|
}
|
|
}
|
|
|
|
/static short pv/{
|
|
m=1;
|
|
}
|
|
|
|
END{
|
|
|
|
printf "#include \"sys/param.h\"\n"
|
|
printf "#include \"machine/pte.h\"\n"
|
|
printf "#include \"sys/buf.h\"\n"
|
|
printf "#include \"sys/map.h\"\n"
|
|
|
|
printf "#include \"vax/uba/ubavar.h\"\n"
|
|
|
|
printf "int antal_ra=%d;\n",nra-1
|
|
printf "int antal_uda=%d;\n",nuda-1
|
|
printf "int antal_ts=%d;\n",nts-1
|
|
printf "int antal_tms=%d;\n",ntms-1
|
|
printf "int antal_tmscp=%d;\n",ntmscp-1
|
|
|
|
printf "extern struct uba_driver udadriver;\n"
|
|
if(nts) printf "extern struct uba_driver tsdriver;\n"
|
|
if(nts) printf "void tsintr();\n"
|
|
if(ntms) printf "extern struct uba_driver tmscpdriver;\n"
|
|
if(ntms) printf "void tmscpintr();\n"
|
|
printf "void udaintr();\n"
|
|
printf "int racd=0, tmscd=0;\n"
|
|
printf "#define C (caddr_t)\n"
|
|
|
|
printf "struct uba_ctlr ubminit[]={\n"
|
|
for(i=1;i<nuda;i++){
|
|
k=sprintf("%d",udaddr[i])
|
|
printf " { &udadriver, %d,0,0,udaintr,C %s},\n",
|
|
udaplats[i],loc[k+1]
|
|
}
|
|
for(i=1;i<nts;i++){
|
|
k=sprintf("%d",tsaddr[i])
|
|
if(nts)printf " { &tsdriver, %d,'?',0,tsintr,C %s},\n",
|
|
tsplats[i],loc[k+1]
|
|
}
|
|
for(i=1;i<ntmscp;i++){
|
|
k=sprintf("%d",tmscpaddr[i])
|
|
if(ntms)printf " { &tmscpdriver, %d,'?',0,tmscpintr,C %s},\n",
|
|
tmscpplats[i],loc[k+1]
|
|
}
|
|
printf "0};\n"
|
|
|
|
printf "struct uba_device ubdinit[]={\n"
|
|
for(i=1;i<nra;i++){
|
|
k=sprintf("%d",raaddr[i])
|
|
printf " { &udadriver,%d,%d,0,%d,0,0,1,0},\n",raplats[i],
|
|
rr++/4,loc[k+1]
|
|
}
|
|
for(i=1;i<nts;i++){
|
|
k=sprintf("%d",tsaddr[i])
|
|
printf " {&tsdriver,%d,0,'?',0,0,C 0,1,0},\n",tsplats[i]
|
|
}
|
|
for(i=1;i<ntms;i++){
|
|
k=sprintf("%d",tmsaddr[i])
|
|
printf " {&tmscpdriver,%d,0,'?',0,0,C 0,1,0},\n",tmsplats[i]
|
|
}
|
|
printf "0};\n"
|
|
|
|
}
|
|
|