source: EcnlProtoTool/trunk/asp3_dcre/tinet/tinet.trb@ 279

Last change on this file since 279 was 279, checked in by coas-nagasima, 7 years ago

ファイルを追加、更新。
  • Property svn:eol-style set to native
  • Property svn:mime-type set to text/x-ruby
File size: 24.1 KB
Line 
1# ======================================================================
2#
3# TINET (TCP/IP Protocol Stack)
4#
5# Copyright (C) 2001-2007 by Dep. of Computer Science and Engineering
6# Tomakomai National College of Technology, JAPAN
7#
8# 上記著作権者
9は，以下の(1)～(4)の条件を満たす場合に限り，本ソフトウェ
10# ア（本ソフトウェアを改変したものを含む．以下同じ）を使用・複製・改
11# 変・再é…
12å¸ƒï¼ˆä»¥ä¸‹ï¼Œåˆ©ç”¨ã¨å‘¼ã¶ï¼‰ã™ã‚‹ã“とを無償で許諾する．
13# (1) 本ソフトウェアをソースコードの形で利用する場合には，上記の著作
14# 権表示，この利用条件および下記の無保証規定が，そのままの形でソー
15# スコード中に含まれていること．
16# (2) 本ソフトウェアを，ライブラリ形式など，他のソフトウェア開発に使
17# 用できる形で再é…
18å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œå†é…
19å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨
20# 者
21マニュアルなど）に，上記の著作権表示，この利用条件および下記
22# の無保証規定を掲載すること．
23# (3) 本ソフトウェアを，機器に組み込むなど，他のソフトウェア開発に使
24# 用できない形で再é…
25å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œæ¬¡ã®ã„ずれかの条件を満たすこ
26# と．
27# (a) 再é…
28å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨è€…
29マニュアルなど）に，上記の著
30# 作権表示，この利用条件および下記の無保証規定を掲載すること．
31# (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
32# 害からも，上記著作権者
33およびTOPPERSプロジェクトをå…
34è²¬ã™ã‚‹ã“と．
35# また，本ソフトウェアのユーザまたはエンドユーザからのいかなる理
36# 由に基づく請求からも，上記著作権者
37およびTOPPERSプロジェクトを
38# å…
39è²¬ã™ã‚‹ã“と．
40#
41# 本ソフトウェアは，無保証で提供されているものである．上記著作権者
42お
43# よびTOPPERSプロジェクトは，本ソフトウェアに関して，特定の使用目的
44# に対する適合性も含めて，いかなる保証も行わない．また，本ソフトウェ
45# アの利用により直接的または間接的に生じたいかなる損害に関しても，そ
46# の責任を負わない．
47#
48# @(#) $Id: tinet.tf 3 2013-09-27 01:07:16Z coas-nagasima $
49#
50# =====================================================================
51
52# =====================================================================
53# tinet_cfg.h の生成
54# =====================================================================
55
56$tinetCfgH = GenFile.new("tinet_cfg.h")
57$tinetCfgH.add("/* tinet_cfg.h */")
58$tinetCfgH.add("#ifndef _TINET_CFG_H_")
59$tinetCfgH.add("#define _TINET_CFG_H_")
60$tinetCfgH.add()
61
62$cfgData[:TCP_CRE_REP].each do |key, params|
63 $tinetCfgH.add("#define #{params[:tcp4_repid]} #{params[:tcp4_repid].val}")
64end
65$cfgData[:TCP6_CRE_REP].each do |key, params|
66 $tinetCfgH.add("#define #{params[:tcp6_repid]} #{params[:tcp6_repid].val}")
67end
68$cfgData[:TCP_CRE_CEP].each do |key, params|
69 $tinetCfgH.add("#define #{params[:tcp4_cepid]} #{params[:tcp4_cepid].val}")
70end
71$cfgData[:TCP6_CRE_CEP].each do |key, params|
72 $tinetCfgH.add("#define #{params[:tcp6_cepid]} #{params[:tcp6_cepid].val}")
73end
74$cfgData[:UDP_CRE_CEP].each do |key, params|
75 $tinetCfgH.add("#define #{params[:udp4_cepid]} #{params[:udp4_cepid].val}")
76end
77$cfgData[:UDP6_CRE_CEP].each do |key, params|
78 $tinetCfgH.add("#define #{params[:udp6_cepid]} #{params[:udp6_cepid].val}")
79end
80$cfgData[:VRID_TCP4_REP].each do |key, params|
81 $tinetCfgH.add("#define #{params[:vrid_tcp4_repid]} #{params[:vrid_tcp4_repid].val + $cfgData[:TCP_CRE_REP].size}")
82end
83$cfgData[:VRID_TCP4_CEP].each do |key, params|
84 $tinetCfgH.add("#define #{params[:vrid_tcp4_cepid]} #{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size}")
85end
86$cfgData[:VRID_TCP6_REP].each do |key, params|
87 $tinetCfgH.add("#define #{params[:vrid_tcp6_repid]} #{params[:vrid_tcp6_repid].val + $cfgData[:TCP6_CRE_REP].size}")
88end
89$cfgData[:VRID_TCP6_CEP].each do |key, params|
90 $tinetCfgH.add("#define #{params[:vrid_tcp6_cepid]} #{params[:vrid_tcp6_cepid].val + $cfgData[:TCP6_CRE_CEP].size}")
91end
92$cfgData[:VRID_UDP4_CEP].each do |key, params|
93 $tinetCfgH.add("#define #{params[:vrid_udp4_cepid]} #{params[:vrid_udp4_cepid].val + $cfgData[:UDP_CRE_CEP].size}")
94end
95$cfgData[:VRID_UDP6_CEP].each do |key, params|
96 $tinetCfgH.add("#define #{params[:vrid_udp6_cepid]} #{params[:vrid_udp6_cepid].val + $cfgData[:UDP6_CRE_CEP].size}")
97end
98$tinetCfgH.add()
99$tinetCfgH.add("#endif /* _TINET_CFG_H_ */")
100
101# =====================================================================
102# tinet_cfg.c の生成
103# =====================================================================
104
105$tinetCfgC = GenFile.new("tinet_cfg.c")
106$tinetCfgC.add(<<EOS)
107/* tinet_cfg.c */
108
109#include <kernel.h>
110#include <sil.h>
111#include "kernel_cfg.h"
112#include "tinet_cfg.h"
113#include <tinet_defs.h>
114#include <tinet_config.h>
115#include <net/if.h>
116#include <net/if_ppp.h>
117#include <net/if_loop.h>
118#include <net/ethernet.h>
119#include <net/net.h>
120#include <net/net_buf.h>
121#include <netinet/in.h>
122#include <netinet/in_var.h>
123#include <netinet/in_itron.h>
124#include <netinet/ip.h>
125#include <netinet/ip6.h>
126#include <netinet/tcp.h>
127#include <netinet/tcp_timer.h>
128#include <netinet/tcp_var.h>
129#include <netinet/tcp_fsm.h>
130#include <netinet/udp_var.h>
131
132EOS
133#
134# インクルードディレクティブ（#include）
135#
136$tinetCfgC.add()
137$tinetCfgC.add("/*")
138$tinetCfgC.add(" * Include Directives (#include)")
139$tinetCfgC.add(" */")
140$tinetCfgC.add()
141$includeFiles.each do |file|
142 $tinetCfgC.add("#include #{file}")
143end
144
145# // TCP (IPv4) 受付口
146if $cfgData[:TCP_CRE_REP].size > 0 || $cfgData[:VRID_TCP4_REP].size > 0
147 $tinetCfgC.add()
148 $tinetCfgC.add("#define TNUM_TCP_REPID #{$cfgData[:TCP_CRE_REP].size + $cfgData[:VRID_TCP4_REP].size}")
149 $tinetCfgC.add()
150 $tinetCfgC.add("const ID tmax_tcp_repid = (TMIN_TCP_REPID + TNUM_TCP_REPID - 1);")
151 $tinetCfgC.add()
152 $tinetCfgC.add("T_TCP_REP tcp_rep[TNUM_TCP_REPID] = {")
153 $cfgData[:TCP_CRE_REP].each do |key, params|
154 $tinetCfgC.add("\t{")
155 $tinetCfgC.add("\t\t#{params[:tcp4_repatr]},")
156 $tinetCfgC.add("\t\t{ #{params[:ipv4addr]}, #{params[:portno]} },")
157 $tinetCfgC.add("#if defined(TCP_CFG_EXTENTIONS)")
158 $tinetCfgC.add("\t\tTCP_REP_FLG_VALID,")
159 $tinetCfgC.add("\t\tSEM_TCP_REP_LOCK#{params[:tcp4_repid].val},")
160 $tinetCfgC.add("#endif")
161 $tinetCfgC.add("\t\t},")
162 end
163 $cfgData[:VRID_TCP4_REP].each do |key, params|
164 $tinetCfgC.add("\t{")
165 $tinetCfgC.add("\t\t0,")
166 $tinetCfgC.add("\t\t{ IPV4_ADDRANY, TCP_PORTANY },")
167 $tinetCfgC.add("#if defined(TCP_CFG_EXTENTIONS)")
168 $tinetCfgC.add("\t\tTCP_REP_FLG_DYNAMIC,")
169 $tinetCfgC.add("\t\tSEM_TCP_REP_LOCK#{params[:vrid_tcp4_repid].val + $cfgData[:TCP_CRE_REP].size},")
170 $tinetCfgC.add("#endif")
171 $tinetCfgC.add("\t\t},")
172 end
173 $tinetCfgC.add("\t};")
174end
175
176# // TCP (IPv6) 受付口
177if $cfgData[:TCP6_CRE_REP].size > 0 || $cfgData[:VRID_TCP6_REP].size > 0
178 $tinetCfgC.add()
179 $tinetCfgC.add("#define TNUM_TCP_REPID #{$cfgData[:TCP6_CRE_REP].size + $cfgData[:VRID_TCP6_REP].size}")
180 $tinetCfgC.add()
181 $tinetCfgC.add("const ID tmax_tcp_repid = (TMIN_TCP_REPID + TNUM_TCP_REPID - 1);")
182 $tinetCfgC.add()
183 $tinetCfgC.add("T_TCP6_REP tcp_rep[TNUM_TCP_REPID] = {")
184 $cfgData[:TCP6_CRE_REP].each do |key, params|
185 $tinetCfgC.add("\t{")
186 $tinetCfgC.add("\t\t#{params[:tcp6_repatr]},")
187 $tinetCfgC.add("\t\t{ #{params[:ipv6addr]}, #{params[:portno]} },")
188 $tinetCfgC.add("#if defined(TCP_CFG_EXTENTIONS)")
189 $tinetCfgC.add("\t\tTCP_REP_FLG_VALID,")
190 $tinetCfgC.add("\t\tSEM_TCP_REP_LOCK#{params[:tcp6_repid].val},")
191 $tinetCfgC.add("#endif")
192 $tinetCfgC.add("\t\t},")
193 end
194 $cfgData[:VRID_TCP6_REP].each do |key, params|
195 $tinetCfgC.add("\t{")
196 $tinetCfgC.add("\t\t0,")
197 $tinetCfgC.add("\t\t{ IPV6_ADDRANY, TCP_PORTANY },")
198 $tinetCfgC.add("#if defined(TCP_CFG_EXTENTIONS)")
199 $tinetCfgC.add("\t\tTCP_REP_FLG_DYNAMIC,")
200 $tinetCfgC.add("\t\tSEM_TCP_REP_LOCK#{params[:vrid_tcp6_repid].val + $cfgData[:TCP6_CRE_REP].size},")
201 $tinetCfgC.add("#endif")
202 $tinetCfgC.add("\t\t},")
203 end
204 $tinetCfgC.add("\t};")
205end
206
207# // TCP (IPv4) 通信端点
208if $cfgData[:TCP_CRE_CEP].size > 0 || $cfgData[:VRID_TCP4_CEP].size > 0
209 $tinetCfgC.add()
210 $tinetCfgC.add("#define TNUM_TCP_CEPID #{$cfgData[:TCP_CRE_CEP].size + $cfgData[:VRID_TCP4_CEP].size}")
211 $tinetCfgC.add()
212 $tinetCfgC.add("const ID tmax_tcp_cepid = (TMIN_TCP_CEPID + TNUM_TCP_CEPID - 1);")
213 $tinetCfgC.add()
214 $tinetCfgC.add("T_TCP_CEP tcp_cep[TNUM_TCP_CEPID] = {")
215 $cfgData[:TCP_CRE_CEP].each do |key, params|
216 $tinetCfgC.add("\t{")
217 $tinetCfgC.add("\t\t#{params[:tcp4_cepatr]},")
218 $tinetCfgC.add("\t\t(void*)#{params[:sbuf]},")
219 $tinetCfgC.add("\t\t#{params[:sbufsz]},")
220 $tinetCfgC.add("\t\t(void*)#{params[:rbuf]},")
221 $tinetCfgC.add("\t\t#{params[:rbufsz]},")
222 $tinetCfgC.add("\t\t(t_tcp_callback)(FP)#{params[:callback]},")
223 $tinetCfgC.add("\t\tTCP_CEP_FLG_VALID,")
224 $tinetCfgC.add("\t\tSEM_TCP_CEP_LOCK#{params[:tcp4_cepid].val},")
225 $tinetCfgC.add("\t\tFLG_TCP_CEP_EST#{params[:tcp4_cepid].val},")
226 $tinetCfgC.add("\t\tFLG_TCP_CEP_SND#{params[:tcp4_cepid].val},")
227 $tinetCfgC.add("\t\tFLG_TCP_CEP_RCV#{params[:tcp4_cepid].val},")
228 $tinetCfgC.add("\t\t},")
229 end
230 $cfgData[:VRID_TCP4_CEP].each do |key, params|
231 $tinetCfgC.add("\t{")
232 $tinetCfgC.add("\t\t0,")
233 $tinetCfgC.add("\t\t(void*)NULL,")
234 $tinetCfgC.add("\t\t0,")
235 $tinetCfgC.add("\t\t(void*)NULL,")
236 $tinetCfgC.add("\t\t0,")
237 $tinetCfgC.add("\t\t(t_tcp_callback)(FP)NULL,")
238 $tinetCfgC.add("\t\tTCP_CEP_FLG_DYNAMIC,")
239 $tinetCfgC.add("\t\tSEM_TCP_CEP_LOCK#{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size},")
240 $tinetCfgC.add("\t\tFLG_TCP_CEP_EST#{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size},")
241 $tinetCfgC.add("\t\tFLG_TCP_CEP_SND#{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size},")
242 $tinetCfgC.add("\t\tFLG_TCP_CEP_RCV#{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size},")
243 $tinetCfgC.add("\t\t},")
244 end
245 $tinetCfgC.add("\t};")
246end
247
248# // TCP (IPv6) 通信端点
249if $cfgData[:TCP6_CRE_CEP].size > 0 || $cfgData[:VRID_TCP6_CEP].size > 0
250 $tinetCfgC.add()
251 $tinetCfgC.add("#define TNUM_TCP_CEPID #{$cfgData[:TCP6_CRE_CEP].size + $cfgData[:VRID_TCP6_CEP].size}")
252 $tinetCfgC.add()
253 $tinetCfgC.add("const ID tmax_tcp_cepid = (TMIN_TCP_CEPID + TNUM_TCP_CEPID - 1);")
254 $tinetCfgC.add()
255 $tinetCfgC.add("T_TCP6_CEP tcp_cep[TNUM_TCP_CEPID] = {")
256 $cfgData[:TCP6_CRE_CEP].each do |key, params|
257 $tinetCfgC.add("\t{")
258 $tinetCfgC.add("\t\t#{params[:tcp6_cepatr]},")
259 $tinetCfgC.add("\t\t(void*)#{params[:sbuf]},")
260 $tinetCfgC.add("\t\t#{params[:sbufsz]},")
261 $tinetCfgC.add("\t\t(void*)#{params[:rbuf]},")
262 $tinetCfgC.add("\t\t#{params[:rbufsz]},")
263 $tinetCfgC.add("\t\t(t_tcp_callback)(FP)#{params[:callback]},")
264 $tinetCfgC.add("\t\tTCP_CEP_FLG_VALID,")
265 $tinetCfgC.add("\t\tSEM_TCP_CEP_LOCK#{params[:tcp6_cepid].val},")
266 $tinetCfgC.add("\t\tFLG_TCP_CEP_EST#{params[:tcp6_cepid].val},")
267 $tinetCfgC.add("\t\tFLG_TCP_CEP_SND#{params[:tcp6_cepid].val},")
268 $tinetCfgC.add("\t\tFLG_TCP_CEP_RCV#{params[:tcp6_cepid].val},")
269 $tinetCfgC.add("\t\t},")
270 end
271 $cfgData[:VRID_TCP6_CEP].each do |key, params|
272 $tinetCfgC.add("\t{")
273 $tinetCfgC.add("\t\t0,")
274 $tinetCfgC.add("\t\t(void*)NULL,")
275 $tinetCfgC.add("\t\t0,")
276 $tinetCfgC.add("\t\t(void*)NULL,")
277 $tinetCfgC.add("\t\t0,")
278 $tinetCfgC.add("\t\t(t_tcp_callback)(FP)NULL,")
279 $tinetCfgC.add("\t\tTCP_CEP_FLG_DYNAMIC,")
280 $tinetCfgC.add("\t\tSEM_TCP_CEP_LOCK#{params[:vrid_tcp6_cepid].val + $cfgData[:TCP6_CRE_CEP].size},")
281 $tinetCfgC.add("\t\tFLG_TCP_CEP_EST#{params[:vrid_tcp6_cepid].val + $cfgData[:TCP6_CRE_CEP].size},")
282 $tinetCfgC.add("\t\tFLG_TCP_CEP_SND#{params[:vrid_tcp6_cepid].val + $cfgData[:TCP6_CRE_CEP].size},")
283 $tinetCfgC.add("\t\tFLG_TCP_CEP_RCV#{params[:vrid_tcp6_cepid].val + $cfgData[:TCP6_CRE_CEP].size},")
284 $tinetCfgC.add("\t\t},")
285 end
286 $tinetCfgC.add("\t};")
287end
288
289# // UDP (IPv4) 通信端点
290if $cfgData[:UDP_CRE_CEP].size > 0 || $cfgData[:VRID_UDP4_CEP].size > 0
291 $tinetCfgC.add()
292 $tinetCfgC.add("#define TNUM_UDP_CEPID #{$cfgData[:UDP_CRE_CEP].size + $cfgData[:VRID_UDP4_CEP].size}")
293 $tinetCfgC.add()
294 $tinetCfgC.add("const ID tmax_udp_cepid = (TMIN_UDP_CEPID + TNUM_UDP_CEPID - 1);")
295 $tinetCfgC.add()
296 $tinetCfgC.add("T_UDP_CEP udp_cep[TNUM_UDP_CEPID] = {")
297 $cfgData[:UDP_CRE_CEP].each do |key, params|
298 $tinetCfgC.add("\t{")
299 $tinetCfgC.add("\t\t#{params[:udp4_cepatr]},")
300 $tinetCfgC.add("\t\t{ #{params[:ipv4addr]}, #{params[:portno]} },")
301 $tinetCfgC.add("\t\t(t_udp_callback)(FP)#{params[:callback]},")
302 $tinetCfgC.add("\t\tUDP_CEP_FLG_VALID,")
303 $tinetCfgC.add("\t\tSEM_UDP_CEP_LOCK#{params[:udp4_cepid].val},")
304 $tinetCfgC.add("\t\tTA_NULL,")
305 $tinetCfgC.add("\t\tTA_NULL,")
306 $tinetCfgC.add("\t\tDTQ_UDP_RCVQ#{params[:udp4_cepid].val},")
307 $tinetCfgC.add("\t\t},")
308 end
309 $cfgData[:VRID_UDP4_CEP].each do |key, params|
310 $tinetCfgC.add("\t{")
311 $tinetCfgC.add("\t\t0,")
312 $tinetCfgC.add("\t\t{ IPV4_ADDRANY, UDP_PORTANY },")
313 $tinetCfgC.add("\t\t(t_udp_callback)(FP)NULL,")
314 $tinetCfgC.add("\t\tUDP_CEP_FLG_DYNAMIC,")
315 $tinetCfgC.add("\t\tSEM_UDP_CEP_LOCK#{params[:vrid_udp4_cepid].val + $cfgData[:UDP_CRE_CEP].size},")
316 $tinetCfgC.add("\t\tTA_NULL,")
317 $tinetCfgC.add("\t\tTA_NULL,")
318 $tinetCfgC.add("\t\tDTQ_UDP_RCVQ#{params[:vrid_udp4_cepid].val + $cfgData[:UDP_CRE_CEP].size},")
319 $tinetCfgC.add("\t\t},")
320 end
321 $tinetCfgC.add("\t};")
322end
323
324# // UDP (IPv6) 通信端点
325if $cfgData[:UDP6_CRE_CEP].size > 0 || $cfgData[:VRID_UDP6_CEP].size > 0
326 $tinetCfgC.add()
327 $tinetCfgC.add("#define TNUM_UDP_CEPID #{cfgData[:UDP6_CRE_CEP].size + $cfgData[:VRID_UDP6_CEP].size}")
328 $tinetCfgC.add()
329 $tinetCfgC.add("const ID tmax_udp_cepid = (TMIN_UDP_CEPID + TNUM_UDP_CEPID - 1);")
330 $tinetCfgC.add()
331 $tinetCfgC.add("T_UDP6_CEP udp_cep[TNUM_UDP_CEPID] = {")
332 $cfgData[:UDP6_CRE_CEP].each do |key, params|
333 $tinetCfgC.add("\t{")
334 $tinetCfgC.add("\t\t#{params[:udp6_cepatr]},")
335 $tinetCfgC.add("\t\t{ #{params[:ipv6addr]}, #{params[:portno]} },")
336 $tinetCfgC.add("\t\t(t_udp_callback)(FP)#{params[:callback]},")
337 $tinetCfgC.add("\t\tUDP_CEP_FLG_VALID,")
338 $tinetCfgC.add("\t\tSEM_UDP_CEP_LOCK#{params[:udp6_cepid].val},")
339 $tinetCfgC.add("\t\tTA_NULL,")
340 $tinetCfgC.add("\t\tTA_NULL,")
341 $tinetCfgC.add("\t\tDTQ_UDP_RCVQ#{params[:udp6_cepid].val},")
342 $tinetCfgC.add("\t\t},")
343 end
344 $cfgData[:VRID_UDP6_CEP].each do |key, params|
345 $tinetCfgC.add("\t{")
346 $tinetCfgC.add("\t\t0,")
347 $tinetCfgC.add("\t\t{ IPV6_ADDRANY, UDP_PORTANY },")
348 $tinetCfgC.add("\t\t(t_udp_callback)(FP)NULL,")
349 $tinetCfgC.add("\t\tUDP_CEP_FLG_DYNAMIC,")
350 $tinetCfgC.add("\t\tSEM_UDP_CEP_LOCK#{params[:vrid_udp6_cepid].val + $cfgData[:UDP6_CRE_CEP].size},")
351 $tinetCfgC.add("\t\tTA_NULL,")
352 $tinetCfgC.add("\t\tTA_NULL,")
353 $tinetCfgC.add("\t\tDTQ_UDP_RCVQ#{params[:vrid_udp6_cepid].val + $cfgData[:UDP6_CRE_CEP].size},")
354 $tinetCfgC.add("\t\t},")
355 end
356 $tinetCfgC.add("\t};")
357end
358
359# =====================================================================
360# tinet_kern.cfg の生成
361# =====================================================================
362
363# // TCP (IPv4) 受付口
364if $cfgData[:TCP_CRE_REP].size > 0 || $cfgData[:VRID_TCP4_REP].size > 0
365 $cfgData[:TCP_CRE_REP].each do |key, params|
366 cfgInfo = { APINAME: "CRE_SEM" }
367 cfgInfo["semid"] = "SEM_TCP_REP_LOCK#{params[:tcp4_repid].val}"
368 cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
369 cfgInfo["isemcnt"] = 1
370 cfgInfo["maxsem"] = 1
371 $cfgFileInfo.push(cfgInfo)
372 end
373 $cfgData[:VRID_TCP4_REP].each do |key, params|
374 cfgInfo = { APINAME: "CRE_SEM" }
375 cfgInfo["semid"] = "SEM_TCP_REP_LOCK#{params[:vrid_tcp4_repid].val + $cfgData[:TCP_CRE_REP].size}"
376 cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
377 cfgInfo["isemcnt"] = 1
378 cfgInfo["maxsem"] = 1
379 $cfgFileInfo.push(cfgInfo)
380 end
381end
382
383# // TCP (IPv6) 受付口
384if $cfgData[:TCP6_CRE_REP].size > 0 || $cfgData[:VRID_TCP6_REP].size > 0
385 $cfgData[:TCP6_CRE_REP].each do |key, params|
386 cfgInfo = { APINAME: "CRE_SEM" }
387 cfgInfo["semid"] = "SEM_TCP_REP_LOCK#{params[:tcp6_repid].val}"
388 cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
389 cfgInfo["isemcnt"] = 1
390 cfgInfo["maxsem"] = 1
391 $cfgFileInfo.push(cfgInfo)
392 end
393 $cfgData[:VRID_TCP6_REP].each do |key, params|
394 cfgInfo = { APINAME: "CRE_SEM" }
395 cfgInfo["semid"] = "SEM_TCP_REP_LOCK#{params[:vrid_tcp6_repid].val + $cfgData[:TCP6_CRE_REP].size}"
396 cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
397 cfgInfo["isemcnt"] = 1
398 cfgInfo["maxsem"] = 1
399 $cfgFileInfo.push(cfgInfo)
400 end
401end
402
403# // TCP (IPv4) 通信端点
404if $cfgData[:TCP_CRE_CEP].size > 0 || $cfgData[:VRID_TCP4_CEP].size > 0
405 $cfgData[:TCP_CRE_CEP].each do |key, params|
406 cfgInfo = { APINAME: "CRE_SEM" }
407 cfgInfo["semid"] = "SEM_TCP_CEP_LOCK#{params[:tcp4_cepid].val}"
408 cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
409 cfgInfo["isemcnt"] = 1
410 cfgInfo["maxsem"] = 1
411 $cfgFileInfo.push(cfgInfo)
412
413 cfgInfo = { APINAME: "CRE_FLG" }
414 cfgInfo["flgid"] = "FLG_TCP_CEP_EST#{params[:tcp4_cepid].val}"
415 cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
416 cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_CLOSED, "TCP_CEP_EVT_CLOSED")
417 $cfgFileInfo.push(cfgInfo)
418
419 cfgInfo = { APINAME: "CRE_FLG" }
420 cfgInfo["flgid"] = "FLG_TCP_CEP_SND#{params[:tcp4_cepid].val}"
421 cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
422 cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_CLOSED, "TCP_CEP_EVT_CLOSED")
423 $cfgFileInfo.push(cfgInfo)
424
425 cfgInfo = { APINAME: "CRE_FLG" }
426 cfgInfo["flgid"] = "FLG_TCP_CEP_RCV#{params[:tcp4_cepid].val}"
427 cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
428 cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_CLOSED, "TCP_CEP_EVT_CLOSED")
429 $cfgFileInfo.push(cfgInfo)
430 end
431 $cfgData[:VRID_TCP4_CEP].each do |key, params|
432 cfgInfo = { APINAME: "CRE_SEM" }
433 cfgInfo["semid"] = "SEM_TCP_CEP_LOCK#{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size}"
434 cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
435 cfgInfo["isemcnt"] = 1
436 cfgInfo["maxsem"] = 1
437 $cfgFileInfo.push(cfgInfo)
438
439 cfgInfo = { APINAME: "CRE_FLG" }
440 cfgInfo["flgid"] = "FLG_TCP_CEP_EST#{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size}"
441 cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
442 cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_CLOSED, "TCP_CEP_EVT_CLOSED")
443 $cfgFileInfo.push(cfgInfo)
444
445 cfgInfo = { APINAME: "CRE_FLG" }
446 cfgInfo["flgid"] = "FLG_TCP_CEP_SND#{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size}"
447 cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
448 cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_CLOSED, "TCP_CEP_EVT_CLOSED")
449 $cfgFileInfo.push(cfgInfo)
450
451 cfgInfo = { APINAME: "CRE_FLG" }
452 cfgInfo["flgid"] = "FLG_TCP_CEP_RCV#{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size}"
453 cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
454 cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_CLOSED, "TCP_CEP_EVT_CLOSED")
455 $cfgFileInfo.push(cfgInfo)
456 end
457end
458
459# // TCP (IPv6) 通信端点
460if $cfgData[:TCP6_CRE_CEP].size > 0 || $cfgData[:VRID_TCP6_CEP].size > 0
461 $cfgData[:TCP6_CRE_CEP].each do |key, params|
462 cfgInfo = { APINAME: "CRE_SEM" }
463 cfgInfo["semid"] = "SEM_TCP_CEP_LOCK#{params[:tcp6_cepid].val}"
464 cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
465 cfgInfo["isemcnt"] = 1
466 cfgInfo["maxsem"] = 1
467 $cfgFileInfo.push(cfgInfo)
468
469 cfgInfo = { APINAME: "CRE_FLG" }
470 cfgInfo["flgid"] = "FLG_TCP_CEP_EST#{params[:tcp6_cepid].val}"
471 cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
472 cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_CLOSED, "TCP_CEP_EVT_CLOSED")
473 $cfgFileInfo.push(cfgInfo)
474
475 cfgInfo = { APINAME: "CRE_FLG" }
476 cfgInfo["flgid"] = "FLG_TCP_CEP_SND#{params[:tcp6_cepid].val}"
477 cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
478 cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_CLOSED, "TCP_CEP_EVT_CLOSED")
479 $cfgFileInfo.push(cfgInfo)
480
481 cfgInfo = { APINAME: "CRE_FLG" }
482 cfgInfo["flgid"] = "FLG_TCP_CEP_RCV#{params[:tcp6_cepid].val}"
483 cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
484 cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_CLOSED, "TCP_CEP_EVT_CLOSED")
485 $cfgFileInfo.push(cfgInfo)
486 end
487 $cfgData[:VRID_TCP6_CEP].each do |key, params|
488 cfgInfo = { APINAME: "CRE_SEM" }
489 cfgInfo["semid"] = "SEM_TCP_CEP_LOCK#{params[:vrid_tcp6_cepid].val + $cfgData[:TCP6_CRE_CEP].size}"
490 cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
491 cfgInfo["isemcnt"] = 1
492 cfgInfo["maxsem"] = 1
493 $cfgFileInfo.push(cfgInfo)
494
495 cfgInfo = { APINAME: "CRE_FLG" }
496 cfgInfo["flgid"] = "FLG_TCP_CEP_EST#{params[:vrid_tcp6_cepid].val + $cfgData[:TCP6_CRE_CEP].size}"
497 cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
498 cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_CLOSED, "TCP_CEP_EVT_CLOSED")
499 $cfgFileInfo.push(cfgInfo)
500
501 cfgInfo = { APINAME: "CRE_FLG" }
502 cfgInfo["flgid"] = "FLG_TCP_CEP_SND#{params[:vrid_tcp6_cepid].val + $cfgData[:TCP6_CRE_CEP].size}"
503 cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
504 cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_CLOSED, "TCP_CEP_EVT_CLOSED")
505 $cfgFileInfo.push(cfgInfo)
506
507 cfgInfo = { APINAME: "CRE_FLG" }
508 cfgInfo["flgid"] = "FLG_TCP_CEP_RCV#{params[:vrid_tcp6_cepid].val + $cfgData[:TCP6_CRE_CEP].size}"
509 cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
510 cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_CLOSED, "TCP_CEP_EVT_CLOSED")
511 $cfgFileInfo.push(cfgInfo)
512 end
513end
514
515# // UDP (IPv4) 通信端点
516if $cfgData[:UDP_CRE_CEP].size > 0 || $cfgData[:VRID_UDP4_CEP].size > 0
517 $cfgData[:UDP_CRE_CEP].each do |key, params|
518 cfgInfo = { APINAME: "CRE_SEM" }
519 cfgInfo["semid"] = "SEM_UDP_CEP_LOCK#{params[:udp4_cepid].val}"
520 cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
521 cfgInfo["isemcnt"] = 1
522 cfgInfo["maxsem"] = 1
523 $cfgFileInfo.push(cfgInfo)
524
525 cfgInfo = { APINAME: "CRE_DTQ" }
526 cfgInfo["dtqid"] = "DTQ_UDP_RCVQ#{params[:udp4_cepid].val}"
527 cfgInfo["dtqatr"] = NumStr.new($TA_TFIFO, "TA_TFIFO")
528 cfgInfo["dtqcnt"] = NumStr.new($NUM_DTQ_UDP_RCVQ, "NUM_DTQ_UDP_RCVQ")
529 #cfgInfo["dtqmb"] = NumStr.new($NULL, "NULL")
530 $cfgFileInfo.push(cfgInfo)
531 end
532 $cfgData[:VRID_UDP4_CEP].each do |key, params|
533 cfgInfo = { APINAME: "CRE_SEM" }
534 cfgInfo["semid"] = "SEM_UDP_CEP_LOCK#{params[:vrid_udp4_cepid].val + $cfgData[:UDP_CRE_CEP].size}"
535 cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
536 cfgInfo["isemcnt"] = 1
537 cfgInfo["maxsem"] = 1
538 $cfgFileInfo.push(cfgInfo)
539
540 cfgInfo = { APINAME: "CRE_DTQ" }
541 cfgInfo["dtqid"] = "DTQ_UDP_RCVQ#{params[:vrid_udp4_cepid].val + $cfgData[:UDP_CRE_CEP].size}"
542 cfgInfo["dtqatr"] = NumStr.new($TA_TFIFO, "TA_TFIFO")
543 cfgInfo["dtqcnt"] = NumStr.new($NUM_DTQ_UDP_RCVQ, "NUM_DTQ_UDP_RCVQ")
544 #cfgInfo["dtqmb"] = NumStr.new($NULL, "NULL")
545 $cfgFileInfo.push(cfgInfo)
546 end
547end
548
549# // UDP (IPv6) 通信端点
550if $cfgData[:UDP6_CRE_CEP].size > 0 || $cfgData[:VRID_UDP6_CEP].size > 0
551 $cfgData[:UDP6_CRE_CEP].each do |key, params|
552 cfgInfo = { APINAME: "CRE_SEM" }
553 cfgInfo["semid"] = "SEM_UDP_CEP_LOCK#{params[:udp6_cepid].val}"
554 cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
555 cfgInfo["isemcnt"] = 1
556 cfgInfo["maxsem"] = 1
557 $cfgFileInfo.push(cfgInfo)
558
559 cfgInfo = { APINAME: "CRE_DTQ" }
560 cfgInfo["dtqid"] = "DTQ_UDP_RCVQ#{params[:udp6_cepid].val}"
561 cfgInfo["dtqatr"] = NumStr.new($TA_TFIFO, "TA_TFIFO")
562 cfgInfo["dtqcnt"] = NumStr.new($NUM_DTQ_UDP_RCVQ, "NUM_DTQ_UDP_RCVQ")
563 #cfgInfo["dtqmb"] = NumStr.new($NULL, "NULL")
564 $cfgFileInfo.push(cfgInfo)
565 end
566 $cfgData[:VRID_UDP6_CEP].each do |key, params|
567 cfgInfo = { APINAME: "CRE_SEM" }
568 cfgInfo["semid"] = "SEM_UDP_CEP_LOCK#{params[:vrid_udp6_cepid].val + $cfgData[:UDP6_CRE_CEP].size}"
569 cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
570 cfgInfo["isemcnt"] = 1
571 cfgInfo["maxsem"] = 1
572 $cfgFileInfo.push(cfgInfo)
573
574 cfgInfo = { APINAME: "CRE_DTQ" }
575 cfgInfo["dtqid"] = "DTQ_UDP_RCVQ#{params[:vrid_udp6_cepid].val + $cfgData[:UDP6_CRE_CEP].size}"
576 cfgInfo["dtqatr"] = NumStr.new($TA_TFIFO, "TA_TFIFO")
577 cfgInfo["dtqcnt"] = NumStr.new($NUM_DTQ_UDP_RCVQ, "NUM_DTQ_UDP_RCVQ")
578 #cfgInfo["dtqmb"] = NumStr.new($NULL, "NULL")
579 $cfgFileInfo.push(cfgInfo)
580 end
581end
Note: See TracBrowser for help on using the repository browser.