[270] | 1 | # -*- coding: utf-8 -*-
|
---|
| 2 | #
|
---|
| 3 | # TECS Generator
|
---|
| 4 | # Generator for TOPPERS Embedded Component System
|
---|
| 5 | #
|
---|
| 6 | # Copyright (C) 2008-2014 by TOPPERS Project
|
---|
| 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 | # (b) åé
|
---|
| 32 | å¸ã®å½¢æ
|
---|
| 33 | ãï¼å¥ã«å®ããæ¹æ³ã«ãã£ã¦ï¼TOPPERSããã¸ã§ã¯ãã«
|
---|
| 34 | # å ±åãããã¨ï¼
|
---|
| 35 | # (4) æ¬ã½ããã¦ã§ã¢ã®å©ç¨ã«ããç´æ¥çã¾ãã¯éæ¥çã«çãããããªãæ
|
---|
| 36 | # 害ãããï¼ä¸è¨èä½æ¨©è
|
---|
| 37 | ããã³TOPPERSããã¸ã§ã¯ããå
|
---|
| 38 | 責ãããã¨ï¼
|
---|
| 39 | # ã¾ãï¼æ¬ã½ããã¦ã§ã¢ã®ã¦ã¼ã¶ã¾ãã¯ã¨ã³ãã¦ã¼ã¶ããã®ãããªãç
|
---|
| 40 | # ç±ã«åºã¥ãè«æ±ãããï¼ä¸è¨èä½æ¨©è
|
---|
| 41 | ããã³TOPPERSããã¸ã§ã¯ãã
|
---|
| 42 | # å
|
---|
| 43 | 責ãããã¨ï¼
|
---|
| 44 | #
|
---|
| 45 | # æ¬ã½ããã¦ã§ã¢ã¯ï¼ç¡ä¿è¨¼ã§æä¾ããã¦ãããã®ã§ããï¼ä¸è¨èä½æ¨©è
|
---|
| 46 | ã
|
---|
| 47 | # ãã³TOPPERSããã¸ã§ã¯ãã¯ï¼æ¬ã½ããã¦ã§ã¢ã«é¢ãã¦ï¼ç¹å®ã®ä½¿ç¨ç®ç
|
---|
| 48 | # ã«å¯¾ããé©åæ§ãå«ãã¦ï¼ãããªãä¿è¨¼ãè¡ããªãï¼ã¾ãï¼æ¬ã½ããã¦ã§
|
---|
| 49 | # ã¢ã®å©ç¨ã«ããç´æ¥çã¾ãã¯éæ¥çã«çãããããªãæ害ã«é¢ãã¦ãï¼ã
|
---|
| 50 | # ã®è²¬ä»»ãè² ããªãï¼
|
---|
| 51 | #
|
---|
| 52 | # $Id: ThroughPlugin.rb 1011 2016-07-11 02:20:01Z coas-nagasima $
|
---|
| 53 | #++
|
---|
| 54 |
|
---|
| 55 | # mikan through plugin: namespace ãèæ
|
---|
| 56 | ®ããã¦ããªã
|
---|
| 57 |
|
---|
| 58 | #== ã¹ã«ã¼ãã©ã°ã¤ã³ã®å
|
---|
| 59 | ±éã®è¦ªã¯ã©ã¹ãã㤠ï¼ä½ãããï¼ã¹ã«ã¼ããã»ã«ãæ¿å
|
---|
| 60 | ¥ããã¹ã«ã¼ãã©ã°ã¤ã³
|
---|
| 61 | # ã¹ã«ã¼ãã©ã°ã¤ã³ã¯ ThroughPlugin ã®åã¯ã©ã¹ã¨ãã¦å®ç¾©ãã
|
---|
| 62 | class ThroughPlugin < Plugin
|
---|
| 63 | #@cell_name:: Symbol çæããã»ã«åï¼è¤æ°ã»ã«ãçæããå ´åãåãå£å´ã®ã»ã«ï¼
|
---|
| 64 | #@plugin_arg_str:: string through ã§æå®ãããå¼æ°
|
---|
| 65 | #@next_cell:: Cell å¼ã³å£ãçµåããã»ã«
|
---|
| 66 | #@next_cell_port_name:: Symbol å¼ã³å£ãçµåããåå£ã®åå
|
---|
| 67 | #@signature:: Signature ã·ã°ããã£
|
---|
| 68 | #@celltype:: Celltype å¼ã³å
|
---|
| 69 | ã®ã»ã«ã®ã»ã«ã¿ã¤ã. through ãé£æ¥ããå ´åãæçµçãªå¼ã³å
|
---|
| 70 | ã®ã»ã«ã®ã»ã«ã¿ã¤ã
|
---|
| 71 | #@entry_port_name::Symbol çæããã»ã«ã®åãå£å "eThroughEntry"
|
---|
| 72 | #@call_port_name:: Symbol çæããã»ã«ã®å¼ã³å£å "cCall"
|
---|
| 73 | #@ct_name:: Symbol çæããã»ã«ã®ã»ã«ã¿ã¤ãå "t#{self.class.name}_#{@signature.get_global_name}"
|
---|
| 74 | #@plugin_arg_list:: Hash ãã©ã°ã¤ã³å¼æ°ããã¼ã¹ããçµæã®ããã·ã¥å¤æ°
|
---|
| 75 | #@caller_cell:: Cell å¼ã³å
|
---|
| 76 | ã®ã»ã«ï¼through ãã©ã°ã¤ã³ãé£æ¥ããå ´åã§ã¯ãæãå¼ã³å
|
---|
| 77 | ã®ã»ã«ï¼($source$)
|
---|
| 78 | # through ãã©ã°ã¤ã³ãåæµããã±ã¼ã¹ã§ã¯ã1ã¤ç®ã®å¼ã³å
|
---|
| 79 | ã»ã«ã®ã¿å¼æ°ã¨ãã¦ä¸ãããã
|
---|
| 80 | # å¾ã£ã¦ TracePlugin ã®å¼ã³å
|
---|
| 81 | ã®å¤å¥ã«å©ç¨ããå ´åã¯ãç°ãªãå¼ã³å
|
---|
| 82 | ããå¼ã°ããå¯è½æ§ããããã¨ã«æ³¨æããªãã¦ã¯ãªããªã
|
---|
| 83 | #@callee_cell:: Cell å¼ã³å
|
---|
| 84 | ã®ã»ã«($destination$)
|
---|
| 85 | #@plugin_arg_check_proc_tab:: [string => Proc] ãã©ã°ã¤ã³å¼æ°åâãã§ãã¯é¢æ°
|
---|
| 86 | # 以ä¸ã®å¤æ°ã¯ãinitialize ã§ã¯ãªããå¾ããè¨å®ããã
|
---|
| 87 | #@start_@region:: Region å§ã¾ãã®ãªã¼ã¸ã§ã³ï¼ caller_cell ã®ãªã¼ã¸ã§ã³ã¨ã¯ç°ãªãå¯è½æ§ããã ($start_region$)
|
---|
| 88 | #@end_region:: Region çµããã®ãªã¼ã¸ã§ã³ï¼ next_cell ã®ãªã¼ã¸ã§ã³ã¨ã¯ç°ãªãå¯è½æ§ããã ($end_region$)
|
---|
| 89 | #@region:: Region @start_region 㨠@end_region ã®ããããã§ãcell ãç½®ãã®ã好ã¾ãããªã¼ã¸ã§ã³ ($preferred_region$)
|
---|
| 90 | #@through_type:: Symbol :THROUGH, :TO_THROUGH, :IN_THROUGH, :OUT_THROUGH ã®ãããã
|
---|
| 91 |
|
---|
| 92 | # ãã® Plugin ãçæããã»ã«ã¿ã¤ãã®ãªã¹ã
|
---|
| 93 | @@generated_celltype = {}
|
---|
| 94 |
|
---|
| 95 | #=== ThroughPlugin ã®åæå
|
---|
| 96 | # through ãæå®ãããæç¹ã§çæãè¡ããã
|
---|
| 97 | # åæåã§ã¯ãæå®ãããå¼æ°ãè¨é²ããã«çãã
|
---|
| 98 | #cell_name:: Symbol çæãã¹ãã»ã«åï¼åå£å´ï¼
|
---|
| 99 | #plugin_arg:: string through ã§æå®ãããå¼æ°
|
---|
| 100 | #next_cell:: Cell å¼ã³å£ãæ¥ç¶ããã»ã«
|
---|
| 101 | #next_cell_port_name:: Symbol å¼ã³å£ãæ¥ç¶ããåå£ã®åå
|
---|
| 102 | #signature:: Signature ã·ã°ããã£
|
---|
| 103 | #celltype:: Celltype ã»ã«ã¿ã¤ã (å¼ã³å
|
---|
| 104 | ã®ã»ã«ã®ã»ã«ã¿ã¤ã)
|
---|
| 105 | #caller_cell:: Cell å¼ã³å
|
---|
| 106 | ã®ã»ã«ï¼@caller_cell ã®é
|
---|
| 107 | ãåç
|
---|
| 108 | §
|
---|
| 109 | def initialize( cell_name, plugin_arg, next_cell, next_cell_port_name, signature, celltype, caller_cell )
|
---|
| 110 | super()
|
---|
| 111 | @cell_name = cell_name # çæãã¹ãã»ã«åï¼åãå£å´ã®ã»ã«åï¼
|
---|
| 112 | # ãã®å¼ã³å
|
---|
| 113 | ã«å¥ã»ã«ãçæããå ´åããã®ååãæ¥é è¾ã¨ãã¹ã
|
---|
| 114 | @next_cell = next_cell # å¼ã³å
|
---|
| 115 | ã®ã»ã«
|
---|
| 116 | @next_cell_port_name = next_cell_port_name
|
---|
| 117 | @signature = signature
|
---|
| 118 | @entry_port_name = :"eThroughEntry"
|
---|
| 119 | @call_port_name = :"cCall"
|
---|
| 120 | @ct_name = :"t#{self.class.name}_#{@signature.get_global_name}"
|
---|
| 121 | @celltype = celltype
|
---|
| 122 | @plugin_arg_str = plugin_arg
|
---|
| 123 | @plugin_arg_list = {} # ãã©ã°ã¤ã³å¼æ°ããã¼ã¹ããçµæã®ããã·ã¥å¤æ°
|
---|
| 124 | @caller_cell = caller_cell
|
---|
| 125 | Join.set_through_info self # å¼æ°ã§æ¸¡ããªã(å¾ãã追å ããã)ãã®ã¯ set_through_info ã§è¨å®ããã
|
---|
| 126 | print( "#{self.class.name}.new( '#{cell_name}', '#{plugin_arg}', '#{next_cell.get_name}', '#{next_cell_port_name}', #{celltype.get_name} )\n" )
|
---|
| 127 | end
|
---|
| 128 |
|
---|
| 129 | #=== æ
|
---|
| 130 | å ±ãè¨å®ãã
|
---|
| 131 | # å
|
---|
| 132 | ±æãã£ã³ãã«ã®å ´å caller_cell, next_cell ã®ãããã® region ã§ããªãã±ã¼ã¹ããã
|
---|
| 133 | # å¾ãã追å ããã®ã§ initialize ã®å¼æ°ã§ã¯ãªããå¥ã¡ã½ããã§è¨å®
|
---|
| 134 | # ãã®ã¡ã½ããã¯ããªã¼ãã¼ã©ã¤ãããªãã§ãã ãã
|
---|
| 135 | # Join 㨠ThrougPlugin ã®éã®é£çµ¡ç¨ã§ãä»å¾ã¨ãå¼æ°ã追å ãããå¯è½æ§ããããã
|
---|
| 136 | # ãã®ã¡ã½ãã㯠V1.C.0.34 ã§ä½ç½®ã移åãããThroughPlugin#initialize ã§å¼ã³åºããã
|
---|
| 137 | def set_through_info( start_region, end_region, through_type, join, callee_cell, count )
|
---|
| 138 | @start_region = start_region
|
---|
| 139 | @end_region = end_region
|
---|
| 140 | @through_type = through_type
|
---|
| 141 | @join = join
|
---|
| 142 | @callee_cell = callee_cell
|
---|
| 143 | @count = count
|
---|
| 144 |
|
---|
| 145 | # preferred_region ã®è¨å®
|
---|
| 146 | case through_type
|
---|
| 147 | when :IN_THROUGH, :THROUGH
|
---|
| 148 | @region = end_region
|
---|
| 149 | when :OUT_THROUGH, :TO_THROUGH
|
---|
| 150 | @region = start_region
|
---|
| 151 | else
|
---|
| 152 | raise "Unknown through_type #{through_type}"
|
---|
| 153 | end
|
---|
| 154 | end
|
---|
| 155 |
|
---|
| 156 | #=== ã»ã«ã®ååãå¾ã
|
---|
| 157 | def get_cell_name
|
---|
| 158 | @cell_name
|
---|
| 159 | end
|
---|
| 160 |
|
---|
| 161 | #=== NamespacePath ãå¾ã
|
---|
| 162 | # çæããã»ã«ã® namespace path ãçæãã
|
---|
| 163 | def get_cell_namespace_path
|
---|
| 164 | # nsp = @region.get_namespace.get_namespace_path
|
---|
| 165 | nsp = @region.get_namespace_path
|
---|
| 166 | return nsp.append( @cell_name )
|
---|
| 167 | end
|
---|
| 168 |
|
---|
| 169 | #=== çæãããã»ã«ã®åãå£ã®ååãå¾ã
|
---|
| 170 | def get_through_entry_port_name
|
---|
| 171 | @entry_port_name
|
---|
| 172 | end
|
---|
| 173 |
|
---|
| 174 | #=== 宣è¨ã³ã¼ãã®çæ
|
---|
| 175 | # typedef, signature, celltype ãªã©ï¼cell 以å¤ï¼ã®ã³ã¼ããçæ
|
---|
| 176 | # éè¤ãã¦çæãã¦ã¯ãªããªãï¼ãã§ã«çæããã¦ããå ´åã¯åºåããªããã¨ï¼
|
---|
| 177 | #file:: FILE çæãããã¡ã¤ã«
|
---|
| 178 | def gen_plugin_decl_code( file )
|
---|
| 179 |
|
---|
| 180 | # ãã®ã»ã«ã¿ã¤ãï¼åãã·ã°ããã£ï¼ã¯æ¢ã«çæããã¦ãããï¼
|
---|
| 181 | if @@generated_celltype[ @ct_name ] == nil then
|
---|
| 182 | @@generated_celltype[ @ct_name ] = [ self ]
|
---|
| 183 | else
|
---|
| 184 | @@generated_celltype[ @ct_name ] << self
|
---|
| 185 | return
|
---|
| 186 | end
|
---|
| 187 |
|
---|
| 188 | file2 = CFile.open( "#{$gen}/#{@ct_name}.cdl", "w" )
|
---|
| 189 |
|
---|
| 190 | send_receive = []
|
---|
| 191 | if @signature != nil then
|
---|
| 192 | @signature.each_param{ |fd,param|
|
---|
| 193 | dir =param.get_direction
|
---|
| 194 | case dir
|
---|
| 195 | when :SEND, :RECEIVE
|
---|
| 196 | send_receive << [ dir, fd, param ]
|
---|
| 197 | end
|
---|
| 198 | }
|
---|
| 199 | end
|
---|
| 200 |
|
---|
| 201 | file2.print <<EOT
|
---|
| 202 | celltype #{@ct_name} {
|
---|
| 203 | EOT
|
---|
| 204 |
|
---|
| 205 | if send_receive.length > 0 then
|
---|
| 206 | file2.print " [ allocator(\n"
|
---|
| 207 | delim = ""
|
---|
| 208 | send_receive.each { |a|
|
---|
| 209 | file2.print "#{delim}\t#{a[1].get_name}.#{a[2].get_name}<=#{@call_port_name}.#{a[1].get_name}.#{a[2].get_name}"
|
---|
| 210 | delim = ",\n"
|
---|
| 211 | }
|
---|
| 212 | file2.print "\n )]\n"
|
---|
| 213 | end
|
---|
| 214 |
|
---|
| 215 | file2.print <<EOT
|
---|
| 216 | entry #{@signature.get_namespace_path} #{@entry_port_name};
|
---|
| 217 | call #{@signature.get_namespace_path} #{@call_port_name};
|
---|
| 218 | };
|
---|
| 219 | EOT
|
---|
| 220 | file2.close
|
---|
| 221 |
|
---|
| 222 | file.print "import( \"#{$gen}/#{@ct_name}.cdl\" );\n"
|
---|
| 223 | end
|
---|
| 224 |
|
---|
| 225 | #=== CDL ãã¡ã¤ã«ã®çæ
|
---|
| 226 | #file:: FILE çæãããã¡ã¤ã«
|
---|
| 227 | def gen_cdl_file( file )
|
---|
| 228 | gen_plugin_decl_code( file )
|
---|
| 229 | gen_through_cell_code( file )
|
---|
| 230 | end
|
---|
| 231 |
|
---|
| 232 | #=== ã»ã«ã³ã¼ãã®çæ
|
---|
| 233 | # through æå®ã«ããçããã»ã«ã³ã¼ã(CDL)ãçæãã
|
---|
| 234 | #file:: FILE çæãããã¡ã¤ã«
|
---|
| 235 | def gen_through_cell_code( file )
|
---|
| 236 |
|
---|
| 237 | nest = @region.gen_region_str_pre file
|
---|
| 238 | nest_str = " " * nest
|
---|
| 239 |
|
---|
| 240 | file.print <<EOT
|
---|
| 241 | #{nest_str}cell #{@ct_name} #{@cell_name} {
|
---|
| 242 | #{nest_str} #{@call_port_name} = #{@next_cell.get_namespace_path.get_path_str}.#{@next_cell_port_name};
|
---|
| 243 | #{nest_str}};
|
---|
| 244 | EOT
|
---|
| 245 | @region.gen_region_str_post file
|
---|
| 246 |
|
---|
| 247 | end
|
---|
| 248 |
|
---|
| 249 | #=== å¾ãã®ã³ã¼ããçæ
|
---|
| 250 | #ãã©ã°ã¤ã³ã®å¾ãã®ã³ã¼ã (CDL) ãçæ
|
---|
| 251 | #file:: File:
|
---|
| 252 | def self.gen_post_code( file )
|
---|
| 253 | # è¤æ°ã®ãã©ã°ã¤ã³ã® post_code ãä¸ã¤ã®ãã¡ã¤ã«ã«å«ã¾ããããã以ä¸ã®ãããªè¦åºããã¤ãããã¨
|
---|
| 254 | # file.print "/* '#{self.class.name}' post code */\n"
|
---|
| 255 | end
|
---|
| 256 |
|
---|
| 257 | #=== åãå£é¢æ°ã®æ¬ä½(Cè¨èª)ãçæãã
|
---|
| 258 | # é常ã§ããã°ãã¸ã§ãã¬ã¼ã¿ã¯åãå£é¢æ°ã®ãã³ãã¬ã¼ããçæãã
|
---|
| 259 | # ãã©ã°ã¤ã³ã®å ´åãå¤æ´ããå¿
|
---|
| 260 | è¦ã®ãªãã»ã«ã¿ã¤ãã³ã¼ããçæãã
|
---|
| 261 | #file:: FILE åºåå
|
---|
| 262 | ãã¡ã¤ã«
|
---|
| 263 | #b_singleton:: bool true if singleton
|
---|
| 264 | #ct_name:: Symbol
|
---|
| 265 | #global_ct_name:: string
|
---|
| 266 | #sig_name:: string
|
---|
| 267 | #ep_name:: string
|
---|
| 268 | #func_name:: string
|
---|
| 269 | #func_global_name:: string
|
---|
| 270 | #func_type:: class derived from Type
|
---|
| 271 | def gen_ep_func_body( file, b_singleton, ct_name, global_ct_name, sig_name, ep_name, func_name, func_global_name, func_type, params )
|
---|
| 272 |
|
---|
| 273 | ret_type = func_type.get_type
|
---|
| 274 | b_ret_void = ret_type.is_void?
|
---|
| 275 |
|
---|
| 276 | if ! b_ret_void then
|
---|
| 277 | file.print( " #{ret_type.get_type_str} retval;\n" )
|
---|
| 278 | end
|
---|
| 279 |
|
---|
| 280 | if ! b_singleton then
|
---|
| 281 |
|
---|
| 282 | file.print <<EOT
|
---|
| 283 | #{ct_name}_CB *p_cellcb;
|
---|
| 284 | if( VALID_IDX( idx ) ){
|
---|
| 285 | p_cellcb = #{global_ct_name}_GET_CELLCB(idx);
|
---|
| 286 | }else{
|
---|
| 287 | /* ã¨ã©ã¼å¦çã³ã¼ããããã«è¨è¿° */
|
---|
| 288 | }
|
---|
| 289 |
|
---|
| 290 | EOT
|
---|
| 291 | end
|
---|
| 292 |
|
---|
| 293 | # p "celltype_name, sig_name, func_name, func_global_name"
|
---|
| 294 | # p "#{ct_name}, #{sig_name}, #{func_name}, #{func_global_name}"
|
---|
| 295 |
|
---|
| 296 | delim = ""
|
---|
| 297 | if ! b_ret_void then
|
---|
| 298 | file.print( " retval = " )
|
---|
| 299 | end
|
---|
| 300 |
|
---|
| 301 | file.print( "#{@call_port_name}_#{func_name}(" )
|
---|
| 302 |
|
---|
| 303 | # if ( ! b_singleton ) then
|
---|
| 304 | # file.print( " tecs_this" )
|
---|
| 305 | # delim = ","
|
---|
| 306 | # end
|
---|
| 307 |
|
---|
| 308 | params.each{ |param|
|
---|
| 309 | file.printf( "#{delim} #{param.get_name}" )
|
---|
| 310 | delim = ","
|
---|
| 311 | }
|
---|
| 312 |
|
---|
| 313 | file.print( " );\n" )
|
---|
| 314 |
|
---|
| 315 | if ! b_ret_void then
|
---|
| 316 | file.print( " return retval;\n" )
|
---|
| 317 | end
|
---|
| 318 | end
|
---|
| 319 |
|
---|
| 320 | #=== Through ãã©ã°ã¤ã³ã®å¼æ°ã®ååãç½®æãã
|
---|
| 321 | def check_plugin_arg( ident, rhs )
|
---|
| 322 | rhs = subst_name rhs
|
---|
| 323 | super( ident, rhs )
|
---|
| 324 | end
|
---|
| 325 |
|
---|
| 326 | #=== ThroughPlugin#ååã®ç½®æ
|
---|
| 327 | # ãã©ã°ã¤ã³ãªãã·ã§ã³å¼æ°å
|
---|
| 328 | ã®æååãç½®æãã
|
---|
| 329 | # $source$ ⦠å¼ã³å
|
---|
| 330 | ã®ã»ã«å
|
---|
| 331 | # $destination$ ⦠å¼ã³å
|
---|
| 332 | ã®ã»ã«å
|
---|
| 333 | # $SOURCE$ ⦠å¼ã³å
|
---|
| 334 | ã®ã»ã«å (ãªã¼ã¸ã§ã³åã '_' ã§é£çµãã global_name)
|
---|
| 335 | # $DESTINATION$ ⦠å¼ã³å
|
---|
| 336 | ã®ã»ã«å (ãªã¼ã¸ã§ã³åã '_' ã§é£çµãã global_name)
|
---|
| 337 | # $next$ ⦠次ã®ã»ã«å
|
---|
| 338 | # è¤æ°ã® through ãã¤ãªãã£ã¦ããå ´åãããå¾ãã«æ¥ããã®
|
---|
| 339 | # $NEXT$ ⦠次ã®ã»ã«å (ãªã¼ã¸ã§ã³åã '_' ã§é£çµãã global_name)
|
---|
| 340 | # è¤æ°ã® through ãã¤ãªãã£ã¦ããå ´åãããå¾ãã«æ¥ããã®
|
---|
| 341 | # $start_region$ ⦠$source$ ã®ã»ã«ã®åå¨ãã region (global_name)
|
---|
| 342 | # $end_region$ ⦠$destination$ ã®ã»ã«ã®åå¨ãã region (global_name)
|
---|
| 343 | # $preferred_region$ ⦠é©å㪠region (global_name), start_region ã¾ã㯠end_region
|
---|
| 344 | # $count$ ⦠region éã® through ã®é©ç¨æ°
|
---|
| 345 | # $$ ⦠$ ã«ç½®æ
|
---|
| 346 | def subst_name( str )
|
---|
| 347 | # ã»ã«åã®ç½®æ
|
---|
| 348 | str = str.gsub( /(^|[^\$])\$source\$/, "\\1#{@caller_cell.get_name}" )
|
---|
| 349 | str = str.gsub( /(^|[^\$])\$destination\$/, "\\1#{@callee_cell.get_name}" )
|
---|
| 350 | str = str.gsub( /(^|[^\$])\$SOURCE\$/, "\\1#{@caller_cell.get_global_name}" )
|
---|
| 351 | str = str.gsub( /(^|[^\$])\$DESTINATION\$/, "\\1#{@callee_cell.get_global_name}" )
|
---|
| 352 | str = str.gsub( /(^|[^\$])\$next\$/, "\\1#{@next_cell.get_name}" )
|
---|
| 353 | str = str.gsub( /(^|[^\$])\$NEXT\$/, "\\1#{@next_cell.get_global_name}" )
|
---|
| 354 | # region åã®ç½®æ
|
---|
| 355 | str = str.gsub( /(^|[^\$])\$start_region\$/, "\\1#{@start_region.get_global_name}" )
|
---|
| 356 | str = str.gsub( /(^|[^\$])\$end_region\$/, "\\1#{@end_region.get_global_name}" )
|
---|
| 357 | str = str.gsub( /(^|[^\$])\$preferred_region\$/, "\\1#{@region.get_global_name}" )
|
---|
| 358 | str = str.gsub( /(^|[^\$])\$count\$/, "\\1#{@count}" )
|
---|
| 359 |
|
---|
| 360 | str = str.gsub( /\$\$/, "\$" ) # $$ ã $ ã«ç½®æ
|
---|
| 361 |
|
---|
| 362 | return str
|
---|
| 363 | end
|
---|
| 364 |
|
---|
| 365 | def show_tree( indent )
|
---|
| 366 | indent.times { print " " }
|
---|
| 367 | puts "Plugin: celltype: #{@ct_name} cell: #{@cell_name}"
|
---|
| 368 | (indent+1).times { print " " }
|
---|
| 369 | puts "next: signature: #{@signature.get_namespace_path} call = #{@next_cell.get_name}.#{@next_cell_port_name}"
|
---|
| 370 | end
|
---|
| 371 | end
|
---|
| 372 |
|
---|