3 * init.c - VMS Enviroment Subsystem Server - Initialization
5 * ReactOS Operating System
7 * --------------------------------------------------------------------
9 * This software is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU General Public License as
11 * published by the Free Software Foundation; either version 2 of the
12 * License, or (at your option) any later version.
14 * This software is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17 * General Public License for more details.
19 * You should have received a copy of the GNU General Public License
20 * along with this software; see the file COPYING.LIB. If not, write
21 * to the Free Software Foundation, Inc., 675 Mass Ave, Cambridge,
24 * --------------------------------------------------------------------
26 #define __USE_NT_LPC__
33 /**********************************************************************
37 NTSTATUS
VmsRunServer (VOID
)
39 NTSTATUS Status
= STATUS_SUCCESS
;
40 LPC_MAX_MESSAGE Request
;
41 PLPC_MESSAGE Reply
= NULL
;
42 ULONG MessageType
= 0;
46 Status
= NtReplyWaitReceivePort (VmsApiPort
,
50 if(NT_SUCCESS(Status
))
52 MessageType
= PORT_MESSAGE_TYPE(Request
);
53 DPRINT("VMS: %s received a message (Type=%d)\n",
54 __FUNCTION__
, MessageType
);
61 DPRINT("VMS: %s: NtReplyWaitReceivePort failed (Status=%08lx)\n",
62 __FUNCTION__
, Status
);