/********************************************************************************************************************************/
/* Created:  9-Mar-2021 22:28:04 by OpenVMS SDL EV3-3      */
/* Source:  09-MAR-2021 22:28:01 $1$DGA8085:[STARLET_H.SRC]SMB$ROUTINES.SDI;1 */
/********************************************************************************************************************************/
/*** MODULE SMB$ROUTINES IDENT X-1 ***/
#ifndef __SMB_ROUTINES_LOADED
#define __SMB_ROUTINES_LOADED 1
 
#pragma __nostandard			 /* This file uses non-ANSI-Standard features */
#pragma __member_alignment __save
#pragma __nomember_alignment
#ifdef __INITIAL_POINTER_SIZE			 /* Defined whenever ptr size pragmas supported */
#pragma __required_pointer_size __save		 /* Save the previously-defined required ptr size */
#pragma __required_pointer_size __short		 /* And set ptr size default to 32-bit pointers */
#endif
 
#ifdef __cplusplus
    extern "C" {
#define __unknown_params ...
#define __optional_params ...
#else
#define __unknown_params
#define __optional_params ...
#endif
 
#ifndef __struct
#if !defined(__VAXC)
#define __struct struct
#else
#define __struct variant_struct
#endif
#endif
 
#ifndef __union
#if !defined(__VAXC)
#define __union union
#else
#define __union variant_union
#endif
#endif
 
/*                                                                          */
/* Symbiont/Job Controller Interface (SMB) Routines                         */
/*                                                                          */
/*                                                                          */
/* SMB$CHECK_FOR_MESSAGE - Check for Message from Job Controller            */
/*                                                                          */
/* status = SMB$CHECK_FOR_MESSAGE ()                                        */
/*                                                                          */
#define  smb$check_for_message  SMB$CHECK_FOR_MESSAGE
#ifdef __NEW_STARLET
unsigned int smb$check_for_message(void);
#else	/* __OLD_STARLET */
unsigned int smb$check_for_message(void);
#endif	/* #ifdef __NEW_STARLET */
/*                                                                          */
/* SMB$INITIALIZE - Initialize User-Written Symbiont                        */
/*                                                                          */
/* status = SMB$INITIALIZE (structure_level [,ast_routine] [,streams])      */
/*                                                                          */
/*  structure_level - Version of the job-controller/symbiont interface      */
/*  ast_routine     - Message-handling AST routine                          */
/*  streams         - Maximum number of streams to support                  */
/*                                                                          */
#define  smb$initialize  SMB$INITIALIZE
	
#ifdef __NEW_STARLET
unsigned int smb$initialize(
	unsigned int *structure_level,
	__optional_params
	);
#else	/* __OLD_STARLET */
unsigned int smb$initialize(__unknown_params);
#endif	/* #ifdef __NEW_STARLET */
/*                                                                          */
/* SMB$READ_MESSAGE - Obtain Message Sent by Job Controller                 */
/*                                                                          */
/* status = SMB$READ_MESSAGE (stream, buffer, request)                      */
/*                                                                          */
/*  stream  - Stream number for message                                     */
/*  buffer  - Buffer into which message is written                          */
/*  request - Code that identifies the request                              */
/*                                                                          */
#define  smb$read_message  SMB$READ_MESSAGE
	
#ifdef __NEW_STARLET
unsigned int smb$read_message(
	unsigned int *stream,
	void *buffer,
	unsigned int *request);
#else	/* __OLD_STARLET */
unsigned int smb$read_message(__unknown_params);
#endif	/* #ifdef __NEW_STARLET */
/*                                                                          */
/* SMB$READ_MESSAGE_ITEM - Parse Next Item from Message Buffer              */
/*                                                                          */
/* status = SMB$READ_MESSAGE_ITEM (message, context, item_code, buffer      */
/*                                 [, size])                                */
/*                                                                          */
/*  message   - Message items to read                                       */
/*  context   - Context value                                               */
/*  item_code - Item code of message read                                   */
/*  buffer    - Message item                                                */
/*  size      - Size of message item                                        */
/*                                                                          */
#define  smb$read_message_item  SMB$READ_MESSAGE_ITEM
	
#ifdef __NEW_STARLET
unsigned int smb$read_message_item(
	void *message,
	unsigned int *context,
	unsigned int *item_code,
	void *buffer,
	__optional_params);
#else	/* __OLD_STARLET */
unsigned int smb$read_message_item(__unknown_params);
#endif	/* #ifdef __NEW_STARLET */
/*                                                                          */
/* SMB$SEND_TO_JOBCTL - Send Message to Job Controller                      */
/*                                                                          */
/* status = SMB$SEND_TO_JOBCTL (stream [,request] [,accounting]             */
/*			        [,checkpoint] [,device_status] [,error])    */
/*                                                                          */
/*  stream        - Number of stream to which message refers                */
/*  request       - Code identifying request being completed                */
/*  accounting    - Accounting information about a task                     */
/*  checkpoint    - Checkpoint data about current task                      */
/*  device_status - Status of device served by the symbiont                 */
/*  error         - Condition code returned by the requested task           */
/*                                                                          */
#define  smb$send_to_jobctl  SMB$SEND_TO_JOBCTL
	
#ifdef __NEW_STARLET
unsigned int smb$send_to_jobctl(
	unsigned int *stream,
	__optional_params
	);
#else	/* __OLD_STARLET */
unsigned int smb$send_to_jobctl(__unknown_params);
#endif	/* #ifdef __NEW_STARLET */
 
#pragma __member_alignment __restore
#ifdef __INITIAL_POINTER_SIZE			 /* Defined whenever ptr size pragmas supported */
#pragma __required_pointer_size __restore		 /* Restore the previously-defined required ptr size */
#endif
#ifdef __cplusplus
    }
#endif
#pragma __standard
 
#endif /* __SMB_ROUTINES_LOADED */