2h`4dZddlmZddlmZddlZddlZddlZddlZddlZddl Z ddl Z ddl Z ddl Z ddl Z ddlmZddlmZe jddkZd Zejd ZGd d ejZd ZdZd.dZdZdZd/dZdZdZdZ dZ!Gddej"Z#Gdde#Z$d0dZ%d/dZ& d1dZ' d2dZ(d3d Z)d/d!Z*ddde+fd"Z,d/d#Z-ddde+fd$Z. d4d&Z/d'Z0d5d(Z1d)Z2d*Z3d+Z4d,Z5d-Z6dS)6z4 Shared __main__ method functionality for emitters. )absolute_import)print_functionN)ast)cladc |d|dt|dd|zS)N./r)findmax)filesuffixs P/home/metal/girl-os-victor/victor-clad/tools/message-buffers/clad/emitterutil.pyget_included_filer&s: 73DIIcNNA 6 6777 86 AAc#K|VdSN)contexts r _disable_withr)s MMMMMrcpeZdZGddeZd fd ZfdZdZdZfd Z d Z d Z dd Z xZ S)IndentedTextIOWrapperc eZdZdZdZdZdS)%IndentedTextIOWrapper.DepthWithHelperc"||_||_dSr)wrapper depth_delta)selfrrs r__init__z.IndentedTextIOWrapper.DepthWithHelper.__init__0s"DL*D   rcdSrr)rs r __enter__z/IndentedTextIOWrapper.DepthWithHelper.__enter__4s Drc:|jxj|jzc_dSr)rdepthr)rtypevalue tracebacks r__exit__z.IndentedTextIOWrapper.DepthWithHelper.__exit__8s! L  $"2 2    rN)__name__ __module__ __qualname__r r"r(rrrDepthWithHelperr/sA + + +    3 3 3 3 3rr,r ctt|d||_||_d|_||_dS)N newlineF)superrr pathr$ended_on_newline tab_character)rr3r$r5 __class__s rr zIndentedTextIOWrapper.__init__;sI #T**33D3AAA  %*rc||tt||||dSr)_write_to_filer2rr()rr%r&r'r6s rr(zIndentedTextIOWrapper.__exit__BsC <    ! ! ! #T**33D%KKKKKrctj|rtj|dtrt ||dSt |d|S)Nir/r0z{mode}b)mode)osr3existschmod_py3openformat)rfilenamer:s r _open_filez IndentedTextIOWrapper._open_fileGsh 7>>( # # ' HXv & & &  ?$555 5)"2"2"2"="=>> >rc|j||jd5}||dddn #1swxYwYtj|jrt j|jddSdStj|dS)Nwim) r3rBwritegetvaluer;r<r=sysstdout)routputs rr8z$IndentedTextIOWrapper._write_to_fileOs 9 C00 .F T]]__--- . . . . . . . . . . . . . . .w~~di(( ,F+++++ , , J  T]]__ - - - - -s(AAAc|sdS|jr|jdkr d|jz|z}|ddk|_|jdkr>d|ddvr2|ddddd|jzz|dz}|d|j}tst |d}t t||dS)Nrr-r/utf8) r4r$replacer5r>unicoder2rrE)rr&r6s rrEzIndentedTextIOWrapper.writeXs  F   .TZ!^^4:%-E!&rd!2 :>>deCRCj00#2#J&&tTD4:4E-EFFrRE dD$677 +E6**E #T**0077777rcN|xj|z c_|||S)zfStarts indenting text and returns an object that unindents if this method is called in a 'with' block.r$r,)rrs rindentzIndentedTextIOWrapper.indentms( k! ##D+666rcL|j}d|_||| S)zpReduces indent to 0 temporarily and returns an object that reindents if this method is called in a 'with' block.rrP)r old_depths r reset_indentz"IndentedTextIOWrapper.reset_indentrs(J  ##D9*555rc  |sdStd|D fd|D}t|}d|D}|D]}|rt|ddD]H\}}|||d||t |z zI||d|ddS)ag Takes in a list of sequences of strings, then writes them all to the buffer as lines, adding whitespace to keep each column aligned. extra_whitespace -- extra space to join the strings with (1 would mean a space inbetween) [('int', ' foo', ' = 5;'), ('float', ' bar;')] -> int foo = 5; float bar; Nc34K|]}t|VdSrlen).0sequences r zFIndentedTextIOWrapper.write_with_aligned_whitespace..s(!F!FH#h--!F!F!F!F!F!FrcZg|]'}t|dt|z zz(S)))tuplerX)rYrZmax_sequence_lengths r zGIndentedTextIOWrapper.write_with_aligned_whitespace..s6fffT\h%+>X+N"OOfffrc@g|]}td|DS)c34K|]}t|VdSrrW)rYpieces rr[zQIndentedTextIOWrapper.write_with_aligned_whitespace...s(??uE ??????r)r )rYcolumns rr`zGIndentedTextIOWrapper.write_with_aligned_whitespace..s/VVVFC???????VVVrrK r/)r zip enumeraterErX) rlinesextra_whitespacerowscolumnsspace_per_columnrZircr_s @rwrite_with_aligned_whitespacez3IndentedTextIOWrapper.write_with_aligned_whitespacexs  F"!F!F!F!F!FFFffff`effft*VVgVVV ! !H ! )(3B3- 8 8IIHAuJJu%%%JJs&6q&9CJJ&FGHHHH 8B<((( 4    ! !r)rr-)r)r)r*r+objectr,r r(rBr8rErQrTrn __classcell__r6s@rrr-s 3 3 3 3 3& 3 3 3++++++LLLLL ???...88888*777 666 !!!!!!!!rrc|jdkr:tj|j|j}t |dSt tjS)N-r) input_filer;r3joininput_directoryr?rrGstdin)options real_paths r _get_inputr{sKS  GLL!8':LMM Is###SY'''rc||jr|jdkrdS|jS|jdkrt|j|SdS)Nrs) output_filerur)ryrs rget_output_filer~sO  # % %3& &  s " " !3V<<<srFc|dkru|dkrotj||}ttj||rt |dSt |dSt ddS)Nrswb )r5)r;r3rvmkdir_pdirnamer?r)output_directoryr}binaryrzs r get_outputrs3;##5#5GLL!1;??  **+++  H 4(( (($GGG G$T>>>>rctj|s,t|d5 ddddS#1swxYwYdSdS)zNCreates an empty file unless it already exists, in which case it does nothing.aN)r;r3r<r?r3s r create_filers 7>>$   $__                     s?AAc tj|dS#t$rA}|jtjkr tj|rnYd}~dSd}~wwxYwr)r;makedirsOSErrorerrnoEEXISTr3isdir)r3excs rrrss D  9 $ $t)<)< $  DDDDDs A#6AA#c6|rrec3>K|]}tj|VdSr)shlexquote)rYargs rr[z$get_comment_lines..s,AAEK,,AAAAAArz-Autogenerated {language} message buffer code.languagezSource: {source})sourcez!Full command line: {command_line}) command_line)ru_convert_abspaths_to_relpathsrGargvrvr@)ryrrrel_argsrs rget_comment_linesrsS  #,SX66H88AAAAAAAL7>>>QQ!!!00+22 2MM rc~tjdd|}tjdd|S)Nz([A-Za-z0-9])([A-Z][a-z]+)z\1_\2z([a-z0-9])([A-Z]))resublower) identifiers r convert_camelcase_to_underscoresrs74h KKJ 6%x < < B B D DDrc|}tjdd|}|d}tjdd|}t|}|pd}d|}|S) z(Creates a C-style macro inclusion guard.z[^A-Za-z0-9_./-]r]z./-z[./-]_rz __{guard}__)guard)rrstriprupperr@)r}rs rc_inclusion_guardrs| E F%r5 1 1E KK  E F7C ' 'E ,U 3 3 9 9 ; ;E OVE  u - -E Lrc2eZdZdZfdZfdZdZxZS)SimpleArgumentParserat The bare-minimum arguments for parsing. No output arguments. Calculates the following arguments and metavalues: input_file -- the filename of the file to read from (made portable) input_directory -- the directory to resolve includes from debug_yacc -- turn on yacc debug You may add your own arguments like a normal argparse.ArgumentParser. c  tt|j|i||ddd|ddddd |d d d dddd|ddtddS)Nruz input-filezThe .clad file to parse.metavarhelpz-Cz--input-directoryz./dirzThe input prefix directory.defaultrrz-Iz--include-directoryr*include_directoriesz=Additional directories in which to search for included files.)rrnargsdestrz --namespaceemitter_namespacez?Global namespace prefixed in front of all specified namespaces.)rr%r)r2rr add_argumentstr)rargskwargsr6s rr zSimpleArgumentParser.__init__s2"D))2DCFCCC , +  - - - $ 3T5.  0 0 0 $ 5r51P  R R R -1D3R  T T T T Trc|ddddtt|j|i|\}}||||fS)Nz-dz --debug-yacc store_truezTurn on yacc debug.)actionr)rr2rparse_known_args postprocess)rrrrr6s rrz%SimpleArgumentParser.parse_known_argssq $|&  ( ( (HU/66GXQWXX d Tzrc8t|j|_dSr)rru)rrs rrz SimpleArgumentParser.postprocesss,T_==r)r)r*r+__doc__r rrrprqs@rrrso   T T T T T>>>>>>>rrc.eZdZdZdfd ZfdZxZS)StandardArgumentParserz An argparse.ArgumentParser used to parse arguments supported in every language. Calculates the additional arguments and metavalues: output_directory -- the directory to output to output_file (if permitted) -- the file to output to Fc d|}tt|j|d|i|||_|rp|}|ddddd| |d d d | dS|ddddd| dS)Nz+Generate {language} code from a .clad file.r descriptionz-oz--output-directoryrsrz/The directory to output the {language} file to.rz --output-filerz.The file path to write the {language} file to.rz2The directory to output the {language} file(s) to.)r@r2rr _allow_override_outputadd_mutually_exclusive_groupr)rrallow_override_outputrrrgroupr6s rr zStandardArgumentParser.__init__s5CJJT\J]] 4$d++4t^^W]^^^&;#  e5577E   t%93PUFMMW_M``  b b b   ELLV^L__  a a a a a   d$8#uIPPZbPcc  e e e e erctt|||jr!|jrt j|_dSd|_dSr)r2rrrr}r;getcwdr)rrr6s rrz"StandardArgumentParser.postprocess+sY $d++77===  & $4+; $$&IKKD ! ! !#D   rF)r)r*r+rr rrprqs@rrrsf e e e e e e$$$$$$$$$rrcft|5}|jg}||jt j||j|}|} |||j |j|}nZ#tj $rH}|j d} |j d} t| d | Yd}~nd}~wwxYw|jr/tj|j} | ||cdddS#1swxYwYdS) zParses a clad input file.) yacc_optimize yacc_debuginput_directories)rA directory debuglevelrrzSyntax Error: {msg})msgN) wrapper_ns)r{rwextendrr CLADParser debug_yaccreadparseru ParseErrorr exit_at_coordr@ namespacerASTNamespaceWrappervisit) ryrrinputr clad_parsertexttreeercoordnsws rrr2s G  $45  !<===oM)=NPPP zz|| H$$T +!1%%''DD H H H&)CF1IE %!6!=!=#!=!F!F G G G G G G G G H   )W5FGGGC IIdOOO+s<AD&$#BD&C>CD&C:D&&D*-D*c |r>tj|tjd|tjkrtjd|r |js#|!tjdn|jstjd|jwtjd|j|j8tjd|j tjdntj|j|jwtjd|j|j8tjd|j tjd tj |j |j}|jtj |rt|d 5}t|D]\}}|d z}||jd zkrn||jd z krvtjdt!|d d|d||jkrdnddddn #1swxYwYtjd dS)z'Exits, specifying a coord as the cause.r/z Nz zz line {line})linez col {column})rdz: rtrrz{spacer}{line_number} {line} rez>>r) line_numberrspacer)rGstderrrEr builtin_coordrlinenor@rdr;r3rvrr<r?rgrrjustrstripexit)r error_textrreal_file_path debug_inputrmrs rrrKs9 $$$  !!! 7888 U Ut| /0000 ZU )*** < # J  ^22 2EE F F F|'   !7!7u|!7!L!LMMM  $$$ < # J  ^22 2EE F F F|'   !7!7u|!7!L!LMMM eouzBB < #)G)G #nc** Uk(55UUGAt"#a%K"U\A%555$ q(888 (()I)P)P(+K(8(8(>(>q#(F(F!%T!2!2,75<,G,GDDT*Q*T*TUUU U U U U U U U U U U U U U U UHQKKKKKsB/L==MMc >t||} |r| ddd| } |r| jt | t | } t | |} fd} t| j| | | ||||dS)a Entry point for a simple C-like language. language -- C, C++, C# extension -- .h, .cs emitter_types -- a list of emitters to have visit the ast use_inclusion_guards -- put inclusion guards around the header file system_headers -- a list of headers: #include local_headers -- a list of headers: #include "foo" usings -- a list of namespaces: using foo; z--header-output-extensionextzOThe extension to use for header files. (Helps work around a CMake Xcode issue.)rcRD]"}||#dS)N)include_extensionr)rI emitter_type emitter_types extensionrs routput_callbackzc_main..output_callbacksF) J JL L9 = = = C CD I I I I J JrN) rr parse_argsheader_output_extensionrr~r write_c_filer)rrrallow_custom_extensionruse_inclusion_guardssystem_headers local_headersusings option_parserrymain_output_file comment_linesrrs `` @rc_mainrvs +85JKKMd""#> [`b # d d d&&((G43 >>D&w ::%gx88MJJJJJJJ)+;_+ v/////rct||5}|rG|dd|D|d|rat|} |d| |d| |rPt |D]+} |d| ,|d|rPt |D]+} |d | ,|d|rPt |D]+} |d | ,|d|||r)|d | ddddS#1swxYwYdS) Nr/c3@K|]}d|VdSz// {0}Nr@rYrs rr[zwrite_c_file..."S"ST8??4#8#8"S"S"S"S"S"Sr z#ifndef {inclusion_guard} )inclusion_guardz#define {inclusion_guard} z#include <{header}> )headerz#include "{header}" zusing {using}; )usingz#endif // {inclusion_guard} )rrErvrr@sorted) rr}rrr r rrrIrrrs rr r sy $k 2 2bf  ! LL"S"S]"S"S"SSS T T T LL  b/ <G;c 4t||||ddd|dS)NF)r r rr)r )rr}rrrs r write_cs_filer s<!;E4@@@@@@rct|t|d}t|d}fd}t}|||t |j||||j|dS)Nz.goGocD|dSrrrIemitterrs rrz go_main..output_callback%d#####rrpackage properties)rr~rdictr write_go_filerr(r%ryscannerrrrr)rs` @rgo_mainr. >>D&w66%gt44M$$$$$$J !!$''''*,.rrrz package {} z import ( cg|] }d|zdz S)z "z" r)rYxs rr`z!write_go_file..s!888!EAI%888rr]z) getappendr;r3rvbasenamerrrrEr@ rr}rrr(importsr)includes full_pathrIs rr+r+scH~~k4((!   ~~lD))+)***~~lD))"!!!~~j$''% $$$~~i&&$GLL!1;?? '""27#3#3BGOOI4N4N#O#OPP $k 2 2  f  ! LL"S"S]"S"S"SSS T T T LL  %,,W55666 \"""88x888 RWWX&&''' W                   s)CIIIct|t|d}t|d}fd}t}|||t |j||||j|dS)Nz.jsJScD|dSrrr$s rrz js_main..output_callbackr&rr')rr~rr*r write_js_filerr(r,s` @rjs_mainrJr/rcg}|ddr|d|ddr|d|ddr|d|ddr|d |d dr|d |dkrytj||}tjtjtj|}t||5} |rG| d d |D| d| d ||| ddddS#1swxYwYdS)Nr1Tr2r3r4r5r6r7r8r9r:r/c3@K|]}d|VdSrrrs rr[z write_js_file..rrrzrBs rrIrIsH~~k4((!   ~~lD))+)***~~lD))"!!!~~j$''% $$$~~i&&$GLL!1;?? '""27#3#3BGOOI4N4N#O#OPP $k 2 2 f  ! LL"S"S]"S"S"SSS T T T LL  W^^_fgghhh                   s)A=G33G7:G7rrcZt||5}|r\|d|dd|D|d|rC|D]+}|d|,|d|tjkr|g|pgz}|r/t |tj||||r|D]p} t| tr0| \} } |d| | G|d | q|d||ddddS#1swxYwYdS) Nz""" r/c3@K|]}d|VdS)z{0}Nrrs rr[z$write_python_file..s."P"P$5<<#5#5"P"P"P"P"P"Prz """ z!from __future__ import {feature} )featurezfrom {source} import {target} )rtargetzimport {module} )module) rrErvr@rGrH_write_python_modify_pathr;r3 isinstancer^) rr}rrfuture_featuresadditional_pathsimport_modulesrIrPrRrrQs rwrite_python_filerXs% $k 2 2 f  & LL ! ! ! LL"P"P-"P"P"PPP Q Q Q LL % % %  * [ [ AHHQXHYYZZZZ LL    SZ   015E5KL   W % %5{CCEU W W W  ( L Lfe,,L%+NFFLL!B!I!IQW`f!I!g!ghhhhLL!4!;!;6!;!J!JKKKK LL   5                  sFF  F$'F$cXfdtdtdDS)NcFg|]}t||dzdS))int)rYrmstrings rr`z%decode_hex_string..7s/ E E EqCq1u r " " E E Errr[)rangerXr^s`rdecode_hex_stringra6s/ E E E EE!S[[!,D,D E E EErcn|s|ddS|dz}|d|D]Q}|d|z|t||dR|d|z|ddS)Nz[]rz[ r-z, ])rErepr)rIpathsr$ inner_depthr3s r_pretty_print_listrg9s   Tai  U  D LL + , , , LLd $ $ $ LL     TE\""" SrcD|tjkr.tj|fd|D}n d|D}|t jdt||d|d|tjkr|d|d|tjkr|d |t jd dS) Nc0g|]}t|Sr)r)rYr3 currentpaths rr`z-_write_python_modify_path..Js$___d.t[AA___rcg|]>}tjtj|?Sr)r;r3rr)rYr3s rr`z-_write_python_modify_path..Ls6aaaBG,,RW__T-B-BCCaaarzU def _modify_path(): import inspect, os, sys search_paths = r)r$r/zY currentpath = os.path.abspath(os.path.dirname(inspect.getfile(inspect.currentframe()))) z" for search_path in search_paths: zl search_path = os.path.normpath(os.path.abspath(os.path.realpath(os.path.join(currentpath, search_path)))) zu if search_path not in sys.path: sys.path.insert(0, search_path) _modify_path() ) rGrHr;r3rrEtextwrapdedentrg)rIr}rVrjs @rrSrSFs; gook22 ____N^___aaP`aaa LL"v/q9999 LL  rsss LL7888  G H H H LL"   rc|D]_}t|drMt|jdr8|jj}t|dr |jsdSt |sdS`dS)zRecursively traverses all members of an ast.Node and returns true if all of them have a default constructor. Returns false if any members don't have a default constructor. NOTE: does not check 'node' itself r% type_decldefault_constructorFT)membershasattrr%rorp(_do_all_members_have_default_constructor)nodememberchilds rrsrsds ,,.. 66 " " wv{K'H'H K)E 566 . uu;EBB uu 4rc|ttjd|}d|vr|d|S)z@Splits the string on the characters '*', '/', '+', '-', ' ' z[*+/ -]r])setrsplitremove)r^rys r_split_string_on_operatorsr{us= F++ , ,E U{{ R LrcX|r'|dd|ddzndS)Nrr])rr`s r_lower_first_char_of_stringr}}s3.4 <6"1":    qrr * *".s+ 3 3 3Aq!1!1 3a 3 3 3rcg|]C}tj|r tj|n|DSr)r;r3rr)rYrlcps rr`z1_convert_abspaths_to_relpaths..sAQQQq27==+;+;B3'''QQQr)r;r3r commonprefix)rrerrs @rrrs[ 4 3 3 3 3E '//"'..u55 6 6CQQQQDQQQH Orrr)Fr)FFFNNN)NFNNN)NN)NrMNN)r)7r __future__rrargparse contextlibrinspectior;rrrGrlr]rr version_infor>rcontextmanagerrStringIOrr{r~rrrrrrrrArgumentParserrrrrrr r r.r*r+rJrIrXrargrSrsr{r}rrrrrs'&&&&&%%%%%%   aBBB g!g!g!g!g!BKg!g!g!R(((    ? ? ? ?((((###   EEE   ">">">">">82">">">H$$$$$1$$$>2((((X=B"8<"/"/"/"/J278<bbbb@@@@@ U U U UQU^b TTVV    < U U U UQU^b TTVV    6-R.2    @FFF    <"===     r