1use std::mem::replace;23use jrsonnet_gcmodule::Trace;4use jrsonnet_interner::IStr;5use jrsonnet_parser::{LocExpr, ParamsDesc};67use super::{arglike::ArgsLike, builtin::BuiltinParam};8use crate::{9 destructure::destruct,10 error::{Error::*, Result},11 evaluate_named,12 gc::GcHashMap,13 tb, throw,14 val::ThunkValue,15 Context, Pending, Thunk, Val,16};1718#[derive(Trace)]19struct EvaluateNamedThunk {20 ctx: Pending<Context>,21 name: IStr,22 value: LocExpr,23}2425impl ThunkValue for EvaluateNamedThunk {26 type Output = Val;27 fn get(self: Box<Self>) -> Result<Val> {28 evaluate_named(self.ctx.unwrap(), &self.value, self.name)29 }30}31323334353637383940pub fn parse_function_call(41 ctx: Context,42 body_ctx: Context,43 params: &ParamsDesc,44 args: &dyn ArgsLike,45 tailstrict: bool,46) -> Result<Context> {47 let mut passed_args = GcHashMap::with_capacity(params.len());48 if args.unnamed_len() > params.len() {49 throw!(TooManyArgsFunctionHas(50 params.len(),51 params.iter().map(|p| (p.0.name(), p.1.is_some())).collect()52 ))53 }5455 let mut filled_named = 0;56 let mut filled_positionals = 0;5758 args.unnamed_iter(ctx.clone(), tailstrict, &mut |id, arg| {59 let name = params[id].0.clone();60 destruct(61 &name,62 arg,63 Pending::new_filled(ctx.clone()),64 &mut passed_args,65 )?;66 filled_positionals += 1;67 Ok(())68 })?;6970 args.named_iter(ctx, tailstrict, &mut |name, value| {71 72 if !params.iter().any(|p| p.0.name().as_ref() == Some(name)) {73 throw!(UnknownFunctionParameter((name as &str).to_owned()));74 }75 if passed_args.insert(name.clone(), value).is_some() {76 throw!(BindingParameterASecondTime(name.clone()));77 }78 filled_named += 1;79 Ok(())80 })?;8182 if filled_named + filled_positionals < params.len() {83 84 85 let fctx = Context::new_future();86 let mut defaults =87 GcHashMap::with_capacity(params.len() - filled_named - filled_positionals);8889 for (idx, param) in params.iter().enumerate().filter(|p| p.1 .1.is_some()) {90 if let Some(name) = param.0.name() {91 if passed_args.contains_key(&name) {92 continue;93 }94 } else if idx < filled_positionals {95 continue;96 }9798 destruct(99 ¶m.0,100 Thunk::new(tb!(EvaluateNamedThunk {101 ctx: fctx.clone(),102 name: param.0.name().unwrap_or_else(|| "<destruct>".into()),103 value: param.1.clone().expect("default exists"),104 })),105 fctx.clone(),106 &mut defaults,107 )?;108 if param.0.name().is_some() {109 filled_named += 1;110 } else {111 filled_positionals += 1;112 }113 }114115 116 if filled_named + filled_positionals != params.len() {117 for param in params.iter().skip(args.unnamed_len()) {118 let mut found = false;119 args.named_names(&mut |name| {120 if Some(name) == param.0.name().as_ref() {121 found = true;122 }123 });124 if !found {125 throw!(FunctionParameterNotBoundInCall(126 param.0.clone().name(),127 params.iter().map(|p| (p.0.name(), p.1.is_some())).collect()128 ));129 }130 }131 unreachable!();132 }133134 Ok(body_ctx135 .extend(passed_args, None, None, None)136 .extend(defaults, None, None, None)137 .into_future(fctx))138 } else {139 let body_ctx = body_ctx.extend(passed_args, None, None, None);140 Ok(body_ctx)141 }142}143144145146147148149150151pub fn parse_builtin_call(152 ctx: Context,153 params: &[BuiltinParam],154 args: &dyn ArgsLike,155 tailstrict: bool,156) -> Result<Vec<Option<Thunk<Val>>>> {157 let mut passed_args: Vec<Option<Thunk<Val>>> = vec![None; params.len()];158 if args.unnamed_len() > params.len() {159 throw!(TooManyArgsFunctionHas(160 params.len(),161 params162 .iter()163 .map(|p| (p.name.as_ref().map(|v| v.as_ref().into()), p.has_default))164 .collect()165 ))166 }167168 let mut filled_args = 0;169170 args.unnamed_iter(ctx.clone(), tailstrict, &mut |id, arg| {171 passed_args[id] = Some(arg);172 filled_args += 1;173 Ok(())174 })?;175176 args.named_iter(ctx, tailstrict, &mut |name, arg| {177 178 let id = params179 .iter()180 .position(|p| p.name.as_ref().map_or(false, |v| v as &str == name as &str))181 .ok_or_else(|| UnknownFunctionParameter((name as &str).to_owned()))?;182 if replace(&mut passed_args[id], Some(arg)).is_some() {183 throw!(BindingParameterASecondTime(name.clone()));184 }185 filled_args += 1;186 Ok(())187 })?;188189 if filled_args < params.len() {190 for (id, _) in params.iter().enumerate().filter(|(_, p)| p.has_default) {191 if passed_args[id].is_some() {192 continue;193 }194 filled_args += 1;195 }196197 198 if filled_args != params.len() {199 for param in params.iter().skip(args.unnamed_len()) {200 let mut found = false;201 args.named_names(&mut |name| {202 if param203 .name204 .as_ref()205 .map_or(false, |v| v as &str == name as &str)206 {207 found = true;208 }209 });210 if !found {211 throw!(FunctionParameterNotBoundInCall(212 param.name.as_ref().map(|v| v.as_ref().into()),213 params214 .iter()215 .map(|p| (p.name.as_ref().map(|p| p.as_ref().into()), p.has_default))216 .collect()217 ));218 }219 }220 unreachable!();221 }222 }223 Ok(passed_args)224}225226227228pub fn parse_default_function_call(body_ctx: Context, params: &ParamsDesc) -> Result<Context> {229 #[derive(Trace)]230 struct DependsOnUnbound(IStr, ParamsDesc);231 impl ThunkValue for DependsOnUnbound {232 type Output = Val;233 fn get(self: Box<Self>) -> Result<Val> {234 Err(FunctionParameterNotBoundInCall(235 Some(self.0.clone()),236 self.1.iter().map(|p| (p.0.name(), p.1.is_some())).collect(),237 )238 .into())239 }240 }241242 let fctx = Context::new_future();243244 let mut bindings = GcHashMap::new();245246 for param in params.iter() {247 if let Some(v) = ¶m.1 {248 destruct(249 ¶m.0.clone(),250 Thunk::new(tb!(EvaluateNamedThunk {251 ctx: fctx.clone(),252 name: param.0.name().unwrap_or_else(|| "<destruct>".into()),253 value: v.clone(),254 })),255 fctx.clone(),256 &mut bindings,257 )?;258 } else {259 destruct(260 ¶m.0,261 Thunk::new(tb!(DependsOnUnbound(262 param.0.name().unwrap_or_else(|| "<destruct>".into()),263 params.clone()264 ))),265 fctx.clone(),266 &mut bindings,267 )?;268 }269 }270271 Ok(body_ctx272 .extend(bindings, None, None, None)273 .into_future(fctx))274}