Help: accessing Bios param from Ada

[Alain Senjean <senjean@club-internet.fr>]

Hello,

I am using AdaObjet 7.1.2 under Win98 and i want to develop an application
software using the LPT port for managing an external HW equipment.

I need to identify the port base address and then use registers of the I/O
controller.

I know How, I have a working model of the port driver in Borland C++ (C
language under dos window) using inportb, outportb.

1) identification
   --------------
   I just need to read four 'words' at address 0000:0408 providing LPT ports
base address.
   I am used to target cross developments using motorola memory model but
not to PC memory organisation (segment, offset).
   So, I have tried something simple:

      type T_Lpt_Bios_Table is array (T_Lpt_Port) of Basic_Types.Word;
      Lpt_Bios_Table : T_Lpt_Bios_Table;
      for Lpt_Bios_Table use at Basic_Types.Int_To_Addr(16#0000_0408#);

      -- memory image
      Lpt_Table : T_Lpt_Bios_Table := Lpt_Bios_Table;

      where : Word: 0 .. 2**16,   T_Lpt_Port: Lpt1 .. Lpt4

   very optimistic I think because AdaObject is blocked upon previous line
execution and sometimes the PC itself!

   I there any standard service to access Bios segment and retrieve
parameters.
   I know this is system specific but It should be something available to
interface with low-level without using C langage (I hope).
   Typically I want to avoid introducing a second language just for two or
three services.

2) management
   ----------
   After, I want to manage this port using the base address found in the
previous BIOS table.
   Again, first idea, simply by mapping at this address a three fields
volatile record (too simple I think).
   Is there any defined service with parameters like (segment, offset, size,
value) for accessing HW ports like inportb, outportb in C ?


   Please help me.