pk_from_bcd (a, 1, sa, pkp -> pk_xcp); /* get calling address */
pk_parse_facilities (facp, sa);
bcopy ((caddr_t)u, sa -> x25_udata, udlen);
pk_from_bcd (a, 1, sa, pkp -> pk_xcp); /* get calling address */
pk_parse_facilities (facp, sa);
bcopy ((caddr_t)u, sa -> x25_udata, udlen);