home *** CD-ROM | disk | FTP | other *** search
/ Solo Programadores 22 / SOLO_22.iso / packages / win32ada / data.z / win32-lmchdev.ads < prev    next >
Encoding:
Text File  |  1996-03-15  |  11.0 KB  |  222 lines
  1. -- $Source: /home/harp/1/proto/monoBANK/winnt/win32-lmchdev.ads,v $ 
  2. -- $Revision: 1.11 $ $Date: 96/03/15 12:52:42 $ $Author: stm $ 
  3. -- See end of file for Copyright (c) information.
  4.  
  5. with Win32.Winnt;
  6.  
  7. package Win32.Lmchdev is
  8.  
  9.     CHARDEV_STAT_OPENED         : constant := 16#2#;        -- lmchdev.h:180
  10.     CHARDEV_STAT_ERROR          : constant := 16#4#;        -- lmchdev.h:181
  11.     CHARDEV_CLOSE               : constant := 0;            -- lmchdev.h:187
  12.     CHARDEVQ_DEV_PARMNUM        : constant := 1;            -- lmchdev.h:193
  13.     CHARDEVQ_PRIORITY_PARMNUM   : constant := 2;            -- lmchdev.h:194
  14.     CHARDEVQ_DEVS_PARMNUM       : constant := 3;            -- lmchdev.h:195
  15.     CHARDEVQ_NUMUSERS_PARMNUM   : constant := 4;            -- lmchdev.h:196
  16.     CHARDEVQ_NUMAHEAD_PARMNUM   : constant := 5;            -- lmchdev.h:197
  17.     CHARDEVQ_PRIORITY_INFOLEVEL : constant := 1002;         -- lmchdev.h:203
  18.     CHARDEVQ_DEVS_INFOLEVEL     : constant := 1003;         -- lmchdev.h:205
  19.     CHARDEVQ_MAX_PRIORITY       : constant := 1;            -- lmchdev.h:212
  20.     CHARDEVQ_MIN_PRIORITY       : constant := 9;            -- lmchdev.h:213
  21.     CHARDEVQ_DEF_PRIORITY       : constant := 5;            -- lmchdev.h:214
  22.     CHARDEVQ_NO_REQUESTS        : constant := -1;           -- lmchdev.h:220
  23.     HANDLE_INFO_LEVEL_1         : constant := 1;            -- lmchdev.h:268
  24.     HANDLE_CHARTIME_PARMNUM     : constant := 1;            -- lmchdev.h:274
  25.     HANDLE_CHARCOUNT_PARMNUM    : constant := 2;            -- lmchdev.h:275
  26.  
  27.     type CHARDEV_INFO_0;                                    -- lmchdev.h:84
  28.     type CHARDEV_INFO_1;                                    -- lmchdev.h:88
  29.     type CHARDEVQ_INFO_0;                                   -- lmchdev.h:151
  30.     type CHARDEVQ_INFO_1;                                   -- lmchdev.h:155
  31.     type CHARDEVQ_INFO_1002;                                -- lmchdev.h:163
  32.     type CHARDEVQ_INFO_1003;                                -- lmchdev.h:167
  33.     type HANDLE_INFO_1;                                     -- lmchdev.h:255
  34.  
  35.     type PCHARDEV_INFO_0 is access all CHARDEV_INFO_0;      -- lmchdev.h:86
  36.     subtype LPCHARDEV_INFO_0 is PCHARDEV_INFO_0;            -- lmchdev.h:86
  37.  
  38.     type PCHARDEV_INFO_1 is access all CHARDEV_INFO_1;      -- lmchdev.h:93
  39.     subtype LPCHARDEV_INFO_1 is PCHARDEV_INFO_1;            -- lmchdev.h:93
  40.  
  41.     type PCHARDEVQ_INFO_0 is access all CHARDEVQ_INFO_0;    -- lmchdev.h:153
  42.     subtype LPCHARDEVQ_INFO_0 is PCHARDEVQ_INFO_0;          -- lmchdev.h:153
  43.  
  44.     type PCHARDEVQ_INFO_1 is access all CHARDEVQ_INFO_1;    -- lmchdev.h:161
  45.     subtype LPCHARDEVQ_INFO_1 is PCHARDEVQ_INFO_1;          -- lmchdev.h:161
  46.  
  47.     type PCHARDEVQ_INFO_1002 is access all CHARDEVQ_INFO_1002;
  48.                                                             -- lmchdev.h:165
  49.     subtype LPCHARDEVQ_INFO_1002 is PCHARDEVQ_INFO_1002;    -- lmchdev.h:165
  50.  
  51.     type PCHARDEVQ_INFO_1003 is access all CHARDEVQ_INFO_1003;
  52.                                                             -- lmchdev.h:169
  53.     subtype LPCHARDEVQ_INFO_1003 is PCHARDEVQ_INFO_1003;    -- lmchdev.h:169
  54.  
  55.     type PHANDLE_INFO_1 is access all HANDLE_INFO_1;        -- lmchdev.h:258
  56.     subtype LPHANDLE_INFO_1 is PHANDLE_INFO_1;              -- lmchdev.h:258
  57.  
  58.     type CHARDEV_INFO_0 is                                  -- lmchdev.h:84
  59.         record
  60.             ch0_dev: Win32.Winnt.LPTSTR;                    -- lmchdev.h:85
  61.         end record;
  62.  
  63.     type CHARDEV_INFO_1 is                                  -- lmchdev.h:88
  64.         record
  65.             ch1_dev     : Win32.Winnt.LPTSTR;               -- lmchdev.h:89
  66.             ch1_status  : Win32.DWORD;                      -- lmchdev.h:90
  67.             ch1_username: Win32.Winnt.LPTSTR;               -- lmchdev.h:91
  68.             ch1_time    : Win32.DWORD;                      -- lmchdev.h:92
  69.         end record;
  70.  
  71.     type CHARDEVQ_INFO_0 is                                 -- lmchdev.h:151
  72.         record
  73.             cq0_dev: Win32.Winnt.LPTSTR;                    -- lmchdev.h:152
  74.         end record;
  75.  
  76.     type CHARDEVQ_INFO_1 is                                 -- lmchdev.h:155
  77.         record
  78.             cq1_dev     : Win32.Winnt.LPTSTR;               -- lmchdev.h:156
  79.             cq1_priority: Win32.DWORD;                      -- lmchdev.h:157
  80.             cq1_devs    : Win32.Winnt.LPTSTR;               -- lmchdev.h:158
  81.             cq1_numusers: Win32.DWORD;                      -- lmchdev.h:159
  82.             cq1_numahead: Win32.DWORD;                      -- lmchdev.h:160
  83.         end record;
  84.  
  85.     type CHARDEVQ_INFO_1002 is                              -- lmchdev.h:163
  86.         record
  87.             cq1002_priority: Win32.DWORD;                   -- lmchdev.h:164
  88.         end record;
  89.  
  90.     type CHARDEVQ_INFO_1003 is                              -- lmchdev.h:167
  91.         record
  92.             cq1003_devs: Win32.Winnt.LPTSTR;                -- lmchdev.h:168
  93.         end record;
  94.  
  95.     type HANDLE_INFO_1 is                                   -- lmchdev.h:255
  96.         record
  97.             hdli1_chartime : Win32.DWORD;                   -- lmchdev.h:256
  98.             hdli1_charcount: Win32.DWORD;                   -- lmchdev.h:257
  99.         end record;
  100.  
  101.     function NetCharDevEnum(
  102.                 servername   : Win32.Winnt.LPTSTR;
  103.                 level        : Win32.DWORD;
  104.                 bufptr       : access Win32.PBYTE;
  105.                 prefmaxlen   : Win32.DWORD;
  106.                 entriesread  : Win32.LPDWORD;
  107.                 totalentries : Win32.LPDWORD;
  108.                 resume_handle: Win32.LPDWORD)
  109.                return Win32.DWORD;                          -- lmchdev.h:55
  110.  
  111.     function NetCharDevGetInfo(
  112.                 servername: Win32.Winnt.LPTSTR;
  113.                 devname   : Win32.Winnt.LPTSTR;
  114.                 level     : Win32.DWORD;
  115.                 bufptr    : access Win32.PBYTE)
  116.                return Win32.DWORD;                          -- lmchdev.h:66
  117.  
  118.     function NetCharDevControl(
  119.                 servername: Win32.Winnt.LPTSTR;
  120.                 devname   : Win32.Winnt.LPTSTR;
  121.                 opcode    : Win32.DWORD)
  122.                return Win32.DWORD;                          -- lmchdev.h:74
  123.  
  124.     function NetCharDevQEnum(
  125.                 servername   : Win32.Winnt.LPTSTR;
  126.                 username     : Win32.Winnt.LPTSTR;
  127.                 level        : Win32.DWORD;
  128.                 bufptr       : access Win32.PBYTE;
  129.                 prefmaxlen   : Win32.DWORD;
  130.                 entriesread  : Win32.LPDWORD;
  131.                 totalentries : Win32.LPDWORD;
  132.                 resume_handle: Win32.LPDWORD)
  133.                return Win32.DWORD;                          -- lmchdev.h:105
  134.  
  135.     function NetCharDevQGetInfo(
  136.                 servername: Win32.Winnt.LPTSTR;
  137.                 queuename : Win32.Winnt.LPTSTR;
  138.                 username  : Win32.Winnt.LPTSTR;
  139.                 level     : Win32.DWORD;
  140.                 bufptr    : access Win32.PBYTE)
  141.                return Win32.DWORD;                          -- lmchdev.h:117
  142.  
  143.     function NetCharDevQSetInfo(
  144.                 servername: Win32.Winnt.LPTSTR;
  145.                 queuename : Win32.Winnt.LPTSTR;
  146.                 level     : Win32.DWORD;
  147.                 buf       : Win32.LPBYTE;
  148.                 parm_err  : Win32.LPDWORD)
  149.                return Win32.DWORD;                          -- lmchdev.h:126
  150.  
  151.     function NetCharDevQPurge(
  152.                 servername: Win32.Winnt.LPTSTR;
  153.                 queuename : Win32.Winnt.LPTSTR)
  154.                return Win32.DWORD;                          -- lmchdev.h:135
  155.  
  156.     function NetCharDevQPurgeSelf(
  157.                 servername  : Win32.Winnt.LPTSTR;
  158.                 queuename   : Win32.Winnt.LPTSTR;
  159.                 computername: Win32.Winnt.LPTSTR)
  160.                return Win32.DWORD;                          -- lmchdev.h:141
  161.  
  162.     function NetHandleGetInfo(
  163.                 handle: Win32.Winnt.HANDLE;
  164.                 level : Win32.DWORD;
  165.                 bufptr: access Win32.PBYTE)
  166.                return Win32.DWORD;                          -- lmchdev.h:236
  167.  
  168.     function NetHandleSetInfo(
  169.                 handle : Win32.Winnt.HANDLE;
  170.                 level  : Win32.DWORD;
  171.                 buf    : Win32.LPBYTE;
  172.                 parmnum: Win32.DWORD;
  173.                 parmerr: Win32.LPDWORD)
  174.                return Win32.DWORD;                          -- lmchdev.h:243
  175.  
  176. private
  177.  
  178.     pragma Convention(C, CHARDEV_INFO_0);                   -- lmchdev.h:84
  179.     pragma Convention(C, CHARDEV_INFO_1);                   -- lmchdev.h:88
  180.     pragma Convention(C, CHARDEVQ_INFO_0);                  -- lmchdev.h:151
  181.     pragma Convention(C, CHARDEVQ_INFO_1);                  -- lmchdev.h:155
  182.     pragma Convention(C, CHARDEVQ_INFO_1002);               -- lmchdev.h:163
  183.     pragma Convention(C, CHARDEVQ_INFO_1003);               -- lmchdev.h:167
  184.     pragma Convention(C, HANDLE_INFO_1);                    -- lmchdev.h:255
  185.  
  186.     pragma Import(Stdcall, NetCharDevEnum, "NetCharDevEnum");     -- lmchdev.h:55
  187.     pragma Import(Stdcall, NetCharDevGetInfo, "NetCharDevGetInfo");
  188.                                                             -- lmchdev.h:66
  189.     pragma Import(Stdcall, NetCharDevControl, "NetCharDevControl");
  190.                                                             -- lmchdev.h:74
  191.     pragma Import(Stdcall, NetCharDevQEnum, "NetCharDevQEnum");   -- lmchdev.h:105
  192.     pragma Import(Stdcall, NetCharDevQGetInfo, "NetCharDevQGetInfo");
  193.                                                             -- lmchdev.h:117
  194.     pragma Import(Stdcall, NetCharDevQSetInfo, "NetCharDevQSetInfo");
  195.                                                             -- lmchdev.h:126
  196.     pragma Import(Stdcall, NetCharDevQPurge, "NetCharDevQPurge"); -- lmchdev.h:135
  197.     pragma Import(Stdcall, NetCharDevQPurgeSelf, "NetCharDevQPurgeSelf");
  198.                                                             -- lmchdev.h:141
  199.     pragma Import(Stdcall, NetHandleGetInfo, "NetHandleGetInfo"); -- lmchdev.h:236
  200.     pragma Import(Stdcall, NetHandleSetInfo, "NetHandleSetInfo"); -- lmchdev.h:243
  201.  
  202. -------------------------------------------------------------------------------
  203. --
  204. -- THIS FILE AND ANY ASSOCIATED DOCUMENTATION IS PROVIDED WITHOUT CHARGE
  205. -- "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESS OR IMPLIED, INCLUDING
  206. -- BUT NOT LIMITED TO THE IMPLIED WARRANTIES OF MERCHANTABILITY AND/OR
  207. -- FITNESS FOR A PARTICULAR PURPOSE.  The user assumes the entire risk as to
  208. -- the accuracy and the use of this file.  This file may be used, copied,
  209. -- modified and distributed only by licensees of Microsoft Corporation's
  210. -- WIN32 Software Development Kit in accordance with the terms of the 
  211. -- licensee's End-User License Agreement for Microsoft Software for the
  212. -- WIN32 Development Kit.
  213. --
  214. -- Copyright (c) Intermetrics, Inc. 1995
  215. -- Portions (c) 1985-1994 Microsoft Corporation with permission.
  216. -- Microsoft is a registered trademark and Windows and Windows NT are
  217. -- trademarks of Microsoft Corporation.
  218. --
  219. -------------------------------------------------------------------------------
  220.  
  221. end Win32.Lmchdev;
  222.