1use std::{2 cell::{Ref, RefCell, RefMut},3 collections::HashMap,4 rc::Rc,5};67use jrsonnet_evaluator::{8 error::{ErrorKind::*, Result},9 function::{builtin::Builtin, CallLocation, FuncVal, TlaArg},10 gc::{GcHashMap, TraceBox},11 tb,12 trace::PathResolver,13 Context, ContextBuilder, IStr, ObjValue, ObjValueBuilder, State, Thunk, Val,14};15use jrsonnet_gcmodule::{Cc, Trace};16use jrsonnet_parser::Source;1718mod expr;19mod types;20pub use types::*;21mod arrays;22pub use arrays::*;23mod math;24pub use math::*;25mod operator;26pub use operator::*;27mod sort;28pub use sort::*;29mod hash;30pub use hash::*;31mod encoding;32pub use encoding::*;33mod objects;34pub use objects::*;35mod manifest;36pub use manifest::*;37mod parse;38pub use parse::*;39mod strings;40pub use strings::*;41mod misc;42pub use misc::*;43mod sets;44pub use sets::*;4546pub fn stdlib_uncached(settings: Rc<RefCell<Settings>>) -> ObjValue {47 let mut builder = ObjValueBuilder::new();4849 let expr = expr::stdlib_expr();50 let eval = jrsonnet_evaluator::evaluate(ContextBuilder::dangerous_empty_state().build(), &expr)51 .expect("stdlib.jsonnet should have no errors")52 .as_obj()53 .expect("stdlib.jsonnet should evaluate to object");5455 builder.with_super(eval);5657 for (name, builtin) in [58 59 ("type", builtin_type::INST),60 ("isString", builtin_is_string::INST),61 ("isNumber", builtin_is_number::INST),62 ("isBoolean", builtin_is_boolean::INST),63 ("isObject", builtin_is_object::INST),64 ("isArray", builtin_is_array::INST),65 ("isFunction", builtin_is_function::INST),66 67 ("makeArray", builtin_make_array::INST),68 ("repeat", builtin_repeat::INST),69 ("slice", builtin_slice::INST),70 ("map", builtin_map::INST),71 ("flatMap", builtin_flatmap::INST),72 ("filter", builtin_filter::INST),73 ("foldl", builtin_foldl::INST),74 ("foldr", builtin_foldr::INST),75 ("range", builtin_range::INST),76 ("join", builtin_join::INST),77 ("reverse", builtin_reverse::INST),78 ("any", builtin_any::INST),79 ("all", builtin_all::INST),80 ("member", builtin_member::INST),81 ("count", builtin_count::INST),82 83 ("abs", builtin_abs::INST),84 ("sign", builtin_sign::INST),85 ("max", builtin_max::INST),86 ("min", builtin_min::INST),87 ("modulo", builtin_modulo::INST),88 ("floor", builtin_floor::INST),89 ("ceil", builtin_ceil::INST),90 ("log", builtin_log::INST),91 ("pow", builtin_pow::INST),92 ("sqrt", builtin_sqrt::INST),93 ("sin", builtin_sin::INST),94 ("cos", builtin_cos::INST),95 ("tan", builtin_tan::INST),96 ("asin", builtin_asin::INST),97 ("acos", builtin_acos::INST),98 ("atan", builtin_atan::INST),99 ("exp", builtin_exp::INST),100 ("mantissa", builtin_mantissa::INST),101 ("exponent", builtin_exponent::INST),102 103 ("mod", builtin_mod::INST),104 ("primitiveEquals", builtin_primitive_equals::INST),105 ("equals", builtin_equals::INST),106 ("format", builtin_format::INST),107 108 ("sort", builtin_sort::INST),109 ("uniq", builtin_uniq::INST),110 ("set", builtin_set::INST),111 112 ("md5", builtin_md5::INST),113 #[cfg(feature = "exp-more-hashes")]114 ("sha256", builtin_sha256::INST),115 116 ("encodeUTF8", builtin_encode_utf8::INST),117 ("decodeUTF8", builtin_decode_utf8::INST),118 ("base64", builtin_base64::INST),119 ("base64Decode", builtin_base64_decode::INST),120 ("base64DecodeBytes", builtin_base64_decode_bytes::INST),121 122 ("objectFieldsEx", builtin_object_fields_ex::INST),123 ("objectHasEx", builtin_object_has_ex::INST),124 125 ("escapeStringJson", builtin_escape_string_json::INST),126 ("manifestJsonEx", builtin_manifest_json_ex::INST),127 ("manifestYamlDoc", builtin_manifest_yaml_doc::INST),128 ("manifestTomlEx", builtin_manifest_toml_ex::INST),129 130 ("parseJson", builtin_parse_json::INST),131 ("parseYaml", builtin_parse_yaml::INST),132 133 ("codepoint", builtin_codepoint::INST),134 ("substr", builtin_substr::INST),135 ("char", builtin_char::INST),136 ("strReplace", builtin_str_replace::INST),137 ("splitLimit", builtin_splitlimit::INST),138 ("asciiUpper", builtin_ascii_upper::INST),139 ("asciiLower", builtin_ascii_lower::INST),140 ("findSubstr", builtin_find_substr::INST),141 ("parseInt", builtin_parse_int::INST),142 ("parseOctal", builtin_parse_octal::INST),143 ("parseHex", builtin_parse_hex::INST),144 145 ("length", builtin_length::INST),146 ("startsWith", builtin_starts_with::INST),147 ("endsWith", builtin_ends_with::INST),148 149 ("setMember", builtin_set_member::INST),150 ]151 .iter()152 .cloned()153 {154 builder155 .member(name.into())156 .hide()157 .value(Val::Func(FuncVal::StaticBuiltin(builtin)))158 .expect("no conflict");159 }160161 builder162 .member("extVar".into())163 .hide()164 .value(Val::Func(FuncVal::builtin(builtin_ext_var {165 settings: settings.clone(),166 })))167 .expect("no conflict");168 builder169 .member("native".into())170 .hide()171 .value(Val::Func(FuncVal::builtin(builtin_native {172 settings: settings.clone(),173 })))174 .expect("no conflict");175 builder176 .member("trace".into())177 .hide()178 .value(Val::Func(FuncVal::builtin(builtin_trace { settings })))179 .expect("no conflict");180181 builder182 .member("id".into())183 .hide()184 .value(Val::Func(FuncVal::Id))185 .expect("no conflict");186187 builder.build()188}189190pub trait TracePrinter {191 fn print_trace(&self, loc: CallLocation, value: IStr);192}193194pub struct StdTracePrinter {195 resolver: PathResolver,196}197impl StdTracePrinter {198 pub fn new(resolver: PathResolver) -> Self {199 Self { resolver }200 }201}202impl TracePrinter for StdTracePrinter {203 fn print_trace(&self, loc: CallLocation, value: IStr) {204 eprint!("TRACE:");205 if let Some(loc) = loc.0 {206 let locs = loc.0.map_source_locations(&[loc.1]);207 eprint!(208 " {}:{}",209 match loc.0.source_path().path() {210 Some(p) => self.resolver.resolve(p),211 None => loc.0.source_path().to_string(),212 },213 locs[0].line214 );215 }216 eprintln!(" {value}");217 }218}219220pub struct Settings {221 222 pub ext_vars: HashMap<IStr, TlaArg>,223 224 pub ext_natives: HashMap<IStr, Cc<TraceBox<dyn Builtin>>>,225 226 pub globals: GcHashMap<IStr, Thunk<Val>>,227 228 pub trace_printer: Box<dyn TracePrinter>,229 230 pub path_resolver: PathResolver,231}232233fn extvar_source(name: &str, code: impl Into<IStr>) -> Source {234 let source_name = format!("<extvar:{name}>");235 Source::new_virtual(source_name.into(), code.into())236}237238#[derive(Trace, Clone)]239pub struct ContextInitializer {240 241 #[cfg(not(feature = "legacy-this-file"))]242 context: Context,243 244 #[cfg(feature = "legacy-this-file")]245 stdlib_obj: ObjValue,246 settings: Rc<RefCell<Settings>>,247}248impl ContextInitializer {249 pub fn new(_s: State, resolver: PathResolver) -> Self {250 let settings = Settings {251 ext_vars: Default::default(),252 ext_natives: Default::default(),253 globals: Default::default(),254 trace_printer: Box::new(StdTracePrinter::new(resolver.clone())),255 path_resolver: resolver,256 };257 let settings = Rc::new(RefCell::new(settings));258 Self {259 #[cfg(not(feature = "legacy-this-file"))]260 context: {261 let mut context = ContextBuilder::with_capacity(_s, 1);262 context.bind(263 "std".into(),264 Thunk::evaluated(Val::Obj(stdlib_uncached(settings.clone()))),265 );266 context.build()267 },268 #[cfg(feature = "legacy-this-file")]269 stdlib_obj: stdlib_uncached(settings.clone()),270 settings,271 }272 }273 pub fn settings(&self) -> Ref<Settings> {274 self.settings.borrow()275 }276 pub fn settings_mut(&self) -> RefMut<Settings> {277 self.settings.borrow_mut()278 }279 pub fn add_ext_var(&self, name: IStr, value: Val) {280 self.settings_mut()281 .ext_vars282 .insert(name, TlaArg::Val(value));283 }284 pub fn add_ext_str(&self, name: IStr, value: IStr) {285 self.settings_mut()286 .ext_vars287 .insert(name, TlaArg::String(value));288 }289 pub fn add_ext_code(&self, name: &str, code: impl Into<IStr>) -> Result<()> {290 let code = code.into();291 let source = extvar_source(name, code.clone());292 let parsed = jrsonnet_parser::parse(293 &code,294 &jrsonnet_parser::ParserSettings {295 source: source.clone(),296 },297 )298 .map_err(|e| ImportSyntaxError {299 path: source,300 error: Box::new(e),301 })?;302 303 self.settings_mut()304 .ext_vars305 .insert(name.into(), TlaArg::Code(parsed));306 Ok(())307 }308 pub fn add_native(&self, name: IStr, cb: impl Builtin) {309 self.settings_mut()310 .ext_natives311 .insert(name, Cc::new(tb!(cb)));312 }313}314impl jrsonnet_evaluator::ContextInitializer for ContextInitializer {315 #[cfg(not(feature = "legacy-this-file"))]316 fn initialize(&self, _s: State, _source: Source) -> jrsonnet_evaluator::Context {317 let out = self.context.clone();318 let globals = &self.settings().globals;319 if globals.is_empty() {320 return out;321 }322323 let mut out = ContextBuilder::extend(out);324 for (k, v) in globals.iter() {325 out.bind(k.clone(), v.clone());326 }327 out.build()328 }329 #[cfg(feature = "legacy-this-file")]330 fn initialize(&self, s: State, source: Source) -> Context {331 use jrsonnet_evaluator::val::StrValue;332333 let mut builder = ObjValueBuilder::new();334 builder.with_super(self.stdlib_obj.clone());335 builder336 .member("thisFile".into())337 .hide()338 .value(Val::Str(StrValue::Flat(339 match source.source_path().path() {340 Some(p) => self.settings().path_resolver.resolve(p).into(),341 None => source.source_path().to_string().into(),342 },343 )))344 .expect("this object builder is empty");345 let stdlib_with_this_file = builder.build();346347 let mut context = ContextBuilder::with_capacity(s, 1);348 context.bind(349 "std".into(),350 Thunk::evaluated(Val::Obj(stdlib_with_this_file)),351 );352 for (k, v) in self.settings().globals.iter() {353 context.bind(k.clone(), v.clone());354 }355 context.build()356 }357 fn as_any(&self) -> &dyn std::any::Any {358 self359 }360}361362pub trait StateExt {363 364 fn with_stdlib(&self);365 fn add_global(&self, name: IStr, value: Thunk<Val>);366}367368impl StateExt for State {369 fn with_stdlib(&self) {370 let initializer = ContextInitializer::new(self.clone(), PathResolver::new_cwd_fallback());371 self.settings_mut().context_initializer = tb!(initializer)372 }373 fn add_global(&self, name: IStr, value: Thunk<Val>) {374 self.settings()375 .context_initializer376 .as_any()377 .downcast_ref::<ContextInitializer>()378 .expect("not standard context initializer")379 .settings_mut()380 .globals381 .insert(name, value);382 }383}