1/* BEGIN LICENSE BLOCK 2 * Version: CMPL 1.1 3 * 4 * The contents of this file are subject to the Cisco-style Mozilla Public 5 * License Version 1.1 (the "License"); you may not use this file except 6 * in compliance with the License. You may obtain a copy of the License 7 * at www.eclipse-clp.org/license. 8 * 9 * Software distributed under the License is distributed on an "AS IS" 10 * basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See 11 * the License for the specific language governing rights and limitations 12 * under the License. 13 * 14 * The Original Code is The ECLiPSe Constraint Logic Programming System. 15 * The Initial Developer of the Original Code is Cisco Systems, Inc. 16 * Portions created by the Initial Developer are 17 * Copyright (C) 1994-2006 Cisco Systems, Inc. All Rights Reserved. 18 * 19 * Contributor(s): Kees Schuerman, ECRC 20 * 21 * END LICENSE BLOCK */ 22/********************************************************************** 23** System: Parallel Distributed System 24** File: lbmsg.c 25** Author: Kees Schuerman 26** SccsId: "@(#)lbmsg.c 1.11 4/6/95" 27** Description: Message Passing System: Base Layer Interface 28***********************************************************************/ 29 30/* LINTLIBRARY */ 31 32#include <pds.h> 33 34 35/* 36** Port Primitives 37*/ 38 39bmsg_ret_t 40bport_familiar(port_id, familiar) 41 bport_id_t port_id; 42 bmsg_bool_t * familiar; 43{ 44 return(BMSG_OK); 45} 46 47bmsg_ret_t 48bport_port(port_id, bport) 49 bport_id_t port_id; 50 bport_t * bport; 51{ 52 return(BMSG_OK); 53} 54 55bmsg_ret_t 56bport_open(bport) 57 bport_t * bport; 58{ 59 return(BMSG_OK); 60} 61 62bmsg_ret_t 63bport_close(port_id) 64 bport_id_t port_id; 65{ 66 return(BMSG_OK); 67} 68 69bmsg_ret_t 70bport_flush(port_id) 71 bport_id_t port_id; 72{ 73 return(BMSG_OK); 74} 75 76bmsg_ret_t 77bport_block(port_id) 78 bport_id_t port_id; 79{ 80 return(BMSG_OK); 81} 82 83bmsg_ret_t 84bport_unblock(port_id) 85 bport_id_t port_id; 86{ 87 return(BMSG_OK); 88} 89 90void 91bport_ack(port_id,port_primitive,ret) 92 bport_id_t port_id; 93 bport_primitive_t port_primitive; 94 bmsg_ret_t ret; 95{ 96} 97 98void 99bport_notify(port_id,port_primitive) 100 bport_id_t port_id; 101 bport_primitive_t port_primitive; 102{ 103} 104 105 106/* 107** Message Primitives 108*/ 109 110bmsg_ret_t 111bmsg_alloc(size,data,msg) 112 bmsg_size_t size; 113 bmsg_data_t * * data; 114 bmsg_t * msg; 115{ 116 return(BMSG_OK); 117} 118 119bmsg_ret_t 120bmsg_free(msg) 121 bmsg_t msg; 122{ 123 return(BMSG_OK); 124} 125 126bmsg_size_t 127bmsg_size(msg) 128 bmsg_t msg; 129{ 130 return((bmsg_size_t) 0); 131} 132 133bmsg_data_t * 134bmsg_data(bmsg_t msg) 135 bmsg_t msg; 136{ 137 return((bmsg_data_t *) 0); 138} 139 140bmsg_size_t 141bmsg_scratch_size() 142{ 143 return(0); 144} 145 146bmsg_ret_t 147bmsg_send(port_id,msg,size) 148 bport_id_t port_id; 149 bmsg_t msg; 150 bmsg_size_t size; 151{ 152 return(BMSG_OK); 153} 154 155bmsg_ret_t 156bmsg_receive(msg,data,size,port_id,familiar) 157 bmsg_t * msg; 158 bmsg_data_t * * data; 159 bmsg_size_t * size; 160 bport_id_t * port_id; 161 bmsg_bool_t * familiar; 162{ 163 return(BMSG_OK); 164} 165 166bmsg_ret_t 167bmsg_peek(msg,data,size,port_id,familiar) 168 bmsg_t * msg; 169 bmsg_data_t * * data; 170 bmsg_size_t * size; 171 bport_id_t * port_id; 172 bmsg_bool_t * familiar; 173{ 174 return(BMSG_OK); 175} 176 177void 178bmsg_notify() 179{ 180} 181 182 183/* 184** Memory Primitives 185*/ 186 187void bmem_cpy(mem_dst_address,mem_src_address,mem_data_size) 188 bmem_address_t mem_dst_address; 189 bmem_address_t mem_src_address; 190 bmem_size_t mem_data_size; 191{ 192 return; 193} 194 195bmsg_ret_t 196bmem_put(port_id,mem_id,mem_src_address,mem_dst_address,mem_data_size) 197 bport_id_t port_id; 198 bmem_id_t * mem_id; 199 bmem_address_t mem_src_address; 200 bmem_address_t mem_dst_address; 201 bmem_size_t mem_data_size; 202{ 203 return(BMSG_OK); 204} 205 206bmsg_ret_t 207bmem_get(port_id,mem_id,mem_src_address,mem_dst_address,mem_data_size) 208 bport_id_t port_id; 209 bmem_id_t * mem_id; 210 bmem_address_t mem_src_address; 211 bmem_address_t mem_dst_address; 212 bmem_size_t mem_data_size; 213{ 214 return(BMSG_OK); 215} 216 217void 218bmem_ack(mem_id,mem_primitive,ret) 219 bmem_id_t mem_id; 220 bmem_primitive_t mem_primitive; 221 bmsg_ret_t ret; 222{ 223} 224 225void 226bmem_notify(port_id,mem_primitive,mem_address,mem_data_size) 227 bport_id_t port_id; 228 bmem_primitive_t mem_primitive; 229 bmem_address_t mem_address; 230 bmem_size_t mem_data_size; 231{ 232} 233 234 235/* 236** Miscellaneous Primitives 237*/ 238 239bmsg_ret_t 240bmsg_init(port_id,domain,option) 241 bport_id_t port_id; 242 bdomain_t * domain; 243 bmsg_option_t option; 244{ 245 return(BMSG_OK); 246} 247 248void 249bmsg_exit() 250{ 251} 252 253bmsg_ret_t 254bmsg_set_option(optname,optval) 255 bmsg_optname_t optname; 256 bmsg_optval_t optval; 257{ 258 return(BMSG_OK); 259} 260 261bmsg_ret_t 262bmsg_get_option(optname,optval) 263 bmsg_optname_t optname; 264 bmsg_optval_t * optval; 265{ 266 return(BMSG_OK); 267} 268 269bmsg_ret_t 270bmsg_trigger(option) 271 bmsg_option_t option; 272{ 273 return(BMSG_OK); 274} 275 276void 277bproc_trigger(port) 278 bport_t * port; 279{ 280} 281 282void 283bmsg_warn(msg_warn,culprit) 284 bmsg_warn_t msg_warn; 285 bport_id_t culprit; 286{ 287} 288 289void 290bmsg_error(msg_error,culprit) 291 bmsg_error_t msg_error; 292 bport_id_t culprit; 293{ 294} 295 296void 297bmsg_panic(msg_panic,culprit) 298 bmsg_panic_t msg_panic; 299 bport_id_t culprit; 300{ 301} 302 303bmsg_ret_t 304bmsg_info(msg_info) 305 bmsg_info_t * msg_info; 306{ 307 return(BMSG_OK); 308} 309 310bmsg_ret_t 311bmem_info(mem_info) 312 bmem_info_t * mem_info; 313{ 314 return(BMSG_OK); 315} 316 317bmsg_ret_t 318bport_info(port_id,port_info) 319 bport_id_t port_id; 320 bport_info_t * port_info; 321{ 322 return(BMSG_OK); 323} 324 325 326bmsg_ret_t 327bmem_address(msg_address,mem_address) 328 bmsg_address_t msg_address; 329 bmem_address_t * mem_address; 330{ 331 return(BMSG_OK); 332} 333 334void 335bmsg_address(mem_address,msg_address) 336 bmem_address_t mem_address; 337 bmsg_address_t * msg_address; 338{ 339 return; 340} 341 342 343