HP3000-L Archives

January 2001, Week 2

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Keven Miller <[log in to unmask]>
Reply To:
Keven Miller <[log in to unmask]>
Date:
Thu, 11 Jan 2001 10:53:32 -0700
Content-Type:
text/plain
Parts/Attachments:
text/plain (78 lines)
My hard copy of AIF manual has small note on page 1-5.

http://docs.hp.com/mpeix/onlinedocs/36374-90013/36374-90013.html
Introduction, Types of Operating System Architected Interfaces

Here is sample C code that calls them. I got these from sample code from
CSL (most likely GODXL or WLKABOUT).

/* AIF TEST */
#pragma  list off

#pragma intrinsic GETPRIVMODE    mpe_getprivmode
#pragma intrinsic GETUSERMODE    mpe_getusermode

#pragma intrinsic_file "AIFINTR.PUB.SYS"
#pragma intrinsic AIFACCESSON    mpe_aifaccesson
#pragma intrinsic AIFACCESSOFF   mpe_aifaccessoff
#pragma intrinsic_file ""

#define  AIF_ID   0

/*---------------------------------------------------------------*/

int enable_aif ( int id ) {
   int   rtv, err;

   mpe_getprivmode ();
   mpe_aifaccesson ( &err, id );
   mpe_getusermode ();

   if ( err ) {
      rtv = 0;
      printf ( "enable err %d\n", err );
   } else
      rtv = 1;
   return rtv;
}
/*---------------------------------------------------------------*/

int disable_aif ( int id ){
   int   rtv, err;

   mpe_getprivmode ();
   mpe_aifaccessoff ( &err, id );
   mpe_getusermode ();

   if ( err ) {
      rtv = 0;
      printf ( "disable err %d\n", err );
   } else
      rtv = 1;
   return rtv;
}
/*---------------------------------------------------------------*/

int main ( int argc, char* argv [] ) {
   int   rtv;

   if ( !enable_aif ( AIF_ID )) {
      printf ( "AIF %d not enabled\n", AIF_ID );
      rtv = 1;
   } else {
      printf ( "OK\n" );
      rtv = 0;
   }

   if ( !disable_aif ( AIF_ID ))
      printf ( "AIF %d not disabled\n", AIF_ID );

   return rtv;
}
/*---------------------------------------------------------------*/
/*---------------------------------------------------------------*/
> _____________________________________________________________
> Keven Miller   mailto:[log in to unmask]   http://www.exegesys.com
>
>

ATOM RSS1 RSS2