o d}@sddlZddlZddlZddlZddlZddlZddlZddlmZddl m Z dZ dZ dZ dZd Zd Zd Zd Zd ZdZdZdZddZddZddZddZddZ  d4ddZddZdd Zd!d"Zd#d$Z d%d&Z!d'd(Z"d)d*Z#d5d,d-Z$d.d/Z% +d6d0d1Z&d2d3Z'dS)7N) r_keywords) reorder_propsa#' @export {funcname} <- function({default_argtext}{wildcards}) {{ {wildcard_declaration} props <- list({default_paramtext}{wildcards}) if (length(props) > 0) {{ props <- props[!vapply(props, is.null, logical(1))] }} component <- list( props = props, type = '{name}', namespace = '{project_shortname}', propNames = c({prop_names}{wildcard_names}), package = '{package_name}' ) structure(component, class = c('dash_component', 'list')) }} z?.{rpkgname}_js_metadata <- function() {{ deps_metadata <- list(a,`{dep_name}` = structure(list(name = "{dep_name}", version = "{project_ver}", src = list(href = NULL, file = "deps"), meta = NULL, script = {script_name}, stylesheet = {css_name}, head = NULL, attachment = NULL, package = "{rpkgname}", all_files = FALSE{async_or_dynamic}), class = "html_dependency")a>`{project_shortname}` = structure(list(name = "{project_shortname}", version = "{project_ver}", src = list(href = NULL, file = "deps"), meta = NULL, script = {script_name}, stylesheet = {css_name}, head = NULL, attachment = NULL, package = "{rpkgname}", all_files = FALSE{async_or_dynamic}), class = "html_dependency")z) return(deps_metadata) } z% Auto-generated: do not edit by hand \name{{{funcname}}} \alias{{{funcname}}} \title{{{name} component}} \description{{ {description} }} \usage{{ {funcname}({default_argtext}) }} \arguments{{ {item_text} }} \value{{{value_text}}} a~Package: {package_name} Title: {package_title} Version: {package_version} Description: {package_description} Depends: R (>= 3.0.2){package_depends} Imports: {package_imports} Suggests: {package_suggests}{package_rauthors} License: {package_license}{package_copyright} URL: {package_url} BugReports: {package_issues} Encoding: UTF-8 LazyData: true{vignette_builder} KeepSource: true a# ignore JS config files/folders node_modules/ coverage/ src/ lib/ .babelrc .builderrc .eslintrc .npmignore .editorconfig .eslintignore .prettierrc .circleci .github # demo folder has special meaning in R # this should hopefully make it still # allow for the possibility to make R demos demo/.*\.js demo/.*\.html demo/.*\.css # ignore Python files/folders setup.py usage.py setup.py requirements.txt MANIFEST.in CHANGELOG.md test/ # CRAN has weird LICENSE requirements LICENSE.txt ^.*\.Rproj$ ^\.Rproj\.user$ z% Auto-generated: do not edit by hand \docType{{package}} \name{{{package_name}-package}} \alias{{{package_name}}} \title{{{pkg_help_title}}} \description{{ {pkg_help_description} }} \author{{ \strong{{Maintainer}}: {maintainer} }} a+ dash_assert_valid_wildcards <- function (attrib = list("data", "aria"), ...) { args <- list(...) validation_results <- lapply(names(args), function(x) { grepl(paste0("^(", paste0(attrib, collapse="|"), ")-[a-zA-Z0-9_-]+$"), x) }) if (FALSE %in% validation_results) { stop(sprintf("The following props are not valid in this component: '%s'", paste(names(args)[grepl(FALSE, unlist(validation_results))], collapse = ", ")), call. = FALSE) } else { return(args) } } zQ wildcard_names = names(dash_assert_valid_wildcards(attrib = list({}), ...)) z9 \item{{...}}{{wildcards allowed have the form: `{}`}} c Cs&t|}t|d}t|}d}d}d}d} d} d} tdd|Dr5t|} d}t| dd}d}d d d|D} |ddD]#} | dsP| d krV| | qE| t vrh| | t d | |qE| d d d|D7} | d d d|D7} tjt|||| ||| || ||d S)Npropscs|]}|dVqdS-*Nendswith.0keyrn/var/www/html/visualizacion-main/env/lib/python3.10/site-packages/dash/development/_r_components_generation.py z(generate_class_string.., ...r z, wildcard_names, css*|]}d|vr|dvrd|VqdS)*)setProps'{}'Nformatrprrrrs rzSWARNING: prop "{}" in component "{}" is an R keyword - REMOVED FROM THE R COMPONENTcs|]}d|VqdSz{}=NULLNrrrrrrrcss,|]}|dkr d|nd|VqdS)childrenz{0}={0}z {}=childrenNrrrrrrs  ) funcnamenamedefault_argtext wildcardswildcard_declarationdefault_paramtextproject_shortname prop_nameswildcard_names package_name)snake_case_to_camel_caserlistkeysanyget_wildcards_rwildcard_templaterreplacejoinr removerwarningswarnr_component_stringformat_fn_name)r!rr&prefixr) prop_keysr#r$r(r%r"accepted_wildcardsr'itemrrrgenerate_class_stringsZ        r;c Csvtjdtt|}t|dgt|dg}|d}t |}t j |d}g}g}t |dkrt t |D]F} || } | d} t| } d| vrS| d d} nd |} d | vrdd | }d }nd | }d }|tj | |||||| dg7}d|}q9n0t |dkr|d} | d} t| } d | vrd | }d }nd | }d }tj |||||| d}d||tg}|S)aCDynamically generate R function to supply JavaScript and CSS dependency information required by the dash package for R. Parameters ---------- project_shortname = component library name, in snake case Returns ------- function_string = complete R function code to provide component features r_js_dist _css_distversion)rpkgnamerrelative_package_pathdash_.{}cssrNULL)dep_name project_verr?r& script_namecss_nameasync_or_dynamicz, )r&rGr?rHrIrJr)syspathinsertosgetcwd importlib import_modulegetattrgetr*frame_open_templaterlenrangeget_async_typesplitframe_element_templater1frame_body_templateframe_close_template)pkg_datar&modalldistrGr?function_frame_openfunction_framefunction_frame_bodydepcurr_deprpprJrFrIrHfunction_stringrrrgenerate_js_metadatasn            rfcCsXd}|D]#}|dvr)||}t|tsd|}nt|}d||}q|S)Nr)asyncdynamicrz , {} = {})r, isinstanceboolrlowerstrupper)rbrJrkeyvalrrrrWVs    rWcCs|dkr|Sd||S)Nrz \{}{{ {}}}r)tagcoderrrwrapes rqc sFt||d}d}d}d}d} d} t} tdd| Dr(t| } d}| ddD]} | ds=| tvs=| d krB| | q.|d d d| D7}|d fd d| D7}t dd|}t dd|}d|vrx| dd }|dkr||7}|t | 7}tjd|} t| ddd }|tj|tj|ddd|| |dddWdn1swY|durd|vr|d}fdd|Dpdgd}d}|rd|vr!|td t|d!rd!nd|d7}t| d"dd}||dWddS1swYdSdSdSdSdS)#aWrite R documentation file (.Rd) given component name and properties. Parameters ---------- name = the name of the Dash component for which a help file is generated props = the properties of the component description = the component's description, inserted into help file header prefix = the DashR library prefix (optional, can be a blank string) rpkg_data = package metadata (optional) Returns ------- writes an R help file to the man directory for the generated R package z.RdrzQnamed list of JSON elements corresponding to React.js properties and their valuescsrr r r rrrrrz"write_help_file..rNr rrcsrrrrrrrrrz c3s2|]}d|t|d|dVqdS)z\item{{{}}}{{{}{}}}type descriptionN)r print_r_typerrrrrs z(?sz#write_help_file..rpexamplesdontrunza+)r6r+r,r-r.r rr2r1resubrXrstripwildcard_help_templaterrNrLopenwrite help_stringtextwrapfillr0rSrq)r!rrsr7 rpkg_data file_namer#r"rr9rr8r: file_pathfexthe_exresultfar)r rrwrite_help_fileksn      $rc Cst|d}t|||||d}t||||}t||d}tjd|} t| ddd} | || |Wdn1s@wYt d |dS) Nr%# AUTO GENERATED FILE - DO NOT EDIT .RRrvrwrxz Generated {}) rrr;r6rNrLr1rrprintr) r!rrsr&r7r import_string class_stringrrrrrrwrite_class_files   rc Cs$t||d}d}tjdstdtjd|}t|ddd}|||r.|tWdn1s8wYtjdrHt dtdt |D]=\}}} | D]5} tj | d } | d vrhqYtjtjd tj ||} tj| st| t tj|| | qYqRdS) zWrite an internal (not exported) R function to return all JS dependencies as required by dash. Parameters ---------- project_shortname = hyphenated string, e.g. dash-html-components Returns ------- )r\r& internal.RrrvrwrxNz inst/depsr)z.pyz.pycz.jsonz inst/deps/)rfrNrLexistsmakedirsr1rrwildcard_helpershutilrmtreewalksplitextrelpathcopy) r\r& has_wildcardsrerrr rel_dirname_ filenamesfilename extensiontarget_dirnamerrrwrite_js_metadatas>          rc$Csft|}d} d} |d} |dur>|dr |d|dd} |dr/|d|dd} |dr=d|dd} n |dd} |dd} |d d }|rbd |d }td d |}|rr|d }td d |}|r|d }td d |}d|vr|ddd}n d}tdtj dd|vr|dd}n d}tdtj d|d}| dd}| dddd}| dd}| ddd}|d|d}d|vrtdtj dt d|dur|drd|dd} nd |||} t jd!st jd"s|d#d}n|d#dd$}t jd!s0t d"d!d%}d}| d | d }tt|}|rS|D] }|d&|7}qHt jd'rpd(}d)|vrod*|vro|d+7}|d }nd}t jd,|d-}t|||td.d/d0d1}||||||Wdn 1swYtd2d/d0d1 }|tWdn 1swYtj|| | || ||||| |||d3 } td4d/d0d1 }!|!| Wdn 1swY|dur/|dr1tj||d|d| |d5}"t|d6d0d1}#|#|"WddS1s(wYdSdSdS)7zGenerate documents for R package creation. Parameters ---------- pkg_data rpkg_data project_shortname export_string package_depends package_imports package_suggests has_wildcards Returns ------- rr!Npkg_help_titlerspkg_help_description pkg_copyrightz Copyright: {}r>z0.0.1r,z (,(?![ ]))bugsurlzGWarning: a URL for bug reports was not provided. Empty string inserted.)filehomepagez@Warning: a homepage URL was not provided. Empty string inserted.authorz brackets in package.json. pkg_authorsz Authors@R: {}zD Authors@R: person("{}", "{}", role = c("aut", "cre"), email = "{}")LICENSEz LICENSE.txtlicensez + file LICENSErz import({}) vignettesz VignetteBuilder: knitrknitr rmarkdownz, knitr, rmarkdownruz -package.Rd NAMESPACEzw+rwrxz .Rbuildignore) r) package_titlepackage_descriptionpackage_versionpackage_rauthorspackage_dependspackage_importspackage_suggestspackage_licensepackage_copyright package_urlpackage_issuesvignette_builder DESCRIPTION)r)rrlib_namerrv)r*rSrstriplstriprrrrKstderrrXrsplitexitrNrLisfilesymlinkfilterrjrr1rrrrbuild_ignore_stringdescription_template pkghelp_stub)$r\rr& export_stringrrrrr)rrrrrrrrpackage_authorpackage_author_namepackage_author_emailpackage_author_fnpackage_author_lnrrrpackages_string rpackage_listrpackagerpkghelp_stub_pathrf2description_stringf3pkghelpf4rrr generate_rpkgs                           $rcCs.|d}|dddd|ddDS)Nrrrcss|]}|VqdS)N) capitalize)rrvrrrrsz+snake_case_to_camel_case..r)rXr1) namestringsrrrr*s $r*cCs,|r|t|St|d|ddS)Nrr)r*rk)r7r!rrrr6s r6c KsTt||} d} |D]} tdd| dDrd} nq t|||| |||| dS)NFcsrr r r rrrrrz#generate_exports..rT)make_namespace_exportsvaluesr-r) r& componentsmetadatar\rr7rrrkwargsrrcomponent_datarrrgenerate_exportss"  rc sd}|D]}|dst|tvrt|dvr|d|7}qg}ddgfdd|D}g}td D]}|d rK||vrK|tjd |g7}q6|D]}t|d d d p}| } t j dd| t j d} | dd dd} t dd| } t dd| } t| d} t| | krt| } t dd| } t dd| } t| | kst d| } | D]} | d} | ddkr| |vr|| qWdn1swYqN|ddd |D7}|S)!Nrr )rrz export({}{}) zutils.Rrcsg|]}d|qS)z{}{}.Rr)r componentr7rrr s z*make_namespace_exports..rrrrwrxz#.*$)flagsr}r~ z'([^'\\]|\\'|\\[^'])*'z''z"([^"\\]|\\"|\\[^"])*"z""rz\(([^()]|\(\))*\)z()z\{([^{}]|\{\})*\}rCz6([^A-Za-z0-9._]|^)([A-Za-z0-9._]+)\s*(=|<-)\s*functionrrBcsr)z export({})Nr)rfunctionrrrrLrz)make_namespace_exports..)r rlrrrNlistdirrLr1rreadrrMr0rUfindallappend)rr7rr rfilelistomitlistfnlistscriptrfilerprev_lenmatchesmatchfnrrrrs\      "rcspfdd}tddddddddddd dd dd dfd dfd dfddfdd||dS)z8Mapping from the PropTypes js type object to the R type.c s>dddddDdddddDS) Nz lists containing elements {}. {}rcsr)rNrrtrrrrUrz;get_r_prop_types..shape_or_exact..valuez+Those elements have the following types: {}r}c ss2|]\}}t|||d|ddddVqdS)requiredrsrr) prop_name type_objectrrs indent_numN)create_prop_docstring_rrS)rrproprrrrWs  )rr1itemsrrrrshape_or_exactSs  z(get_r_prop_types..shape_or_exactcSdS)Nz unnamed listrrrrrez"get_r_prop_types..cSr)NlogicalrrrrrrfrcSr)NnumericrrrrrrgrcSr)N characterrrrrrrhrcSr)Nz named listrrrrrrircSr)Nz9logical | numeric | character | named list | unnamed listrrrrrrjrcSr)Nzdash componentrrrrrrkrcSr)Nz8a list of or a singular dash component, string or numberrrrrrrlrcdddddDS)Nza value equal to: {}rcss"|] }dt|dVqdS)rCrN)rrlr rrrros 5get_r_prop_types....rrr1rrrrrnscr)NrCz | css*|]}t|dkrdt|VqdS)rrCN get_r_typer)rsubTyperrrrss   rrr rrrrrrs  cs,dtddkrdtdSdS)Nr+rrz of {}sr!rrrrrzs csdtdS)Nz.list with named elements and values of type {}r)rr"rrrrrs )arrayrjnumberstringobjectr-elementnodeenumunionarrayOfobjectOfshapeexact)dict)rrrrrget_r_prop_typesPs"     r1FcCsP|d}t|d}d|vr|ds|dddkrdS||vr&||}|SdS)aP Convert JS types to R types for the component definition Parameters ---------- type_object: dict react-docgen-generated prop type dictionary is_flow_type: bool indent_num: int Number of indents to use for the docstring for the prop Returns ------- str Python type string r!rcomputedrrrr)r1rS)r is_flow_typer js_type_name js_to_r_types prop_typerrrr"s  r"cCst|}|r |d7}|S)Nz. )r"r)typedata typestringrrrrts rtcCst|||dd}d|}d|vr!dj|||||rddSddSd j|||r,d |nd |d kr6d |nd |r=ddSddS) aS Create the Dash component prop docstring Parameters ---------- prop_name: str Name of the Dash component prop type_object: dict react-docgen-generated prop type dictionary required: bool Component is required? description: str Dash component description indent_num: int Number of indents to use for the context block (creates 2 spaces for every indent) is_flow_type: bool Does the prop use Flow types? Otherwise, uses PropTypes Returns ------- str Dash component prop docstring r)rr3rz r}z^{indent_spacing}- {name} ({is_required}): {description}. {name} has the following type: {type}roptional)indent_spacingr!rrrs is_requiredz;{indent_spacing}- {name} ({type}{is_required}){description}z{}; rz: {}r!)rrrrsrr3 r_type_namer:rrrrs4  rcCs,d}|ddd|D7}|dkrd}|S)Nrrcss$|] }|drd|VqdS)r rN)r rrrrrrs"z"get_wildcards_r..rE)r1)r8r#rrrr.s r.)NN)Fr)F)(rNrKrrPrrr3 _all_keywordsr_py_components_generationrr5rTrYrZr[rrrrrr/rr;rfrWrqrrrrr*r6rrr1r"rtrr.rrrrsT  $ Aba 7B $? = 2