hqltcppc.cpp 117 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276327732783279328032813282328332843285328632873288328932903291329232933294329532963297329832993300330133023303330433053306330733083309331033113312331333143315331633173318331933203321332233233324332533263327332833293330333133323333333433353336333733383339334033413342334333443345334633473348334933503351335233533354335533563357335833593360336133623363336433653366336733683369337033713372337333743375337633773378337933803381338233833384338533863387338833893390339133923393339433953396339733983399340034013402340334043405340634073408340934103411341234133414341534163417341834193420342134223423342434253426342734283429343034313432343334343435343634373438343934403441344234433444344534463447344834493450345134523453345434553456345734583459346034613462346334643465346634673468346934703471347234733474347534763477347834793480348134823483348434853486348734883489349034913492349334943495349634973498349935003501350235033504350535063507350835093510351135123513351435153516
  1. /*##############################################################################
  2. Copyright (C) 2011 HPCC Systems.
  3. All rights reserved. This program is free software: you can redistribute it and/or modify
  4. it under the terms of the GNU Affero General Public License as
  5. published by the Free Software Foundation, either version 3 of the
  6. License, or (at your option) any later version.
  7. This program is distributed in the hope that it will be useful,
  8. but WITHOUT ANY WARRANTY; without even the implied warranty of
  9. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  10. GNU Affero General Public License for more details.
  11. You should have received a copy of the GNU Affero General Public License
  12. along with this program. If not, see <http://www.gnu.org/licenses/>.
  13. ############################################################################## */
  14. #include "jliball.hpp"
  15. #include "hql.hpp"
  16. #include "platform.h"
  17. #include "jlib.hpp"
  18. #include "jexcept.hpp"
  19. #include "jmisc.hpp"
  20. #include "hql.hpp"
  21. #include "hqlexpr.hpp"
  22. #include "hqlattr.hpp"
  23. #include "hqlfunc.hpp"
  24. #include "hqlcpputil.hpp"
  25. #include "hqlfold.hpp"
  26. #include "hqlthql.hpp"
  27. #include "hqlstmt.hpp"
  28. #include "hqlwcpp.hpp"
  29. #include "hqlcpp.ipp"
  30. #include "hqltcppc.ipp"
  31. #include "hqlhtcpp.ipp"
  32. #include "hqlcerrors.hpp"
  33. #include "hqlcatom.hpp"
  34. #include "hqlccommon.hpp"
  35. #include "hqlpmap.hpp"
  36. #include "hqlutil.hpp"
  37. #include "hqlinline.hpp"
  38. #define LIMIT_FOR_GET (NULL)
  39. //#define TraceExprPrintLog(x, expr) PrintLog(x ": %s", expr->toString(StringBuffer()).str());
  40. static void normalizeAdditions(IHqlExpression * expr, HqlExprAttr & var, HqlExprAttr & fixed)
  41. {
  42. switch (expr->getOperator())
  43. {
  44. case no_constant:
  45. extendAdd(fixed, expr);
  46. break;
  47. case no_add:
  48. normalizeAdditions(expr->queryChild(0), var, fixed);
  49. normalizeAdditions(expr->queryChild(1), var, fixed);
  50. break;
  51. default:
  52. extendAdd(var, expr);
  53. break;
  54. }
  55. }
  56. static bool needToNormalize(IHqlExpression * expr, bool insideAdd)
  57. {
  58. switch (expr->getOperator())
  59. {
  60. case no_constant:
  61. return insideAdd;
  62. case no_add:
  63. if (needToNormalize(expr->queryChild(0), true))
  64. return true;
  65. if (!insideAdd && expr->queryChild(1)->getOperator() == no_constant)
  66. return false;
  67. return needToNormalize(expr->queryChild(1), true);
  68. default:
  69. return false;
  70. }
  71. }
  72. IHqlExpression * normalizeAdditions(IHqlExpression * expr)
  73. {
  74. if (!needToNormalize(expr, false))
  75. return LINK(expr);
  76. HqlExprAttr var;
  77. HqlExprAttr fixed;
  78. normalizeAdditions(expr, var, fixed);
  79. if (fixed)
  80. extendAdd(var, fixed);
  81. return var.getClear();
  82. }
  83. IHqlExpression * ensureType(IHqlExpression * expr, ITypeInfo * type)
  84. {
  85. if (expr->queryType() != type)
  86. return createValue(no_implicitcast, LINK(type), expr);
  87. return expr;
  88. }
  89. bool isSimpleLength(IHqlExpression * expr)
  90. {
  91. switch (expr->getOperator())
  92. {
  93. case no_variable:
  94. case no_constant:
  95. return true;
  96. case no_add:
  97. if ((expr->queryChild(0)->getOperator() == no_variable) &&
  98. (expr->queryChild(1)->getOperator() == no_constant))
  99. return true;
  100. break;
  101. }
  102. return false;
  103. }
  104. void ensureSimpleLength(HqlCppTranslator & translator, BuildCtx & ctx, CHqlBoundExpr & bound)
  105. {
  106. OwnedHqlExpr length = translator.getBoundLength(bound);
  107. if (isSimpleLength(length))
  108. return;
  109. OwnedHqlExpr tempLen = createTranslatedOwned(translator.getBoundLength(bound));
  110. CHqlBoundExpr boundLength;
  111. translator.buildSimpleExpr(ctx, tempLen, boundLength);
  112. bound.length.set(boundLength.expr);
  113. }
  114. //---------------------------------------------------------------------------
  115. void SizeStruct::add(const SizeStruct & other)
  116. {
  117. assertex(self == other.self);
  118. addFixed(other.fixedSize);
  119. if (other.varSize)
  120. addVariableExpr(other.varMinSize, other.varSize);
  121. }
  122. void SizeStruct::addVariableExpr(unsigned _varMinSize, IHqlExpression * expr)
  123. {
  124. varMinSize += _varMinSize;
  125. if (varSize)
  126. varSize.setown(createValue(no_add, varSize.getClear(), LINK(expr)));
  127. else
  128. varSize.set(expr);
  129. }
  130. void SizeStruct::addVariable(unsigned _varMinSize, IHqlExpression * column)
  131. {
  132. OwnedHqlExpr expr = createValue(no_sizeof, makeIntType(4,false), LINK(column));
  133. addVariableExpr(_varMinSize, expr);
  134. }
  135. void SizeStruct::buildSizeExpr(HqlCppTranslator & translator, BuildCtx & ctx, BoundRow * row, CHqlBoundExpr & bound)
  136. {
  137. if (varSize)
  138. {
  139. OwnedHqlExpr temp = getSizeExpr(row);
  140. translator.buildCachedExpr(ctx, temp, bound);
  141. }
  142. else
  143. bound.expr.setown(getSizetConstant(fixedSize));
  144. }
  145. void SizeStruct::forceToTemp(node_operator op, IHqlExpression * selector)
  146. {
  147. if (isWorthCommoning())
  148. {
  149. varSize.setown(createValue(op, LINK(sizetType), LINK(selector)));
  150. fixedSize = 0;
  151. }
  152. }
  153. IHqlExpression * SizeStruct::getSizeExpr(BoundRow * row)
  154. {
  155. #if 0
  156. IHqlExpression * bound = row->queryDataset();
  157. if ((bound->getOperator() == no_translated) && queryRealChild(bound, 1))
  158. return createTranslated(bound->queryChild(1));
  159. #endif
  160. assertex(self != NULL);
  161. OwnedHqlExpr mapped = normalizeAdditions(varSize);
  162. OwnedHqlExpr total = row->bindToRow(mapped, self);
  163. if (!total)
  164. return getSizetConstant(fixedSize);
  165. total.setown(ensureType(LINK(total), sizetType));
  166. if (fixedSize)
  167. return adjustValue(total, (int)fixedSize);
  168. return total.getClear();
  169. }
  170. bool SizeStruct::isWorthCommoning() const
  171. {
  172. if (varSize && varSize->getOperator() == no_add && varSize->queryChild(0)->getOperator() == no_add)
  173. return true;
  174. return false;
  175. }
  176. //---------------------------------------------------------------------------
  177. /* In param: _column is not linked */
  178. CMemberInfo::CMemberInfo(CContainerInfo * _container, CMemberInfo * _prior, IHqlExpression * _column)
  179. {
  180. container = _container;
  181. prior = _prior;
  182. column.set(_column);
  183. if (column->isRecord())
  184. column.setown(createRow(no_null, LINK(column)));
  185. hasVarOffset = false;
  186. isOffsetCached = false;
  187. }
  188. void CMemberInfo::addVariableSize(size32_t varMinSize, SizeStruct & size)
  189. {
  190. Owned<IHqlExpression> self = createSelectorExpr();
  191. size.addVariable(varMinSize, self);
  192. }
  193. void CMemberInfo::buildAddress(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, CHqlBoundExpr & bound)
  194. {
  195. bound.expr.setown(getColumnAddress(translator, ctx, selector, queryPhysicalType()));
  196. }
  197. void CMemberInfo::calcAllCachedOffsets()
  198. {
  199. assertex(container);
  200. container->calcAllCachedOffsets();
  201. }
  202. void CMemberInfo::calcCachedOffsets(const SizeStruct & offset, SizeStruct & sizeSelf)
  203. {
  204. if (!isOffsetCached)
  205. {
  206. isOffsetCached = true;
  207. cachedOffset.set(offset);
  208. cachedSize.clear(offset.querySelf());
  209. calcCachedSize(offset, sizeSelf);
  210. }
  211. else
  212. {
  213. sizeSelf.set(cachedSize);
  214. }
  215. }
  216. void CMemberInfo::calcCachedSize(const SizeStruct & offset, SizeStruct & sizeSelf)
  217. {
  218. gatherSize(cachedSize);
  219. sizeSelf.set(cachedSize);
  220. }
  221. StringBuffer & CMemberInfo::expandSelectPathText(StringBuffer & out, bool isLast) const
  222. {
  223. bool isField = (column->getOperator() == no_field);
  224. if (container)
  225. container->expandSelectPathText(out, isLast && !isField);
  226. if (isField)
  227. {
  228. out.append(column->queryName());
  229. if (!isLast)
  230. out.append('.');
  231. }
  232. return out;
  233. }
  234. unsigned CMemberInfo::getTotalFixedSize()
  235. {
  236. return cachedSize.getFixedSize();
  237. }
  238. unsigned CMemberInfo::getTotalMinimumSize()
  239. {
  240. return cachedSize.getMinimumSize();
  241. }
  242. void CContainerInfo::calcAllCachedOffsets()
  243. {
  244. if (container)
  245. CMemberInfo::calcAllCachedOffsets();
  246. else
  247. {
  248. OwnedHqlExpr self = getRelativeSelf();
  249. SizeStruct offset(self);
  250. SizeStruct size(self);
  251. calcCachedOffsets(offset, size);
  252. }
  253. }
  254. void CContainerInfo::calcCachedChildrenOffsets(SizeStruct & offset, SizeStruct & sizeSelf)
  255. {
  256. ForEachItemIn(idx, children)
  257. {
  258. CMemberInfo & cur = children.item(idx);
  259. SizeStruct sizeChild(offset.querySelf());
  260. SizeStruct maxSizeChild(offset.querySelf());
  261. cur.calcCachedOffsets(offset, sizeChild);
  262. if (offset.isWorthCommoning())
  263. {
  264. Owned<IHqlExpression> child = cur.createSelectorExpr();
  265. offset.forceToTemp(no_offsetof, child);
  266. }
  267. sizeSelf.add(sizeChild);
  268. offset.add(sizeChild);
  269. }
  270. }
  271. void CContainerInfo::calcCachedSize(const SizeStruct & offset, SizeStruct & sizeSelf)
  272. {
  273. SizeStruct childOffset(offset);
  274. if (childOffset.isWorthCommoning())
  275. {
  276. Owned<IHqlExpression> self = createSelectorExpr();
  277. childOffset.forceToTemp(no_offsetof, self);
  278. }
  279. calcCachedChildrenOffsets(childOffset, cachedSize);
  280. //Ensure that a record with no fields has a meta size > 0 (can be created by implicit project code)
  281. if (cachedSize.isEmpty())
  282. {
  283. IHqlExpression * record = column->queryRecord();
  284. if (record->hasProperty(_nonEmpty_Atom))
  285. cachedSize.addFixed(1);
  286. }
  287. if (cachedSize.isFixedSize())
  288. sizeSelf.set(cachedSize);
  289. else
  290. addVariableSize(cachedSize.getMinimumSize(), sizeSelf);
  291. }
  292. unsigned CContainerInfo::getTotalFixedSize()
  293. {
  294. if (!isOffsetCached)
  295. calcAllCachedOffsets();
  296. if (cachedSize.isFixedSize())
  297. return cachedSize.getFixedSize();
  298. unsigned size = 0;
  299. ForEachItemIn(idx, children)
  300. size += children.item(idx).getTotalFixedSize();
  301. return size;
  302. }
  303. unsigned CContainerInfo::getTotalMinimumSize()
  304. {
  305. if (!isOffsetCached)
  306. calcAllCachedOffsets();
  307. if (cachedSize.isFixedSize())
  308. return cachedSize.getFixedSize();
  309. unsigned size = 0;
  310. ForEachItemIn(idx, children)
  311. size += children.item(idx).getTotalMinimumSize();
  312. return size;
  313. }
  314. void CIfBlockInfo::calcCachedSize(const SizeStruct & offset, SizeStruct & sizeSelf)
  315. {
  316. SizeStruct childOffset(offset);
  317. calcCachedChildrenOffsets(childOffset, cachedSize);
  318. if (cachedSize.isFixedSize())
  319. sizeSelf.set(cachedSize);
  320. else
  321. {
  322. addVariableSize(0, sizeSelf);
  323. // if (alwaysPresent)
  324. // sizeSelf.addFixed(cachedSize.getFixedSize());
  325. }
  326. }
  327. unsigned CIfBlockInfo::getTotalFixedSize()
  328. {
  329. if (alwaysPresent)
  330. return CContainerInfo::getTotalFixedSize();
  331. return 0;
  332. }
  333. unsigned CIfBlockInfo::getTotalMinimumSize()
  334. {
  335. return 0;
  336. }
  337. void CBitfieldContainerInfo::calcCachedSize(const SizeStruct & offset, SizeStruct & sizeSelf)
  338. {
  339. cachedSize.addFixed(column->queryType()->getSize());
  340. sizeSelf.set(cachedSize);
  341. SizeStruct sizeBitfields(sizeSelf.querySelf());
  342. SizeStruct offsetBitfields(offset);
  343. calcCachedChildrenOffsets(offsetBitfields, sizeBitfields);
  344. assertex(sizeBitfields.isFixedSize() && sizeBitfields.getFixedSize() == 0);
  345. }
  346. void CMemberInfo::gatherSize(SizeStruct & target)
  347. {
  348. assertex(!"Should be implemented for non-containers");
  349. }
  350. void CMemberInfo::gatherOffset(SizeStruct & target, IHqlExpression * selector)
  351. {
  352. if (!isOffsetCached)
  353. calcAllCachedOffsets();
  354. target.set(cachedOffset);
  355. }
  356. void CMemberInfo::getSizeExpr(SizeStruct & target)
  357. {
  358. if (!isOffsetCached)
  359. calcAllCachedOffsets();
  360. target.set(cachedSize);
  361. }
  362. size32_t CMemberInfo::getContainerTrailingFixed()
  363. {
  364. SizeStruct size;
  365. assertex(container);
  366. container->addTrailingFixed(size, this);
  367. return size.getFixedSize();
  368. }
  369. void CMemberInfo::buildConditionFilter(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector)
  370. {
  371. OwnedHqlExpr condition = getConditionSelect(translator, ctx, selector->queryRootRow());
  372. if (condition)
  373. translator.buildFilter(ctx, condition);
  374. }
  375. void CMemberInfo::buildOffset(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, CHqlBoundExpr & bound)
  376. {
  377. SizeStruct totalSize;
  378. gatherOffset(totalSize, selector->queryExpr()); //this
  379. totalSize.buildSizeExpr(translator, ctx, selector->queryRootRow(), bound);
  380. }
  381. void callDeserializeGetN(HqlCppTranslator & translator, BuildCtx & ctx, IHqlExpression * helper, IHqlExpression * boundSize, IHqlExpression * address)
  382. {
  383. HqlExprArray args;
  384. args.append(*LINK(helper));
  385. args.append(*LINK(boundSize));
  386. args.append(*LINK(address));
  387. OwnedHqlExpr call = translator.bindTranslatedFunctionCall(deserializerReadNAtom, args);
  388. ctx.addExpr(call);
  389. }
  390. IHqlExpression * callDeserializerGetSize(HqlCppTranslator & translator, BuildCtx & ctx, IHqlExpression * helper)
  391. {
  392. HqlExprArray args;
  393. args.append(*LINK(helper));
  394. OwnedHqlExpr call = translator.bindFunctionCall(deserializerReadSizeAtom, args);
  395. OwnedHqlExpr sizeVariable = ctx.getTempDeclare(sizetType, call);
  396. return LINK(sizeVariable);
  397. }
  398. void callDeserializerSkipInputSize(HqlCppTranslator & translator, BuildCtx & ctx, IHqlExpression * helper, IHqlExpression * size)
  399. {
  400. CHqlBoundExpr bound;
  401. translator.buildExpr(ctx, size, bound);
  402. HqlExprArray args;
  403. args.append(*LINK(helper));
  404. args.append(*LINK(bound.expr));
  405. translator.callProcedure(ctx, deserializerSkipNAtom, args);
  406. }
  407. void callDeserializerSkipInputTranslatedSize(HqlCppTranslator & translator, BuildCtx & ctx, IHqlExpression * helper, IHqlExpression * size)
  408. {
  409. HqlExprArray args;
  410. args.append(*LINK(helper));
  411. args.append(*LINK(size));
  412. translator.callProcedure(ctx, deserializerSkipNAtom, args);
  413. }
  414. void CMemberInfo::associateSizeOf(BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * rawSize, size32_t extraSize)
  415. {
  416. //Use the size just calculated for the field
  417. OwnedHqlExpr sizeOfExpr = createValue(no_sizeof, LINK(sizetType), LINK(selector->queryExpr()));
  418. OwnedHqlExpr srcSize = adjustValue(rawSize, extraSize);
  419. ctx.associateExpr(sizeOfExpr, srcSize);
  420. }
  421. void CMemberInfo::doBuildDeserialize(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * helper, IHqlExpression * boundSize)
  422. {
  423. if (!boundSize->isConstant())
  424. {
  425. OwnedHqlExpr unboundSize = createTranslated(boundSize);
  426. checkAssignOk(translator, ctx, selector, unboundSize, 0);
  427. }
  428. OwnedHqlExpr address = getColumnAddress(translator, ctx, selector, queryPhysicalType());
  429. callDeserializeGetN(translator, ctx, helper, boundSize, address);
  430. associateSizeOf(ctx, selector, boundSize, 0);
  431. }
  432. void CMemberInfo::doBuildSkipInput(HqlCppTranslator & translator, BuildCtx & ctx, IHqlExpression * helper, size32_t size)
  433. {
  434. HqlExprArray args;
  435. args.append(*LINK(helper));
  436. if (size == UNKNOWN_LENGTH)
  437. {
  438. OwnedHqlExpr sizeVariable = callDeserializerGetSize(translator, ctx, helper);
  439. callDeserializerSkipInputTranslatedSize(translator, ctx, helper, sizeVariable);
  440. }
  441. else
  442. {
  443. OwnedHqlExpr sizeExpr = getSizetConstant(size);
  444. callDeserializerSkipInputTranslatedSize(translator, ctx, helper, sizeExpr);
  445. }
  446. }
  447. IHqlExpression * CMemberInfo::createSelfPeekDeserializer(HqlCppTranslator & translator, IHqlExpression * helper)
  448. {
  449. IHqlExpression * size = column->queryAttribute(_attrSize_Atom);
  450. LinkedHqlExpr maxSize = size->queryChild(2);
  451. if (!maxSize || maxSize->isAttribute())
  452. maxSize.setown(getSizetConstant(MAX_RECORD_SIZE));
  453. HqlExprArray peekArgs;
  454. peekArgs.append(*LINK(helper));
  455. peekArgs.append(*LINK(maxSize));
  456. return translator.bindTranslatedFunctionCall(deserializerPeekAtom, peekArgs);
  457. }
  458. void CMemberInfo::gatherMaxRowSize(SizeStruct & totalSize, IHqlExpression * newSize, size32_t fixedExtra, IReferenceSelector * selector)
  459. {
  460. if (!isOffsetCached)
  461. calcAllCachedOffsets();
  462. totalSize.set(cachedOffset);
  463. totalSize.addFixed(fixedExtra);
  464. //Total size of the record is
  465. //offset+<size-this>+<any-following-fixed-size>
  466. if (newSize)
  467. {
  468. IHqlExpression * size = newSize;
  469. if (size->getOperator() == no_translated)
  470. size = size->queryChild(0);
  471. IValue * fixedNewSize = size->queryValue();
  472. if (fixedNewSize)
  473. totalSize.addFixed((size32_t)fixedNewSize->getIntValue());
  474. else
  475. totalSize.addVariableExpr(0, newSize);
  476. }
  477. BoundRow * row = selector->queryRootRow();
  478. if (!row->isSerialization())
  479. {
  480. if (container)
  481. container->addTrailingFixed(totalSize, this);
  482. }
  483. }
  484. void CMemberInfo::checkAssignOk(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * newSize, unsigned fixedExtra)
  485. {
  486. if (!translator.checkForRowOverflow())
  487. return;
  488. //If no size beyond the constant value then this can't be increasing the size of the row => no need to check
  489. if (matchesConstantValue(newSize, 0))
  490. return;
  491. CHqlBoundExpr bound;
  492. SizeStruct totalSize;
  493. gatherMaxRowSize(totalSize, newSize, fixedExtra, selector);
  494. BoundRow * row = selector->queryRootRow();
  495. if (row->isSerialization())
  496. {
  497. //<any-following-fixed-size> is unknown at this point.
  498. //equals (eventualMaximum - fixed-to-this-point)
  499. //note, offset - leadingFixed should never go negative
  500. container->subLeadingFixed(totalSize, this);
  501. totalSize.buildSizeExpr(translator, ctx, row, bound);
  502. //NOTE: The final fixed size is unknown at this point, and is implemented as a callback.
  503. bound.expr.setown(createValue(no_add, bound.expr->getType(), row->getFinalFixedSizeExpr(), LINK(bound.expr)));
  504. HqlExprArray args2;
  505. args2.append(*LINK(row->queryBound()));
  506. args2.append(*LINK(bound.expr));
  507. translator.callProcedure(ctx, ensureRowAvailableAtom, args2);
  508. }
  509. else
  510. {
  511. unsigned maxRowSize = row->getMaxSize();
  512. unsigned fixedSize = totalSize.getFixedSize();
  513. bool supportDynamicRows = translator.queryOptions().supportDynamicRows;
  514. if (!supportDynamicRows && (fixedSize > maxRowSize))
  515. translator.throwError2(HQLERR_RowTooLarge, fixedSize, maxRowSize);
  516. //This removes calls that can be constant folded - a bit confusing in the generated code sometimes..
  517. if (!row->queryBuilder() && !totalSize.queryVarSize())
  518. return;
  519. totalSize.buildSizeExpr(translator, ctx, row, bound);
  520. IValue * value = bound.expr->queryValue();
  521. if (value)
  522. {
  523. unsigned constSize = (unsigned)value->getIntValue();
  524. if (!supportDynamicRows)
  525. {
  526. if (constSize > maxRowSize)
  527. translator.throwError2(HQLERR_RowTooLarge, constSize, maxRowSize);
  528. return;
  529. }
  530. else if (constSize <= getMinRecordSize(row->queryRecord()))
  531. return;
  532. }
  533. StringBuffer fieldname;
  534. fieldname.append(column->queryName()).toLowerCase();
  535. if (row->queryBuilder())
  536. {
  537. HqlExprArray args2;
  538. args2.append(*LINK(row->queryBuilder()));
  539. args2.append(*LINK(bound.expr));
  540. args2.append(*createConstant(unknownVarStringType->castFrom(fieldname.length(), fieldname.str())));
  541. OwnedHqlExpr call = translator.bindFunctionCall(ensureCapacityAtom, args2);
  542. bool combined = false;
  543. if (bound.expr->isConstant())
  544. {
  545. //Try and merge all calls to ensureCapacity with a constant value
  546. IHqlExpression * marker = row->queryBuilderEnsureMarker();
  547. HqlStmtExprAssociation * match = static_cast<HqlStmtExprAssociation *>(ctx.queryAssociation(marker, AssocStmt, NULL));
  548. if (match)
  549. {
  550. //Check the previous call to ensureCapacity() wasn't outside of a condition
  551. //otherwise modifying it could cause problems with the other branches
  552. if (ctx.hasAssociation(*match, false))
  553. {
  554. ctx.replaceExpr(match->stmt, call);
  555. combined = true;
  556. }
  557. }
  558. if (!combined)
  559. {
  560. IHqlStmt * stmt = ctx.addExpr(call);
  561. ctx.associateOwn(* new HqlStmtExprAssociation(marker, stmt));
  562. combined = true;
  563. }
  564. }
  565. if (!combined)
  566. ctx.addExpr(call);
  567. }
  568. else
  569. {
  570. OwnedHqlExpr max = getSizetConstant(maxRowSize);
  571. HqlExprArray args2;
  572. args2.append(*LINK(bound.expr));
  573. args2.append(*LINK(max));
  574. args2.append(*createConstant(unknownVarStringType->castFrom(fieldname.length(), fieldname.str())));
  575. translator.callProcedure(ctx, checkFieldOverflowAtom, args2);
  576. }
  577. }
  578. }
  579. void CMemberInfo::defaultSetColumn(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * value)
  580. {
  581. CHqlBoundTarget boundTarget;
  582. boundTarget.expr.setown(getColumnRef(translator, ctx, selector));
  583. translator.buildExprAssign(ctx, boundTarget, value);
  584. }
  585. void CMemberInfo::ensureTargetAvailable(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, size32_t thisSize)
  586. {
  587. OwnedHqlExpr minSize = getSizetConstant(thisSize);
  588. checkAssignOk(translator, ctx, selector, minSize, 0);
  589. }
  590. IHqlExpression * CMemberInfo::getColumnAddress(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, ITypeInfo * columnType, size32_t delta)
  591. {
  592. ITypeInfo * type;
  593. if (isTypePassedByAddress(columnType) && !hasReferenceModifier(columnType))
  594. {
  595. type = makeReferenceModifier(LINK(columnType));
  596. }
  597. else
  598. type = makePointerType(LINK(columnType));
  599. CHqlBoundExpr bound;
  600. getColumnOffset(translator, ctx, selector, bound);
  601. bound.expr.setown(adjustValue(bound.expr, delta));
  602. IHqlExpression * rowAddr = getPointer(selector->queryRootRow()->queryBound());
  603. // IValue * value = bound.expr->queryValue();
  604. // if (value && value->getIntValue()== 0)
  605. // return createValue(no_typetransfer, type, rowAddr));
  606. return createValue(no_add, type, rowAddr, bound.expr.getClear());
  607. }
  608. void CMemberInfo::getColumnOffset(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, CHqlBoundExpr & tgt)
  609. {
  610. if (!isOffsetCached)
  611. calcAllCachedOffsets();
  612. if (!cachedOffset.isWorthCommoning())
  613. buildOffset(translator, ctx, selector, tgt);
  614. else
  615. {
  616. OwnedHqlExpr expr = createValue(no_offsetof, LINK(sizetType), LINK(selector->queryExpr()));
  617. translator.buildExpr(ctx, expr, tgt);
  618. }
  619. }
  620. IHqlExpression * CMemberInfo::getColumnRef(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector)
  621. {
  622. OwnedHqlExpr address = getColumnAddress(translator, ctx, selector, queryType());
  623. return convertAddressToValue(address, queryType());
  624. }
  625. IHqlExpression * CMemberInfo::getCondition(BuildCtx & ctx)
  626. {
  627. if (container)
  628. return container->getCondition(ctx);
  629. return NULL;
  630. }
  631. IHqlExpression * CMemberInfo::getConditionSelect(HqlCppTranslator & translator, BuildCtx & ctx, BoundRow * row)
  632. {
  633. OwnedHqlExpr cond = getCondition(ctx);
  634. cond.setown(row->bindToRow(cond, queryRootSelf()));
  635. if (row->isConditional())
  636. extendConditionOwn(cond, no_and, createTranslated(row->queryBound()));
  637. if (cond)
  638. {
  639. //Force the ifblock condition to be evaluated in a temporary - since it will be reused several times.
  640. CHqlBoundExpr bound;
  641. HqlExprAssociation * match = ctx.queryMatchExpr(cond);
  642. if (match)
  643. bound.expr.set(match->queryExpr());
  644. else
  645. translator.buildSimpleExpr(ctx, cond, bound);
  646. IValue * boundValue = bound.expr->queryValue();
  647. if (boundValue)
  648. {
  649. if (boundValue->getBoolValue())
  650. return NULL;
  651. return LINK(bound.expr);
  652. }
  653. return bound.getTranslatedExpr();
  654. }
  655. return cond.getClear();
  656. }
  657. ITypeInfo * CMemberInfo::queryPhysicalType()
  658. {
  659. return queryType();
  660. }
  661. IReferenceSelector * CMemberInfo::getSelector(BuildCtx & ctx, IReferenceSelector * parentSelector)
  662. {
  663. return parentSelector->select(ctx, column);
  664. }
  665. void CMemberInfo::getXPath(StringBuffer & out)
  666. {
  667. if (container)
  668. container->getContainerXPath(out);
  669. IHqlExpression * xpath = column->queryProperty(xpathAtom);
  670. if (xpath)
  671. xpath->queryChild(0)->queryValue()->getStringValue(out);
  672. else
  673. {
  674. IHqlExpression * named = column->queryProperty(namedAtom);
  675. if (named)
  676. named->queryChild(0)->queryValue()->getStringValue(out);
  677. else
  678. {
  679. StringBuffer temp;
  680. temp.append(*column->queryName()).toLowerCase();
  681. out.append(temp);
  682. }
  683. }
  684. }
  685. IHqlExpression * CMemberInfo::createSelectorExpr()
  686. {
  687. return createSelectExpr(container->getRelativeSelf(), column.getLink());
  688. }
  689. IHqlExpression * CMemberInfo::makeConditional(HqlCppTranslator & translator, BuildCtx & ctx, BoundRow * row, IHqlExpression * value)
  690. {
  691. OwnedHqlExpr cond = getConditionSelect(translator, ctx, row);
  692. if (cond)
  693. {
  694. IValue * condValue = cond->queryValue();
  695. if (!condValue)
  696. return createValue(no_if, value->getType(), cond.getClear(), LINK(value), createNullExpr(value));
  697. else if (!condValue->getBoolValue())
  698. return createNullExpr(value);
  699. }
  700. return LINK(value);
  701. }
  702. bool CMemberInfo::hasFixedOffset()
  703. {
  704. return !hasVarOffset;
  705. }
  706. bool CMemberInfo::isConditional()
  707. {
  708. if (container)
  709. return container->isConditional();
  710. return false;
  711. }
  712. IHqlExpression * CMemberInfo::queryParentSelector(IHqlExpression * selector)
  713. {
  714. return selector->queryChild(0);
  715. }
  716. IHqlExpression * CMemberInfo::queryRootSelf()
  717. {
  718. return container->queryRootSelf();
  719. }
  720. ITypeInfo * CMemberInfo::queryType() const
  721. {
  722. return column->queryType();
  723. }
  724. bool CMemberInfo::requiresTemp()
  725. {
  726. return isConditional();
  727. }
  728. void CMemberInfo::setOffset(bool _hasVarOffset)
  729. {
  730. hasVarOffset = _hasVarOffset;
  731. }
  732. AColumnInfo * CMemberInfo::lookupColumn(IHqlExpression * search)
  733. {
  734. throwUnexpected();
  735. }
  736. //---------------------------------------------------------------------------
  737. /* In param: _column is NOT linked */
  738. CContainerInfo::CContainerInfo(CContainerInfo * _container, CMemberInfo * _prior, IHqlExpression * _column) :
  739. CMemberInfo(_container, _prior, _column)
  740. {
  741. fixedSize = true;
  742. isDynamic = false;
  743. }
  744. void CContainerInfo::addChild(CMemberInfo * child)
  745. {
  746. isOffsetCached = false;
  747. children.append(*LINK(child));
  748. registerChild(child);
  749. }
  750. void CContainerInfo::buildClear(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, int direction)
  751. {
  752. BuildCtx condctx(ctx);
  753. buildConditionFilter(translator, condctx, selector);
  754. if (children.ordinality() == 0)
  755. {
  756. if (column->queryRecord()->hasProperty(_nonEmpty_Atom))
  757. {
  758. //Clear on an empty record that has the _nonEmpty_attrbute clears the implicit byte
  759. Owned<ITypeInfo> dummyType = makeIntType(1, false);
  760. OwnedHqlExpr address = getColumnAddress(translator, ctx, selector, dummyType);
  761. OwnedHqlExpr dummyTarget = convertAddressToValue(address, dummyType);
  762. translator.buildAssignToTemp(ctx, dummyTarget, queryZero());
  763. }
  764. return;
  765. }
  766. ForEachItemIn(idx, children)
  767. {
  768. CMemberInfo & cur = children.item(idx);
  769. Owned<IReferenceSelector> ds = cur.getSelector(ctx, selector);
  770. cur.buildClear(translator, condctx, ds, direction);
  771. }
  772. }
  773. void CContainerInfo::buildDeserialize(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * helper)
  774. {
  775. ForEachItemIn(idx, children)
  776. {
  777. CMemberInfo & cur = children.item(idx);
  778. Owned<IReferenceSelector> ds = cur.getSelector(ctx, selector);
  779. cur.buildDeserialize(translator, ctx, ds, helper);
  780. }
  781. }
  782. void CContainerInfo::buildSerialize(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * helper)
  783. {
  784. ForEachItemIn(idx, children)
  785. {
  786. CMemberInfo & cur = children.item(idx);
  787. Owned<IReferenceSelector> ds = cur.getSelector(ctx, selector);
  788. cur.buildSerialize(translator, ctx, ds, helper);
  789. }
  790. }
  791. void CContainerInfo::buildSizeOf(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, CHqlBoundExpr & bound)
  792. {
  793. if (!isOffsetCached)
  794. calcAllCachedOffsets();
  795. cachedSize.buildSizeExpr(translator, ctx, selector->queryRootRow(), bound);
  796. }
  797. bool CContainerInfo::prepareReadAhead(HqlCppTranslator & translator, ReadAheadState & state)
  798. {
  799. ForEachItemIn(idx, children)
  800. {
  801. CMemberInfo & cur = children.item(idx);
  802. if (!cur.prepareReadAhead(translator, state))
  803. return false;
  804. }
  805. return true;
  806. }
  807. bool CContainerInfo::buildReadAhead(HqlCppTranslator & translator, BuildCtx & ctx, ReadAheadState & state)
  808. {
  809. ForEachItemIn(idx, children)
  810. {
  811. CMemberInfo & cur = children.item(idx);
  812. if (!cur.buildReadAhead(translator, ctx, state))
  813. return false;
  814. }
  815. return true;
  816. }
  817. IHqlExpression * CContainerInfo::createSelectorExpr()
  818. {
  819. if (!container)
  820. return getRelativeSelf();
  821. return CMemberInfo::createSelectorExpr();
  822. }
  823. void CContainerInfo::setRow(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IReferenceSelector * source)
  824. {
  825. if (!recordTypesMatch(selector->queryType(), source->queryType()))
  826. throwError(HQLERR_RecordNotCompatible);
  827. assertex(!recordRequiresSerialization(column->queryRecord()));
  828. CHqlBoundExpr targetAddress, sourceAddress, length;
  829. source->buildAddress(ctx, sourceAddress);
  830. IHqlExpression * sourceExpr = source->queryExpr();
  831. OwnedHqlExpr rowExpr = sourceExpr->isDataset() ? ensureActiveRow(sourceExpr) : LINK(sourceExpr);
  832. OwnedHqlExpr size = createSizeof(rowExpr);
  833. translator.buildExpr(ctx, size, length);
  834. ensureSimpleLength(translator, ctx, length);
  835. calcAllCachedOffsets();
  836. //If copying from one identical record to another then the source record must be large enough,
  837. //so only need to check it it is a child record....
  838. if (!cachedSize.isFixedSize() && (container || translator.queryOptions().supportDynamicRows))
  839. {
  840. //Note - if we are cop
  841. OwnedHqlExpr translatedLength = length.getTranslatedExpr();
  842. checkAssignOk(translator, ctx, selector, translatedLength, 0);
  843. }
  844. buildAddress(translator, ctx, selector, targetAddress);
  845. HqlExprArray args;
  846. args.append(*LINK(targetAddress.expr));
  847. args.append(*LINK(sourceAddress.expr));
  848. args.append(*LINK(length.expr));
  849. translator.callProcedure(ctx, memcpyAtom, args);
  850. //Use the size just calulated for the field
  851. associateSizeOf(ctx, selector, length.expr, 0);
  852. }
  853. void CContainerInfo::addTrailingFixed(SizeStruct & size, CMemberInfo * cur)
  854. {
  855. if (container)
  856. container->addTrailingFixed(size, this);
  857. unsigned max = children.ordinality();
  858. unsigned match = children.find(*cur);
  859. for (unsigned i=match+1; i < max; i++)
  860. size.addFixed(children.item(i).getTotalMinimumSize());
  861. }
  862. void CContainerInfo::subLeadingFixed(SizeStruct & size, CMemberInfo * cur)
  863. {
  864. if (container)
  865. container->subLeadingFixed(size, this);
  866. unsigned match = children.find(*cur);
  867. for (unsigned i=0; i < match; i++)
  868. size.addFixed((unsigned)-(int)children.item(i).getTotalFixedSize());
  869. }
  870. IHqlExpression * CContainerInfo::getCondition(BuildCtx & ctx)
  871. {
  872. if (container)
  873. return container->getCondition(ctx);
  874. return NULL;
  875. }
  876. void CContainerInfo::getContainerXPath(StringBuffer & out)
  877. {
  878. if (container)
  879. container->getContainerXPath(out);
  880. if (column->getOperator() == no_field)
  881. {
  882. StringBuffer temp;
  883. IHqlExpression * xpath = column->queryProperty(xpathAtom);
  884. if (xpath)
  885. xpath->queryChild(0)->queryValue()->getStringValue(temp);
  886. else
  887. {
  888. IHqlExpression * named = column->queryProperty(namedAtom);
  889. if (named)
  890. named->queryChild(0)->queryValue()->getStringValue(temp);
  891. else
  892. temp.append(*column->queryName()).toLowerCase();
  893. }
  894. unsigned len = temp.length();
  895. if (len && (temp.charAt(len-1) != '/'))
  896. temp.append('/');
  897. out.append(temp);
  898. }
  899. }
  900. bool CContainerInfo::isConditional()
  901. {
  902. if (container)
  903. return container->isConditional();
  904. return false;
  905. }
  906. void CContainerInfo::registerChild(CMemberInfo * child)
  907. {
  908. container->registerChild(child);
  909. }
  910. //---------------------------------------------------------------------------
  911. CRecordInfo::CRecordInfo(CContainerInfo * _container, CMemberInfo * _prior, IHqlExpression * _column) :
  912. CContainerInfo(_container, _prior, _column)
  913. {
  914. }
  915. void CRecordInfo::buildAssign(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, const CHqlBoundTarget & target)
  916. {
  917. CHqlBoundExpr temp;
  918. buildExpr(translator, ctx, selector, temp);
  919. translator.assign(ctx, target, temp);
  920. }
  921. void CRecordInfo::buildExpr(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, CHqlBoundExpr & bound)
  922. {
  923. OwnedHqlExpr size = createValue(no_sizeof, LINK(sizetType), LINK(selector->queryExpr()), NULL);
  924. CHqlBoundExpr boundSize;
  925. translator.buildExpr(ctx, size, boundSize);
  926. OwnedHqlExpr address = getColumnAddress(translator, ctx, selector, queryType());
  927. bound.length.set(boundSize.expr);
  928. bound.expr.setown(convertAddressToValue(address, queryType()));
  929. }
  930. void CRecordInfo::setColumn(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * value)
  931. {
  932. translator.buildCompoundAssign(ctx, selector->queryExpr(), value);
  933. }
  934. IHqlExpression * CRecordInfo::getRelativeSelf()
  935. {
  936. if (!cachedSelf)
  937. {
  938. if (container)
  939. cachedSelf.setown(createSelectExpr(container->getRelativeSelf(), LINK(column)));
  940. else
  941. cachedSelf.setown(createSelector(no_self, column->queryRecord(), NULL));
  942. }
  943. return LINK(cachedSelf);
  944. }
  945. IHqlExpression * CRecordInfo::queryRootSelf()
  946. {
  947. if (container)
  948. return container->queryRootSelf();
  949. if (!cachedSelf)
  950. cachedSelf.setown(createSelector(no_self, column->queryRecord(), NULL));
  951. return cachedSelf;
  952. }
  953. AColumnInfo * CRecordInfo::lookupColumn(IHqlExpression * search)
  954. {
  955. return map.find(search);
  956. }
  957. void CRecordInfo::registerChild(CMemberInfo * child)
  958. {
  959. map.replaceOwn(*child);
  960. }
  961. //---------------------------------------------------------------------------
  962. CIfBlockInfo::CIfBlockInfo(CContainerInfo * _container, CMemberInfo * _prior, IHqlExpression * _column) :
  963. CContainerInfo(_container, _prior, _column)
  964. {
  965. OwnedHqlExpr self = container->getRelativeSelf();
  966. condition.setown(replaceSelector(column->queryChild(0), querySelfReference(), self));
  967. alwaysPresent = (condition->queryValue() && condition->queryValue()->getBoolValue());
  968. }
  969. void CIfBlockInfo::buildAssign(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, const CHqlBoundTarget & target)
  970. {
  971. throwUnexpected();
  972. }
  973. void CIfBlockInfo::buildExpr(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, CHqlBoundExpr & bound)
  974. {
  975. throwUnexpected();
  976. }
  977. void CIfBlockInfo::buildDeserialize(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * helper)
  978. {
  979. //MORE: This should really associate offset of the ifblock with the offset of its first child as well.
  980. CHqlBoundExpr boundSize;
  981. buildOffset(translator, ctx, selector, boundSize);
  982. //MORE: Should also conditionally set a variable to the size of the ifblock to simplify subsequent generated code
  983. OwnedHqlExpr cond = selector->queryRootRow()->bindToRow(condition, queryRootSelf());
  984. CHqlBoundExpr bound;
  985. translator.buildSimpleExpr(ctx, cond, bound);
  986. BuildCtx condctx(ctx);
  987. condctx.addFilter(bound.expr);
  988. //MORE: This test could be avoided if the first child is *actually* variable length
  989. ensureTargetAvailable(translator, condctx, selector, CContainerInfo::getTotalMinimumSize());
  990. CContainerInfo::buildDeserialize(translator, condctx, selector, helper);
  991. }
  992. void CIfBlockInfo::buildSerialize(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * helper)
  993. {
  994. OwnedHqlExpr cond = selector->queryRootRow()->bindToRow(condition, queryRootSelf());
  995. CHqlBoundExpr bound;
  996. translator.buildSimpleExpr(ctx, cond, bound);
  997. BuildCtx condctx(ctx);
  998. condctx.addFilter(bound.expr);
  999. CContainerInfo::buildSerialize(translator, condctx, selector, helper);
  1000. }
  1001. bool CIfBlockInfo::prepareReadAhead(HqlCppTranslator & translator, ReadAheadState & state)
  1002. {
  1003. gatherSelectExprs(state.requiredValues, condition);
  1004. return CContainerInfo::prepareReadAhead(translator, state);
  1005. }
  1006. bool CIfBlockInfo::buildReadAhead(HqlCppTranslator & translator, BuildCtx & ctx, ReadAheadState & state)
  1007. {
  1008. try
  1009. {
  1010. OwnedHqlExpr mappedCondition = quickFullReplaceExpressions(condition, state.requiredValues, state.mappedValues);
  1011. //Early check to see if all the values have been mapped, rather than relying on exception processing.
  1012. if (!containsSelector(mappedCondition, queryRootSelf()))
  1013. {
  1014. BuildCtx condctx(ctx);
  1015. translator.buildFilter(condctx, mappedCondition);
  1016. return CContainerInfo::buildReadAhead(translator, condctx, state);
  1017. }
  1018. }
  1019. catch (IException * e)
  1020. {
  1021. //yuk yuk yuk!! Could't resolve the test condition for very unusual reason, e.g., based on a variable length string.
  1022. e->Release();
  1023. }
  1024. return false;
  1025. }
  1026. void CIfBlockInfo::setColumn(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * value)
  1027. {
  1028. throwUnexpected();
  1029. }
  1030. IHqlExpression * CIfBlockInfo::getCondition(BuildCtx & ctx)
  1031. {
  1032. IHqlExpression * containerCond = container->getCondition(ctx);
  1033. if (alwaysPresent)
  1034. return containerCond;
  1035. if (containerCond)
  1036. return createBoolExpr(no_and, LINK(condition), containerCond);
  1037. return LINK(condition);
  1038. }
  1039. IHqlExpression * CIfBlockInfo::getRelativeSelf()
  1040. {
  1041. return container->getRelativeSelf();
  1042. }
  1043. IReferenceSelector * CIfBlockInfo::getSelector(BuildCtx & ctx, IReferenceSelector * parentSelector)
  1044. {
  1045. return LINK(parentSelector);
  1046. }
  1047. bool CIfBlockInfo::isConditional()
  1048. {
  1049. if (alwaysPresent)
  1050. return CMemberInfo::isConditional();
  1051. return true;
  1052. }
  1053. IHqlExpression * CIfBlockInfo::queryParentSelector(IHqlExpression * selector)
  1054. {
  1055. return selector;
  1056. }
  1057. //---------------------------------------------------------------------------
  1058. CColumnInfo::CColumnInfo(CContainerInfo * _container, CMemberInfo * _prior, IHqlExpression * _column) : CMemberInfo(_container, _prior, _column)
  1059. {
  1060. }
  1061. void CColumnInfo::buildAssign(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, const CHqlBoundTarget & target)
  1062. {
  1063. BoundRow * row = selector->queryRootRow();
  1064. if (isConditional() || row->isConditional())
  1065. {
  1066. CHqlBoundExpr boundCondition;
  1067. OwnedHqlExpr condition = getConditionSelect(translator, ctx, row);
  1068. //calculate the address (and throw it away) so that indexing calculations aren't
  1069. //included in the conditional code.
  1070. calcCurrentOffset(translator, ctx, selector);
  1071. // now generate if (a) b else c
  1072. BuildCtx condctx(ctx);
  1073. IHqlStmt * stmt = NULL;
  1074. if (condition)
  1075. stmt = translator.buildFilterViaExpr(condctx, condition);
  1076. buildColumnAssign(translator, condctx, selector, target);
  1077. if (stmt)
  1078. {
  1079. condctx.selectElse(stmt);
  1080. IHqlExpression * dft = column->queryChild(0);
  1081. if (dft && !dft->isAttribute() && dft->isConstant())
  1082. translator.buildExprAssign(condctx, target, dft);
  1083. else
  1084. translator.buildClear(condctx, target);
  1085. }
  1086. }
  1087. else
  1088. {
  1089. buildColumnAssign(translator, ctx, selector, target);
  1090. }
  1091. }
  1092. void CColumnInfo::calcCurrentOffset(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector)
  1093. {
  1094. OwnedHqlExpr address = getColumnAddress(translator, ctx, selector, queryPhysicalType());
  1095. }
  1096. void CColumnInfo::gatherSize(SizeStruct & target)
  1097. {
  1098. if (isConditional())
  1099. addVariableSize(queryType()->getSize(), target);
  1100. else
  1101. target.addFixed(queryType()->getSize());
  1102. }
  1103. void CColumnInfo::buildSizeOf(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, CHqlBoundExpr & bound)
  1104. {
  1105. //Need to be careful that buildSizeOfUnbound() is called within a test for the dataset being present
  1106. //otherwise with alien datatypes it can incorrectly access the current row.
  1107. BoundRow * row = selector->queryRootRow();
  1108. if (!row->isConditional())
  1109. {
  1110. OwnedHqlExpr value = ensureType(buildSizeOfUnbound(translator, ctx, selector), sizetType);
  1111. value.setown(makeConditional(translator, ctx, row, value));
  1112. translator.buildExpr(ctx, value, bound);
  1113. }
  1114. else
  1115. {
  1116. OwnedHqlExpr cond = getConditionSelect(translator, ctx, row);
  1117. CHqlBoundTarget tempTarget;
  1118. translator.createTempFor(ctx, sizetType, tempTarget, typemod_none, FormatNatural);
  1119. BuildCtx subctx(ctx);
  1120. IHqlStmt * ifStmt = translator.buildFilterViaExpr(subctx, cond);
  1121. OwnedHqlExpr value = ensureType(buildSizeOfUnbound(translator, subctx, selector), sizetType);
  1122. translator.buildExprAssign(subctx, tempTarget, value);
  1123. subctx.selectElse(ifStmt);
  1124. translator.buildExprAssign(subctx, tempTarget, queryZero());
  1125. bound.setFromTarget(tempTarget);
  1126. }
  1127. }
  1128. IHqlExpression * CColumnInfo::buildSizeOfUnbound(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector)
  1129. {
  1130. ITypeInfo * type = queryType();
  1131. unsigned typeSize = type->getSize();
  1132. return getSizetConstant(typeSize);
  1133. }
  1134. static __int64 maxIntValue[] = { I64C(0), I64C(0x7F), I64C(0x7FFF), I64C(0x7FFFFF), I64C(0x7FFFFFFF), I64C(0x7FFFFFFFFF), I64C(0x7FFFFFFFFFFF), I64C(0x7FFFFFFFFFFFFF), I64C(0x7FFFFFFFFFFFFFFF) };
  1135. void CColumnInfo::buildClear(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, int direction)
  1136. {
  1137. OwnedHqlExpr null;
  1138. ITypeInfo * type = queryType();
  1139. if (direction != 0)
  1140. {
  1141. switch (type->getTypeCode())
  1142. {
  1143. case type_int:
  1144. case type_swapint:
  1145. if (type->isSigned())
  1146. {
  1147. __int64 value = maxIntValue[type->getSize()];
  1148. if (direction == -1)
  1149. value = 0-(value+1);
  1150. null.setown(createConstant(type->castFrom(true, value)));
  1151. }
  1152. break;
  1153. case type_decimal:
  1154. if (type->isSigned())
  1155. {
  1156. size32_t size = type->getSize();
  1157. byte * temp = (byte *)alloca(size);
  1158. memset(temp, 0x99, size-1);
  1159. if ((type->getDigits() & 1) != 0)
  1160. temp[0] = 0x99;
  1161. else
  1162. temp[0] = 0x09;
  1163. if (direction == 1)
  1164. temp[size-1] = 0x90;
  1165. else
  1166. temp[size-1] = 0x9F;
  1167. null.setown(createConstant(createValueFromMem(LINK(type), temp)));
  1168. }
  1169. else if (direction == 1)
  1170. {
  1171. size32_t size = type->getSize();
  1172. byte * temp = (byte *)alloca(size);
  1173. memset(temp, 0x99, size);
  1174. if ((type->getDigits() & 1) != 0)
  1175. temp[0] = 0x99;
  1176. else
  1177. temp[0] = 0x09;
  1178. null.setown(createConstant(createValueFromMem(LINK(type), temp)));
  1179. }
  1180. break;
  1181. case type_real:
  1182. //MORE: ? assign +/-inf?
  1183. break;
  1184. case type_string:
  1185. case type_data:
  1186. case type_varstring:
  1187. {
  1188. size32_t size = type->getSize();
  1189. size32_t len = type->getStringLen();
  1190. if (size == UNKNOWN_LENGTH)
  1191. {
  1192. assertex(direction < 0);
  1193. null.setown(createConstant(type->castFrom(0, (const char *)NULL)));
  1194. }
  1195. else
  1196. {
  1197. MemoryAttr buffer(size);
  1198. memset(buffer.bufferBase(), direction < 0 ? 0x00 : 0xff, size);
  1199. null.setown(createConstant(type->castFrom(len, (const char *)buffer.get())));
  1200. }
  1201. break;
  1202. }
  1203. case type_unicode:
  1204. case type_varunicode:
  1205. {
  1206. assertex(direction < 0);
  1207. size32_t size = type->getSize();
  1208. size32_t len = type->getStringLen();
  1209. if (size == UNKNOWN_LENGTH)
  1210. {
  1211. null.setown(createConstant(type->castFrom(0, (const UChar *)NULL)));
  1212. }
  1213. else
  1214. {
  1215. MemoryAttr buffer(size);
  1216. memset(buffer.bufferBase(), 0x00, size);
  1217. null.setown(createConstant(type->castFrom(len, (const UChar *)buffer.get())));
  1218. }
  1219. break;
  1220. }
  1221. }
  1222. }
  1223. if (!null)
  1224. null.setown(createNullExpr(column));
  1225. setColumn(translator, ctx, selector, null);
  1226. }
  1227. void CColumnInfo::buildDeserialize(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * helper)
  1228. {
  1229. CHqlBoundExpr boundSize;
  1230. OwnedHqlExpr unboundSize = ensureType(buildSizeOfUnbound(translator, ctx, selector), sizetType);
  1231. translator.buildExpr(ctx, unboundSize, boundSize);
  1232. doBuildDeserialize(translator, ctx, selector, helper, boundSize.expr);
  1233. }
  1234. void CColumnInfo::buildSerialize(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * helper)
  1235. {
  1236. OwnedHqlExpr sizeOfExpr = createValue(no_sizeof, LINK(sizetType), LINK(selector->queryExpr()));
  1237. CHqlBoundExpr boundSize;
  1238. translator.buildExpr(ctx, sizeOfExpr, boundSize);
  1239. HqlExprArray args;
  1240. args.append(*LINK(helper));
  1241. args.append(*LINK(boundSize.expr));
  1242. args.append(*getColumnAddress(translator, ctx, selector, queryPhysicalType()));
  1243. OwnedHqlExpr call = translator.bindTranslatedFunctionCall(serializerPutAtom, args);
  1244. ctx.addExpr(call);
  1245. }
  1246. bool CColumnInfo::prepareReadAhead(HqlCppTranslator & translator, ReadAheadState & state)
  1247. {
  1248. return true;
  1249. }
  1250. bool CColumnInfo::buildReadAhead(HqlCppTranslator & translator, BuildCtx & ctx, ReadAheadState & state)
  1251. {
  1252. size32_t columnSize = queryType()->getSize();
  1253. if ((columnSize != UNKNOWN_LENGTH) && state.requiredValues.ordinality())
  1254. {
  1255. OwnedHqlExpr selector = createSelectorExpr();
  1256. unsigned match = state.requiredValues.find(*selector);
  1257. if (match != NotFound)
  1258. {
  1259. OwnedHqlExpr tempVariable = ctx.getTempDeclare(queryType(), NULL);
  1260. HqlExprArray args;
  1261. args.append(*LINK(state.helper));
  1262. args.append(*getSizetConstant(columnSize));
  1263. args.append(*getPointer(tempVariable));
  1264. OwnedHqlExpr call = translator.bindTranslatedFunctionCall(deserializerReadNAtom, args);
  1265. ctx.addExpr(call);
  1266. OwnedHqlExpr translated = createTranslated(tempVariable);
  1267. state.setMapping(match, translated);
  1268. return true;
  1269. }
  1270. }
  1271. doBuildSkipInput(translator, ctx, state.helper, column->queryType()->getSize());
  1272. return true;
  1273. }
  1274. void CColumnInfo::buildExpr(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, CHqlBoundExpr & bound)
  1275. {
  1276. BoundRow * row = selector->queryRootRow();
  1277. if (isConditional() || row->isConditional())
  1278. {
  1279. OwnedHqlExpr condition = getConditionSelect(translator, ctx, row);
  1280. if (condition)
  1281. {
  1282. //Unusual, but if this is inside a fileview translation helper there is no context, so use blocked
  1283. //format to avoid temporaries that require an allocator.
  1284. //A better fix long term would be to pass the format to get() and buildExpr
  1285. ExpressionFormat format = ctx.queryMatchExpr(codeContextMarkerExpr) ? FormatNatural : FormatBlockedDataset;
  1286. //MORE: Can conditionally code retrieval be improved for some types of field...
  1287. CHqlBoundTarget tempTarget;
  1288. translator.createTempFor(ctx, queryLogicalType(), tempTarget, typemod_none, format);
  1289. buildAssign(translator, ctx, selector, tempTarget);
  1290. bound.setFromTarget(tempTarget);
  1291. return;
  1292. }
  1293. }
  1294. buildColumnExpr(translator, ctx, selector, bound);
  1295. }
  1296. bool CColumnInfo::isFixedSize()
  1297. {
  1298. return (queryType()->getSize() != UNKNOWN_LENGTH);
  1299. }
  1300. void CColumnInfo::buildColumnAssign(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, const CHqlBoundTarget & target)
  1301. {
  1302. CHqlBoundExpr bound;
  1303. buildColumnExpr(translator, ctx, selector, bound);
  1304. translator.assign(ctx, target, bound);
  1305. }
  1306. void CColumnInfo::buildColumnExpr(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, CHqlBoundExpr & bound)
  1307. {
  1308. bound.expr.setown(getColumnRef(translator, ctx, selector));
  1309. }
  1310. void CColumnInfo::setColumn(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * value)
  1311. {
  1312. if (isConditional())
  1313. {
  1314. OwnedHqlExpr size = getSizetConstant(queryType()->getSize());
  1315. checkAssignOk(translator, ctx, selector, size, 0);
  1316. CHqlBoundTarget tgt;
  1317. OwnedHqlExpr address = getColumnAddress(translator, ctx, selector, queryType());
  1318. tgt.expr.setown(convertAddressToValue(address, queryType()));
  1319. translator.buildExprAssign(ctx, tgt, value);
  1320. }
  1321. else
  1322. defaultSetColumn(translator, ctx, selector, value);
  1323. }
  1324. //---------------------------------------------------------------------------
  1325. CSpecialIntColumnInfo::CSpecialIntColumnInfo(CContainerInfo * _container, CMemberInfo * _prior, IHqlExpression * _column) : CColumnInfo(_container, _prior, _column)
  1326. {
  1327. }
  1328. void CSpecialIntColumnInfo::buildColumnExpr(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, CHqlBoundExpr & bound)
  1329. {
  1330. ITypeInfo * type = queryType();
  1331. _ATOM func = readIntAtom[type->getSize()][type->isSigned()];
  1332. HqlExprArray args;
  1333. args.append(*getColumnAddress(translator, ctx, selector, queryPhysicalType()));
  1334. bound.expr.setown(translator.bindTranslatedFunctionCall(func, args));
  1335. ITypeInfo * promoted = type->queryPromotedType();
  1336. if (promoted != bound.expr->queryType())
  1337. bound.expr.setown(createValue(no_typetransfer, LINK(promoted), bound.expr.getClear()));
  1338. }
  1339. void CSpecialIntColumnInfo::setColumn(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * value)
  1340. {
  1341. ITypeInfo * type = queryType();
  1342. ITypeInfo * promoted = type->queryPromotedType();
  1343. _ATOM func = writeIntAtom[type->getSize()];
  1344. if (isConditional())
  1345. {
  1346. OwnedHqlExpr size = getSizetConstant(type->getSize());
  1347. checkAssignOk(translator, ctx, selector, size, 0);
  1348. }
  1349. HqlExprArray args;
  1350. CHqlBoundExpr bound;
  1351. args.append(*getColumnAddress(translator, ctx, selector, queryPhysicalType()));
  1352. ITypeInfo * valueType = value->queryType();
  1353. LinkedHqlExpr castValue = value;
  1354. if (valueType->getTypeCode() != type_int || type->getTypeCode() != type_int)
  1355. castValue.setown(ensureExprType(value, promoted));
  1356. translator.buildExpr(ctx, castValue, bound);
  1357. args.append(*bound.expr.getLink());
  1358. OwnedHqlExpr call = translator.bindTranslatedFunctionCall(func, args);
  1359. ctx.addExpr(call);
  1360. }
  1361. //---------------------------------------------------------------------------
  1362. CPackedIntColumnInfo::CPackedIntColumnInfo(CContainerInfo * _container, CMemberInfo * _prior, IHqlExpression * _column) : CColumnInfo(_container, _prior, _column)
  1363. {
  1364. }
  1365. void CPackedIntColumnInfo::buildColumnExpr(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, CHqlBoundExpr & bound)
  1366. {
  1367. ITypeInfo * type = queryType();
  1368. _ATOM func = type->isSigned() ? getPackedSignedAtom : getPackedUnsignedAtom;
  1369. HqlExprArray args;
  1370. args.append(*getColumnAddress(translator, ctx, selector, queryPhysicalType()));
  1371. bound.expr.setown(translator.bindTranslatedFunctionCall(func, args));
  1372. ITypeInfo * promoted = type->queryPromotedType();
  1373. if (promoted != bound.expr->queryType())
  1374. bound.expr.setown(createValue(no_typetransfer, LINK(promoted), bound.expr.getClear()));
  1375. }
  1376. void CPackedIntColumnInfo::gatherSize(SizeStruct & target)
  1377. {
  1378. addVariableSize(1, target);
  1379. }
  1380. IHqlExpression * CPackedIntColumnInfo::buildSizeOfUnbound(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector)
  1381. {
  1382. HqlExprArray args;
  1383. args.append(*getColumnAddress(translator, ctx, selector, queryPhysicalType()));
  1384. return createValue(no_translated, LINK(sizetType), translator.bindTranslatedFunctionCall(getPackedSizeAtom, args));
  1385. }
  1386. void CPackedIntColumnInfo::buildDeserialize(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * helper)
  1387. {
  1388. OwnedHqlExpr size = getSizetConstant(queryType()->queryPromotedType()->getSize()+1); // an over-estimate, but more efficient than working out exactly.
  1389. checkAssignOk(translator, ctx, selector, size, 0);
  1390. HqlExprArray args;
  1391. args.append(*LINK(helper));
  1392. args.append(*getColumnAddress(translator, ctx, selector, queryPhysicalType()));
  1393. translator.buildTranslatedFunctionCall(ctx, deserializerReadPackedIntAtom, args);
  1394. }
  1395. bool CPackedIntColumnInfo::buildReadAhead(HqlCppTranslator & translator, BuildCtx & ctx, ReadAheadState & state)
  1396. {
  1397. Owned<ITypeInfo> tempType = makeDataType(queryType()->queryPromotedType()->getSize()+1); // an over-estimate
  1398. OwnedHqlExpr tempVar = ctx.getTempDeclare(tempType, NULL);
  1399. HqlExprArray args;
  1400. args.append(*LINK(state.helper));
  1401. args.append(*getPointer(tempVar));
  1402. translator.buildTranslatedFunctionCall(ctx, deserializerReadPackedIntAtom, args);
  1403. return true;
  1404. }
  1405. void CPackedIntColumnInfo::setColumn(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * value)
  1406. {
  1407. ITypeInfo * type = queryType();
  1408. _ATOM func = type->isSigned() ? setPackedSignedAtom : setPackedUnsignedAtom;
  1409. OwnedHqlExpr size = getSizetConstant(type->queryPromotedType()->getSize()+1); // an over-estimate, but more efficient than working out exactly.
  1410. checkAssignOk(translator, ctx, selector, size, 0);
  1411. HqlExprArray args;
  1412. CHqlBoundExpr bound;
  1413. args.append(*getColumnAddress(translator, ctx, selector, queryPhysicalType()));
  1414. OwnedHqlExpr castValue = ensureExprType(value, type);
  1415. translator.buildExpr(ctx, castValue, bound);
  1416. args.append(*LINK(bound.expr));
  1417. OwnedHqlExpr call = translator.bindTranslatedFunctionCall(func, args);
  1418. ctx.addExpr(call);
  1419. }
  1420. //---------------------------------------------------------------------------
  1421. CSpecialStringColumnInfo::CSpecialStringColumnInfo(CContainerInfo * _container, CMemberInfo * _prior, IHqlExpression * _column) : CColumnInfo(_container, _prior, _column)
  1422. {
  1423. }
  1424. void CSpecialStringColumnInfo::buildColumnExpr(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, CHqlBoundExpr & bound)
  1425. {
  1426. OwnedHqlExpr address = getColumnAddress(translator, ctx, selector, sizetType);
  1427. OwnedHqlExpr addressStr = getColumnAddress(translator, ctx, selector, queryType(), sizeof(size32_t));
  1428. bound.length.setown(convertAddressToValue(address, sizetType));
  1429. bound.expr.setown(convertAddressToValue(addressStr, queryType()));
  1430. #if 0
  1431. //Following improves code for transforms, disable until I finish regression testing
  1432. ensureSimpleLength(translator, ctx, bound);
  1433. OwnedHqlExpr boundSize = translator.getBoundSize(bound);
  1434. associateSizeOf(ctx, selector, boundSize, sizeof(size32_t));
  1435. #endif
  1436. }
  1437. void CSpecialStringColumnInfo::gatherSize(SizeStruct & target)
  1438. {
  1439. addVariableSize(sizeof(size32_t), target);
  1440. }
  1441. void CSpecialStringColumnInfo::buildDeserialize(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * helper)
  1442. {
  1443. OwnedHqlExpr address = getColumnAddress(translator, ctx, selector, sizetType);
  1444. OwnedHqlExpr addressStr = getColumnAddress(translator, ctx, selector, queryType(), sizeof(size32_t));
  1445. OwnedHqlExpr targetLength = convertAddressToValue(address, sizetType);
  1446. OwnedHqlExpr sizeSizet = getSizetConstant(sizeof(size32_t));
  1447. callDeserializeGetN(translator, ctx, helper, sizeSizet, address);
  1448. if (queryType()->getTypeCode() == type_utf8)
  1449. {
  1450. BoundRow * row = selector->queryRootRow();
  1451. CHqlBoundExpr boundOffset;
  1452. getColumnOffset(translator, ctx, selector, boundOffset);
  1453. SizeStruct fixedRowSize;
  1454. CHqlBoundExpr boundFixedRowSize;
  1455. gatherMaxRowSize(fixedRowSize, NULL, sizeof(size32_t), selector);
  1456. fixedRowSize.buildSizeExpr(translator, ctx, row, boundFixedRowSize);
  1457. assertex(!row->isSerialization() && row->queryBuilder());
  1458. _ATOM func = deserializerReadUtf8Atom;
  1459. HqlExprArray args;
  1460. args.append(*LINK(helper));
  1461. args.append(*LINK(row->queryBuilder()));
  1462. args.append(*adjustValue(boundOffset.expr, sizeof(size32_t)));
  1463. args.append(*LINK(boundFixedRowSize.expr));
  1464. args.append(*LINK(targetLength));
  1465. OwnedHqlExpr call = translator.bindTranslatedFunctionCall(func, args);
  1466. OwnedHqlExpr sizeVariable = ctx.getTempDeclare(sizetType, call);
  1467. associateSizeOf(ctx, selector, sizeVariable, sizeof(size32_t));
  1468. }
  1469. else
  1470. {
  1471. CHqlBoundExpr bound;
  1472. bound.length.setown(translator.ensureSimpleTranslatedExpr(ctx, targetLength));
  1473. bound.expr.setown(convertAddressToValue(addressStr, queryType()));
  1474. OwnedHqlExpr boundSize = translator.getBoundSize(bound);
  1475. if (queryType()->getTypeCode() == type_qstring)
  1476. boundSize.setown(translator.ensureSimpleTranslatedExpr(ctx, boundSize));
  1477. OwnedHqlExpr unboundSize = createTranslated(boundSize);
  1478. checkAssignOk(translator, ctx, selector, unboundSize, sizeof(size32_t));
  1479. callDeserializeGetN(translator, ctx, helper, boundSize, addressStr);
  1480. associateSizeOf(ctx, selector, boundSize, sizeof(size32_t));
  1481. }
  1482. }
  1483. bool CSpecialStringColumnInfo::buildReadAhead(HqlCppTranslator & translator, BuildCtx & ctx, ReadAheadState & state)
  1484. {
  1485. OwnedHqlExpr lengthVariable = callDeserializerGetSize(translator, ctx, state.helper);
  1486. if (column->queryType()->getTypeCode() == type_utf8)
  1487. {
  1488. HqlExprArray args;
  1489. args.append(*LINK(state.helper));
  1490. args.append(*LINK(lengthVariable));
  1491. translator.callProcedure(ctx, deserializerSkipUtf8Atom, args);
  1492. }
  1493. else
  1494. {
  1495. OwnedHqlExpr size = translator.getBoundSize(column->queryType(), lengthVariable, NULL);
  1496. callDeserializerSkipInputTranslatedSize(translator, ctx, state.helper, size);
  1497. }
  1498. return true;
  1499. }
  1500. IHqlExpression * CSpecialStringColumnInfo::buildSizeOfUnbound(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector)
  1501. {
  1502. OwnedHqlExpr address = getColumnAddress(translator, ctx, selector, sizetType);
  1503. OwnedHqlExpr addressStr = getColumnAddress(translator, ctx, selector, queryType(), sizeof(size32_t));
  1504. OwnedHqlExpr length = convertAddressToValue(address, sizetType);
  1505. assertex(length->queryType()->queryTypeBase() == sizetType);
  1506. OwnedHqlExpr boundSize = translator.getBoundSize(column->queryType(), length, addressStr);
  1507. return createValue(no_translated, LINK(sizetType), adjustValue(boundSize, sizeof(size32_t)));
  1508. }
  1509. void CSpecialStringColumnInfo::setColumn(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * _value)
  1510. {
  1511. OwnedHqlExpr address = getColumnAddress(translator, ctx, selector, sizetType, 0);
  1512. OwnedHqlExpr addressStr = getColumnAddress(translator, ctx, selector, queryType(), sizeof(size32_t));
  1513. ITypeInfo * columnType = column->queryType();
  1514. CHqlBoundExpr bound;
  1515. OwnedHqlExpr value = ensureExprType(_value, columnType);
  1516. translator.buildExpr(ctx, value, bound);
  1517. ensureSimpleLength(translator, ctx, bound);
  1518. OwnedHqlExpr length = createValue(no_translated, LINK(sizetType), translator.getBoundLength(bound));
  1519. OwnedHqlExpr size = createValue(no_translated, LINK(sizetType), translator.getBoundSize(bound));
  1520. checkAssignOk(translator, ctx, selector, size, sizeof(size32_t));
  1521. CHqlBoundTarget boundTarget;
  1522. boundTarget.expr.setown(convertAddressToValue(address, sizetType));
  1523. translator.buildExprAssign(ctx, boundTarget, length);
  1524. translator.buildBlockCopy(ctx, addressStr, bound);
  1525. //Use the size just calulated for the field
  1526. OwnedHqlExpr boundSize = translator.getBoundSize(bound);
  1527. associateSizeOf(ctx, selector, boundSize, sizeof(size32_t));
  1528. }
  1529. //---------------------------------------------------------------------------
  1530. CSpecialVStringColumnInfo::CSpecialVStringColumnInfo(CContainerInfo * _container, CMemberInfo * _prior, IHqlExpression * _column) : CColumnInfo(_container, _prior, _column)
  1531. {
  1532. }
  1533. void CSpecialVStringColumnInfo::buildColumnExpr(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, CHqlBoundExpr & bound)
  1534. {
  1535. OwnedHqlExpr address = getColumnAddress(translator, ctx, selector, queryType(), 0);
  1536. bound.expr.setown(convertAddressToValue(address, queryType()));
  1537. }
  1538. void CSpecialVStringColumnInfo::gatherSize(SizeStruct & target)
  1539. {
  1540. size32_t varMinSize = (queryType()->getTypeCode() == type_varunicode) ? sizeof(UChar) : 1;
  1541. addVariableSize(varMinSize, target);
  1542. }
  1543. IHqlExpression * CSpecialVStringColumnInfo::buildSizeOfUnbound(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector)
  1544. {
  1545. CHqlBoundExpr bound;
  1546. buildColumnExpr(translator, ctx, selector, bound);
  1547. IHqlExpression * length = translator.getBoundSize(bound);
  1548. return createTranslatedOwned(length);
  1549. }
  1550. void CSpecialVStringColumnInfo::buildDeserialize(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * helper)
  1551. {
  1552. BoundRow * row = selector->queryRootRow();
  1553. CHqlBoundExpr boundOffset;
  1554. getColumnOffset(translator, ctx, selector, boundOffset);
  1555. SizeStruct fixedRowSize;
  1556. CHqlBoundExpr boundFixedRowSize;
  1557. gatherMaxRowSize(fixedRowSize, NULL, 0, selector);
  1558. fixedRowSize.buildSizeExpr(translator, ctx, row, boundFixedRowSize);
  1559. assertex(!row->isSerialization() && row->queryBuilder());
  1560. _ATOM func;
  1561. switch (queryType()->getTypeCode())
  1562. {
  1563. case type_varstring:
  1564. func = deserializerReadVStrAtom;
  1565. break;
  1566. case type_varunicode:
  1567. func = deserializerReadVUniAtom;
  1568. break;
  1569. default:
  1570. throwUnexpected();
  1571. }
  1572. HqlExprArray args;
  1573. args.append(*LINK(helper));
  1574. args.append(*LINK(row->queryBuilder()));
  1575. args.append(*LINK(boundOffset.expr));
  1576. args.append(*LINK(boundFixedRowSize.expr));
  1577. OwnedHqlExpr call = translator.bindTranslatedFunctionCall(func, args);
  1578. OwnedHqlExpr sizeVariable = ctx.getTempDeclare(sizetType, call);
  1579. associateSizeOf(ctx, selector, sizeVariable, 0);
  1580. }
  1581. bool CSpecialVStringColumnInfo::buildReadAhead(HqlCppTranslator & translator, BuildCtx & ctx, ReadAheadState & state)
  1582. {
  1583. HqlExprArray args;
  1584. args.append(*LINK(state.helper));
  1585. _ATOM func;
  1586. switch (queryType()->getTypeCode())
  1587. {
  1588. case type_varstring:
  1589. func = deserializerSkipVStrAtom;
  1590. break;
  1591. case type_varunicode:
  1592. func = deserializerSkipVUniAtom;
  1593. break;
  1594. default:
  1595. throwUnexpected();
  1596. }
  1597. translator.callProcedure(ctx, func, args);
  1598. return true;
  1599. }
  1600. void CSpecialVStringColumnInfo::setColumn(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * _value)
  1601. {
  1602. OwnedHqlExpr address = getColumnAddress(translator, ctx, selector, queryType(), 0);
  1603. OwnedHqlExpr target = convertAddressToValue(address, queryType());
  1604. ITypeInfo * columnType = column->queryType();
  1605. OwnedHqlExpr value = ensureExprType(_value, columnType);
  1606. //Allow a direct assignment from a string, rather than creating a temp varstring.
  1607. switch (value->getOperator())
  1608. {
  1609. case no_cast: case no_implicitcast:
  1610. ITypeInfo * type = value->queryType();
  1611. ITypeInfo * prevType = value->queryChild(0)->queryType();
  1612. if ((type->getTypeCode() == type_varstring) && (prevType->getTypeCode() == type_string) &&
  1613. (type->queryCharset() == prevType->queryCharset()))
  1614. value.set(value->queryChild(0));
  1615. break;
  1616. }
  1617. CHqlBoundExpr bound;
  1618. translator.buildExpr(ctx, value, bound);
  1619. // ensureSimpleLength(translator, ctx, bound);
  1620. OwnedHqlExpr length = translator.getBoundLength(bound);
  1621. OwnedHqlExpr targetSize = adjustValue(length, 1);
  1622. if (isUnicodeType(columnType))
  1623. targetSize.setown(createValue(no_mul, targetSize->getType(), LINK(targetSize), getSizetConstant(2)));
  1624. OwnedHqlExpr translatedLength = createTranslated(targetSize);
  1625. checkAssignOk(translator, ctx, selector, translatedLength, 0);
  1626. HqlExprArray args;
  1627. if (columnType->getTypeCode() == type_varunicode)
  1628. {
  1629. translator.buildBlockCopy(ctx, address, bound);
  1630. }
  1631. else if (bound.expr->queryType()->getTypeCode() == type_varstring)
  1632. {
  1633. args.append(*target.getLink());
  1634. args.append(*translator.getElementPointer(bound.expr));
  1635. translator.callProcedure(ctx, strcpyAtom, args);
  1636. }
  1637. else
  1638. {
  1639. args.append(*LINK(targetSize));
  1640. args.append(*target.getLink());
  1641. args.append(*LINK(length));
  1642. args.append(*translator.getElementPointer(bound.expr));
  1643. translator.callProcedure(ctx, str2VStrAtom, args);
  1644. }
  1645. }
  1646. //---------------------------------------------------------------------------
  1647. CAlienColumnInfo::CAlienColumnInfo(CContainerInfo * _container, CMemberInfo * _prior, IHqlExpression * _column) : CColumnInfo(_container, _prior, _column)
  1648. {
  1649. self.setown(container->getRelativeSelf());
  1650. }
  1651. void CAlienColumnInfo::buildAddress(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, CHqlBoundExpr & bound)
  1652. {
  1653. Linked<ITypeInfo> physicalType = queryPhysicalType();
  1654. OwnedHqlExpr address = getColumnAddress(translator, ctx, selector, physicalType, 0);
  1655. OwnedHqlExpr value = convertAddressToValue(address, physicalType);
  1656. bound.expr.set(value->queryChild(0));
  1657. }
  1658. IHqlExpression * CAlienColumnInfo::doBuildSizeOfUnbound(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * helper)
  1659. {
  1660. ITypeInfo * type = queryType();
  1661. IHqlAlienTypeInfo * alien = queryAlienType(type);
  1662. unsigned size = alien->getPhysicalTypeSize();
  1663. if (size != UNKNOWN_LENGTH)
  1664. return getSizetConstant(size);
  1665. BoundRow * cursor = selector->queryRootRow();
  1666. IHqlExpression * lengthAttr = alien->queryLengthFunction();
  1667. if (!lengthAttr->isFunctionDefinition())
  1668. {
  1669. OwnedHqlExpr absoluteLength = replaceSelector(lengthAttr, querySelfReference(), self);
  1670. OwnedHqlExpr value = cursor->bindToRow(absoluteLength, queryRootSelf());
  1671. return ensureExprType(value, sizetType);
  1672. }
  1673. HqlExprArray args;
  1674. if (lengthAttr->queryChild(0))
  1675. {
  1676. OwnedHqlExpr address;
  1677. Owned<ITypeInfo> physicalType = getPhysicalSourceType();
  1678. if (helper)
  1679. address.setown(createSelfPeekDeserializer(translator, helper));
  1680. else
  1681. address.setown(getColumnAddress(translator, ctx, selector, physicalType, 0));
  1682. OwnedHqlExpr value = convertAddressToValue(address, physicalType);
  1683. args.append(*createTranslated(value));
  1684. }
  1685. OwnedHqlExpr expr = createBoundFunction(NULL, lengthAttr, args, NULL, true);
  1686. OwnedHqlExpr absoluteExpr = replaceSelector(expr, querySelfReference(), self);
  1687. OwnedHqlExpr value = cursor->bindToRow(absoluteExpr, queryRootSelf());
  1688. return ensureExprType(value, sizetType);
  1689. }
  1690. IHqlExpression * CAlienColumnInfo::buildSizeOfUnbound(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector)
  1691. {
  1692. return doBuildSizeOfUnbound(translator, ctx, selector, NULL);
  1693. }
  1694. void CAlienColumnInfo::buildDeserialize(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * helper)
  1695. {
  1696. OwnedHqlExpr unboundSize = doBuildSizeOfUnbound(translator, ctx, selector, helper);
  1697. CHqlBoundExpr boundSize;
  1698. if (unboundSize->isConstant())
  1699. translator.buildSimpleExpr(ctx, unboundSize, boundSize);
  1700. else
  1701. translator.buildTempExpr(ctx, unboundSize, boundSize);
  1702. doBuildDeserialize(translator, ctx, selector, helper, boundSize.expr);
  1703. }
  1704. bool CAlienColumnInfo::prepareReadAhead(HqlCppTranslator & translator, ReadAheadState & state)
  1705. {
  1706. return false; // too complicated to do safetly. It really needs a rethink...
  1707. }
  1708. bool CAlienColumnInfo::buildReadAhead(HqlCppTranslator & translator, BuildCtx & ctx, ReadAheadState & state)
  1709. {
  1710. throwUnexpected();
  1711. }
  1712. void CAlienColumnInfo::gatherSize(SizeStruct & target)
  1713. {
  1714. unsigned size = getPhysicalSize();
  1715. if (isConditional())
  1716. addVariableSize(0, target);
  1717. else
  1718. {
  1719. if (size != UNKNOWN_LENGTH)
  1720. target.addFixed(size);
  1721. else
  1722. addVariableSize(0, target);
  1723. }
  1724. }
  1725. unsigned CAlienColumnInfo::getPhysicalSize()
  1726. {
  1727. ITypeInfo * type = queryType();
  1728. IHqlAlienTypeInfo * alien = queryAlienType(type);
  1729. unsigned size = alien->getPhysicalTypeSize();
  1730. if (size == UNKNOWN_LENGTH)
  1731. {
  1732. IHqlExpression * lengthAttr = queryStripCasts(alien->queryLengthFunction());
  1733. if (lengthAttr->isConstant() && !lengthAttr->isFunction())
  1734. {
  1735. OwnedHqlExpr folded = foldHqlExpression(lengthAttr);
  1736. if (folded->queryValue())
  1737. size = (unsigned)folded->queryValue()->getIntValue();
  1738. }
  1739. }
  1740. return size;
  1741. }
  1742. ITypeInfo * CAlienColumnInfo::queryPhysicalType()
  1743. {
  1744. IHqlAlienTypeInfo * alien = queryAlienType(queryType());
  1745. return alien->queryPhysicalType();
  1746. }
  1747. ITypeInfo * CAlienColumnInfo::getPhysicalSourceType()
  1748. {
  1749. ITypeInfo * physicalType = queryPhysicalType();
  1750. if (physicalType->getSize() == UNKNOWN_LENGTH)
  1751. return getStretchedType(INFINITE_LENGTH, physicalType);
  1752. return LINK(physicalType);
  1753. }
  1754. IHqlExpression * CAlienColumnInfo::getAlienGetFunction(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector)
  1755. {
  1756. ITypeInfo * columnType = queryType();
  1757. IHqlAlienTypeInfo * alien = queryAlienType(columnType);
  1758. IHqlExpression * getFunction = alien->queryLoadFunction();
  1759. Owned<ITypeInfo> physicalType = getPhysicalSourceType();
  1760. OwnedHqlExpr address = getColumnAddress(translator, ctx, selector, physicalType, 0);
  1761. OwnedHqlExpr physical = convertAddressToValue(address, physicalType);
  1762. HqlExprArray args;
  1763. args.append(*createTranslated(physical));
  1764. OwnedHqlExpr bound = createBoundFunction(NULL, getFunction, args, NULL, true);
  1765. OwnedHqlExpr absoluteBound = replaceSelector(bound, querySelfReference(), self);
  1766. return selector->queryRootRow()->bindToRow(absoluteBound, queryRootSelf());
  1767. }
  1768. bool CAlienColumnInfo::isFixedSize()
  1769. {
  1770. return getPhysicalSize() != UNKNOWN_LENGTH;
  1771. }
  1772. void CAlienColumnInfo::buildColumnAssign(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, const CHqlBoundTarget & target)
  1773. {
  1774. OwnedHqlExpr expr = getAlienGetFunction(translator, ctx, selector);
  1775. translator.buildExprAssign(ctx, target, expr);
  1776. }
  1777. void CAlienColumnInfo::buildColumnExpr(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, CHqlBoundExpr & bound)
  1778. {
  1779. BoundRow * cursor = selector->queryRootRow();
  1780. ITypeInfo * columnType = queryType();
  1781. IHqlAlienTypeInfo * alien = queryAlienType(columnType);
  1782. IHqlExpression * getFunction = alien->queryLoadFunction();
  1783. Owned<ITypeInfo> physicalType = getPhysicalSourceType();
  1784. OwnedHqlExpr address = getColumnAddress(translator, ctx, selector, physicalType);
  1785. OwnedHqlExpr physical = convertAddressToValue(address, physicalType);
  1786. HqlExprArray args;
  1787. args.append(*createTranslated(physical));
  1788. OwnedHqlExpr expr = createBoundFunction(NULL, getFunction, args, NULL, true);
  1789. OwnedHqlExpr absoluteExpr = replaceSelector(expr, querySelfReference(), self);
  1790. OwnedHqlExpr selectedExpr = cursor->bindToRow(absoluteExpr, queryRootSelf());
  1791. translator.buildExpr(ctx, selectedExpr, bound);
  1792. }
  1793. void CAlienColumnInfo::setColumn(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * value)
  1794. {
  1795. BoundRow * cursor = selector->queryRootRow();
  1796. ITypeInfo * columnType = queryType();
  1797. IHqlAlienTypeInfo * alien = queryAlienType(columnType);
  1798. IHqlExpression * setFunction = alien->queryStoreFunction();
  1799. HqlExprArray args;
  1800. CHqlBoundExpr bound;
  1801. translator.buildExpr(ctx, value, bound);
  1802. args.append(*bound.getTranslatedExpr());
  1803. OwnedHqlExpr call = createBoundFunction(NULL, setFunction, args, NULL, true);
  1804. Linked<ITypeInfo> physicalType = queryPhysicalType();
  1805. OwnedHqlExpr address = getColumnAddress(translator, ctx, selector, physicalType, 0);
  1806. IHqlExpression * tgt = convertAddressToValue(address, physicalType);
  1807. OwnedHqlExpr absoluteCall = replaceSelector(call, querySelfReference(), self);
  1808. OwnedHqlExpr selectedCall = cursor->bindToRow(absoluteCall, queryRootSelf());
  1809. if (physicalType->getSize() == UNKNOWN_LENGTH)
  1810. {
  1811. CHqlBoundExpr boundCall;
  1812. translator.buildExpr(ctx, selectedCall, boundCall);
  1813. OwnedHqlExpr size = translator.getBoundSize(boundCall);
  1814. OwnedHqlExpr translatedSize = createTranslated(size);
  1815. checkAssignOk(translator, ctx, selector, translatedSize, 0);
  1816. translator.buildBlockCopy(ctx, tgt, boundCall);
  1817. //Use the size just calulated for sizeof(target)
  1818. associateSizeOf(ctx, selector, size, 0);
  1819. }
  1820. else
  1821. {
  1822. if (isConditional())
  1823. {
  1824. OwnedHqlExpr size = getSizetConstant(physicalType->getSize());
  1825. checkAssignOk(translator, ctx, selector, size, 0);
  1826. }
  1827. CHqlBoundTarget boundTarget;
  1828. boundTarget.expr.set(tgt);
  1829. translator.buildExprAssign(ctx, boundTarget, selectedCall);
  1830. }
  1831. tgt->Release();
  1832. }
  1833. //---------------------------------------------------------------------------
  1834. CBitfieldContainerInfo::CBitfieldContainerInfo(CContainerInfo * _container, CMemberInfo * _prior, IHqlExpression * _column) :
  1835. CContainerInfo(_container, _prior, _column)
  1836. {
  1837. }
  1838. //AColumnInfo
  1839. void CBitfieldContainerInfo::buildAssign(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, const CHqlBoundTarget & target)
  1840. {
  1841. throwUnexpected();
  1842. }
  1843. void CBitfieldContainerInfo::buildClear(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, int direction)
  1844. {
  1845. BuildCtx condctx(ctx);
  1846. BoundRow * cursor = selector->queryRootRow();
  1847. OwnedHqlExpr condition = getConditionSelect(translator, ctx, cursor);
  1848. if (condition)
  1849. translator.buildFilter(condctx, condition);
  1850. OwnedHqlExpr null = createNullExpr(column);
  1851. setColumn(translator, condctx, selector, null);
  1852. }
  1853. void CBitfieldContainerInfo::buildDeserialize(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * helper)
  1854. {
  1855. OwnedHqlExpr size = getSizetConstant(column->queryType()->getSize());
  1856. doBuildDeserialize(translator, ctx, selector, helper, size);
  1857. }
  1858. bool CBitfieldContainerInfo::buildReadAhead(HqlCppTranslator & translator, BuildCtx & ctx, ReadAheadState & state)
  1859. {
  1860. doBuildSkipInput(translator, ctx, state.helper, column->queryType()->getSize());
  1861. return true;
  1862. }
  1863. IHqlExpression* CBitfieldContainerInfo::queryParentSelector(IHqlExpression* selector)
  1864. {
  1865. return selector;
  1866. }
  1867. void CBitfieldContainerInfo::buildExpr(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, CHqlBoundExpr & bound)
  1868. {
  1869. throwUnexpected();
  1870. }
  1871. IReferenceSelector * CBitfieldContainerInfo::getSelector(BuildCtx & ctx, IReferenceSelector * parentSelector)
  1872. {
  1873. return LINK(parentSelector);
  1874. }
  1875. void CBitfieldContainerInfo::noteLastBitfield()
  1876. {
  1877. if (children.ordinality())
  1878. children.tos().noteLastBitfield();
  1879. }
  1880. void CBitfieldContainerInfo::setColumn(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * value)
  1881. {
  1882. defaultSetColumn(translator, ctx, selector, value);
  1883. }
  1884. CMemberInfo * CBitfieldContainerInfo::lastBitfield()
  1885. {
  1886. if (children.ordinality())
  1887. return &(CMemberInfo &)children.tos();
  1888. return NULL;
  1889. }
  1890. void CBitfieldContainerInfo::gatherSize(SizeStruct & size)
  1891. {
  1892. size.addFixed(column->queryType()->getSize());
  1893. }
  1894. IHqlExpression * CBitfieldContainerInfo::getRelativeSelf()
  1895. {
  1896. //ifblocks inside bitfield containers?? Not supported.... should create a new container, unless desparate.
  1897. UNIMPLEMENTED;
  1898. }
  1899. bool CBitfieldContainerInfo::isFixedSize()
  1900. {
  1901. return true;
  1902. }
  1903. //---------------------------------------------------------------------------
  1904. CBitfieldInfo::CBitfieldInfo(CContainerInfo * _container, CMemberInfo * _prior, IHqlExpression * _column) : CColumnInfo(_container, _prior, _column)
  1905. {
  1906. bitOffset = 0;
  1907. isLastBitfield = false;
  1908. }
  1909. void CBitfieldInfo::buildColumnExpr(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, CHqlBoundExpr & bound)
  1910. {
  1911. ITypeInfo * columnType = queryType();
  1912. OwnedHqlExpr address = getColumnAddress(translator, ctx, selector, queryStorageType(), 0);
  1913. OwnedHqlExpr value = convertAddressToValue(address, queryStorageType());
  1914. if (bitOffset > 0)
  1915. value.setown(createValue(no_rshift, LINK(value), getSizetConstant((int)bitOffset)));
  1916. unsigned __int64 mask = ((unsigned __int64)1<<columnType->getBitSize())-1;
  1917. IValue * maskValue = columnType->queryChildType()->castFrom(false, (__int64)mask);
  1918. bound.expr.setown(createValue(no_band, LINK(value), createConstant(maskValue)));
  1919. }
  1920. IHqlExpression * CBitfieldInfo::buildSizeOfUnbound(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector)
  1921. {
  1922. return createConstant(0);
  1923. }
  1924. void CBitfieldInfo::gatherSize(SizeStruct & target)
  1925. {
  1926. target.addFixed(0); //!!
  1927. }
  1928. bool CBitfieldInfo::isFixedSize()
  1929. {
  1930. return true;
  1931. }
  1932. unsigned CBitfieldInfo::queryBitfieldPackSize() const
  1933. {
  1934. const CBitfieldContainerInfo * packing = static_cast<const CBitfieldContainerInfo *>(container);
  1935. return packing->queryStorageType()->getSize();
  1936. }
  1937. void CBitfieldInfo::setBitOffset(unsigned _bitOffset)
  1938. {
  1939. bitOffset = _bitOffset;
  1940. }
  1941. void CBitfieldInfo::setColumn(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * value)
  1942. {
  1943. ITypeInfo * columnType = queryType();
  1944. ITypeInfo * storageType = queryStorageType();
  1945. OwnedHqlExpr address = getColumnAddress(translator, ctx, selector, storageType, 0);
  1946. IHqlExpression * columnRef = convertAddressToValue(address, storageType);
  1947. unsigned bitSize = columnType->getBitSize();
  1948. unsigned __int64 mask = (((unsigned __int64)1)<<bitSize)-1;
  1949. unsigned __int64 shiftMask = (((unsigned __int64)1)<<(bitSize+bitOffset)) - (((unsigned __int64)1)<<bitOffset);
  1950. IValue * oldMaskValue = storageType->castFrom(false, (__int64)shiftMask);
  1951. IHqlExpression * oldMask = createConstant(oldMaskValue);
  1952. IHqlExpression * transColumn = createTranslatedOwned(columnRef);
  1953. IHqlExpression * oldValue = createValue(no_band, transColumn, createValue(no_bnot,oldMask));
  1954. IValue * newMaskValue = storageType->castFrom(false, (__int64)mask);
  1955. IHqlExpression * newMask = createConstant(newMaskValue);
  1956. OwnedHqlExpr newValue = createValue(no_band, LINK(storageType), LINK(value), newMask);
  1957. if (bitOffset > 0)
  1958. newValue.setown(createValue(no_lshift, LINK(storageType), newValue.getClear(), getSizetConstant(bitOffset)));
  1959. if (newValue->isConstant())
  1960. newValue.setown(foldHqlExpression(newValue, 0, 0));
  1961. OwnedHqlExpr final = createValue(no_bor, LINK(storageType), oldValue, newValue.getClear());
  1962. CHqlBoundTarget boundTarget;
  1963. boundTarget.expr.set(columnRef);
  1964. translator.buildExprAssign(ctx, boundTarget, final);
  1965. }
  1966. //---------------------------------------------------------------------------
  1967. CVirtualColumnInfo::CVirtualColumnInfo(CContainerInfo * _container, CMemberInfo * _prior, IHqlExpression * _column) : CColumnInfo(_container, _prior, _column)
  1968. {
  1969. }
  1970. void CVirtualColumnInfo::buildAddress(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, CHqlBoundExpr & bound)
  1971. {
  1972. UNIMPLEMENTED;
  1973. }
  1974. IHqlExpression * CVirtualColumnInfo::buildSizeOfUnbound(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector)
  1975. {
  1976. return getSizetConstant(0);
  1977. }
  1978. void CVirtualColumnInfo::gatherSize(SizeStruct & target)
  1979. {
  1980. //Zero size
  1981. }
  1982. bool CVirtualColumnInfo::isFixedSize()
  1983. {
  1984. return true;
  1985. }
  1986. void CVirtualColumnInfo::buildColumnExpr(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, CHqlBoundExpr & bound)
  1987. {
  1988. IHqlExpression * virtualAttr = column->queryProperty(virtualAtom);
  1989. OwnedHqlExpr value = getVirtualReplacement(column, virtualAttr->queryChild(0), selector->queryRootRow()->querySelector());
  1990. OwnedHqlExpr cast = ensureExprType(value, column->queryType()->queryPromotedType());
  1991. translator.buildExpr(ctx, cast, bound);
  1992. }
  1993. void CVirtualColumnInfo::setColumn(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * value)
  1994. {
  1995. UNIMPLEMENTED;
  1996. }
  1997. //---------------------------------------------------------------------------
  1998. //******* For CSV the offset is the field number, not a byte offset ***********
  1999. CCsvColumnInfo::CCsvColumnInfo(CContainerInfo * _container, CMemberInfo * _prior, IHqlExpression * _column, _ATOM _encoding) : CColumnInfo(_container, _prior, _column)
  2000. {
  2001. encoding = _encoding;
  2002. }
  2003. void CCsvColumnInfo::buildAddress(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, CHqlBoundExpr & bound)
  2004. {
  2005. UNIMPLEMENTED;
  2006. }
  2007. IHqlExpression * CCsvColumnInfo::buildSizeOfUnbound(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector)
  2008. {
  2009. return getSizetConstant(1);
  2010. }
  2011. void CCsvColumnInfo::gatherSize(SizeStruct & target)
  2012. {
  2013. if (isConditional())
  2014. addVariableSize(1, target);
  2015. else
  2016. target.addFixed(1);
  2017. }
  2018. bool CCsvColumnInfo::isFixedSize()
  2019. {
  2020. return true;
  2021. }
  2022. void CCsvColumnInfo::getName(HqlCppTranslator & translator, BuildCtx & ctx, StringBuffer & out, const char * prefix, IReferenceSelector * selector)
  2023. {
  2024. CHqlBoundExpr boundIndex;
  2025. buildOffset(translator, ctx, selector, boundIndex);
  2026. BoundRow * cursor = selector->queryRootRow();
  2027. out.append(prefix);
  2028. cursor->queryBound()->toString(out);
  2029. out.append("[");
  2030. translator.generateExprCpp(out, boundIndex.expr).append("]");
  2031. }
  2032. void CCsvColumnInfo::buildColumnAssign(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, const CHqlBoundTarget & target)
  2033. {
  2034. OwnedHqlExpr value = getColumnExpr(translator, ctx, selector);
  2035. translator.buildExprAssign(ctx, target, value);
  2036. }
  2037. void CCsvColumnInfo::buildColumnExpr(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, CHqlBoundExpr & bound)
  2038. {
  2039. OwnedHqlExpr value = getColumnExpr(translator, ctx, selector);
  2040. translator.buildExpr(ctx, value, bound);
  2041. }
  2042. IHqlExpression * CCsvColumnInfo::getColumnExpr(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector)
  2043. {
  2044. StringBuffer lenText, dataText;
  2045. getName(translator, ctx, lenText, "len", selector);
  2046. getName(translator, ctx, dataText, "data", selector);
  2047. Owned<ITypeInfo> type = makeStringType(UNKNOWN_LENGTH, NULL, NULL);
  2048. ITypeInfo * columnType = column->queryType();
  2049. if (encoding == NULL)
  2050. {
  2051. //This is slightly weird legacy semantics - treat the input as UTF8 if a unicode field is used.
  2052. if (isUnicodeType(columnType))
  2053. type.setown(makeUtf8Type(UNKNOWN_LENGTH, NULL));
  2054. }
  2055. else if (encoding == ebcdicAtom || encoding == asciiAtom)
  2056. {
  2057. type.setown(makeStringType(UNKNOWN_LENGTH, getCharset(encoding), NULL));
  2058. }
  2059. else if (encoding == unicodeAtom)
  2060. {
  2061. type.setown(makeUtf8Type(UNKNOWN_LENGTH, NULL));
  2062. }
  2063. type.setown(makeReferenceModifier(type.getClear()));
  2064. if (isUnicodeType(type))
  2065. {
  2066. //This is an ugly fix to change the size to the number of utf8-characters.
  2067. //Better would be to either perform the mapping (and validation) in the engines, or
  2068. //give it a string of encoding utf8 and extend the code generator to correctly handle those
  2069. //string/unicode conversions by using the codepage to codepage mapping function.
  2070. StringBuffer temp;
  2071. temp.appendf("rtlUtf8Length(%s,%s)", lenText.str(), dataText.str());
  2072. lenText.swapWith(temp);
  2073. }
  2074. OwnedHqlExpr length = createQuoted(lenText.str(), LINK(sizetType));
  2075. OwnedHqlExpr data = createQuoted(dataText.str(), type.getClear());
  2076. OwnedHqlExpr value = createTranslated(data, length);
  2077. if (columnType->getTypeCode() == type_boolean)
  2078. {
  2079. HqlExprArray args;
  2080. args.append(*LINK(value));
  2081. value.setown(translator.bindFunctionCall(csvStr2BoolAtom,args));
  2082. }
  2083. else
  2084. value.setown(ensureExprType(value, columnType));
  2085. return value.getClear();
  2086. }
  2087. void CCsvColumnInfo::setColumn(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * value)
  2088. {
  2089. UNIMPLEMENTED;
  2090. }
  2091. //---------------------------------------------------------------------------
  2092. static _ATOM getXmlReadFunction(ITypeInfo * type, bool hasDefault)
  2093. {
  2094. type = type->queryPromotedType();
  2095. if (hasDefault)
  2096. {
  2097. switch (type->getTypeCode())
  2098. {
  2099. case type_unicode:
  2100. case type_varunicode:
  2101. return columnReadUnicodeXAtom;
  2102. case type_utf8:
  2103. return columnReadUtf8XAtom;
  2104. case type_int:
  2105. case type_swapint:
  2106. case type_packedint:
  2107. return columnReadIntAtom;
  2108. case type_data:
  2109. return columnReadDataXAtom;
  2110. case type_boolean:
  2111. return columnReadBoolAtom;
  2112. default:
  2113. return columnReadStringXAtom;
  2114. }
  2115. }
  2116. else
  2117. {
  2118. switch (type->getTypeCode())
  2119. {
  2120. case type_unicode:
  2121. case type_varunicode:
  2122. return columnGetUnicodeXAtom;
  2123. case type_utf8:
  2124. return columnGetUtf8XAtom;
  2125. case type_int:
  2126. case type_swapint:
  2127. case type_packedint:
  2128. return columnGetIntAtom;
  2129. case type_data:
  2130. return columnGetDataXAtom;
  2131. case type_boolean:
  2132. return columnGetBoolAtom;
  2133. default:
  2134. return columnGetStringXAtom;
  2135. }
  2136. }
  2137. }
  2138. CXmlColumnInfo::CXmlColumnInfo(CContainerInfo * _container, CMemberInfo * _prior, IHqlExpression * _column) : CColumnInfo(_container, _prior, _column)
  2139. {
  2140. }
  2141. void CXmlColumnInfo::buildAddress(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, CHqlBoundExpr & bound)
  2142. {
  2143. UNIMPLEMENTED;
  2144. }
  2145. IHqlExpression * CXmlColumnInfo::buildSizeOfUnbound(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector)
  2146. {
  2147. UNIMPLEMENTED;
  2148. }
  2149. void CXmlColumnInfo::gatherSize(SizeStruct & target)
  2150. {
  2151. addVariableSize(0, target);
  2152. }
  2153. bool CXmlColumnInfo::isFixedSize()
  2154. {
  2155. return false;
  2156. }
  2157. void CXmlColumnInfo::buildFixedStringAssign(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, const CHqlBoundTarget & target, IHqlExpression * defaultValue, _ATOM func)
  2158. {
  2159. StringBuffer row,path;
  2160. selector->queryRootRow()->queryBound()->toString(row);
  2161. getXPath(path);
  2162. translator.noteXpathUsed(path);
  2163. HqlExprArray args;
  2164. args.append(*createQuoted(row, makeBoolType()));
  2165. args.append(*target.getTranslatedExpr());
  2166. args.append(*createConstant(path.str()));
  2167. if (defaultValue)
  2168. args.append(*LINK(defaultValue));
  2169. OwnedHqlExpr call = translator.bindFunctionCall(func, args);
  2170. translator.buildStmt(ctx, call);
  2171. }
  2172. void CXmlColumnInfo::buildColumnAssign(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, const CHqlBoundTarget & target)
  2173. {
  2174. Linked<ITypeInfo> type = queryPhysicalType();
  2175. if (type->getSize() != UNKNOWN_LENGTH)
  2176. {
  2177. _ATOM func = NULL;
  2178. IHqlExpression * defaultValue = queryPropertyChild(column, xmlDefaultAtom, 0);
  2179. switch (type->getTypeCode())
  2180. {
  2181. case type_string:
  2182. if (type->queryCharset()->queryName() == asciiAtom)
  2183. func = defaultValue ? columnReadStringAtom : columnGetStringAtom;
  2184. break;
  2185. case type_data:
  2186. func = defaultValue ? columnReadDataAtom : columnGetDataAtom;
  2187. break;
  2188. case type_qstring:
  2189. func = defaultValue ? columnReadQStringAtom : columnGetQStringAtom;
  2190. break;
  2191. }
  2192. if (func)
  2193. {
  2194. buildFixedStringAssign(translator, ctx, selector, target, defaultValue, func);
  2195. return;
  2196. }
  2197. }
  2198. OwnedHqlExpr call = getCallExpr(translator, ctx, selector);
  2199. translator.buildExprAssign(ctx, target, call);
  2200. }
  2201. void CXmlColumnInfo::buildColumnExpr(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, CHqlBoundExpr & bound)
  2202. {
  2203. OwnedHqlExpr call = getCallExpr(translator, ctx, selector);
  2204. translator.buildExpr(ctx, call, bound);
  2205. }
  2206. void HqlCppTranslator::buildXmlReadChildrenIterator(BuildCtx & ctx, const char * iterTag, IHqlExpression * rowName, SharedHqlExpr & subRowExpr)
  2207. {
  2208. StringBuffer s, iterName, subRowName;
  2209. unique_id_t id = getUniqueId();
  2210. appendUniqueId(iterName.append("iter"), id);
  2211. appendUniqueId(subRowName.append("row"), id);
  2212. //XmlChildIterator iterNNN;
  2213. s.clear().append("XmlChildIterator ").append(iterName).append(";");
  2214. ctx.addQuoted(s);
  2215. //iterNN.init(row->getChildIterator("Name/Row"))
  2216. s.clear().append(iterName).append(".initOwn(");
  2217. generateExprCpp(s, rowName).append("->getChildIterator(");
  2218. s.append("\"");
  2219. if (iterTag)
  2220. appendStringAsCPP(s, strlen(iterTag), iterTag, false);
  2221. s.append("\"));");
  2222. ctx.addQuoted(s);
  2223. //IColumnProvider * rowNNN;
  2224. s.clear().append("IColumnProvider * ").append(subRowName).append(";");
  2225. ctx.addQuoted(s);
  2226. //rowNNN = iterNN.first();
  2227. s.clear().append(subRowName).append(" = ").append(iterName).append(".first();");
  2228. ctx.addQuoted(s);
  2229. s.clear().append(subRowName).append(" = ").append(iterName).append(".next()");
  2230. OwnedHqlExpr nextExpr = createQuoted(s.str(), makeVoidType());
  2231. //<Name><Row><.....fields.....></Row>
  2232. subRowExpr.setown(createQuoted(subRowName, makeBoolType()));
  2233. ctx.addLoop(subRowExpr, nextExpr, false);
  2234. }
  2235. IHqlExpression * CXmlColumnInfo::getXmlDatasetExpr(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector)
  2236. {
  2237. IHqlExpression * expr = column;
  2238. IHqlExpression * rowName = selector->queryRootRow()->queryBound();
  2239. StringBuffer prefix;
  2240. if (container)
  2241. container->getContainerXPath(prefix);
  2242. StringBuffer s;
  2243. StringBuffer fieldTag, rowTag, iterTag;
  2244. extractXmlName(fieldTag, &rowTag, NULL, expr, "Row", true);
  2245. iterTag.append(prefix);
  2246. if (fieldTag.length())
  2247. iterTag.append(fieldTag).append("/");
  2248. iterTag.append(rowTag);
  2249. //Create the builder for generating a temporary set.
  2250. IHqlExpression * record = expr->queryRecord();
  2251. Owned<IHqlCppDatasetBuilder> builder;
  2252. if (recordRequiresSerialization(expr->queryRecord()) || translator.queryOptions().tempDatasetsUseLinkedRows)
  2253. builder.setown(translator.createLinkedDatasetBuilder(record));
  2254. else
  2255. builder.setown(translator.createBlockedDatasetBuilder(record));
  2256. builder->buildDeclare(ctx);
  2257. //Generate the code to process a child iterator
  2258. OwnedHqlExpr subRowExpr;
  2259. BuildCtx loopctx(ctx);
  2260. translator.buildXmlReadChildrenIterator(loopctx, iterTag.str(), rowName, subRowExpr);
  2261. BoundRow * targetRow = builder->buildCreateRow(loopctx);
  2262. IHqlExpression * path = selector->queryExpr();
  2263. StringBuffer subPrefix;
  2264. BoundRow * selfCursor = translator.bindSelf(loopctx, path, targetRow->queryBound(), targetRow->queryBuilder());
  2265. BoundRow * srcCursor = translator.bindXmlTableCursor(loopctx, path, subRowExpr, no_none, NULL, false);
  2266. OwnedHqlExpr active = ensureActiveRow(path);
  2267. translator.buildAssign(loopctx, selfCursor->querySelector(), active);
  2268. translator.finishSelf(loopctx, selfCursor, targetRow);
  2269. builder->finishRow(loopctx, targetRow);
  2270. CHqlBoundTarget temp;
  2271. translator.createTempFor(ctx, expr, temp);
  2272. builder->buildFinish(ctx, temp);
  2273. return temp.getTranslatedExpr();
  2274. }
  2275. IHqlExpression * CXmlColumnInfo::getXmlSetExpr(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector)
  2276. {
  2277. IHqlExpression * expr = column;
  2278. IHqlExpression * rowName = selector->queryRootRow()->queryBound();
  2279. StringBuffer prefix;
  2280. if (container)
  2281. container->getContainerXPath(prefix);
  2282. ITypeInfo * elementType = expr->queryType()->queryChildType();
  2283. StringBuffer s;
  2284. StringBuffer fieldTag, itemTag, valueTag, iterTag, fullFieldPath;
  2285. extractXmlName(fieldTag, &itemTag, &valueTag, expr, "Item", true);
  2286. fullFieldPath.append(prefix).append(fieldTag);
  2287. iterTag.append(prefix);
  2288. if (fieldTag.length() != 0)
  2289. iterTag.append(fieldTag).append("/");
  2290. iterTag.append(itemTag);
  2291. bool checkForAll = (fieldTag.length() != 0);
  2292. //Create the builder for generating a temporary set.
  2293. CHqlBoundTarget temp;
  2294. translator.createTempFor(ctx, expr, temp);
  2295. Owned<IHqlCppSetBuilder> builder = translator.createTempSetBuilder(elementType, temp.isAll);
  2296. builder->buildDeclare(ctx);
  2297. LinkedHqlExpr defaultValue = queryPropertyChild(column, xmlDefaultAtom, 0);
  2298. bool defaultIsAllValue = defaultValue && (defaultValue->getOperator() == no_all);
  2299. if (checkForAll)
  2300. {
  2301. //assign isAll...
  2302. HqlExprArray isAllArgs;
  2303. isAllArgs.append(*LINK(rowName));
  2304. isAllArgs.append(*createConstant(fullFieldPath.str()));
  2305. if (defaultValue)
  2306. isAllArgs.append(*createConstant(defaultIsAllValue));
  2307. OwnedHqlExpr isAll = translator.bindFunctionCall(defaultValue ? columnReadSetIsAllAtom : columnGetSetIsAllAtom, isAllArgs);
  2308. builder->setAll(ctx, isAll);
  2309. }
  2310. else
  2311. builder->setAll(ctx, queryBoolExpr(false));
  2312. //Generate the code to process a child iterator
  2313. OwnedHqlExpr subRowExpr;
  2314. BuildCtx loopctx(ctx);
  2315. translator.buildXmlReadChildrenIterator(loopctx, iterTag.str(), rowName, subRowExpr);
  2316. HqlExprArray args;
  2317. args.append(*LINK(subRowExpr));
  2318. args.append(*createConstant(valueTag.str()));
  2319. OwnedHqlExpr call = translator.bindFunctionCall(getXmlReadFunction(elementType, false), args);
  2320. Owned<IReferenceSelector> elemselector = builder->buildCreateElement(loopctx);
  2321. elemselector->set(loopctx, call);
  2322. builder->finishElement(loopctx);
  2323. builder->buildFinish(ctx, temp);
  2324. return temp.getTranslatedExpr();
  2325. }
  2326. IHqlExpression * CXmlColumnInfo::getCallExpr(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector)
  2327. {
  2328. Linked<ITypeInfo> type = queryPhysicalType();
  2329. _ATOM func = NULL;
  2330. IHqlExpression * defaultValue = queryPropertyChild(column, xmlDefaultAtom, 0);
  2331. switch (type->getTypeCode())
  2332. {
  2333. case type_table:
  2334. case type_groupedtable:
  2335. return getXmlDatasetExpr(translator, ctx, selector);
  2336. case type_set:
  2337. return getXmlSetExpr(translator, ctx, selector);
  2338. case type_string:
  2339. if ((type->getSize() != UNKNOWN_LENGTH) && type->queryCharset()->queryName() == asciiAtom)
  2340. func = defaultValue ? columnReadStringAtom : columnGetStringAtom;
  2341. break;
  2342. case type_data:
  2343. if (type->getSize() != UNKNOWN_LENGTH)
  2344. func = defaultValue ? columnReadDataAtom : columnGetDataAtom;
  2345. break;
  2346. case type_qstring:
  2347. if (type->getSize() != UNKNOWN_LENGTH)
  2348. func = defaultValue ? columnReadQStringAtom : columnGetQStringAtom;
  2349. break;
  2350. }
  2351. if (func)
  2352. {
  2353. CHqlBoundTarget tempTarget;
  2354. translator.createTempFor(ctx, type, tempTarget, typemod_none, FormatNatural);
  2355. buildFixedStringAssign(translator, ctx, selector, tempTarget, defaultValue, func);
  2356. return tempTarget.getTranslatedExpr();
  2357. }
  2358. StringBuffer row,path;
  2359. selector->queryRootRow()->queryBound()->toString(row);
  2360. getXPath(path);
  2361. translator.noteXpathUsed(path);
  2362. HqlExprArray args;
  2363. args.append(*createQuoted(row, makeBoolType()));
  2364. args.append(*createConstant(path.str()));
  2365. if (defaultValue)
  2366. args.append(*LINK(defaultValue));
  2367. OwnedHqlExpr call = translator.bindFunctionCall(getXmlReadFunction(type, defaultValue != NULL), args);
  2368. return ensureExprType(call, type);
  2369. }
  2370. void CXmlColumnInfo::setColumn(HqlCppTranslator & translator, BuildCtx & ctx, IReferenceSelector * selector, IHqlExpression * value)
  2371. {
  2372. UNIMPLEMENTED;
  2373. }
  2374. //---------------------------------------------------------------------------
  2375. inline int doAlign(unsigned value, unsigned align) { return (value + align-1) & ~(align-1); }
  2376. ColumnToOffsetMap::ColumnToOffsetMap(IHqlExpression * _record, unsigned _packing, unsigned _maxRecordSize, bool _translateVirtuals) : root(NULL, NULL, _record)
  2377. {
  2378. record = _record;
  2379. prior = NULL;
  2380. maxAlign = _packing;
  2381. packing = _packing;
  2382. fixedSizeRecord = true;
  2383. translateVirtuals = _translateVirtuals;
  2384. defaultMaxRecordSize = _maxRecordSize;
  2385. containsIfBlock = false;
  2386. cachedDefaultMaxSizeUsed = false;
  2387. cachedMaxSize = UNKNOWN_LENGTH;
  2388. root.setOffset(false);
  2389. }
  2390. void ColumnToOffsetMap::init(RecordOffsetMap & map)
  2391. {
  2392. expandRecord(record, &root, map);
  2393. }
  2394. void ColumnToOffsetMap::completeActiveBitfields()
  2395. {
  2396. if (prior)
  2397. prior->noteLastBitfield();
  2398. packer.reset();
  2399. }
  2400. CMemberInfo * ColumnToOffsetMap::addColumn(CContainerInfo * container, IHqlExpression * column, RecordOffsetMap & map)
  2401. {
  2402. CMemberInfo * created = NULL;
  2403. switch (column->getOperator())
  2404. {
  2405. case no_attr:
  2406. case no_attr_expr:
  2407. case no_attr_link:
  2408. if (column->queryName() == packingAtom)
  2409. packing = (unsigned)column->queryChild(0)->queryValue()->getIntValue();
  2410. break;
  2411. case no_record:
  2412. completeActiveBitfields();
  2413. return expandRecord(column, container, map);
  2414. case no_ifblock:
  2415. {
  2416. completeActiveBitfields();
  2417. CIfBlockInfo * next = new CIfBlockInfo(container, prior, column);
  2418. next->setOffset(!fixedSizeRecord);
  2419. expandRecord(column->queryChild(1), next, map);
  2420. created = next;
  2421. containsIfBlock = true;
  2422. }
  2423. break;
  2424. default:
  2425. {
  2426. if (column->queryType()->getTypeCode() != type_bitfield)
  2427. completeActiveBitfields();
  2428. if (translateVirtuals && column->hasProperty(virtualAtom) && (column->queryType()->getSize() != UNKNOWN_LENGTH))
  2429. created = new CVirtualColumnInfo(container, prior, column);
  2430. else
  2431. created = createColumn(container, column, map);
  2432. break;
  2433. }
  2434. }
  2435. if (created)
  2436. {
  2437. container->addChild(created);
  2438. prior = created;
  2439. }
  2440. return created;
  2441. }
  2442. bool ColumnToOffsetMap::buildReadAhead(HqlCppTranslator & translator, BuildCtx & ctx, IHqlExpression * helper)
  2443. {
  2444. //prepare() allows Ifblock and a count/size on a dataset to tag the fields they depend on which need to be read.
  2445. //The fallback (implemented in base class) is to call deserialize on a temporary row instead. Ugly, but better than failing.
  2446. ReadAheadState state(helper);
  2447. if (queryRootColumn()->prepareReadAhead(translator, state))
  2448. {
  2449. state.addDummyMappings();
  2450. return queryRootColumn()->buildReadAhead(translator, ctx, state);
  2451. }
  2452. return false;
  2453. }
  2454. CMemberInfo * ColumnToOffsetMap::createColumn(CContainerInfo * container, IHqlExpression * column, RecordOffsetMap & map)
  2455. {
  2456. ITypeInfo * type = column->queryType();
  2457. ITypeInfo * promoted = type->queryPromotedType();
  2458. unsigned align = promoted ? promoted->getAlignment() : 1;
  2459. if (align > packing)
  2460. align = packing;
  2461. if (align > maxAlign)
  2462. maxAlign = align;
  2463. bool isFixedOffset = !fixedSizeRecord;
  2464. CMemberInfo * created = NULL;
  2465. switch (type->getTypeCode())
  2466. {
  2467. //MORE: Alien types could be based on bitfields. If so need a column as a child
  2468. //of the alien column representing the stored value.....
  2469. case type_bitfield:
  2470. {
  2471. CBitfieldContainerInfo * bitContainer;
  2472. unsigned thisBitOffset, thisBits;
  2473. if (!packer.checkSpaceAvailable(thisBitOffset, thisBits, type))
  2474. {
  2475. if (prior)
  2476. prior->noteLastBitfield();
  2477. ITypeInfo * storeType = type->queryChildType();
  2478. OwnedHqlExpr value = createValue(no_field, LINK(storeType));
  2479. bitContainer = new CBitfieldContainerInfo(container, prior, value);
  2480. bitContainer->setOffset(!fixedSizeRecord);
  2481. }
  2482. else
  2483. bitContainer = (CBitfieldContainerInfo *)prior;
  2484. CBitfieldInfo & entry = * new CBitfieldInfo(bitContainer, bitContainer->lastBitfield(), column);
  2485. entry.setBitOffset(thisBitOffset);
  2486. bitContainer->addChild(&entry);
  2487. if (bitContainer != prior)
  2488. created = bitContainer;
  2489. break;
  2490. }
  2491. case type_row:
  2492. {
  2493. if (hasReferenceModifier(type))
  2494. created = new CColumnInfo(container, prior, column);
  2495. else
  2496. {
  2497. CRecordInfo * next = new CRecordInfo(container, prior, column);
  2498. expandRecord(column->queryRecord(), next, map);
  2499. created = next;
  2500. }
  2501. break;
  2502. }
  2503. case type_groupedtable:
  2504. case type_table:
  2505. {
  2506. IHqlExpression * count = NULL;
  2507. IHqlExpression * size = NULL;
  2508. ForEachChild(i, column)
  2509. {
  2510. IHqlExpression * cur = column->queryChild(i);
  2511. if (cur->isAttribute())
  2512. {
  2513. _ATOM name = cur->queryName();
  2514. if (name == countAtom)
  2515. count = cur->queryChild(0);
  2516. else if (name == sizeofAtom)
  2517. size = cur->queryChild(0);
  2518. }
  2519. }
  2520. if (column->hasProperty(_linkCounted_Atom))
  2521. created = new CChildLinkedDatasetColumnInfo(container, prior, column, map, defaultMaxRecordSize);
  2522. else if (count || size)
  2523. created = new CChildLimitedDatasetColumnInfo(container, prior, column, map, defaultMaxRecordSize);
  2524. else
  2525. created = new CChildDatasetColumnInfo(container, prior, column, map, defaultMaxRecordSize);
  2526. break;
  2527. }
  2528. case type_string:
  2529. case type_data:
  2530. case type_unicode:
  2531. case type_qstring:
  2532. case type_utf8:
  2533. if (type->getSize() == UNKNOWN_LENGTH)
  2534. created = new CSpecialStringColumnInfo(container, prior, column);
  2535. else
  2536. created = new CColumnInfo(container, prior, column);
  2537. break;
  2538. case type_varstring:
  2539. case type_varunicode:
  2540. if (type->getSize() == UNKNOWN_LENGTH)
  2541. created = new CSpecialVStringColumnInfo(container, prior, column);
  2542. else
  2543. created = new CColumnInfo(container, prior, column);
  2544. break;
  2545. case type_int:
  2546. case type_swapint:
  2547. switch (type->getSize())
  2548. {
  2549. case 1: case 2: case 4: case 8:
  2550. created = new CColumnInfo(container, prior, column);
  2551. break;
  2552. default:
  2553. created = new CSpecialIntColumnInfo(container, prior, column);
  2554. break;
  2555. }
  2556. break;
  2557. case type_packedint:
  2558. created = new CPackedIntColumnInfo(container, prior, column);
  2559. break;
  2560. case type_set:
  2561. created = new CChildSetColumnInfo(container, prior, column);
  2562. break;
  2563. default:
  2564. {
  2565. if (type->getTypeCode() == type_alien)
  2566. created = new CAlienColumnInfo(container, prior, column);
  2567. else
  2568. created = new CColumnInfo(container, prior, column);
  2569. break;
  2570. }
  2571. }
  2572. if (created)
  2573. created->setOffset(isFixedOffset);
  2574. return created;
  2575. }
  2576. unsigned ColumnToOffsetMap::getFixedRecordSize()
  2577. {
  2578. SizeStruct size;
  2579. root.getSizeExpr(size);
  2580. assertex(size.isFixedSize());
  2581. return size.getFixedSize();
  2582. }
  2583. AColumnInfo * ColumnToOffsetMap::queryRootColumn()
  2584. {
  2585. return &root;
  2586. }
  2587. void ColumnToOffsetMap::ensureMaxSizeCached()
  2588. {
  2589. if (cachedMaxSize == UNKNOWN_LENGTH)
  2590. {
  2591. bool isKnownSize;
  2592. cachedMaxSize = getMaxRecordSize(record, defaultMaxRecordSize, isKnownSize, cachedDefaultMaxSizeUsed);
  2593. }
  2594. }
  2595. void ColumnToOffsetMap::checkValidMaxSize()
  2596. {
  2597. ensureMaxSizeCached();
  2598. if (!cachedDefaultMaxSizeUsed)
  2599. return;
  2600. StringBuffer s;
  2601. getExprECL(record, s);
  2602. throwError1(HQLERR_MaxLengthNotSetOnRecord, s.str());
  2603. }
  2604. unsigned ColumnToOffsetMap::getMaxSize()
  2605. {
  2606. ensureMaxSizeCached();
  2607. return cachedMaxSize;
  2608. }
  2609. bool ColumnToOffsetMap::isMaxSizeSpecified()
  2610. {
  2611. if (isFixedWidth())
  2612. return true;
  2613. ensureMaxSizeCached();
  2614. return !cachedDefaultMaxSizeUsed;
  2615. }
  2616. CMemberInfo * ColumnToOffsetMap::expandRecord(IHqlExpression * record, CContainerInfo * container, RecordOffsetMap & map)
  2617. {
  2618. assertex(record->getOperator() == no_record);
  2619. unsigned max = record->numChildren();
  2620. unsigned idx;
  2621. bool fixedSize = true;
  2622. prior = NULL;
  2623. for (idx = 0; idx < max; idx++)
  2624. {
  2625. CMemberInfo * created = addColumn(container, record->queryChild(idx), map);
  2626. if (created)
  2627. {
  2628. if (!created->isFixedSize())
  2629. {
  2630. fixedSize = false;
  2631. fixedSizeRecord = false;
  2632. }
  2633. }
  2634. }
  2635. container->setFixedSize(fixedSize);
  2636. completeActiveBitfields();
  2637. return prior;
  2638. }
  2639. DynamicColumnToOffsetMap::DynamicColumnToOffsetMap(unsigned _maxRecordSize) : ColumnToOffsetMap(queryNullRecord(), 0, _maxRecordSize, false)
  2640. {
  2641. root.setDynamic();
  2642. fixedSizeRecord = false;
  2643. }
  2644. void DynamicColumnToOffsetMap::addColumn(IHqlExpression * column, RecordOffsetMap & map)
  2645. {
  2646. CMemberInfo * created = ColumnToOffsetMap::addColumn(&root, column, map);
  2647. if (created)
  2648. {
  2649. //MORE: Check if fixed size... possibly...
  2650. }
  2651. }
  2652. //---------------------------------------------------------------------------
  2653. static bool cachedCanReadFromCsv(IHqlExpression * record)
  2654. {
  2655. record = record->queryBody();
  2656. if (record->queryTransformExtra())
  2657. return true;
  2658. record->setTransformExtra(record);
  2659. ForEachChild(i, record)
  2660. {
  2661. IHqlExpression * cur = record->queryChild(i);
  2662. switch (cur->getOperator())
  2663. {
  2664. case no_ifblock:
  2665. if (!cachedCanReadFromCsv(cur->queryChild(1)))
  2666. return false;
  2667. break;
  2668. case no_record:
  2669. if (!cachedCanReadFromCsv(cur))
  2670. return false;
  2671. break;
  2672. case no_field:
  2673. {
  2674. ITypeInfo * type = cur->queryType();
  2675. switch (type->getTypeCode())
  2676. {
  2677. case type_row:
  2678. if (!cachedCanReadFromCsv(cur->queryRecord()))
  2679. return false;
  2680. break;
  2681. case type_table:
  2682. case type_groupedtable:
  2683. case type_set:
  2684. return false;
  2685. }
  2686. break;
  2687. }
  2688. }
  2689. }
  2690. return true;
  2691. }
  2692. bool canReadFromCsv(IHqlExpression * record)
  2693. {
  2694. TransformMutexBlock block;
  2695. return cachedCanReadFromCsv(record);
  2696. }
  2697. CsvColumnToOffsetMap::CsvColumnToOffsetMap(IHqlExpression * _record, unsigned _maxRecordSize, bool _translateVirtuals, _ATOM _encoding) : ColumnToOffsetMap(_record, 1, _maxRecordSize, _translateVirtuals)
  2698. {
  2699. encoding = _encoding;
  2700. }
  2701. CMemberInfo * CsvColumnToOffsetMap::createColumn(CContainerInfo * container, IHqlExpression * column, RecordOffsetMap & map)
  2702. {
  2703. CMemberInfo * created = NULL;
  2704. ITypeInfo * type = column->queryType();
  2705. switch (type->getTypeCode())
  2706. {
  2707. case type_row:
  2708. {
  2709. Owned<CRecordInfo> next = new CRecordInfo(container, prior, column);
  2710. expandRecord(column->queryRecord(), next, map);
  2711. created = next.getClear();
  2712. break;
  2713. }
  2714. case type_table:
  2715. case type_groupedtable:
  2716. case type_set:
  2717. throwError(HQLERR_CsvNotSupportTableSet);
  2718. break;
  2719. default:
  2720. created = new CCsvColumnInfo(container, prior, column, encoding);
  2721. break;
  2722. }
  2723. return created;
  2724. }
  2725. //---------------------------------------------------------------------------
  2726. XmlColumnToOffsetMap::XmlColumnToOffsetMap(IHqlExpression * _record, unsigned _maxRecordSize, bool _translateVirtuals) : ColumnToOffsetMap(_record, 1, _maxRecordSize, _translateVirtuals)
  2727. {
  2728. }
  2729. CMemberInfo * XmlColumnToOffsetMap::createColumn(CContainerInfo * container, IHqlExpression * column, RecordOffsetMap & map)
  2730. {
  2731. CMemberInfo * created = NULL;
  2732. ITypeInfo * type = column->queryType();
  2733. switch (type->getTypeCode())
  2734. {
  2735. case type_row:
  2736. {
  2737. CRecordInfo * next = new CRecordInfo(container, prior, column);
  2738. expandRecord(column->queryRecord(), next, map);
  2739. created = next;
  2740. break;
  2741. }
  2742. default:
  2743. created = new CXmlColumnInfo(container, prior, column);
  2744. break;
  2745. }
  2746. return created;
  2747. }
  2748. //---------------------------------------------------------------------------
  2749. BoundRow::BoundRow(const BoundRow & other, IHqlExpression * _newBound) : HqlExprAssociation(other.represents)
  2750. {
  2751. dataset.set(other.dataset);
  2752. bound.set(_newBound ? _newBound : other.bound.get());
  2753. columnMap = LINK(other.columnMap);
  2754. conditional = other.conditional;
  2755. side = other.side;
  2756. kind = other.kind;
  2757. assertex(bound->queryType()->getTypeCode() != type_void);
  2758. resultAlias = false;
  2759. inherited = other.inherited;
  2760. }
  2761. BoundRow::BoundRow(IHqlExpression * _dataset, IHqlExpression * _bound, ColumnToOffsetMap * _columnMap) : HqlExprAssociation(_dataset)
  2762. {
  2763. assertex(_columnMap);
  2764. dataset.set(_dataset);
  2765. bound.set(_bound);
  2766. columnMap = LINK(_columnMap);
  2767. conditional = false;
  2768. side = no_none;
  2769. kind = AssocRow;
  2770. assertex(bound->queryType()->getTypeCode() != type_void);
  2771. resultAlias = false;
  2772. inherited = false;
  2773. }
  2774. BoundRow::BoundRow(IHqlExpression * _dataset, IHqlExpression * _bound, ColumnToOffsetMap * _columnMap, node_operator _side, IHqlExpression * selSeq) : HqlExprAssociation(NULL)
  2775. {
  2776. assertex(_columnMap);
  2777. dataset.set(_dataset);
  2778. bound.set(_bound);
  2779. columnMap = LINK(_columnMap);
  2780. conditional = false;
  2781. kind = AssocCursor;
  2782. side = _side;
  2783. if (side == no_none)
  2784. represents.set(_dataset->queryNormalizedSelector());
  2785. else if ((side != no_self) || selSeq)
  2786. represents.setown(createSelector(side, dataset, selSeq));
  2787. else
  2788. {
  2789. OwnedHqlExpr uid = createUniqueSelectorSequence();
  2790. represents.setown(createSelector(no_self, dataset, uid));
  2791. }
  2792. assertex(bound->queryType()->getTypeCode() != type_void);
  2793. resultAlias = false;
  2794. inherited = false;
  2795. }
  2796. BoundRow::BoundRow(BoundRow * _row, IHqlExpression * _dataset, node_operator _side, IHqlExpression * selSeq) : HqlExprAssociation(NULL)
  2797. {
  2798. dataset.set(_dataset);
  2799. bound.set(_row->bound);
  2800. columnMap = LINK(_row->columnMap);
  2801. conditional = false;
  2802. kind = AssocCursor;
  2803. side = _side;
  2804. if (side == no_none)
  2805. represents.set(_dataset->queryNormalizedSelector());
  2806. else if ((side != no_self) || selSeq)
  2807. represents.setown(createSelector(side, dataset, selSeq));
  2808. else
  2809. {
  2810. OwnedHqlExpr uid = createUniqueSelectorSequence();
  2811. represents.setown(createSelector(no_self, dataset, uid));
  2812. }
  2813. assertex(bound->queryType()->getTypeCode() != type_void);
  2814. resultAlias = false;
  2815. inherited = false;
  2816. }
  2817. BoundRow::~BoundRow()
  2818. {
  2819. ::Release(columnMap);
  2820. }
  2821. /* In: not linked. Return: linked */
  2822. IHqlExpression * BoundRow::bindToRow(IHqlExpression * expr, IHqlExpression * exprSelector)
  2823. {
  2824. if (kind == AssocCursor)
  2825. {
  2826. OwnedHqlExpr replacement = ensureActiveRow(represents);
  2827. return replaceSelector(expr, exprSelector, replacement);
  2828. }
  2829. OwnedHqlExpr wrapped = createRow(no_newrow, LINK(represents));
  2830. return replaceSelector(expr, exprSelector, wrapped);
  2831. }
  2832. IHqlExpression * BoundRow::getMappedSelector(BuildCtx & ctx, IReferenceSelector * selector)
  2833. {
  2834. return NULL;
  2835. }
  2836. IHqlExpression * BoundRow::getFinalFixedSizeExpr()
  2837. {
  2838. return getSizetConstant(columnMap->getTotalFixedSize());
  2839. }
  2840. bool BoundRow::isBinary()
  2841. {
  2842. return (columnMap->getFormat() == MapFormatBinary);
  2843. }
  2844. IHqlExpression * BoundRow::queryBuilderEnsureMarker()
  2845. {
  2846. if (!builderEnsureMarker)
  2847. builderEnsureMarker.setown(createAttribute(ensureCapacityAtom, LINK(represents)));
  2848. return builderEnsureMarker;
  2849. }
  2850. AColumnInfo * BoundRow::queryRootColumn()
  2851. {
  2852. return columnMap->queryRootColumn();
  2853. }
  2854. unsigned BoundRow::getMaxSize()
  2855. {
  2856. return columnMap->getMaxSize();
  2857. }
  2858. //---------------------------------------------------------------------------
  2859. NonLocalIndirectRow::NonLocalIndirectRow(const BoundRow & other, IHqlExpression * _newBound, SerializationRow * _serialization) : BoundRow(other, _newBound)
  2860. {
  2861. serialization = _serialization;
  2862. }
  2863. IHqlExpression * NonLocalIndirectRow::getMappedSelector(BuildCtx & ctx, IReferenceSelector * selector)
  2864. {
  2865. return serialization->ensureSerialized(ctx, NULL, selector);
  2866. }
  2867. //---------------------------------------------------------------------------
  2868. SerializationRow::SerializationRow(HqlCppTranslator & _translator, IHqlExpression * _dataset, IHqlExpression * _bound, DynamicColumnToOffsetMap * _columnMap, ActivityInstance * _activity) : BoundRow(_dataset, _bound, _columnMap, no_none, NULL), translator(_translator)
  2869. {
  2870. serializedMap = _columnMap;
  2871. extractBuilder = NULL;
  2872. finalFixedSizeExpr.setown(createUnknown(no_callback, LINK(sizetType), sizeAtom, new DelayedSizeGenerator(serializedMap)));
  2873. activity = _activity;
  2874. }
  2875. IHqlExpression * SerializationRow::ensureSerialized(BuildCtx & ctx, IHqlExpression * colocal, IReferenceSelector * selector)
  2876. {
  2877. return ensureSerialized(selector->queryExpr(), colocal, selector->isConditional());
  2878. }
  2879. IHqlExpression * SerializationRow::ensureSerialized(IHqlExpression * path, IHqlExpression * colocal, bool isConditional)
  2880. {
  2881. SharedHqlExpr * mapped = mapping.getValue(path);
  2882. if (mapped)
  2883. return LINK(mapped->get());
  2884. ITypeInfo * pathType = path->queryType();
  2885. Owned<ITypeInfo> unqualifiedType = getFullyUnqualifiedType(pathType);
  2886. Owned<ITypeInfo> serializeType = cloneEssentialFieldModifiers(pathType, unqualifiedType);
  2887. if (colocal && path->isDataset() &&
  2888. (hasLinkedRow(pathType) || (hasOutOfLineModifier(pathType) && translator.queryOptions().tempDatasetsUseLinkedRows)))
  2889. serializeType.setown(setLinkCountedAttr(serializeType, true));
  2890. return addSerializedValue(path, serializeType, colocal, isConditional);
  2891. }
  2892. IHqlExpression * SerializationRow::addSerializedValue(IHqlExpression * path, ITypeInfo * type, IHqlExpression * colocal, bool isConditional)
  2893. {
  2894. _ATOM name = NULL;
  2895. if (path->getOperator() == no_select)
  2896. name = path->queryChild(1)->queryName();
  2897. Owned<ITypeInfo> newType = getSimplifiedType(type, isConditional, (colocal == NULL));
  2898. OwnedHqlExpr newSelect = createField(name, newType);
  2899. OwnedHqlExpr deserialized;
  2900. if (colocal)
  2901. {
  2902. extractBuilder->buildAssign(newSelect, path);
  2903. deserialized.set(newSelect);
  2904. }
  2905. else
  2906. {
  2907. OwnedHqlExpr srcValue = ::ensureSerialized(path);
  2908. extractBuilder->buildAssign(newSelect, srcValue);
  2909. deserialized.setown(ensureDeserialized(newSelect, type));
  2910. if (deserialized != newSelect)
  2911. deserialized.setown(createAlias(deserialized, NULL)); // force it to be evaluated once per start
  2912. }
  2913. mapping.setValue(path, deserialized);
  2914. return LINK(deserialized);
  2915. }
  2916. IHqlExpression * SerializationRow::createField(_ATOM name, ITypeInfo * type)
  2917. {
  2918. if (!name)
  2919. {
  2920. StringBuffer fieldName;
  2921. fieldName.append("__f").append(numFields()).append("__");
  2922. name = createIdentifierAtom(fieldName);
  2923. }
  2924. IHqlExpression * attr = hasLinkCountedModifier(type) ? getLinkCountedAttr() : NULL;
  2925. OwnedHqlExpr newField = ::createField(name, LINK(type), attr, NULL);
  2926. if (serializedMap->queryRootColumn()->lookupColumn(newField))
  2927. return createField(NULL, type); // name clash -> create a new unnamed field
  2928. queryRecord()->addOperand(LINK(newField));
  2929. serializedMap->addColumn(newField, translator.queryRecordMap());
  2930. return createSelectExpr(LINK(querySelector()), LINK(newField));
  2931. }
  2932. SerializationRow * SerializationRow::create(HqlCppTranslator & _translator, IHqlExpression * _bound, ActivityInstance * activity)
  2933. {
  2934. OwnedHqlExpr id = createDataset(no_anon, LINK(queryNullRecord()), createAttribute(serializationAtom, createUniqueId()));
  2935. Owned<DynamicColumnToOffsetMap> map = new DynamicColumnToOffsetMap(_translator.queryOptions().maxRecordSize); //NB: This is not cached, but it may be shared...
  2936. return new SerializationRow(_translator, id, _bound, map, activity);
  2937. }
  2938. BoundRow * SerializationRow::clone(IHqlExpression * _newBound)
  2939. {
  2940. return new SerializationRow(translator, dataset, _newBound, serializedMap, activity);
  2941. }
  2942. unsigned SerializationRow::numFields() const
  2943. {
  2944. return serializedMap->numRootFields();
  2945. }
  2946. IHqlExpression * SerializationRow::queryRecord()
  2947. {
  2948. if (!record)
  2949. record.setown(createRecord());
  2950. return record;
  2951. }
  2952. void SerializationRow::finalize()
  2953. {
  2954. if (record)
  2955. record.setown(record.getClear()->closeExpr());
  2956. }