Ignore:
Timestamp:
Jan 21, 2018, 12:10:09 AM (6 years ago)
Author:
coas-nagasima
Message:

prototoolに関連するプロジェクトをnewlibからmuslを使うよう変更・更新
ntshellをnewlibの下位の実装から、muslのsyscallの実装に変更・更新
以下のOSSをアップデート
・mruby-1.3.0
・musl-1.1.18
・onigmo-6.1.3
・tcc-0.9.27
以下のOSSを追加
・openssl-1.1.0e
・curl-7.57.0
・zlib-1.2.11
以下のmrbgemsを追加
・iij/mruby-digest
・iij/mruby-env
・iij/mruby-errno
・iij/mruby-iijson
・iij/mruby-ipaddr
・iij/mruby-mock
・iij/mruby-require
・iij/mruby-tls-openssl

File:
1 edited

Legend:

Unmodified
Added
Removed

  • EcnlProtoTool/trunk/asp3_dcre/tinet/tinet.trb

    r321 r331  
    4747$tinetCfgH.add()
    4848
    49 $cfgData[:TCP_CRE_REP].each do |key, params|
    50         $tinetCfgH.add("#define #{params[:tcp4_repid]}  #{params[:tcp4_repid].val}")
    51 end
     49$tinetCfgH.add("#define TNUM_TCP6_REPID #{$cfgData[:TCP6_CRE_REP].size + $cfgData[:VRID_TCP6_REP].size}")
     50$tinetCfgH.add("#define TNUM_TCP4_REPID #{$cfgData[:TCP_CRE_REP].size + $cfgData[:VRID_TCP_REP].size}")
     51$tinetCfgH.add("#define TNUM_TCP_REPID  #{$cfgData[:TCP6_CRE_REP].size + $cfgData[:VRID_TCP6_REP].size + $cfgData[:TCP_CRE_REP].size + $cfgData[:VRID_TCP_REP].size}")
     52$tinetCfgH.add()
     53
     54$tinetCfgH.add("#define TNUM_TCP6_CEPID #{$cfgData[:TCP6_CRE_CEP].size + $cfgData[:VRID_TCP6_CEP].size}")
     55$tinetCfgH.add("#define TNUM_TCP4_CEPID #{$cfgData[:TCP_CRE_CEP].size + $cfgData[:VRID_TCP_CEP].size}")
     56$tinetCfgH.add("#define TNUM_TCP_CEPID  #{$cfgData[:TCP6_CRE_CEP].size + $cfgData[:VRID_TCP6_CEP].size + $cfgData[:TCP_CRE_CEP].size + $cfgData[:VRID_TCP_CEP].size}")
     57$tinetCfgH.add()
     58
     59$tinetCfgH.add("#define TNUM_UDP6_CEPID #{$cfgData[:UDP6_CRE_CEP].size + $cfgData[:VRID_UDP6_CEP].size}")
     60$tinetCfgH.add("#define TNUM_UDP4_CEPID #{$cfgData[:UDP_CRE_CEP].size + $cfgData[:VRID_UDP_CEP].size}")
     61$tinetCfgH.add("#define TNUM_UDP_CEPID  #{$cfgData[:UDP6_CRE_CEP].size + $cfgData[:VRID_UDP6_CEP].size + $cfgData[:UDP_CRE_CEP].size + $cfgData[:VRID_UDP_CEP].size}")
     62$tinetCfgH.add()
     63
    5264$cfgData[:TCP6_CRE_REP].each do |key, params|
    5365        $tinetCfgH.add("#define #{params[:tcp6_repid]}  #{params[:tcp6_repid].val}")
    5466end
    55 $cfgData[:TCP_CRE_CEP].each do |key, params|
    56         $tinetCfgH.add("#define #{params[:tcp4_cepid]}  #{params[:tcp4_cepid].val}")
    57 end
     67$cfgData[:VRID_TCP6_REP].each do |key, params|
     68        $tinetCfgH.add("#define #{params[:vrid_tcp6_repid]}     #{params[:vrid_tcp6_repid].val + $cfgData[:TCP6_CRE_REP].size}")
     69end
     70$cfgData[:TCP_CRE_REP].each do |key, params|
     71        $tinetCfgH.add("#define #{params[:tcp4_repid]}  #{params[:tcp4_repid].val + $cfgData[:TCP6_CRE_REP].size + $cfgData[:VRID_TCP6_REP].size}")
     72end
     73$cfgData[:VRID_TCP_REP].each do |key, params|
     74        $tinetCfgH.add("#define #{params[:vrid_tcp4_repid]}     #{params[:vrid_tcp4_repid].val + $cfgData[:TCP_CRE_REP].size + $cfgData[:TCP6_CRE_REP].size + $cfgData[:VRID_TCP6_REP].size}")
     75end
     76$tinetCfgH.add()
     77
    5878$cfgData[:TCP6_CRE_CEP].each do |key, params|
    5979        $tinetCfgH.add("#define #{params[:tcp6_cepid]}  #{params[:tcp6_cepid].val}")
    6080end
    61 $cfgData[:UDP_CRE_CEP].each do |key, params|
    62         $tinetCfgH.add("#define #{params[:udp4_cepid]}  #{params[:udp4_cepid].val}")
    63 end
     81$cfgData[:VRID_TCP6_CEP].each do |key, params|
     82        $tinetCfgH.add("#define #{params[:vrid_tcp6_cepid]}     #{params[:vrid_tcp6_cepid].val + $cfgData[:TCP6_CRE_CEP].size}")
     83end
     84$cfgData[:TCP_CRE_CEP].each do |key, params|
     85        $tinetCfgH.add("#define #{params[:tcp4_cepid]}  #{params[:tcp4_cepid].val + $cfgData[:TCP6_CRE_CEP].size + $cfgData[:VRID_TCP6_CEP].size}")
     86end
     87$cfgData[:VRID_TCP_CEP].each do |key, params|
     88        $tinetCfgH.add("#define #{params[:vrid_tcp4_cepid]}     #{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size + $cfgData[:TCP6_CRE_CEP].size + $cfgData[:VRID_TCP6_CEP].size}")
     89end
     90$tinetCfgH.add()
     91
    6492$cfgData[:UDP6_CRE_CEP].each do |key, params|
    6593        $tinetCfgH.add("#define #{params[:udp6_cepid]}  #{params[:udp6_cepid].val}")
    6694end
    67 $cfgData[:VRID_TCP4_REP].each do |key, params|
    68         $tinetCfgH.add("#define #{params[:vrid_tcp4_repid]}     #{params[:vrid_tcp4_repid].val + $cfgData[:TCP_CRE_REP].size}")
    69 end
    70 $cfgData[:VRID_TCP4_CEP].each do |key, params|
    71         $tinetCfgH.add("#define #{params[:vrid_tcp4_cepid]}     #{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size}")
    72 end
    73 $cfgData[:VRID_TCP6_REP].each do |key, params|
    74         $tinetCfgH.add("#define #{params[:vrid_tcp6_repid]}     #{params[:vrid_tcp6_repid].val + $cfgData[:TCP6_CRE_REP].size}")
    75 end
    76 $cfgData[:VRID_TCP6_CEP].each do |key, params|
    77         $tinetCfgH.add("#define #{params[:vrid_tcp6_cepid]}     #{params[:vrid_tcp6_cepid].val + $cfgData[:TCP6_CRE_CEP].size}")
    78 end
    79 $cfgData[:VRID_UDP4_CEP].each do |key, params|
    80         $tinetCfgH.add("#define #{params[:vrid_udp4_cepid]}     #{params[:vrid_udp4_cepid].val + $cfgData[:UDP_CRE_CEP].size}")
    81 end
    8295$cfgData[:VRID_UDP6_CEP].each do |key, params|
    8396        $tinetCfgH.add("#define #{params[:vrid_udp6_cepid]}     #{params[:vrid_udp6_cepid].val + $cfgData[:UDP6_CRE_CEP].size}")
     97end
     98$cfgData[:UDP_CRE_CEP].each do |key, params|
     99        $tinetCfgH.add("#define #{params[:udp4_cepid]}  #{params[:udp4_cepid].val + $cfgData[:UDP6_CRE_CEP].size + $cfgData[:VRID_UDP6_CEP].size}")
     100end
     101$cfgData[:VRID_UDP_CEP].each do |key, params|
     102        $tinetCfgH.add("#define #{params[:vrid_udp4_cepid]}     #{params[:vrid_udp4_cepid].val + $cfgData[:UDP_CRE_CEP].size + $cfgData[:UDP6_CRE_CEP].size + $cfgData[:VRID_UDP6_CEP].size}")
    84103end
    85104$tinetCfgH.add()
    … …  
    110129#include <netinet/in_itron.h>
    111130#include <netinet/ip.h>
    112 #include <netinet/ip6.h>
    113131#include <netinet/tcp.h>
    114 #include <netinet/tcp_timer.h>
    115132#include <netinet/tcp_var.h>
    116 #include <netinet/tcp_fsm.h>
    117133#include <netinet/udp_var.h>
    118134
    … …  
    130146end
    131147
     148$tinetCfgC.add()
     149$tinetCfgC.add("const ID tmax_tcp_repid = (TMIN_TCP_REPID + TNUM_TCP6_REPID + TNUM_TCP4_REPID - 1);")
     150
     151$tinetCfgC.add()
     152$tinetCfgC.add("#if defined(SUPPORT_INET6) && defined(SUPPORT_INET4)")
     153$tinetCfgC.add("const ID tmax_tcp6_repid = (TMIN_TCP6_REPID + TNUM_TCP6_REPID - 1);")
     154$tinetCfgC.add("const ID tmax_tcp4_repid = (TMIN_TCP4_REPID + TNUM_TCP4_REPID - 1);")
     155$tinetCfgC.add("#endif")
     156
     157$tinetCfgC.add()
     158$tinetCfgC.add("const ID tmax_tcp_cepid = (TMIN_TCP_CEPID + TNUM_TCP6_CEPID + TNUM_TCP4_CEPID - 1);")
     159
     160$tinetCfgC.add()
     161$tinetCfgC.add("#if defined(SUPPORT_INET6) && defined(SUPPORT_INET4)")
     162$tinetCfgC.add("const ID tmax_tcp6_cepid = (TMIN_TCP_CEPID + TNUM_TCP6_CEPID - 1);")
     163$tinetCfgC.add("const ID tmax_tcp4_cepid = (TMIN_TCP_CEPID + TNUM_TCP4_CEPID - 1);")
     164$tinetCfgC.add("#endif")
     165
     166$tinetCfgC.add()
     167$tinetCfgC.add("const ID tmax_udp_cepid = (TMIN_UDP_CEPID + TNUM_UDP6_CEPID + TNUM_UDP4_CEPID - 1);")
     168
     169$tinetCfgC.add()
     170$tinetCfgC.add("#if defined(SUPPORT_INET6) && defined(SUPPORT_INET4)")
     171$tinetCfgC.add("const ID tmax_udp6_cepid = (TMIN_UDP6_CEPID + TNUM_UDP6_CEPID - 1);")
     172$tinetCfgC.add("const ID tmax_udp4_cepid = (TMIN_UDP4_CEPID + TNUM_UDP4_CEPID - 1);")
     173$tinetCfgC.add("#endif")
     174
     175#       // TCP (IPv6) 受付口
     176$sem_tcp_rep_lock_id = 0
     177if $cfgData[:TCP6_CRE_REP].size > 0 || $cfgData[:VRID_TCP6_REP].size > 0
     178        $tinetCfgC.add()
     179        $tinetCfgC.add("T_TCP6_REP tcp6_rep[TNUM_TCP6_REPID] = {")
     180        $cfgData[:TCP6_CRE_REP].each do |key, params|
     181                $tinetCfgC.add("\t{")
     182                        $tinetCfgC.add("\t\t#{params[:tcp6_repatr]},")
     183                        $tinetCfgC.add("\t\t{ #{params[:ipv6addr]}, #{params[:portno]} },")
     184                $tinetCfgC.add("#if defined(TCP_CFG_EXTENTIONS)")
     185                        $tinetCfgC.add("\t\tTCP_REP_FLG_VALID,")
     186                        $tinetCfgC.add("\t\tSEM_TCP_REP_LOCK#{$sem_tcp_rep_lock_id},")
     187                $tinetCfgC.add("#endif")
     188                        $tinetCfgC.add("\t\t},")
     189                $sem_tcp_rep_lock_id = $sem_tcp_rep_lock_id + 1
     190        end
     191        $cfgData[:VRID_TCP6_REP].each do |key, params|
     192                $tinetCfgC.add("\t{")
     193                        $tinetCfgC.add("\t\t0,")
     194                        $tinetCfgC.add("\t\t{ IPV6_ADDRANY, TCP_PORTANY },")
     195        $tinetCfgC.add("#if defined(TCP_CFG_EXTENTIONS)")
     196                        $tinetCfgC.add("\t\tTCP_REP_FLG_DYNAMIC,")
     197                        $tinetCfgC.add("\t\tSEM_TCP_REP_LOCK#{$sem_tcp_rep_lock_id},")
     198        $tinetCfgC.add("#endif")
     199                        $tinetCfgC.add("\t\t},")
     200                $sem_tcp_rep_lock_id = $sem_tcp_rep_lock_id + 1
     201        end
     202        $tinetCfgC.add("\t};")
     203end
     204
    132205#       // TCP (IPv4) 受付口
    133 if $cfgData[:TCP_CRE_REP].size > 0 || $cfgData[:VRID_TCP4_REP].size > 0
     206if $cfgData[:TCP_CRE_REP].size > 0 || $cfgData[:VRID_TCP_REP].size > 0
    134207        $tinetCfgC.add()
    135         $tinetCfgC.add("#define TNUM_TCP_REPID  #{$cfgData[:TCP_CRE_REP].size + $cfgData[:VRID_TCP4_REP].size}")
    136         $tinetCfgC.add()
    137         $tinetCfgC.add("const ID tmax_tcp_repid = (TMIN_TCP_REPID + TNUM_TCP_REPID - 1);")
    138         $tinetCfgC.add()
    139         $tinetCfgC.add("T_TCP_REP tcp_rep[TNUM_TCP_REPID] = {")
     208        $tinetCfgC.add("T_TCP4_REP tcp4_rep[TNUM_TCP4_REPID] = {")
    140209        $cfgData[:TCP_CRE_REP].each do |key, params|
    141210                $tinetCfgC.add("\t{")
    … …  
    144213        $tinetCfgC.add("#if defined(TCP_CFG_EXTENTIONS)")
    145214                        $tinetCfgC.add("\t\tTCP_REP_FLG_VALID,")
    146                         $tinetCfgC.add("\t\tSEM_TCP_REP_LOCK#{params[:tcp4_repid].val},")
     215                        $tinetCfgC.add("\t\tSEM_TCP_REP_LOCK#{$sem_tcp_rep_lock_id},")
    147216        $tinetCfgC.add("#endif")
    148217                        $tinetCfgC.add("\t\t},")
    149         end
    150         $cfgData[:VRID_TCP4_REP].each do |key, params|
     218                $sem_tcp_rep_lock_id = $sem_tcp_rep_lock_id + 1
     219        end
     220        $cfgData[:VRID_TCP_REP].each do |key, params|
    151221                $tinetCfgC.add("\t{")
    152222                        $tinetCfgC.add("\t\t0,")
    … …  
    154224        $tinetCfgC.add("#if defined(TCP_CFG_EXTENTIONS)")
    155225                        $tinetCfgC.add("\t\tTCP_REP_FLG_DYNAMIC,")
    156                         $tinetCfgC.add("\t\tSEM_TCP_REP_LOCK#{params[:vrid_tcp4_repid].val + $cfgData[:TCP_CRE_REP].size},")
     226                        $tinetCfgC.add("\t\tSEM_TCP_REP_LOCK#{$sem_tcp_rep_lock_id},")
    157227        $tinetCfgC.add("#endif")
    158228                        $tinetCfgC.add("\t\t},")
    159         end
    160                 $tinetCfgC.add("\t};")
    161 end
    162 
    163 #       // TCP (IPv6) 受付口
    164 if $cfgData[:TCP6_CRE_REP].size > 0 || $cfgData[:VRID_TCP6_REP].size > 0
     229                $sem_tcp_rep_lock_id = $sem_tcp_rep_lock_id + 1
     230        end
     231        $tinetCfgC.add("\t};")
     232end
     233
     234#       // TCP 通信端点
     235if $cfgData[:TCP6_CRE_CEP].size > 0 || $cfgData[:VRID_TCP6_CEP].size > 0 || $cfgData[:TCP_CRE_CEP].size > 0 || $cfgData[:VRID_TCP_CEP].size > 0
    165236        $tinetCfgC.add()
    166         $tinetCfgC.add("#define TNUM_TCP_REPID  #{$cfgData[:TCP6_CRE_REP].size + $cfgData[:VRID_TCP6_REP].size}")
    167         $tinetCfgC.add()
    168         $tinetCfgC.add("const ID tmax_tcp_repid = (TMIN_TCP_REPID + TNUM_TCP_REPID - 1);")
    169         $tinetCfgC.add()
    170         $tinetCfgC.add("T_TCP6_REP tcp_rep[TNUM_TCP_REPID] = {")
    171         $cfgData[:TCP6_CRE_REP].each do |key, params|
    172                 $tinetCfgC.add("\t{")
    173                         $tinetCfgC.add("\t\t#{params[:tcp6_repatr]},")
    174                         $tinetCfgC.add("\t\t{ #{params[:ipv6addr]}, #{params[:portno]} },")
    175         $tinetCfgC.add("#if defined(TCP_CFG_EXTENTIONS)")
    176                         $tinetCfgC.add("\t\tTCP_REP_FLG_VALID,")
    177                         $tinetCfgC.add("\t\tSEM_TCP_REP_LOCK#{params[:tcp6_repid].val},")
    178         $tinetCfgC.add("#endif")
    179                         $tinetCfgC.add("\t\t},")
    180         end
    181         $cfgData[:VRID_TCP6_REP].each do |key, params|
    182                 $tinetCfgC.add("\t{")
    183                         $tinetCfgC.add("\t\t0,")
    184                         $tinetCfgC.add("\t\t{ IPV6_ADDRANY, TCP_PORTANY },")
    185         $tinetCfgC.add("#if defined(TCP_CFG_EXTENTIONS)")
    186                         $tinetCfgC.add("\t\tTCP_REP_FLG_DYNAMIC,")
    187                         $tinetCfgC.add("\t\tSEM_TCP_REP_LOCK#{params[:vrid_tcp6_repid].val + $cfgData[:TCP6_CRE_REP].size},")
    188         $tinetCfgC.add("#endif")
    189                         $tinetCfgC.add("\t\t},")
    190         end
    191                 $tinetCfgC.add("\t};")
    192 end
    193 
    194 #       // TCP (IPv4) 通信端点
    195 if $cfgData[:TCP_CRE_CEP].size > 0 || $cfgData[:VRID_TCP4_CEP].size > 0
    196         $tinetCfgC.add()
    197         $tinetCfgC.add("#define TNUM_TCP_CEPID  #{$cfgData[:TCP_CRE_CEP].size + $cfgData[:VRID_TCP4_CEP].size}")
    198         $tinetCfgC.add()
    199         $tinetCfgC.add("const ID tmax_tcp_cepid = (TMIN_TCP_CEPID + TNUM_TCP_CEPID - 1);")
    200         $tinetCfgC.add()
    201         $tinetCfgC.add("T_TCP_CEP tcp_cep[TNUM_TCP_CEPID] = {")
    202         $cfgData[:TCP_CRE_CEP].each do |key, params|
    203                 $tinetCfgC.add("\t{")
    204                         $tinetCfgC.add("\t\t#{params[:tcp4_cepatr]},")
    205                         $tinetCfgC.add("\t\t(void*)#{params[:sbuf]},")
    206                         $tinetCfgC.add("\t\t#{params[:sbufsz]},")
    207                         $tinetCfgC.add("\t\t(void*)#{params[:rbuf]},")
    208                         $tinetCfgC.add("\t\t#{params[:rbufsz]},")
    209                         $tinetCfgC.add("\t\t(t_tcp_callback)(FP)#{params[:callback]},")
    210                         $tinetCfgC.add("\t\tTCP_CEP_FLG_VALID,")
    211                         $tinetCfgC.add("\t\tSEM_TCP_CEP_LOCK#{params[:tcp4_cepid].val},")
    212                         $tinetCfgC.add("\t\tFLG_TCP_CEP_EST#{params[:tcp4_cepid].val},")
    213                         $tinetCfgC.add("\t\tFLG_TCP_CEP_SND#{params[:tcp4_cepid].val},")
    214                         $tinetCfgC.add("\t\tFLG_TCP_CEP_RCV#{params[:tcp4_cepid].val},")
    215                         $tinetCfgC.add("\t\t},")
    216         end
    217         $cfgData[:VRID_TCP4_CEP].each do |key, params|
    218                 $tinetCfgC.add("\t{")
    219                         $tinetCfgC.add("\t\t0,")
    220                         $tinetCfgC.add("\t\t(void*)NULL,")
    221                         $tinetCfgC.add("\t\t0,")
    222                         $tinetCfgC.add("\t\t(void*)NULL,")
    223                         $tinetCfgC.add("\t\t0,")
    224                         $tinetCfgC.add("\t\t(t_tcp_callback)(FP)NULL,")
    225                         $tinetCfgC.add("\t\tTCP_CEP_FLG_DYNAMIC,")
    226                         $tinetCfgC.add("\t\tSEM_TCP_CEP_LOCK#{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size},")
    227                         $tinetCfgC.add("\t\tFLG_TCP_CEP_EST#{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size},")
    228                         $tinetCfgC.add("\t\tFLG_TCP_CEP_SND#{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size},")
    229                         $tinetCfgC.add("\t\tFLG_TCP_CEP_RCV#{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size},")
    230                         $tinetCfgC.add("\t\t},")
    231         end
    232                 $tinetCfgC.add("\t};")
    233 end
    234 
    235 #       // TCP (IPv6) 通信端点
    236 if $cfgData[:TCP6_CRE_CEP].size > 0 || $cfgData[:VRID_TCP6_CEP].size > 0
    237         $tinetCfgC.add()
    238         $tinetCfgC.add("#define TNUM_TCP_CEPID  #{$cfgData[:TCP6_CRE_CEP].size + $cfgData[:VRID_TCP6_CEP].size}")
    239         $tinetCfgC.add()
    240         $tinetCfgC.add("const ID tmax_tcp_cepid = (TMIN_TCP_CEPID + TNUM_TCP_CEPID - 1);")
    241         $tinetCfgC.add()
    242         $tinetCfgC.add("T_TCP6_CEP tcp_cep[TNUM_TCP_CEPID] = {")
     237        $tinetCfgC.add("T_TCP_CEP tcp_cep[TNUM_TCP6_CEPID + TNUM_TCP4_CEPID] = {")
    243238        $cfgData[:TCP6_CRE_CEP].each do |key, params|
    244239                $tinetCfgC.add("\t{")
    … …  
    271266                        $tinetCfgC.add("\t\t},")
    272267        end
     268        $cfgData[:TCP_CRE_CEP].each do |key, params|
     269                $tinetCfgC.add("\t{")
     270                        $tinetCfgC.add("\t\t#{params[:tcp4_cepatr]},")
     271                        $tinetCfgC.add("\t\t(void*)#{params[:sbuf]},")
     272                        $tinetCfgC.add("\t\t#{params[:sbufsz]},")
     273                        $tinetCfgC.add("\t\t(void*)#{params[:rbuf]},")
     274                        $tinetCfgC.add("\t\t#{params[:rbufsz]},")
     275                        $tinetCfgC.add("\t\t(t_tcp_callback)(FP)#{params[:callback]},")
     276                        $tinetCfgC.add("\t\tTCP_CEP_FLG_VALID|TCP_CEP_FLG_IPV4,")
     277                        $tinetCfgC.add("\t\tSEM_TCP_CEP_LOCK#{params[:tcp4_cepid].val + $cfgData[:TCP6_CRE_CEP].size + $cfgData[:VRID_TCP6_CEP].size},")
     278                        $tinetCfgC.add("\t\tFLG_TCP_CEP_EST#{params[:tcp4_cepid].val + $cfgData[:TCP6_CRE_CEP].size + $cfgData[:VRID_TCP6_CEP].size},")
     279                        $tinetCfgC.add("\t\tFLG_TCP_CEP_SND#{params[:tcp4_cepid].val + $cfgData[:TCP6_CRE_CEP].size + $cfgData[:VRID_TCP6_CEP].size},")
     280                        $tinetCfgC.add("\t\tFLG_TCP_CEP_RCV#{params[:tcp4_cepid].val + $cfgData[:TCP6_CRE_CEP].size + $cfgData[:VRID_TCP6_CEP].size},")
     281                        $tinetCfgC.add("\t\t},")
     282        end
     283        $cfgData[:VRID_TCP_CEP].each do |key, params|
     284                $tinetCfgC.add("\t{")
     285                        $tinetCfgC.add("\t\t0,")
     286                        $tinetCfgC.add("\t\t(void*)NULL,")
     287                        $tinetCfgC.add("\t\t0,")
     288                        $tinetCfgC.add("\t\t(void*)NULL,")
     289                        $tinetCfgC.add("\t\t0,")
     290                        $tinetCfgC.add("\t\t(t_tcp_callback)(FP)NULL,")
     291                        $tinetCfgC.add("\t\tTCP_CEP_FLG_DYNAMIC|TCP_CEP_FLG_IPV4,")
     292                        $tinetCfgC.add("\t\tSEM_TCP_CEP_LOCK#{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size + $cfgData[:TCP6_CRE_CEP].size + $cfgData[:VRID_TCP6_CEP].size},")
     293                        $tinetCfgC.add("\t\tFLG_TCP_CEP_EST#{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size + $cfgData[:TCP6_CRE_CEP].size + $cfgData[:VRID_TCP6_CEP].size},")
     294                        $tinetCfgC.add("\t\tFLG_TCP_CEP_SND#{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size + $cfgData[:TCP6_CRE_CEP].size + $cfgData[:VRID_TCP6_CEP].size},")
     295                        $tinetCfgC.add("\t\tFLG_TCP_CEP_RCV#{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size + $cfgData[:TCP6_CRE_CEP].size + $cfgData[:VRID_TCP6_CEP].size},")
     296                        $tinetCfgC.add("\t\t},")
     297        end
    273298                $tinetCfgC.add("\t};")
    274299end
    275300
     301#       // UDP (IPv6) 通信端点
     302if $cfgData[:UDP6_CRE_CEP].size > 0 || $cfgData[:VRID_UDP6_CEP].size > 0
     303        $tinetCfgC.add()
     304        $tinetCfgC.add("T_UDP6_CEP udp6_cep[TNUM_UDP6_CEPID] = {")
     305        $cfgData[:UDP6_CRE_CEP].each do |key, params|
     306                $tinetCfgC.add("\t{")
     307                        $tinetCfgC.add("\t\t#{params[:udp6_cepatr]},")
     308                        $tinetCfgC.add("\t\t{ #{params[:ipv6addr]}, #{params[:portno]} },")
     309                        $tinetCfgC.add("\t\t(t_udp_callback)(FP)#{params[:callback]},")
     310                        $tinetCfgC.add("\t\tUDP_CEP_FLG_VALID,")
     311                        $tinetCfgC.add("\t\tSEM_UDP6_CEP_LOCK#{params[:udp6_cepid].val},")
     312                        $tinetCfgC.add("\t\tTA_NULL,")
     313                        $tinetCfgC.add("\t\tTA_NULL,")
     314                        $tinetCfgC.add("\t\tDTQ_UDP6_RCVQ#{params[:udp6_cepid].val},")
     315                        $tinetCfgC.add("\t\t},")
     316        end
     317        $cfgData[:VRID_UDP6_CEP].each do |key, params|
     318                $tinetCfgC.add("\t{")
     319                        $tinetCfgC.add("\t\t0,")
     320                        $tinetCfgC.add("\t\t{ IPV6_ADDRANY, UDP_PORTANY },")
     321                        $tinetCfgC.add("\t\t(t_udp_callback)(FP)NULL,")
     322                        $tinetCfgC.add("\t\tUDP_CEP_FLG_DYNAMIC,")
     323                        $tinetCfgC.add("\t\tSEM_UDP6_CEP_LOCK#{params[:vrid_udp6_cepid].val + $cfgData[:UDP6_CRE_CEP].size},")
     324                        $tinetCfgC.add("\t\tTA_NULL,")
     325                        $tinetCfgC.add("\t\tTA_NULL,")
     326                        $tinetCfgC.add("\t\tDTQ_UDP6_RCVQ#{params[:vrid_udp6_cepid].val + $cfgData[:UDP6_CRE_CEP].size},")
     327                        $tinetCfgC.add("\t\t},")
     328        end
     329                $tinetCfgC.add("\t};")
     330end
     331
    276332#       // UDP (IPv4) 通信端点
    277 if $cfgData[:UDP_CRE_CEP].size > 0 || $cfgData[:VRID_UDP4_CEP].size > 0
     333if $cfgData[:UDP_CRE_CEP].size > 0 || $cfgData[:VRID_UDP_CEP].size > 0
    278334        $tinetCfgC.add()
    279         $tinetCfgC.add("#define TNUM_UDP_CEPID  #{$cfgData[:UDP_CRE_CEP].size + $cfgData[:VRID_UDP4_CEP].size}")
    280         $tinetCfgC.add()
    281         $tinetCfgC.add("const ID tmax_udp_cepid = (TMIN_UDP_CEPID + TNUM_UDP_CEPID - 1);")
    282         $tinetCfgC.add()
    283         $tinetCfgC.add("T_UDP_CEP udp_cep[TNUM_UDP_CEPID] = {")
     335        $tinetCfgC.add("T_UDP4_CEP udp4_cep[TNUM_UDP4_CEPID] = {")
    284336        $cfgData[:UDP_CRE_CEP].each do |key, params|
    285337                $tinetCfgC.add("\t{")
    … …  
    288340                        $tinetCfgC.add("\t\t(t_udp_callback)(FP)#{params[:callback]},")
    289341                        $tinetCfgC.add("\t\tUDP_CEP_FLG_VALID,")
    290                         $tinetCfgC.add("\t\tSEM_UDP_CEP_LOCK#{params[:udp4_cepid].val},")
    291                         $tinetCfgC.add("\t\tTA_NULL,")
    292                         $tinetCfgC.add("\t\tTA_NULL,")
    293                         $tinetCfgC.add("\t\tDTQ_UDP_RCVQ#{params[:udp4_cepid].val},")
    294                         $tinetCfgC.add("\t\t},")
    295         end
    296         $cfgData[:VRID_UDP4_CEP].each do |key, params|
     342                        $tinetCfgC.add("\t\tSEM_UDP4_CEP_LOCK#{params[:udp4_cepid].val},")
     343                        $tinetCfgC.add("\t\tTA_NULL,")
     344                        $tinetCfgC.add("\t\tTA_NULL,")
     345                        $tinetCfgC.add("\t\tDTQ_UDP4_RCVQ#{params[:udp4_cepid].val},")
     346                        $tinetCfgC.add("\t\t},")
     347        end
     348        $cfgData[:VRID_UDP_CEP].each do |key, params|
    297349                $tinetCfgC.add("\t{")
    298350                        $tinetCfgC.add("\t\t0,")
    … …  
    300352                        $tinetCfgC.add("\t\t(t_udp_callback)(FP)NULL,")
    301353                        $tinetCfgC.add("\t\tUDP_CEP_FLG_DYNAMIC,")
    302                         $tinetCfgC.add("\t\tSEM_UDP_CEP_LOCK#{params[:vrid_udp4_cepid].val + $cfgData[:UDP_CRE_CEP].size},")
    303                         $tinetCfgC.add("\t\tTA_NULL,")
    304                         $tinetCfgC.add("\t\tTA_NULL,")
    305                         $tinetCfgC.add("\t\tDTQ_UDP_RCVQ#{params[:vrid_udp4_cepid].val + $cfgData[:UDP_CRE_CEP].size},")
     354                        $tinetCfgC.add("\t\tSEM_UDP4_CEP_LOCK#{params[:vrid_udp4_cepid].val + $cfgData[:UDP_CRE_CEP].size},")
     355                        $tinetCfgC.add("\t\tTA_NULL,")
     356                        $tinetCfgC.add("\t\tTA_NULL,")
     357                        $tinetCfgC.add("\t\tDTQ_UDP4_RCVQ#{params[:vrid_udp4_cepid].val + $cfgData[:UDP_CRE_CEP].size},")
    306358                        $tinetCfgC.add("\t\t},")
    307359        end
    … …  
    309361end
    310362
    311 #       // UDP (IPv6) 通信端点
    312 if $cfgData[:UDP6_CRE_CEP].size > 0 || $cfgData[:VRID_UDP6_CEP].size > 0
    313         $tinetCfgC.add()
    314         $tinetCfgC.add("#define TNUM_UDP_CEPID  #{cfgData[:UDP6_CRE_CEP].size + $cfgData[:VRID_UDP6_CEP].size}")
    315         $tinetCfgC.add()
    316         $tinetCfgC.add("const ID tmax_udp_cepid = (TMIN_UDP_CEPID + TNUM_UDP_CEPID - 1);")
    317         $tinetCfgC.add()
    318         $tinetCfgC.add("T_UDP6_CEP udp_cep[TNUM_UDP_CEPID] = {")
    319         $cfgData[:UDP6_CRE_CEP].each do |key, params|
    320                 $tinetCfgC.add("\t{")
    321                         $tinetCfgC.add("\t\t#{params[:udp6_cepatr]},")
    322                         $tinetCfgC.add("\t\t{ #{params[:ipv6addr]}, #{params[:portno]} },")
    323                         $tinetCfgC.add("\t\t(t_udp_callback)(FP)#{params[:callback]},")
    324                         $tinetCfgC.add("\t\tUDP_CEP_FLG_VALID,")
    325                         $tinetCfgC.add("\t\tSEM_UDP_CEP_LOCK#{params[:udp6_cepid].val},")
    326                         $tinetCfgC.add("\t\tTA_NULL,")
    327                         $tinetCfgC.add("\t\tTA_NULL,")
    328                         $tinetCfgC.add("\t\tDTQ_UDP_RCVQ#{params[:udp6_cepid].val},")
    329                         $tinetCfgC.add("\t\t},")
    330         end
    331         $cfgData[:VRID_UDP6_CEP].each do |key, params|
    332                 $tinetCfgC.add("\t{")
    333                         $tinetCfgC.add("\t\t0,")
    334                         $tinetCfgC.add("\t\t{ IPV6_ADDRANY, UDP_PORTANY },")
    335                         $tinetCfgC.add("\t\t(t_udp_callback)(FP)NULL,")
    336                         $tinetCfgC.add("\t\tUDP_CEP_FLG_DYNAMIC,")
    337                         $tinetCfgC.add("\t\tSEM_UDP_CEP_LOCK#{params[:vrid_udp6_cepid].val + $cfgData[:UDP6_CRE_CEP].size},")
    338                         $tinetCfgC.add("\t\tTA_NULL,")
    339                         $tinetCfgC.add("\t\tTA_NULL,")
    340                         $tinetCfgC.add("\t\tDTQ_UDP_RCVQ#{params[:vrid_udp6_cepid].val + $cfgData[:UDP6_CRE_CEP].size},")
    341                         $tinetCfgC.add("\t\t},")
    342         end
    343                 $tinetCfgC.add("\t};")
    344 end
    345 
    346363# =====================================================================
    347364# tinet_kern.cfg の生成
    348365# =====================================================================
    349366
    350 #       // TCP (IPv4) 受付口
    351 if $cfgData[:TCP_CRE_REP].size > 0 || $cfgData[:VRID_TCP4_REP].size > 0
    352         $cfgData[:TCP_CRE_REP].each do |key, params|
    353                 cfgInfo = { APINAME: "CRE_SEM" }
    354                 cfgInfo["semid"] = "SEM_TCP_REP_LOCK#{params[:tcp4_repid].val}"
    355                 cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
    356                 cfgInfo["isemcnt"] = 1
    357                 cfgInfo["maxsem"] = 1
    358                 $cfgFileInfo.push(cfgInfo)
    359         end
    360         $cfgData[:VRID_TCP4_REP].each do |key, params|
    361                 cfgInfo = { APINAME: "CRE_SEM" }
    362                 cfgInfo["semid"] = "SEM_TCP_REP_LOCK#{params[:vrid_tcp4_repid].val + $cfgData[:TCP_CRE_REP].size}"
    363                 cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
    364                 cfgInfo["isemcnt"] = 1
    365                 cfgInfo["maxsem"] = 1
    366                 $cfgFileInfo.push(cfgInfo)
    367         end
    368 end
    369 
    370367#       // TCP (IPv6) 受付口
     368$sem_tcp_rep_lock_id = 0
    371369if $cfgData[:TCP6_CRE_REP].size > 0 || $cfgData[:VRID_TCP6_REP].size > 0
    372370        $cfgData[:TCP6_CRE_REP].each do |key, params|
    373371                cfgInfo = { APINAME: "CRE_SEM" }
    374                 cfgInfo["semid"] = "SEM_TCP_REP_LOCK#{params[:tcp6_repid].val}"
    375                 cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
    376                 cfgInfo["isemcnt"] = 1
    377                 cfgInfo["maxsem"] = 1
    378                 $cfgFileInfo.push(cfgInfo)
     372                cfgInfo["semid"] = "SEM_TCP_REP_LOCK#{$sem_tcp_rep_lock_id}"
     373                cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
     374                cfgInfo["isemcnt"] = 1
     375                cfgInfo["maxsem"] = 1
     376                $cfgFileInfo.push(cfgInfo)
     377
     378                $sem_tcp_rep_lock_id = $sem_tcp_rep_lock_id + 1
    379379        end
    380380        $cfgData[:VRID_TCP6_REP].each do |key, params|
    381381                cfgInfo = { APINAME: "CRE_SEM" }
    382                 cfgInfo["semid"] = "SEM_TCP_REP_LOCK#{params[:vrid_tcp6_repid].val + $cfgData[:TCP6_CRE_REP].size}"
    383                 cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
    384                 cfgInfo["isemcnt"] = 1
    385                 cfgInfo["maxsem"] = 1
    386                 $cfgFileInfo.push(cfgInfo)
    387         end
    388 end
    389 
    390 #       // TCP (IPv4) 通信端点
    391 if $cfgData[:TCP_CRE_CEP].size > 0 || $cfgData[:VRID_TCP4_CEP].size > 0
    392         $cfgData[:TCP_CRE_CEP].each do |key, params|
    393                 cfgInfo = { APINAME: "CRE_SEM" }
    394                 cfgInfo["semid"] = "SEM_TCP_CEP_LOCK#{params[:tcp4_cepid].val}"
    395                 cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
    396                 cfgInfo["isemcnt"] = 1
    397                 cfgInfo["maxsem"] = 1
    398                 $cfgFileInfo.push(cfgInfo)
    399 
    400                 cfgInfo = { APINAME: "CRE_FLG" }
    401                 cfgInfo["flgid"] = "FLG_TCP_CEP_EST#{params[:tcp4_cepid].val}"
    402                 cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
    403                 cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_CLOSED, "TCP_CEP_EVT_CLOSED")
    404                 $cfgFileInfo.push(cfgInfo)
    405 
    406                 cfgInfo = { APINAME: "CRE_FLG" }
    407                 cfgInfo["flgid"] = "FLG_TCP_CEP_SND#{params[:tcp4_cepid].val}"
    408                 cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
    409                 cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_CLOSED, "TCP_CEP_EVT_CLOSED")
    410                 $cfgFileInfo.push(cfgInfo)
    411 
    412                 cfgInfo = { APINAME: "CRE_FLG" }
    413                 cfgInfo["flgid"] = "FLG_TCP_CEP_RCV#{params[:tcp4_cepid].val}"
    414                 cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
    415                 cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_CLOSED, "TCP_CEP_EVT_CLOSED")
    416                 $cfgFileInfo.push(cfgInfo)
    417         end
    418         $cfgData[:VRID_TCP4_CEP].each do |key, params|
    419                 cfgInfo = { APINAME: "CRE_SEM" }
    420                 cfgInfo["semid"] = "SEM_TCP_CEP_LOCK#{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size}"
    421                 cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
    422                 cfgInfo["isemcnt"] = 1
    423                 cfgInfo["maxsem"] = 1
    424                 $cfgFileInfo.push(cfgInfo)
    425 
    426                 cfgInfo = { APINAME: "CRE_FLG" }
    427                 cfgInfo["flgid"] = "FLG_TCP_CEP_EST#{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size}"
    428                 cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
    429                 cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_CLOSED, "TCP_CEP_EVT_CLOSED")
    430                 $cfgFileInfo.push(cfgInfo)
    431 
    432                 cfgInfo = { APINAME: "CRE_FLG" }
    433                 cfgInfo["flgid"] = "FLG_TCP_CEP_SND#{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size}"
    434                 cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
    435                 cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_CLOSED, "TCP_CEP_EVT_CLOSED")
    436                 $cfgFileInfo.push(cfgInfo)
    437 
    438                 cfgInfo = { APINAME: "CRE_FLG" }
    439                 cfgInfo["flgid"] = "FLG_TCP_CEP_RCV#{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size}"
    440                 cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
    441                 cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_CLOSED, "TCP_CEP_EVT_CLOSED")
    442                 $cfgFileInfo.push(cfgInfo)
     382                cfgInfo["semid"] = "SEM_TCP_REP_LOCK#{$sem_tcp_rep_lock_id}"
     383                cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
     384                cfgInfo["isemcnt"] = 1
     385                cfgInfo["maxsem"] = 1
     386                $cfgFileInfo.push(cfgInfo)
     387
     388                $sem_tcp_rep_lock_id = $sem_tcp_rep_lock_id + 1
     389        end
     390end
     391
     392#       // TCP (IPv4) 受付口
     393if $cfgData[:TCP_CRE_REP].size > 0 || $cfgData[:VRID_TCP_REP].size > 0
     394        $cfgData[:TCP_CRE_REP].each do |key, params|
     395                cfgInfo = { APINAME: "CRE_SEM" }
     396                cfgInfo["semid"] = "SEM_TCP_REP_LOCK#{$sem_tcp_rep_lock_id}"
     397                cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
     398                cfgInfo["isemcnt"] = 1
     399                cfgInfo["maxsem"] = 1
     400                $cfgFileInfo.push(cfgInfo)
     401
     402                $sem_tcp_rep_lock_id = $sem_tcp_rep_lock_id + 1
     403        end
     404        $cfgData[:VRID_TCP_REP].each do |key, params|
     405                cfgInfo = { APINAME: "CRE_SEM" }
     406                cfgInfo["semid"] = "SEM_TCP_REP_LOCK#{$sem_tcp_rep_lock_id}"
     407                cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
     408                cfgInfo["isemcnt"] = 1
     409                cfgInfo["maxsem"] = 1
     410                $cfgFileInfo.push(cfgInfo)
     411
     412                $sem_tcp_rep_lock_id = $sem_tcp_rep_lock_id + 1
    443413        end
    444414end
    … …  
    463433                cfgInfo["flgid"] = "FLG_TCP_CEP_SND#{params[:tcp6_cepid].val}"
    464434                cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
     435                cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_SWBUF_READY, "TCP_CEP_EVT_SWBUF_READY")
     436                $cfgFileInfo.push(cfgInfo)
     437
     438                cfgInfo = { APINAME: "CRE_FLG" }
     439                cfgInfo["flgid"] = "FLG_TCP_CEP_RCV#{params[:tcp6_cepid].val}"
     440                cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
     441                cfgInfo["iflgptn"] = 0
     442                $cfgFileInfo.push(cfgInfo)
     443        end
     444        $cfgData[:VRID_TCP6_CEP].each do |key, params|
     445                cfgInfo = { APINAME: "CRE_SEM" }
     446                cfgInfo["semid"] = "SEM_TCP_CEP_LOCK#{params[:vrid_tcp6_cepid].val + $cfgData[:TCP6_CRE_CEP].size}"
     447                cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
     448                cfgInfo["isemcnt"] = 1
     449                cfgInfo["maxsem"] = 1
     450                $cfgFileInfo.push(cfgInfo)
     451
     452                cfgInfo = { APINAME: "CRE_FLG" }
     453                cfgInfo["flgid"] = "FLG_TCP_CEP_EST#{params[:vrid_tcp6_cepid].val + $cfgData[:TCP6_CRE_CEP].size}"
     454                cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
    465455                cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_CLOSED, "TCP_CEP_EVT_CLOSED")
    466456                $cfgFileInfo.push(cfgInfo)
    467457
    468458                cfgInfo = { APINAME: "CRE_FLG" }
    469                 cfgInfo["flgid"] = "FLG_TCP_CEP_RCV#{params[:tcp6_cepid].val}"
     459                cfgInfo["flgid"] = "FLG_TCP_CEP_SND#{params[:vrid_tcp6_cepid].val + $cfgData[:TCP6_CRE_CEP].size}"
     460                cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
     461                cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_SWBUF_READY, "TCP_CEP_EVT_SWBUF_READY")
     462                $cfgFileInfo.push(cfgInfo)
     463
     464                cfgInfo = { APINAME: "CRE_FLG" }
     465                cfgInfo["flgid"] = "FLG_TCP_CEP_RCV#{params[:vrid_tcp6_cepid].val + $cfgData[:TCP6_CRE_CEP].size}"
     466                cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
     467                cfgInfo["iflgptn"] = 0
     468                $cfgFileInfo.push(cfgInfo)
     469        end
     470end
     471
     472#       // TCP (IPv4) 通信端点
     473if $cfgData[:TCP_CRE_CEP].size > 0 || $cfgData[:VRID_TCP_CEP].size > 0
     474        $cfgData[:TCP_CRE_CEP].each do |key, params|
     475                cfgInfo = { APINAME: "CRE_SEM" }
     476                cfgInfo["semid"] = "SEM_TCP_CEP_LOCK#{params[:tcp4_cepid].val + $cfgData[:TCP6_CRE_CEP].size + $cfgData[:VRID_TCP6_CEP].size}"
     477                cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
     478                cfgInfo["isemcnt"] = 1
     479                cfgInfo["maxsem"] = 1
     480                $cfgFileInfo.push(cfgInfo)
     481
     482                cfgInfo = { APINAME: "CRE_FLG" }
     483                cfgInfo["flgid"] = "FLG_TCP_CEP_EST#{params[:tcp4_cepid].val + $cfgData[:TCP6_CRE_CEP].size + $cfgData[:VRID_TCP6_CEP].size}"
    470484                cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
    471485                cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_CLOSED, "TCP_CEP_EVT_CLOSED")
    472486                $cfgFileInfo.push(cfgInfo)
    473         end
    474         $cfgData[:VRID_TCP6_CEP].each do |key, params|
    475                 cfgInfo = { APINAME: "CRE_SEM" }
    476                 cfgInfo["semid"] = "SEM_TCP_CEP_LOCK#{params[:vrid_tcp6_cepid].val + $cfgData[:TCP6_CRE_CEP].size}"
    477                 cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
    478                 cfgInfo["isemcnt"] = 1
    479                 cfgInfo["maxsem"] = 1
    480                 $cfgFileInfo.push(cfgInfo)
    481 
    482                 cfgInfo = { APINAME: "CRE_FLG" }
    483                 cfgInfo["flgid"] = "FLG_TCP_CEP_EST#{params[:vrid_tcp6_cepid].val + $cfgData[:TCP6_CRE_CEP].size}"
     487
     488                cfgInfo = { APINAME: "CRE_FLG" }
     489                cfgInfo["flgid"] = "FLG_TCP_CEP_SND#{params[:tcp4_cepid].val + $cfgData[:TCP6_CRE_CEP].size + $cfgData[:VRID_TCP6_CEP].size}"
     490                cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
     491                cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_SWBUF_READY, "TCP_CEP_EVT_SWBUF_READY")
     492                $cfgFileInfo.push(cfgInfo)
     493
     494                cfgInfo = { APINAME: "CRE_FLG" }
     495                cfgInfo["flgid"] = "FLG_TCP_CEP_RCV#{params[:tcp4_cepid].val + $cfgData[:TCP6_CRE_CEP].size + $cfgData[:VRID_TCP6_CEP].size}"
     496                cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
     497                cfgInfo["iflgptn"] = 0
     498                $cfgFileInfo.push(cfgInfo)
     499        end
     500        $cfgData[:VRID_TCP_CEP].each do |key, params|
     501                cfgInfo = { APINAME: "CRE_SEM" }
     502                cfgInfo["semid"] = "SEM_TCP_CEP_LOCK#{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size + $cfgData[:TCP6_CRE_CEP].size + $cfgData[:VRID_TCP6_CEP].size}"
     503                cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
     504                cfgInfo["isemcnt"] = 1
     505                cfgInfo["maxsem"] = 1
     506                $cfgFileInfo.push(cfgInfo)
     507
     508                cfgInfo = { APINAME: "CRE_FLG" }
     509                cfgInfo["flgid"] = "FLG_TCP_CEP_EST#{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size + $cfgData[:TCP6_CRE_CEP].size + $cfgData[:VRID_TCP6_CEP].size}"
    484510                cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
    485511                cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_CLOSED, "TCP_CEP_EVT_CLOSED")
    … …  
    487513
    488514                cfgInfo = { APINAME: "CRE_FLG" }
    489                 cfgInfo["flgid"] = "FLG_TCP_CEP_SND#{params[:vrid_tcp6_cepid].val + $cfgData[:TCP6_CRE_CEP].size}"
    490                 cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
    491                 cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_CLOSED, "TCP_CEP_EVT_CLOSED")
    492                 $cfgFileInfo.push(cfgInfo)
    493 
    494                 cfgInfo = { APINAME: "CRE_FLG" }
    495                 cfgInfo["flgid"] = "FLG_TCP_CEP_RCV#{params[:vrid_tcp6_cepid].val + $cfgData[:TCP6_CRE_CEP].size}"
    496                 cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
    497                 cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_CLOSED, "TCP_CEP_EVT_CLOSED")
    498                 $cfgFileInfo.push(cfgInfo)
    499         end
    500 end
    501 
    502 #       // UDP (IPv4) 通信端点
    503 if $cfgData[:UDP_CRE_CEP].size > 0 || $cfgData[:VRID_UDP4_CEP].size > 0
    504         $cfgData[:UDP_CRE_CEP].each do |key, params|
    505                 cfgInfo = { APINAME: "CRE_SEM" }
    506                 cfgInfo["semid"] = "SEM_UDP_CEP_LOCK#{params[:udp4_cepid].val}"
     515                cfgInfo["flgid"] = "FLG_TCP_CEP_SND#{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size + $cfgData[:TCP6_CRE_CEP].size + $cfgData[:VRID_TCP6_CEP].size}"
     516                cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
     517                cfgInfo["iflgptn"] = NumStr.new($TCP_CEP_EVT_SWBUF_READY, "TCP_CEP_EVT_SWBUF_READY")
     518                $cfgFileInfo.push(cfgInfo)
     519
     520                cfgInfo = { APINAME: "CRE_FLG" }
     521                cfgInfo["flgid"] = "FLG_TCP_CEP_RCV#{params[:vrid_tcp4_cepid].val + $cfgData[:TCP_CRE_CEP].size + $cfgData[:TCP6_CRE_CEP].size + $cfgData[:VRID_TCP6_CEP].size}"
     522                cfgInfo["flgatr"] = NumStr.new($TA_TFIFO | $TA_WSGL, "TA_TFIFO|TA_WSGL")
     523                cfgInfo["iflgptn"] = 0
     524                $cfgFileInfo.push(cfgInfo)
     525        end
     526end
     527
     528#       // UDP (IPv6) 通信端点
     529if $cfgData[:UDP6_CRE_CEP].size > 0 || $cfgData[:VRID_UDP6_CEP].size > 0
     530        $cfgData[:UDP6_CRE_CEP].each do |key, params|
     531                cfgInfo = { APINAME: "CRE_SEM" }
     532                cfgInfo["semid"] = "SEM_UDP6_CEP_LOCK#{params[:udp6_cepid].val}"
    507533                cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
    508534                cfgInfo["isemcnt"] = 1
    … …  
    511537
    512538                cfgInfo = { APINAME: "CRE_DTQ" }
    513                 cfgInfo["dtqid"] = "DTQ_UDP_RCVQ#{params[:udp4_cepid].val}"
     539                cfgInfo["dtqid"] = "DTQ_UDP6_RCVQ#{params[:udp6_cepid].val}"
    514540                cfgInfo["dtqatr"] = NumStr.new($TA_TFIFO, "TA_TFIFO")
    515541                cfgInfo["dtqcnt"] = NumStr.new($NUM_DTQ_UDP_RCVQ, "NUM_DTQ_UDP_RCVQ")
    … …  
    517543                $cfgFileInfo.push(cfgInfo)
    518544        end
    519         $cfgData[:VRID_UDP4_CEP].each do |key, params|
    520                 cfgInfo = { APINAME: "CRE_SEM" }
    521                 cfgInfo["semid"] = "SEM_UDP_CEP_LOCK#{params[:vrid_udp4_cepid].val + $cfgData[:UDP_CRE_CEP].size}"
     545        $cfgData[:VRID_UDP6_CEP].each do |key, params|
     546                cfgInfo = { APINAME: "CRE_SEM" }
     547                cfgInfo["semid"] = "SEM_UDP6_CEP_LOCK#{params[:vrid_udp6_cepid].val + $cfgData[:UDP6_CRE_CEP].size}"
    522548                cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
    523549                cfgInfo["isemcnt"] = 1
    … …  
    526552
    527553                cfgInfo = { APINAME: "CRE_DTQ" }
    528                 cfgInfo["dtqid"] = "DTQ_UDP_RCVQ#{params[:vrid_udp4_cepid].val + $cfgData[:UDP_CRE_CEP].size}"
     554                cfgInfo["dtqid"] = "DTQ_UDP6_RCVQ#{params[:vrid_udp6_cepid].val + $cfgData[:UDP6_CRE_CEP].size}"
    529555                cfgInfo["dtqatr"] = NumStr.new($TA_TFIFO, "TA_TFIFO")
    530556                cfgInfo["dtqcnt"] = NumStr.new($NUM_DTQ_UDP_RCVQ, "NUM_DTQ_UDP_RCVQ")
    … …  
    534560end
    535561
    536 #       // UDP (IPv6) 通信端点
    537 if $cfgData[:UDP6_CRE_CEP].size > 0 || $cfgData[:VRID_UDP6_CEP].size > 0
    538         $cfgData[:UDP6_CRE_CEP].each do |key, params|
    539                 cfgInfo = { APINAME: "CRE_SEM" }
    540                 cfgInfo["semid"] = "SEM_UDP_CEP_LOCK#{params[:udp6_cepid].val}"
     562#       // UDP (IPv4) 通信端点
     563if $cfgData[:UDP_CRE_CEP].size > 0 || $cfgData[:VRID_UDP_CEP].size > 0
     564        $cfgData[:UDP_CRE_CEP].each do |key, params|
     565                cfgInfo = { APINAME: "CRE_SEM" }
     566                cfgInfo["semid"] = "SEM_UDP4_CEP_LOCK#{params[:udp4_cepid].val}"
    541567                cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
    542568                cfgInfo["isemcnt"] = 1
    … …  
    545571
    546572                cfgInfo = { APINAME: "CRE_DTQ" }
    547                 cfgInfo["dtqid"] = "DTQ_UDP_RCVQ#{params[:udp6_cepid].val}"
     573                cfgInfo["dtqid"] = "DTQ_UDP4_RCVQ#{params[:udp4_cepid].val}"
    548574                cfgInfo["dtqatr"] = NumStr.new($TA_TFIFO, "TA_TFIFO")
    549575                cfgInfo["dtqcnt"] = NumStr.new($NUM_DTQ_UDP_RCVQ, "NUM_DTQ_UDP_RCVQ")
    … …  
    551577                $cfgFileInfo.push(cfgInfo)
    552578        end
    553         $cfgData[:VRID_UDP6_CEP].each do |key, params|
    554                 cfgInfo = { APINAME: "CRE_SEM" }
    555                 cfgInfo["semid"] = "SEM_UDP_CEP_LOCK#{params[:vrid_udp6_cepid].val + $cfgData[:UDP6_CRE_CEP].size}"
     579        $cfgData[:VRID_UDP_CEP].each do |key, params|
     580                cfgInfo = { APINAME: "CRE_SEM" }
     581                cfgInfo["semid"] = "SEM_UDP4_CEP_LOCK#{params[:vrid_udp4_cepid].val + $cfgData[:UDP_CRE_CEP].size}"
    556582                cfgInfo["sematr"] = NumStr.new($TA_TPRI, "TA_TPRI")
    557583                cfgInfo["isemcnt"] = 1
    … …  
    560586
    561587                cfgInfo = { APINAME: "CRE_DTQ" }
    562                 cfgInfo["dtqid"] = "DTQ_UDP_RCVQ#{params[:vrid_udp6_cepid].val + $cfgData[:UDP6_CRE_CEP].size}"
     588                cfgInfo["dtqid"] = "DTQ_UDP4_RCVQ#{params[:vrid_udp4_cepid].val + $cfgData[:UDP_CRE_CEP].size}"
    563589                cfgInfo["dtqatr"] = NumStr.new($TA_TFIFO, "TA_TFIFO")
    564590                cfgInfo["dtqcnt"] = NumStr.new($NUM_DTQ_UDP_RCVQ, "NUM_DTQ_UDP_RCVQ")
Note: See TracChangeset for help on using the changeset viewer.