home *** CD-ROM | disk | FTP | other *** search
/ Solo Programadores 22 / SOLO_22.iso / packages / win32ada / data.z / win32-ras.ads < prev    next >
Encoding:
Text File  |  1996-03-15  |  30.1 KB  |  575 lines
  1. -- $Source: /home/harp/1/proto/monoBANK/winnt/win32-ras.ads,v $ 
  2. -- $Revision: 1.17 $ $Date: 96/03/15 12:55:19 $ $Author: stm $ 
  3. -- See end of file for Copyright (c) information.
  4.  
  5. with Win32.Lmcons;
  6. with Win32.Windef;
  7. with Win32.Winnt;
  8.  
  9. package Win32.Ras is
  10.  
  11.     use type Interfaces.C.Char_Array;
  12.  
  13.     RAS_MaxEntryName                : constant := 20;       -- ras.h:22
  14.     RAS_MaxDeviceName               : constant := 32;       -- ras.h:23
  15.     RAS_MaxDeviceType               : constant := 16;       -- ras.h:24
  16.     RAS_MaxParamKey                 : constant := 32;       -- ras.h:25
  17.     RAS_MaxParamValue               : constant := 128;      -- ras.h:26
  18.     RAS_MaxPhoneNumber              : constant := 128;      -- ras.h:27
  19.     RAS_MaxCallbackNumber           : constant := 48;       -- ras.h:28
  20.     RAS_MaxIpAddress                : constant := 15;       -- ras.h:29
  21.     RAS_MaxIpxAddress               : constant := 21;       -- ras.h:30
  22.     RASCS_PAUSED                    : constant := 16#1000#; -- ras.h:69
  23.     RASCS_DONE                      : constant := 16#2000#; -- ras.h:70
  24.     RDEOPT_UsePrefixSuffix          : constant := 16#1#;    -- ras.h:192
  25.     RDEOPT_PausedStates             : constant := 16#2#;    -- ras.h:193
  26.     RDEOPT_IgnoreModemSpeaker       : constant := 16#4#;    -- ras.h:194
  27.     RDEOPT_SetModemSpeaker          : constant := 16#8#;    -- ras.h:195
  28.     RDEOPT_IgnoreSoftwareCompression: constant := 16#10#;   -- ras.h:196
  29.     RDEOPT_SetSoftwareCompression   : constant := 16#20#;   -- ras.h:197
  30.     RASDIALEVENT                    : constant CHAR_Array := 
  31.                                       "RasDialEvent" & Nul; -- ras.h:373
  32.     WM_RASDIALEVENT                 : constant := 16#cccd#; -- ras.h:374
  33.  
  34.     type tagRASCONNSTATE is (                               -- ras.h:73
  35.         RASCS_OpenPort,                                     -- ras.h:75
  36.         RASCS_PortOpened,                                   -- ras.h:76
  37.         RASCS_ConnectDevice,                                -- ras.h:77
  38.         RASCS_DeviceConnected,                              -- ras.h:78
  39.         RASCS_AllDevicesConnected,                          -- ras.h:79
  40.         RASCS_Authenticate,                                 -- ras.h:80
  41.         RASCS_AuthNotify,                                   -- ras.h:81
  42.         RASCS_AuthRetry,                                    -- ras.h:82
  43.         RASCS_AuthCallback,                                 -- ras.h:83
  44.         RASCS_AuthChangePassword,                           -- ras.h:84
  45.         RASCS_AuthProject,                                  -- ras.h:85
  46.         RASCS_AuthLinkSpeed,                                -- ras.h:86
  47.         RASCS_AuthAck,                                      -- ras.h:87
  48.         RASCS_ReAuthenticate,                               -- ras.h:88
  49.         RASCS_Authenticated,                                -- ras.h:89
  50.         RASCS_PrepareForCallback,                           -- ras.h:90
  51.         RASCS_WaitForModemReset,                            -- ras.h:91
  52.         RASCS_WaitForCallback,                              -- ras.h:92
  53.         RASCS_Projected,                                    -- ras.h:93
  54.         RASCS_Interactive,                                  -- ras.h:95
  55.         RASCS_RetryAuthentication,                          -- ras.h:96
  56.         RASCS_CallbackSetByCaller,                          -- ras.h:97
  57.         RASCS_PasswordExpired,                              -- ras.h:98
  58.         RASCS_Connected,                                    -- ras.h:100
  59.         RASCS_Disconnected                                  -- ras.h:102
  60.     );
  61.     for tagRASCONNSTATE use (                               -- ras.h:73
  62.         RASCS_OpenPort => 0,                                -- ras.h:75
  63.         RASCS_PortOpened => 1,                              -- ras.h:76
  64.         RASCS_ConnectDevice => 2,                           -- ras.h:77
  65.         RASCS_DeviceConnected => 3,                         -- ras.h:78
  66.         RASCS_AllDevicesConnected => 4,                     -- ras.h:79
  67.         RASCS_Authenticate => 5,                            -- ras.h:80
  68.         RASCS_AuthNotify => 6,                              -- ras.h:81
  69.         RASCS_AuthRetry => 7,                               -- ras.h:82
  70.         RASCS_AuthCallback => 8,                            -- ras.h:83
  71.         RASCS_AuthChangePassword => 9,                      -- ras.h:84
  72.         RASCS_AuthProject => 10,                            -- ras.h:85
  73.         RASCS_AuthLinkSpeed => 11,                          -- ras.h:86
  74.         RASCS_AuthAck => 12,                                -- ras.h:87
  75.         RASCS_ReAuthenticate => 13,                         -- ras.h:88
  76.         RASCS_Authenticated => 14,                          -- ras.h:89
  77.         RASCS_PrepareForCallback => 15,                     -- ras.h:90
  78.         RASCS_WaitForModemReset => 16,                      -- ras.h:91
  79.         RASCS_WaitForCallback => 17,                        -- ras.h:92
  80.         RASCS_Projected => 18,                              -- ras.h:93
  81.         RASCS_Interactive => 4096,                          -- ras.h:95
  82.         RASCS_RetryAuthentication => 4097,                  -- ras.h:96
  83.         RASCS_CallbackSetByCaller => 4098,                  -- ras.h:97
  84.         RASCS_PasswordExpired => 4099,                      -- ras.h:98
  85.         RASCS_Connected => 8192,                            -- ras.h:100
  86.         RASCS_Disconnected => 8193                          -- ras.h:102
  87.     );
  88.     for tagRASCONNSTATE'size use 32;                        -- ras.h:73
  89.  
  90.     type tagRASPROJECTION is (                              -- ras.h:230
  91.         RASP_PppIp,                                         -- ras.h:236
  92.         RASP_PppIpx,                                        -- ras.h:234
  93.         RASP_PppNbf,                                        -- ras.h:233
  94.         RASP_Amb                                            -- ras.h:232
  95.     );
  96.     for tagRASPROJECTION use (                              -- ras.h:230
  97.         RASP_PppIp => 32801,                                -- ras.h:236
  98.         RASP_PppIpx => 32811,                               -- ras.h:234
  99.         RASP_PppNbf => 32831,                               -- ras.h:233
  100.         RASP_Amb => 65536                                   -- ras.h:232
  101.     );
  102.  
  103.     -- for tagRASPROJECTION'size use 32;                   -- ras.h:230
  104.  
  105.     subtype HRASCONN is Win32.Winnt.HANDLE;
  106.  
  107.     type RASCONNW;                                          -- ras.h:41
  108.     type RASCONNA;                                          -- ras.h:49
  109.     type RASCONNSTATUSW;                                    -- ras.h:110
  110.     type RASCONNSTATUSA;                                    -- ras.h:120
  111.     type RASDIALPARAMSW;                                    -- ras.h:143
  112.     type RASDIALPARAMSA;                                    -- ras.h:155
  113.     type RASDIALEXTENSIONS;                                 -- ras.h:180
  114.     type RASENTRYNAMEW;                                     -- ras.h:203
  115.     type RASENTRYNAMEA;                                     -- ras.h:210
  116.     type RASAMBW;                                           -- ras.h:246
  117.     type RASAMBA;                                           -- ras.h:255
  118.     type RASPPPNBFW;                                        -- ras.h:277
  119.     type RASPPPNBFA;                                        -- ras.h:288
  120.     type RASIPXW;                                           -- ras.h:313
  121.     type RASPPPIPXA;                                        -- ras.h:322
  122.     type RASPPPIPW;                                         -- ras.h:343
  123.     type RASPPPIPA;                                         -- ras.h:351
  124.  
  125.     type RASCONNW is                                        -- ras.h:41
  126.         record
  127.             dwSize     : Win32.DWORD;                       -- ras.h:43
  128.             hrasconn   : Win32.Ras.HRASCONN;                -- ras.h:44
  129.             szEntryName: Win32.WCHAR_Array(0..RAS_MaxEntryName);
  130.                                                             -- ras.h:45
  131.         end record;
  132.  
  133.     type RASCONNA is                                        -- ras.h:49
  134.         record
  135.             dwSize     : Win32.DWORD;                       -- ras.h:51
  136.             hrasconn   : Win32.Ras.HRASCONN;                -- ras.h:52
  137.             szEntryName: Win32.CHAR_Array(0..RAS_MaxEntryName);
  138.                                                             -- ras.h:53
  139.         end record;
  140.  
  141.     type RASCONN is access all RASCONNA;                    -- ras.h:59
  142.  
  143.     type LPRASCONNW is access all  RASCONNW;                -- ras.h:62
  144.     type LPRASCONNA is access all  RASCONNA;                -- ras.h:63
  145.     type LPRASCONN  is access all  RASCONN;                 -- ras.h:64
  146.  
  147.     type RASCONNSTATE is new tagRASCONNSTATE;            -- ras.h:72
  148.  
  149.     type LPRASCONNSTATE is access all RASCONNSTATE;         -- ras.h:104
  150.  
  151.     type RASCONNSTATUSW is                                  -- ras.h:110
  152.         record
  153.             dwSize      : Win32.DWORD;                      -- ras.h:112
  154.             rasconnstate: tagRASCONNSTATE;                  -- ras.h:113
  155.             dwError     : Win32.DWORD;                      -- ras.h:114
  156.             szDeviceType: Win32.WCHAR_Array(0..RAS_MaxDeviceType);
  157.                                                             -- ras.h:115
  158.             szDeviceName: Win32.WCHAR_Array(0..RAS_MaxDeviceType);
  159.                                                             -- ras.h:116
  160.         end record;
  161.  
  162.     type RASCONNSTATUSA is                                  -- ras.h:120
  163.         record
  164.             dwSize      : Win32.DWORD;                      -- ras.h:122
  165.             rasconnstate: tagRASCONNSTATE;                  -- ras.h:123
  166.             dwError     : Win32.DWORD;                      -- ras.h:124
  167.             szDeviceType: Win32.CHAR_Array(0..RAS_MaxDeviceType);
  168.                                                             -- ras.h:125
  169.             szDeviceName: Win32.CHAR_Array(0..RAS_MaxDeviceType);
  170.                                                             -- ras.h:126
  171.         end record;
  172.  
  173.     type RASCONNSTATUS is access all RASCONNSTATUSA;        -- ras.h:132
  174.  
  175.     type LPRASCONNSTATUSW is access all RASCONNSTATUSW;     -- ras.h:135
  176.     type LPRASCONNSTATUSA is access all RASCONNSTATUSA;     -- ras.h:136
  177.     type LPRASCONNSTATUS  is access all RASCONNSTATUS ;     -- ras.h:137
  178.  
  179.     type RASDIALPARAMSW is                                  -- ras.h:143
  180.         record
  181.             dwSize          : Win32.DWORD;                  -- ras.h:145
  182.             szEntryName     : Win32.WCHAR_Array(0..RAS_MaxEntryName);
  183.                                                             -- ras.h:146
  184.             szPhoneNumber   : Win32.WCHAR_Array(0..RAS_MaxPhoneNumber);
  185.                                                             -- ras.h:147
  186.             szCallbackNumber: Win32.WCHAR_Array(0..RAS_MaxCallbackNumber);
  187.                                                             -- ras.h:148
  188.             szUserName      : Win32.WCHAR_Array(0..Win32.Lmcons.UNLEN);
  189.                                                             -- ras.h:149
  190.             szPassword      : Win32.WCHAR_Array(0..Win32.Lmcons.PWLEN);
  191.                                                             -- ras.h:150
  192.             szDomain        : Win32.WCHAR_Array(0..Win32.Lmcons.DNLEN);
  193.                                                             -- ras.h:151
  194.         end record;
  195.  
  196.     type RASDIALPARAMSA is                                  -- ras.h:155
  197.         record
  198.             dwSize          : Win32.DWORD;                  -- ras.h:157
  199.             szEntryName     : Win32.CHAR_Array(0..RAS_MaxEntryName);
  200.                                                             -- ras.h:158
  201.             szPhoneNumber   : Win32.CHAR_Array(0..RAS_MaxPhoneNumber);
  202.                                                             -- ras.h:159
  203.             szCallbackNumber: Win32.CHAR_Array(0..RAS_MaxCallbackNumber);
  204.                                                             -- ras.h:160
  205.             szUserName      : Win32.CHAR_Array(0..Win32.Lmcons.UNLEN);
  206.                                                             -- ras.h:161
  207.             szPassword      : Win32.CHAR_Array(0..Win32.Lmcons.PWLEN);
  208.                                                             -- ras.h:162
  209.             szDomain        : Win32.CHAR_Array(0..Win32.Lmcons.DNLEN);
  210.                                                             -- ras.h:163
  211.         end record;
  212.  
  213.     type RASDIALPARAMS is access all RASDIALPARAMSA;        -- ras.h:169
  214.  
  215.     type LPRASDIALPARAMSW is access all  RASDIALPARAMSW;    -- ras.h:172
  216.     type LPRASDIALPARAMSA is access all  RASDIALPARAMSA;    -- ras.h:173
  217.     type LPRASDIALPARAMS  is access all  RASDIALPARAMS ;    -- ras.h:174
  218.  
  219.     type RASDIALEXTENSIONS is                               -- ras.h:180
  220.         record
  221.             dwSize    : Win32.DWORD;                        -- ras.h:182
  222.             dwfOptions: Win32.DWORD;                        -- ras.h:183
  223.             hwndParent: Win32.Windef.HWND;                  -- ras.h:184
  224.             reserved  : Win32.DWORD;                        -- ras.h:185
  225.         end record;
  226.  
  227.     type LPRASDIALEXTENSIONS is access all RASDIALEXTENSIONS;
  228.                                                             -- ras.h:188
  229.  
  230.     type RASENTRYNAMEW is                                   -- ras.h:203
  231.         record
  232.             dwSize     : Win32.DWORD;                       -- ras.h:205
  233.             szEntryName: Win32.WCHAR_Array(0..RAS_MaxEntryName);
  234.                                                             -- ras.h:206
  235.         end record;
  236.  
  237.     type RASENTRYNAMEA is                                   -- ras.h:210
  238.         record
  239.             dwSize     : Win32.DWORD;                       -- ras.h:212
  240.             szEntryName: Win32.CHAR_Array(0..RAS_MaxEntryName);
  241.                                                             -- ras.h:213
  242.         end record;
  243.  
  244.     type RASENTRYNAME is access all RASENTRYNAMEA;          -- ras.h:219
  245.  
  246.     type  LPRASENTRYNAMEW is access all RASENTRYNAMEW;      -- ras.h:222
  247.     type  LPRASENTRYNAMEA is access all RASENTRYNAMEA;      -- ras.h:223
  248.     type  LPRASENTRYNAME  is access all RASENTRYNAME ;      -- ras.h:224
  249.  
  250.     type RASPROJECTION is new tagRASPROJECTION;            -- ras.h:229
  251.  
  252.     type LPRASPROJECTION is access all RASPROJECTION;       -- ras.h:238
  253.  
  254.     type RASAMBW is                                         -- ras.h:246
  255.         record
  256.             dwSize        : Win32.DWORD;                    -- ras.h:248
  257.             dwError       : Win32.DWORD;                    -- ras.h:249
  258.             szNetBiosError: Win32.WCHAR_Array(
  259.                 0..Win32.Lmcons.NETBIOS_NAME_LEN);
  260.                                                             -- ras.h:250
  261.             bLana         : Win32.BYTE;                     -- ras.h:251
  262.         end record;
  263.  
  264.     type RASAMBA is                                         -- ras.h:255
  265.         record
  266.             dwSize        : Win32.DWORD;                    -- ras.h:257
  267.             dwError       : Win32.DWORD;                    -- ras.h:258
  268.             szNetBiosError: Win32.CHAR_Array(0..Win32.Lmcons.NETBIOS_NAME_LEN);
  269.                                                             -- ras.h:259
  270.             bLana         : Win32.BYTE;                     -- ras.h:260
  271.         end record;
  272.  
  273.     subtype RASAMB is RASAMBA;                             -- ras.h:266
  274.     type LPRASAMBW is access all RASAMBW;                   -- ras.h:269
  275.     type LPRASAMBA is access all RASAMBA;                   -- ras.h:270
  276.     type LPRASAMB is access all RASAMB;                     -- ras.h:271
  277.  
  278.     type RASPPPNBFW is                                      -- ras.h:277
  279.         record
  280.             dwSize           : Win32.DWORD;                 -- ras.h:279
  281.             dwError          : Win32.DWORD;                 -- ras.h:280
  282.             dwNetBiosError   : Win32.DWORD;                 -- ras.h:281
  283.             szNetBiosError   : Win32.WCHAR_Array(
  284.                                0..Win32.Lmcons.NETBIOS_NAME_LEN);
  285.                                                             -- ras.h:282
  286.             szWorkstationName: Win32.WCHAR_Array(
  287.                                0..Win32.Lmcons.NETBIOS_NAME_LEN);
  288.                                                             -- ras.h:283
  289.             bLana            : Win32.BYTE;                  -- ras.h:284
  290.         end record;
  291.  
  292.     type RASPPPNBFA is                                      -- ras.h:288
  293.         record
  294.             dwSize           : Win32.DWORD;                 -- ras.h:290
  295.             dwError          : Win32.DWORD;                 -- ras.h:291
  296.             dwNetBiosError   : Win32.DWORD;                 -- ras.h:292
  297.             szNetBiosError   : Win32.CHAR_Array(
  298.                                0..Win32.Lmcons.NETBIOS_NAME_LEN);
  299.                                                             -- ras.h:293
  300.             szWorkstationName: Win32.CHAR_Array(
  301.                                0..Win32.Lmcons.NETBIOS_NAME_LEN);
  302.                                                             -- ras.h:294
  303.             bLana            : Win32.BYTE;                  -- ras.h:295
  304.         end record;
  305.  
  306.     type RASPPPNBF is access all RASPPPNBFA;                -- ras.h:301
  307.  
  308.     type LPRASPPPNBFW is access all RASPPPNBFW;             -- ras.h:304
  309.     type LPRASPPPNBFA is access all RASPPPNBFA;             -- ras.h:305
  310.     type LPRASPPPNBF  is access all RASPPPNBF ;             -- ras.h:306
  311.  
  312.     type RASIPXW is                                         -- ras.h:313
  313.         record
  314.             dwSize      : Win32.DWORD;                      -- ras.h:315
  315.             dwError     : Win32.DWORD;                      -- ras.h:316
  316.             szIpxAddress: Win32.WCHAR_Array(0..RAS_MaxIpxAddress);
  317.                                                             -- ras.h:317
  318.         end record;
  319.  
  320.     type RASPPPIPXA is                                      -- ras.h:322
  321.         record
  322.             dwSize      : Win32.DWORD;                      -- ras.h:324
  323.             dwError     : Win32.DWORD;                      -- ras.h:325
  324.             szIpxAddress: Win32.CHAR_Array(0..RAS_MaxIpxAddress);
  325.                                                             -- ras.h:326
  326.         end record;
  327.  
  328.     type RASPPPIPX is access all RASPPPIPXA;                -- ras.h:332
  329.  
  330.     type LPRASPPPIPXW is access all RASIPXW;                -- ras.h:335
  331.     type LPRASPPPIPXA is access all RASPPPIPXA;             -- ras.h:336
  332.     type LPRASPPPIPX  is access all RASPPPIPX ;             -- ras.h:337
  333.  
  334.     type RASPPPIPW is                                       -- ras.h:343
  335.         record
  336.             dwSize     : Win32.DWORD;                       -- ras.h:345
  337.             dwError    : Win32.DWORD;                       -- ras.h:346
  338.             szIpAddress: Win32.WCHAR_Array(0..RAS_MaxIpAddress);
  339.                                                             -- ras.h:347
  340.         end record;
  341.  
  342.     type RASPPPIPA is                                       -- ras.h:351
  343.         record
  344.             dwSize     : Win32.DWORD;                       -- ras.h:353
  345.             dwError    : Win32.DWORD;                       -- ras.h:354
  346.             szIpAddress: Win32.CHAR_Array(0..RAS_MaxIpAddress);
  347.                                                             -- ras.h:355
  348.         end record;
  349.  
  350.     type RASPPPIP is access all RASPPPIPA;                  -- ras.h:361
  351.  
  352.     type LPRASPPPIPW is access all RASPPPIPW;               -- ras.h:364
  353.     type LPRASPPPIPA is access all RASPPPIPA;               -- ras.h:365
  354.     type LPRASPPPIP  is access all RASPPPIP ;               -- ras.h:366
  355.  
  356.     type RASDIALFUNC is access procedure (
  357.                 unMsg       : Win32.UINT;
  358.                 RasConnState: tagRASCONNSTATE;
  359.                 dwError     : Win32.DWORD);                 -- ras.h:381
  360.     pragma Convention(Stdcall, RASDIALFUNC);
  361.     type RASDIALFUNC1 is access procedure (
  362.                 hRasConn       : Win32.Ras.HRASCONN;
  363.                 unMsg          : Win32.UINT;
  364.                 rascs          : tagRASCONNSTATE;
  365.                 dwError        : Win32.DWORD;
  366.                 dwExtendedError: Win32.DWORD);              -- ras.h:382
  367.     pragma Convention(Stdcall, RASDIALFUNC1);
  368.  
  369.     function RasDialA(
  370.                 lpRasDialExtensions: access RASDIALEXTENSIONS;
  371.                 lpszPhonebookPath  : Win32.LPSTR;
  372.                 lpRasDialParams    : access RASDIALPARAMSA;
  373.                 dwNotifierType     : Win32.DWORD;
  374.                 notifier           : Win32.LPVOID;
  375.                 lphRasConn         : access HRASCONN)
  376.                return Win32.DWORD;                          -- ras.h:387
  377.  
  378.     function RasDial(
  379.                 lpRasDialExtensions: access RASDIALEXTENSIONS;
  380.                 lpszPhonebookPath  : Win32.LPSTR;
  381.                 lpRasDialParams    : access RASDIALPARAMSA;
  382.                 dwNotifierType     : Win32.DWORD;
  383.                 notifier           : Win32.LPVOID;
  384.                 lphRasConn         : access HRASCONN)
  385.                return Win32.DWORD
  386.                renames RasDialA;                            -- ras.h:387
  387.  
  388.     function RasDialW(
  389.                 lpRasDialExtensions: access RASDIALEXTENSIONS;
  390.                 lpszPhonebookPath  : Win32.LPWSTR;
  391.                 lpRasDialParams    : access RASDIALPARAMSW;
  392.                 dwNotifierType     : Win32.DWORD;
  393.                 notifier           : Win32.LPVOID;
  394.                 lphRasConn         : access HRASCONN)
  395.                return Win32.DWORD;                          -- ras.h:390
  396.  
  397.     function RasEnumConnectionsA(
  398.                 lpRasConn     : access RASCONNA;
  399.                 lpcb          : Win32.LPDWORD;
  400.                 lpcConnections: Win32.LPDWORD)
  401.                return Win32.DWORD;                          -- ras.h:393
  402.  
  403.     function RasEnumConnections(
  404.                 lpRasConn     : access RASCONNA;
  405.                 lpcb          : Win32.LPDWORD;
  406.                 lpcConnections: Win32.LPDWORD)
  407.                return Win32.DWORD
  408.                renames RasEnumConnectionsA;                 -- ras.h:393
  409.  
  410.     function RasEnumConnectionsW(
  411.                 lpRasConn     : access RASCONNW;
  412.                 lpcb          : Win32.LPDWORD;
  413.                 lpcConnections: Win32.LPDWORD)
  414.                return Win32.DWORD;                          -- ras.h:395
  415.  
  416.     function RasEnumEntriesA(
  417.                 reserved         : Win32.LPSTR;
  418.                 lpszPhonebookPath: Win32.LPSTR;
  419.                 lpRasEntryname   : access RASENTRYNAMEA;
  420.                 lpcb             : Win32.LPDWORD;
  421.                 lpcEntries       : Win32.LPDWORD)
  422.                return Win32.DWORD;                          -- ras.h:397
  423.  
  424.     function RasEnumEntries(
  425.                 reserved         : Win32.LPSTR;
  426.                 lpszPhonebookPath: Win32.LPSTR;
  427.                 lpRasEntryname   : access RASENTRYNAMEA;
  428.                 lpcb             : Win32.LPDWORD;
  429.                 lpcEntries       : Win32.LPDWORD)
  430.                return Win32.DWORD
  431.                renames RasEnumEntriesA;                     -- ras.h:397
  432.  
  433.     function RasEnumEntriesW(
  434.                 reserved         : Win32.LPWSTR;
  435.                 lpszPhonebookPath: Win32.LPWSTR;
  436.                 lpRasEntryname   : access RASENTRYNAMEW;
  437.                 lpcb             : Win32.LPDWORD;
  438.                 lpcEntries       : Win32.LPDWORD)
  439.                return Win32.DWORD;                          -- ras.h:400
  440.  
  441.     function RasGetConnectStatusA(
  442.                 hRasConn       : Win32.Ras.HRASCONN;
  443.                 lprasconnstatus: access RASCONNSTATUSA)
  444.                return Win32.DWORD;                          -- ras.h:403
  445.  
  446.     function RasGetConnectStatus(
  447.                 hRasConn       : Win32.Ras.HRASCONN;
  448.                 lprasconnstatus: access RASCONNSTATUSA)
  449.                return Win32.DWORD
  450.                renames RasGetConnectStatusA;                -- ras.h:403
  451.  
  452.     function RasGetConnectStatusW(
  453.                 hRasConn       : Win32.Ras.HRASCONN;
  454.                 lprasconnstatus: access RASCONNSTATUSW)
  455.                return Win32.DWORD;                          -- ras.h:405
  456.  
  457.     function RasGetErrorStringA(
  458.                 uErrorValue    : Win32.UINT;
  459.                 lpszErrorString: Win32.LPSTR;
  460.                 cBufSize       : Win32.DWORD)
  461.                return Win32.DWORD;                          -- ras.h:407
  462.  
  463.     function RasGetErrorString(
  464.                 uErrorValue    : Win32.UINT;
  465.                 lpszErrorString: Win32.LPSTR;
  466.                 cBufSize       : Win32.DWORD)
  467.                return Win32.DWORD
  468.                renames RasGetErrorStringA;                  -- ras.h:407
  469.  
  470.     function RasGetErrorStringW(
  471.                 uErrorValue    : Win32.UINT;
  472.                 lpszErrorString: Win32.LPWSTR;
  473.                 cBufSize       : Win32.DWORD)
  474.                return Win32.DWORD;                          -- ras.h:409
  475.  
  476.     function RasHangUpA(
  477.                 hRasConn: Win32.Ras.HRASCONN)
  478.                return Win32.DWORD;                          -- ras.h:411
  479.  
  480.     function RasHangUp(
  481.                 hRasConn: Win32.Ras.HRASCONN)
  482.                return Win32.DWORD
  483.                renames RasHangUpA;                          -- ras.h:411
  484.  
  485.     function RasHangUpW(
  486.                 hRasConn: Win32.Ras.HRASCONN)
  487.                return Win32.DWORD;                          -- ras.h:413
  488.  
  489.     function RasGetProjectionInfoA(
  490.                 hRasConn     : Win32.Ras.HRASCONN;
  491.                 Rasprojection: TagRasProjection;
  492.                 lpProjection : Win32.LPVOID;
  493.                 lpcb         : Win32.LPDWORD)
  494.                Return Win32.Dword;                          -- ras.h:415
  495.  
  496.     Function RasGetProjectioninfo(
  497.                 hRasConn     : Win32.Ras.HRASCONN;
  498.                 RasProjection: TagRasProjection;
  499.                 lpProjection : Win32.LPVOID;
  500.                 lpcb         : Win32.LPDWORD)
  501.                Return Win32.Dword
  502.                Renames RasgetProjectioninfoa;               -- ras.h:415
  503.  
  504.     Function RasGetProjectioninfow(
  505.                 hRasConn     : HRASCONN;
  506.                 RasProjection: TagRasProjection;
  507.                 lpProjection : Win32.LPVOID;
  508.                 lpcb         : Win32.LPDWORD)
  509.                return Win32.DWORD;                          -- ras.h:418
  510.  
  511. private
  512.  
  513.     pragma Convention(C, RASCONNW);                         -- ras.h:41
  514.     pragma Convention(C, RASCONNA);                         -- ras.h:49
  515.     pragma Convention(C, RASCONNSTATUSW);                   -- ras.h:110
  516.     pragma Convention(C, RASCONNSTATUSA);                   -- ras.h:120
  517.     pragma Convention(C, RASDIALPARAMSW);                   -- ras.h:143
  518.     pragma Convention(C, RASDIALPARAMSA);                   -- ras.h:155
  519.     pragma Convention(C, RASDIALEXTENSIONS);                -- ras.h:180
  520.     pragma Convention(C, RASENTRYNAMEW);                    -- ras.h:203
  521.     pragma Convention(C, RASENTRYNAMEA);                    -- ras.h:210
  522.     pragma Convention(C, RASAMBW);                          -- ras.h:246
  523.     pragma Convention(C, RASAMBA);                          -- ras.h:255
  524.     pragma Convention(C, RASPPPNBFW);                       -- ras.h:277
  525.     pragma Convention(C, RASPPPNBFA);                       -- ras.h:288
  526.     pragma Convention(C, RASIPXW);                          -- ras.h:313
  527.     pragma Convention(C, RASPPPIPXA);                       -- ras.h:322
  528.     pragma Convention(C, RASPPPIPW);                        -- ras.h:343
  529.     pragma Convention(C, RASPPPIPA);                        -- ras.h:351
  530.  
  531.     pragma Import(Stdcall, RasDialA, "RasDialA");                 -- ras.h:387
  532.     pragma Import(Stdcall, RasDialW, "RasDialW");                 -- ras.h:390
  533.     pragma Import(Stdcall, RasEnumConnectionsA, "RasEnumConnectionsA");
  534.                                                             -- ras.h:393
  535.     pragma Import(Stdcall, RasEnumConnectionsW, "RasEnumConnectionsW");
  536.                                                             -- ras.h:395
  537.     pragma Import(Stdcall, RasEnumEntriesA, "RasEnumEntriesA");   -- ras.h:397
  538.     pragma Import(Stdcall, RasEnumEntriesW, "RasEnumEntriesW");   -- ras.h:400
  539.     pragma Import(Stdcall, RasGetConnectStatusA, "RasGetConnectStatusA");
  540.                                                             -- ras.h:403
  541.     pragma Import(Stdcall, RasGetConnectStatusW, "RasGetConnectStatusW");
  542.                                                             -- ras.h:405
  543.     pragma Import(Stdcall, RasGetErrorStringA, "RasGetErrorStringA");
  544.                                                             -- ras.h:407
  545.     pragma Import(Stdcall, RasGetErrorStringW, "RasGetErrorStringW");
  546.                                                             -- ras.h:409
  547.     pragma Import(Stdcall, RasHangUpA, "RasHangUpA");             -- ras.h:411
  548.     pragma Import(Stdcall, RasHangUpW, "RasHangUpW");             -- ras.h:413
  549.     pragma Import(Stdcall, RasGetProjectionInfoA, "RasGetProjectionInfoA");
  550.                                                             -- ras.h:415
  551.     pragma Import(Stdcall, RasGetProjectionInfoW, "RasGetProjectionInfoW");
  552.                                                             -- ras.h:418
  553.  
  554. -------------------------------------------------------------------------------
  555. --
  556. -- THIS FILE AND ANY ASSOCIATED DOCUMENTATION IS PROVIDED WITHOUT CHARGE
  557. -- "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESS OR IMPLIED, INCLUDING
  558. -- BUT NOT LIMITED TO THE IMPLIED WARRANTIES OF MERCHANTABILITY AND/OR
  559. -- FITNESS FOR A PARTICULAR PURPOSE.  The user assumes the entire risk as to
  560. -- the accuracy and the use of this file.  This file may be used, copied,
  561. -- modified and distributed only by licensees of Microsoft Corporation's
  562. -- WIN32 Software Development Kit in accordance with the terms of the 
  563. -- licensee's End-User License Agreement for Microsoft Software for the
  564. -- WIN32 Development Kit.
  565. --
  566. -- Copyright (c) Intermetrics, Inc. 1995
  567. -- Portions (c) 1985-1994 Microsoft Corporation with permission.
  568. -- Microsoft is a registered trademark and Windows and Windows NT are
  569. -- trademarks of Microsoft Corporation.
  570. --
  571. -------------------------------------------------------------------------------
  572.  
  573. end Win32.Ras;
  574.  
  575.