difftreelog
feat lazy evaluation of function default params
in: master
Fixes #59
7 files changed
crates/jrsonnet-evaluator/src/ctx.rsdiffbeforeafterboth--- a/crates/jrsonnet-evaluator/src/ctx.rs
+++ b/crates/jrsonnet-evaluator/src/ctx.rs
@@ -73,6 +73,9 @@
.cloned()
.ok_or(VariableIsNotDefined(name))?)
}
+ pub fn contains_binding(&self, name: IStr) -> bool {
+ self.0.bindings.contains_key(&name)
+ }
pub fn into_future(self, ctx: FutureWrapper<Self>) -> Self {
{
ctx.0.borrow_mut().replace(self);
crates/jrsonnet-evaluator/src/error.rsdiffbeforeafterboth--- a/crates/jrsonnet-evaluator/src/error.rs
+++ b/crates/jrsonnet-evaluator/src/error.rs
@@ -56,7 +56,7 @@
BindingParameterASecondTime(IStr),
#[error("too many args, function has {0}")]
TooManyArgsFunctionHas(usize),
- #[error("founction argument is not passed: {0}")]
+ #[error("function argument is not passed: {0}")]
FunctionParameterNotBoundInCall(IStr),
#[error("external variable is not defined: {0}")]
crates/jrsonnet-evaluator/src/function.rsdiffbeforeafterboth--- a/crates/jrsonnet-evaluator/src/function.rs
+++ b/crates/jrsonnet-evaluator/src/function.rs
@@ -1,4 +1,7 @@
-use crate::{error::Error::*, evaluate, throw, Context, LazyVal, LazyValValue, Result, Val};
+use crate::{
+ error::Error::*, evaluate, evaluate_named, throw, Context, FutureWrapper, LazyVal,
+ LazyValValue, Result, Val,
+};
use jrsonnet_gc::Trace;
use jrsonnet_interner::IStr;
use jrsonnet_parser::{ArgsDesc, LocExpr, ParamsDesc};
@@ -8,6 +11,18 @@
const NO_DEFAULT_CONTEXT: &str =
"no default context set for call with defined default parameter value";
+#[derive(Trace)]
+#[trivially_drop]
+struct EvaluateLazyVal {
+ context: Context,
+ expr: LocExpr,
+}
+impl LazyValValue for EvaluateLazyVal {
+ fn get(self: Box<Self>) -> Result<Val> {
+ evaluate(self.context, &self.expr)
+ }
+}
+
/// Creates correct [context](Context) for function body evaluation returning error on invalid call.
///
/// ## Parameters
@@ -18,64 +33,119 @@
/// * `tailstrict`: if set to `true` function arguments are eagerly executed, otherwise - lazily
pub fn parse_function_call(
ctx: Context,
- body_ctx: Option<Context>,
+ body_ctx: Context,
params: &ParamsDesc,
args: &ArgsDesc,
tailstrict: bool,
) -> Result<Context> {
- let mut out = HashMap::with_capacity_and_hasher(params.len(), BuildHasherDefault::default());
- let mut positioned_args = vec![None; params.0.len()];
- for (id, arg) in args.iter().enumerate() {
- let idx = if let Some(name) = &arg.0 {
- params
- .iter()
- .position(|p| *p.0 == *name)
- .ok_or_else(|| UnknownFunctionParameter(name.clone()))?
- } else {
- id
- };
+ let mut passed_args =
+ HashMap::with_capacity_and_hasher(params.len(), BuildHasherDefault::default());
+ if args.unnamed.len() > params.len() {
+ throw!(TooManyArgsFunctionHas(params.len()))
+ }
+
+ let mut filled_args = 0;
- if idx >= params.len() {
- throw!(TooManyArgsFunctionHas(params.len()));
+ for (id, arg) in args.unnamed.iter().enumerate() {
+ let name = params[id].0.clone();
+ passed_args.insert(
+ name,
+ if tailstrict {
+ LazyVal::new_resolved(evaluate(ctx.clone(), arg)?)
+ } else {
+ LazyVal::new(Box::new(EvaluateLazyVal {
+ context: ctx.clone(),
+ expr: arg.clone(),
+ }))
+ },
+ );
+ filled_args += 1;
+ }
+
+ for (name, value) in args.named.iter() {
+ // FIXME: O(n) for arg existence check
+ if !params.iter().any(|p| &p.0 == name) {
+ throw!(UnknownFunctionParameter((name as &str).to_owned()));
}
- if positioned_args[idx].is_some() {
- throw!(BindingParameterASecondTime(params[idx].0.clone()));
+ if passed_args
+ .insert(
+ name.clone(),
+ if tailstrict {
+ LazyVal::new_resolved(evaluate(ctx.clone(), value)?)
+ } else {
+ LazyVal::new(Box::new(EvaluateLazyVal {
+ context: ctx.clone(),
+ expr: value.clone(),
+ }))
+ },
+ )
+ .is_some()
+ {
+ throw!(BindingParameterASecondTime(name.clone()));
}
- positioned_args[idx] = Some(arg.1.clone());
+ filled_args += 1;
}
- // Fill defaults
- for (id, p) in params.iter().enumerate() {
- let (ctx, expr) = if let Some(arg) = &positioned_args[id] {
- (ctx.clone(), arg)
- } else if let Some(default) = &p.1 {
- (body_ctx.clone().expect(NO_DEFAULT_CONTEXT), default)
- } else {
- throw!(FunctionParameterNotBoundInCall(p.0.clone()));
- };
- let val = if tailstrict {
- LazyVal::new_resolved(evaluate(ctx, expr)?)
- } else {
+
+ if filled_args < params.len() {
+ // Some args are unset, but maybe we have defaults for them
+ // Default values should be created in newly created context
+ let future_context = FutureWrapper::<Context>::new();
+ let mut defaults = HashMap::with_capacity_and_hasher(
+ params.len() - filled_args,
+ BuildHasherDefault::default(),
+ );
+
+ for param in params.iter().filter(|p| p.1.is_some()) {
+ if passed_args.contains_key(¶m.0.clone()) {
+ continue;
+ }
#[derive(Trace)]
#[trivially_drop]
- struct EvaluateLazyVal {
- context: Context,
- expr: LocExpr,
+ struct LazyNamedBinding {
+ future_context: FutureWrapper<Context>,
+ name: IStr,
+ value: LocExpr,
}
- impl LazyValValue for EvaluateLazyVal {
+ impl LazyValValue for LazyNamedBinding {
fn get(self: Box<Self>) -> Result<Val> {
- evaluate(self.context, &self.expr)
+ evaluate_named(self.future_context.unwrap(), &self.value, self.name)
}
}
+ LazyVal::new(Box::new(LazyNamedBinding {
+ future_context: future_context.clone(),
+ name: param.0.clone(),
+ value: param.1.clone().unwrap(),
+ }));
- LazyVal::new(Box::new(EvaluateLazyVal {
- context: ctx.clone(),
- expr: expr.clone(),
- }))
- };
- out.insert(p.0.clone(), val);
- }
+ defaults.insert(
+ param.0.clone(),
+ LazyVal::new(Box::new(LazyNamedBinding {
+ future_context: future_context.clone(),
+ name: param.0.clone(),
+ value: param.1.clone().unwrap(),
+ })),
+ );
+ filled_args += 1;
+ }
+
+ // Some args still wasn't filled
+ if filled_args != params.len() {
+ for param in params.iter().skip(args.unnamed.len()) {
+ if !args.named.iter().any(|a| a.0 == param.0) {
+ throw!(FunctionParameterNotBoundInCall(param.0.clone()));
+ }
+ }
+ unreachable!();
+ }
- Ok(body_ctx.unwrap_or(ctx).extend(out, None, None, None))
+ Ok(body_ctx
+ .extend(passed_args, None, None, None)
+ .extend_bound(defaults)
+ .into_future(future_context))
+ } else {
+ let body_ctx = body_ctx.extend(passed_args, None, None, None);
+ Ok(body_ctx)
+ }
}
pub fn parse_function_call_map(
@@ -176,21 +246,25 @@
use $crate::{error::Error::*, throw, evaluate, push_stack_frame, typed::CheckType};
let args = $args;
- if args.len() > $total_args {
+ if args.unnamed.len() + args.named.len() > $total_args {
throw!(TooManyArgsFunctionHas($total_args));
}
$(
- if args.len() <= $id {
+ if args.unnamed.len() + args.named.len() <= $id {
throw!(FunctionParameterNotBoundInCall(stringify!($name).into()));
}
- let $name = &args[$id];
- if $name.0.is_some() {
- if $name.0.as_ref().unwrap() != stringify!($name) {
+ // Is named
+ let $name = if $id >= $args.unnamed.len() {
+ let named = &args.named[$id - $args.unnamed.len()];
+ if &named.0 != stringify!($name) {
throw!(IntrinsicArgumentReorderingIsNotSupportedYet);
}
- }
+ &named.1
+ } else {
+ &$args.unnamed[$id]
+ };
let $name = push_stack_frame(None, || format!("evaluating argument"), || {
- let value = evaluate($ctx.clone(), &$name.1)?;
+ let value = evaluate($ctx.clone(), &$name)?;
$ty.check(&value)?;
Ok(value)
})?;
crates/jrsonnet-evaluator/src/map.rsdiffbeforeafterboth--- a/crates/jrsonnet-evaluator/src/map.rs
+++ b/crates/jrsonnet-evaluator/src/map.rs
@@ -29,6 +29,16 @@
.get(key)
.or_else(|| self.0.parent.as_ref().and_then(|p| p.get(key)))
}
+
+ pub fn contains_key(&self, key: &IStr) -> bool {
+ (self.0).current.contains_key(key)
+ || self
+ .0
+ .parent
+ .as_ref()
+ .map(|p| p.contains_key(key))
+ .unwrap_or(false)
+ }
}
impl Clone for LayeredHashMap {
crates/jrsonnet-evaluator/src/val.rsdiffbeforeafterboth--- a/crates/jrsonnet-evaluator/src/val.rs
+++ b/crates/jrsonnet-evaluator/src/val.rs
@@ -11,7 +11,7 @@
};
use jrsonnet_gc::{Gc, GcCell, Trace};
use jrsonnet_interner::IStr;
-use jrsonnet_parser::{el, Arg, ArgsDesc, Expr, ExprLocation, LiteralType, LocExpr, ParamsDesc};
+use jrsonnet_parser::{el, ArgsDesc, Expr, ExprLocation, LiteralType, LocExpr, ParamsDesc};
use jrsonnet_types::ValType;
use std::{collections::HashMap, fmt::Debug, rc::Rc};
@@ -127,7 +127,7 @@
Self::Normal(func) => {
let ctx = parse_function_call(
call_ctx,
- Some(func.ctx.clone()),
+ func.ctx.clone(),
&func.params,
args,
tailstrict,
@@ -136,7 +136,8 @@
}
Self::Intrinsic(name) => call_builtin(call_ctx, loc, name, args),
Self::NativeExt(_name, handler) => {
- let args = parse_function_call(call_ctx, None, &handler.params, args, true)?;
+ let args =
+ parse_function_call(call_ctx, Context::new(), &handler.params, args, true)?;
let mut out_args = Vec::with_capacity(handler.params.len());
for p in handler.params.0.iter() {
out_args.push(args.binding(p.0.clone())?.evaluate()?);
@@ -554,17 +555,17 @@
el!(Expr::Var("std".into())),
el!(Expr::Str("manifestYamlDoc".into()))
)),
- ArgsDesc(vec![
- Arg(None, el!(Expr::Var("__tmp__to_json__".into()))),
- Arg(
- None,
+ ArgsDesc::new(
+ vec![
+ el!(Expr::Var("__tmp__to_json__".into())),
el!(Expr::Literal(if padding != 0 {
LiteralType::True
} else {
LiteralType::False
- }))
- )
- ]),
+ })),
+ ],
+ vec![]
+ ),
false
)),
)?
crates/jrsonnet-parser/src/expr.rsdiffbeforeafterboth--- a/crates/jrsonnet-parser/src/expr.rs
+++ b/crates/jrsonnet-parser/src/expr.rs
@@ -194,18 +194,13 @@
#[cfg_attr(feature = "deserialize", derive(Deserialize))]
#[derive(Debug, PartialEq, Trace)]
#[trivially_drop]
-pub struct Arg(pub Option<String>, pub LocExpr);
-
-#[cfg_attr(feature = "serialize", derive(Serialize))]
-#[cfg_attr(feature = "deserialize", derive(Deserialize))]
-#[derive(Debug, PartialEq, Trace)]
-#[trivially_drop]
-pub struct ArgsDesc(pub Vec<Arg>);
-
-impl Deref for ArgsDesc {
- type Target = Vec<Arg>;
- fn deref(&self) -> &Self::Target {
- &self.0
+pub struct ArgsDesc {
+ pub unnamed: Vec<LocExpr>,
+ pub named: Vec<(IStr, LocExpr)>,
+}
+impl ArgsDesc {
+ pub fn new(unnamed: Vec<LocExpr>, named: Vec<(IStr, LocExpr)>) -> Self {
+ Self { unnamed, named }
}
}
crates/jrsonnet-parser/src/lib.rsdiffbeforeafterboth1#![allow(clippy::redundant_closure_call)]23use peg::parser;4use std::{5 path::{Path, PathBuf},6 rc::Rc,7};8mod expr;9pub use expr::*;10pub use peg;1112pub struct ParserSettings {13 pub loc_data: bool,14 pub file_name: Rc<Path>,15}1617macro_rules! expr_bin {18 ($a:ident $op:ident $b:ident) => {19 loc_expr_todo!(Expr::BinaryOp($a, $op, $b))20 };21}22macro_rules! expr_un {23 ($op:ident $a:ident) => {24 loc_expr_todo!(Expr::UnaryOp($op, $a))25 };26}2728parser! {29 grammar jsonnet_parser() for str {30 use peg::ParseLiteral;3132 /// Standard C-like comments33 rule comment()34 = "//" (!['\n'][_])* "\n"35 / "/*" ("\\*/" / "\\\\" / (!("*/")[_]))* "*/"36 / "#" (!['\n'][_])* "\n"3738 rule single_whitespace() = quiet!{([' ' | '\r' | '\n' | '\t'] / comment())} / expected!("<whitespace>")39 rule _() = single_whitespace()*4041 /// For comma-delimited elements42 rule comma() = quiet!{_ "," _} / expected!("<comma>")43 rule alpha() -> char = c:$(['_' | 'a'..='z' | 'A'..='Z']) {c.chars().next().unwrap()}44 rule digit() -> char = d:$(['0'..='9']) {d.chars().next().unwrap()}45 rule end_of_ident() = !['0'..='9' | '_' | 'a'..='z' | 'A'..='Z']46 /// Sequence of digits47 rule uint_str() -> &'input str = a:$(digit()+) { a }48 /// Number in scientific notation format49 rule number() -> f64 = quiet!{a:$(uint_str() ("." uint_str())? (['e'|'E'] (s:['+'|'-'])? uint_str())?) {? a.parse().map_err(|_| "<number>") }} / expected!("<number>")5051 /// Reserved word followed by any non-alphanumberic52 rule reserved() = ("assert" / "else" / "error" / "false" / "for" / "function" / "if" / "import" / "importstr" / "in" / "local" / "null" / "tailstrict" / "then" / "self" / "super" / "true") end_of_ident()53 rule id() = quiet!{ !reserved() alpha() (alpha() / digit())*} / expected!("<identifier>")5455 rule keyword(id: &'static str) -> ()56 = ##parse_string_literal(id) end_of_ident()57 // Adds location data information to existing expression58 rule l(s: &ParserSettings, x: rule<Expr>) -> LocExpr59 = start:position!() v:x() end:position!() {loc_expr!(v, s.loc_data, (s.file_name.clone(), start, end))}6061 pub rule param(s: &ParserSettings) -> expr::Param = name:$(id()) expr:(_ "=" _ expr:expr(s){expr})? { expr::Param(name.into(), expr) }62 pub rule params(s: &ParserSettings) -> expr::ParamsDesc63 = params:param(s) ** comma() comma()? {64 let mut defaults_started = false;65 for param in ¶ms {66 defaults_started = defaults_started || param.1.is_some();67 assert_eq!(defaults_started, param.1.is_some(), "defauld parameters should be used after all positionals");68 }69 expr::ParamsDesc(Rc::new(params))70 }71 / { expr::ParamsDesc(Rc::new(Vec::new())) }7273 pub rule arg(s: &ParserSettings) -> expr::Arg74 = name:$(id()) _ "=" _ expr:expr(s) {expr::Arg(Some(name.into()), expr)}75 / expr:expr(s) {expr::Arg(None, expr)}76 pub rule args(s: &ParserSettings) -> expr::ArgsDesc77 = args:arg(s) ** comma() comma()? {78 let mut named_started = false;79 for arg in &args {80 named_started = named_started || arg.0.is_some();81 assert_eq!(named_started, arg.0.is_some(), "named args should be used after all positionals");82 }83 expr::ArgsDesc(args)84 }85 / { expr::ArgsDesc(Vec::new()) }8687 pub rule bind(s: &ParserSettings) -> expr::BindSpec88 = name:$(id()) _ "=" _ expr:expr(s) {expr::BindSpec{name:name.into(), params: None, value: expr}}89 / name:$(id()) _ "(" _ params:params(s) _ ")" _ "=" _ expr:expr(s) {expr::BindSpec{name:name.into(), params: Some(params), value: expr}}90 pub rule assertion(s: &ParserSettings) -> expr::AssertStmt91 = keyword("assert") _ cond:expr(s) msg:(_ ":" _ e:expr(s) {e})? { expr::AssertStmt(cond, msg) }9293 pub rule whole_line() -> &'input str94 = str:$((!['\n'][_])* "\n") {str}95 pub rule string_block() -> String96 = "|||" (!['\n']single_whitespace())* "\n"97 empty_lines:$(['\n']*)98 prefix:[' ' | '\t']+ first_line:whole_line()99 lines:("\n" {"\n"} / [' ' | '\t']*<{prefix.len()}> s:whole_line() {s})*100 [' ' | '\t']*<, {prefix.len() - 1}> "|||"101 {let mut l = empty_lines.to_owned(); l.push_str(first_line); l.extend(lines); l}102 pub rule string() -> String103 = quiet!{ "\"" str:$(("\\\"" / "\\\\" / (!['"'][_]))*) "\"" {unescape::unescape(str).unwrap()}104 / "'" str:$(("\\'" / "\\\\" / (!['\''][_]))*) "'" {unescape::unescape(str).unwrap()}105 / "@'" str:$(("''" / (!['\''][_]))*) "'" {str.replace("''", "'")}106 / "@\"" str:$(("\"\"" / (!['"'][_]))*) "\"" {str.replace("\"\"", "\"")}107 / string_block() } / expected!("<string>")108109 pub rule field_name(s: &ParserSettings) -> expr::FieldName110 = name:$(id()) {expr::FieldName::Fixed(name.into())}111 / name:string() {expr::FieldName::Fixed(name.into())}112 / "[" _ expr:expr(s) _ "]" {expr::FieldName::Dyn(expr)}113 pub rule visibility() -> expr::Visibility114 = ":::" {expr::Visibility::Unhide}115 / "::" {expr::Visibility::Hidden}116 / ":" {expr::Visibility::Normal}117 pub rule field(s: &ParserSettings) -> expr::FieldMember118 = name:field_name(s) _ plus:"+"? _ visibility:visibility() _ value:expr(s) {expr::FieldMember{119 name,120 plus: plus.is_some(),121 params: None,122 visibility,123 value,124 }}125 / name:field_name(s) _ "(" _ params:params(s) _ ")" _ visibility:visibility() _ value:expr(s) {expr::FieldMember{126 name,127 plus: false,128 params: Some(params),129 visibility,130 value,131 }}132 pub rule obj_local(s: &ParserSettings) -> BindSpec133 = keyword("local") _ bind:bind(s) {bind}134 pub rule member(s: &ParserSettings) -> expr::Member135 = bind:obj_local(s) {expr::Member::BindStmt(bind)}136 / assertion:assertion(s) {expr::Member::AssertStmt(assertion)}137 / field:field(s) {expr::Member::Field(field)}138 pub rule objinside(s: &ParserSettings) -> expr::ObjBody139 = pre_locals:(b: obj_local(s) comma() {b})* "[" _ key:expr(s) _ "]" _ plus:"+"? _ ":" _ value:expr(s) post_locals:(comma() b:obj_local(s) {b})* _ forspec:forspec(s) others:(_ rest:compspec(s) {rest})? {140 let mut compspecs = vec![CompSpec::ForSpec(forspec)];141 compspecs.extend(others.unwrap_or_default());142 expr::ObjBody::ObjComp(expr::ObjComp{143 pre_locals,144 key,145 plus: plus.is_some(),146 value,147 post_locals,148 compspecs,149 })150 }151 / members:(member(s) ** comma()) comma()? {expr::ObjBody::MemberList(members)}152 pub rule ifspec(s: &ParserSettings) -> IfSpecData153 = keyword("if") _ expr:expr(s) {IfSpecData(expr)}154 pub rule forspec(s: &ParserSettings) -> ForSpecData155 = keyword("for") _ id:$(id()) _ keyword("in") _ cond:expr(s) {ForSpecData(id.into(), cond)}156 pub rule compspec(s: &ParserSettings) -> Vec<expr::CompSpec>157 = s:(i:ifspec(s) { expr::CompSpec::IfSpec(i) } / f:forspec(s) {expr::CompSpec::ForSpec(f)} ) ** _ {s}158 pub rule local_expr(s: &ParserSettings) -> LocExpr159 = l(s,<keyword("local") _ binds:bind(s) ** comma() _ ";" _ expr:expr(s) { Expr::LocalExpr(binds, expr) }>)160 pub rule string_expr(s: &ParserSettings) -> LocExpr161 = l(s, <s:string() {Expr::Str(s.into())}>)162 pub rule obj_expr(s: &ParserSettings) -> LocExpr163 = l(s,<"{" _ body:objinside(s) _ "}" {Expr::Obj(body)}>)164 pub rule array_expr(s: &ParserSettings) -> LocExpr165 = l(s,<"[" _ elems:(expr(s) ** comma()) _ comma()? "]" {Expr::Arr(elems)}>)166 pub rule array_comp_expr(s: &ParserSettings) -> LocExpr167 = l(s,<"[" _ expr:expr(s) _ comma()? _ forspec:forspec(s) _ others:(others: compspec(s) _ {others})? "]" {168 let mut specs = vec![CompSpec::ForSpec(forspec)];169 specs.extend(others.unwrap_or_default());170 Expr::ArrComp(expr, specs)171 }>)172 pub rule number_expr(s: &ParserSettings) -> LocExpr173 = l(s,<n:number() { expr::Expr::Num(n) }>)174 pub rule var_expr(s: &ParserSettings) -> LocExpr175 = l(s,<n:$(id()) { expr::Expr::Var(n.into()) }>)176 pub rule if_then_else_expr(s: &ParserSettings) -> LocExpr177 = l(s,<cond:ifspec(s) _ keyword("then") _ cond_then:expr(s) cond_else:(_ keyword("else") _ e:expr(s) {e})? {Expr::IfElse{178 cond,179 cond_then,180 cond_else,181 }}>)182183 pub rule literal(s: &ParserSettings) -> LocExpr184 = l(s,<v:(185 keyword("null") {LiteralType::Null}186 / keyword("true") {LiteralType::True}187 / keyword("false") {LiteralType::False}188 / keyword("self") {LiteralType::This}189 / keyword("$") {LiteralType::Dollar}190 / keyword("super") {LiteralType::Super}191 ) {Expr::Literal(v)}>)192193 pub rule expr_basic(s: &ParserSettings) -> LocExpr194 = literal(s)195196 / quiet!{l(s,<"$intrinsic(" name:$(id()) ")" {Expr::Intrinsic(name.into())}>)}197198 / string_expr(s) / number_expr(s)199 / array_expr(s)200 / obj_expr(s)201 / array_expr(s)202 / array_comp_expr(s)203204 / l(s,<keyword("importstr") _ path:string() {Expr::ImportStr(PathBuf::from(path))}>)205 / l(s,<keyword("import") _ path:string() {Expr::Import(PathBuf::from(path))}>)206207 / var_expr(s)208 / local_expr(s)209 / if_then_else_expr(s)210211 / l(s,<keyword("function") _ "(" _ params:params(s) _ ")" _ expr:expr(s) {Expr::Function(params, expr)}>)212 / l(s,<assertion:assertion(s) _ ";" _ expr:expr(s) { Expr::AssertExpr(assertion, expr) }>)213214 / l(s,<keyword("error") _ expr:expr(s) { Expr::ErrorStmt(expr) }>)215216 rule slice_part(s: &ParserSettings) -> Option<LocExpr>217 = e:(_ e:expr(s) _{e})? {e}218 pub rule slice_desc(s: &ParserSettings) -> SliceDesc219 = start:slice_part(s) ":" pair:(end:slice_part(s) step:(":" e:slice_part(s){e})? {(end, step.flatten())})? {220 let (end, step) = if let Some((end, step)) = pair {221 (end, step)222 }else{223 (None, None)224 };225226 SliceDesc { start, end, step }227 }228229 rule binop(x: rule<()>) -> ()230 = quiet!{ x() } / expected!("<binary op>")231 rule unaryop(x: rule<()>) -> ()232 = quiet!{ x() } / expected!("<unary op>")233234235 use BinaryOpType::*;236 use UnaryOpType::*;237 rule expr(s: &ParserSettings) -> LocExpr238 = start:position!() a:precedence! {239 a:(@) _ binop(<"||">) _ b:@ {expr_bin!(a Or b)}240 --241 a:(@) _ binop(<"&&">) _ b:@ {expr_bin!(a And b)}242 --243 a:(@) _ binop(<"|">) _ b:@ {expr_bin!(a BitOr b)}244 --245 a:@ _ binop(<"^">) _ b:(@) {expr_bin!(a BitXor b)}246 --247 a:(@) _ binop(<"&">) _ b:@ {expr_bin!(a BitAnd b)}248 --249 a:(@) _ binop(<"==">) _ b:@ {expr_bin!(a Eq b)}250 a:(@) _ binop(<"!=">) _ b:@ {expr_bin!(a Neq b)}251 --252 a:(@) _ binop(<"<">) _ b:@ {expr_bin!(a Lt b)}253 a:(@) _ binop(<">">) _ b:@ {expr_bin!(a Gt b)}254 a:(@) _ binop(<"<=">) _ b:@ {expr_bin!(a Lte b)}255 a:(@) _ binop(<">=">) _ b:@ {expr_bin!(a Gte b)}256 a:(@) _ binop(<keyword("in")>) _ b:@ {expr_bin!(a In b)}257 --258 a:(@) _ binop(<"<<">) _ b:@ {expr_bin!(a Lhs b)}259 a:(@) _ binop(<">>">) _ b:@ {expr_bin!(a Rhs b)}260 --261 a:(@) _ binop(<"+">) _ b:@ {expr_bin!(a Add b)}262 a:(@) _ binop(<"-">) _ b:@ {expr_bin!(a Sub b)}263 --264 a:(@) _ binop(<"*">) _ b:@ {expr_bin!(a Mul b)}265 a:(@) _ binop(<"/">) _ b:@ {expr_bin!(a Div b)}266 a:(@) _ binop(<"%">) _ b:@ {expr_bin!(a Mod b)}267 --268 unaryop(<"-">) _ b:@ {expr_un!(Minus b)}269 unaryop(<"!">) _ b:@ {expr_un!(Not b)}270 unaryop(<"~">) _ b:@ {expr_un!(BitNot b)}271 --272 a:(@) _ "[" _ s:slice_desc(s) _ "]" {loc_expr_todo!(Expr::Slice(a, s))}273 a:(@) _ "." _ s:$(id()) {loc_expr_todo!(Expr::Index(a, el!(Expr::Str(s.into()))))}274 a:(@) _ "[" _ s:expr(s) _ "]" {loc_expr_todo!(Expr::Index(a, s))}275 a:(@) _ "(" _ args:args(s) _ ")" ts:(_ keyword("tailstrict"))? {loc_expr_todo!(Expr::Apply(a, args, ts.is_some()))}276 a:(@) _ "{" _ body:objinside(s) _ "}" {loc_expr_todo!(Expr::ObjExtend(a, body))}277 --278 e:expr_basic(s) {e}279 "(" _ e:expr(s) _ ")" {loc_expr_todo!(Expr::Parened(e))}280 } end:position!() {281 let LocExpr(e, _) = a;282 LocExpr(e, if s.loc_data {283 Some(ExprLocation(s.file_name.clone(), start, end))284 } else {285 None286 })287 }288 / e:expr_basic(s) {e}289290 pub rule jsonnet(s: &ParserSettings) -> LocExpr = _ e:expr(s) _ {e}291 }292}293294pub type ParseError = peg::error::ParseError<peg::str::LineCol>;295pub fn parse(str: &str, settings: &ParserSettings) -> Result<LocExpr, ParseError> {296 jsonnet_parser::jsonnet(str, settings)297}298299#[macro_export]300macro_rules! el {301 ($expr:expr) => {302 LocExpr(std::rc::Rc::new($expr), None)303 };304}305306#[cfg(test)]307pub mod tests {308 use super::{expr::*, parse};309 use crate::ParserSettings;310 use std::path::PathBuf;311 use BinaryOpType::*;312313 macro_rules! parse {314 ($s:expr) => {315 parse(316 $s,317 &ParserSettings {318 loc_data: false,319 file_name: PathBuf::from("/test.jsonnet").into(),320 },321 )322 .unwrap()323 };324 }325326 mod expressions {327 use super::*;328329 pub fn basic_math() -> LocExpr {330 el!(Expr::BinaryOp(331 el!(Expr::Num(2.0)),332 Add,333 el!(Expr::BinaryOp(334 el!(Expr::Num(2.0)),335 Mul,336 el!(Expr::Num(2.0)),337 )),338 ))339 }340 }341342 #[test]343 fn multiline_string() {344 assert_eq!(345 parse!("|||\n Hello world!\n a\n|||"),346 el!(Expr::Str("Hello world!\n a\n".into())),347 );348 assert_eq!(349 parse!("|||\n Hello world!\n a\n|||"),350 el!(Expr::Str("Hello world!\n a\n".into())),351 );352 assert_eq!(353 parse!("|||\n\t\tHello world!\n\t\t\ta\n|||"),354 el!(Expr::Str("Hello world!\n\ta\n".into())),355 );356 assert_eq!(357 parse!("|||\n Hello world!\n a\n |||"),358 el!(Expr::Str("Hello world!\n a\n".into())),359 );360 }361362 #[test]363 fn slice() {364 parse!("a[1:]");365 parse!("a[1::]");366 parse!("a[:1:]");367 parse!("a[::1]");368 parse!("str[:len - 1]");369 }370371 #[test]372 fn string_escaping() {373 assert_eq!(374 parse!(r#""Hello, \"world\"!""#),375 el!(Expr::Str(r#"Hello, "world"!"#.into())),376 );377 assert_eq!(378 parse!(r#"'Hello \'world\'!'"#),379 el!(Expr::Str("Hello 'world'!".into())),380 );381 assert_eq!(parse!(r#"'\\\\'"#), el!(Expr::Str("\\\\".into())),);382 }383384 #[test]385 fn string_unescaping() {386 assert_eq!(387 parse!(r#""Hello\nWorld""#),388 el!(Expr::Str("Hello\nWorld".into())),389 );390 }391392 #[test]393 fn string_verbantim() {394 assert_eq!(395 parse!(r#"@"Hello\n""World""""#),396 el!(Expr::Str("Hello\\n\"World\"".into())),397 );398 }399400 #[test]401 fn imports() {402 assert_eq!(403 parse!("import \"hello\""),404 el!(Expr::Import(PathBuf::from("hello"))),405 );406 assert_eq!(407 parse!("importstr \"garnish.txt\""),408 el!(Expr::ImportStr(PathBuf::from("garnish.txt")))409 );410 }411412 #[test]413 fn empty_object() {414 assert_eq!(parse!("{}"), el!(Expr::Obj(ObjBody::MemberList(vec![]))));415 }416417 #[test]418 fn basic_math() {419 assert_eq!(420 parse!("2+2*2"),421 el!(Expr::BinaryOp(422 el!(Expr::Num(2.0)),423 Add,424 el!(Expr::BinaryOp(425 el!(Expr::Num(2.0)),426 Mul,427 el!(Expr::Num(2.0))428 ))429 ))430 );431 }432433 #[test]434 fn basic_math_with_indents() {435 assert_eq!(parse!("2 + 2 * 2 "), expressions::basic_math());436 }437438 #[test]439 fn basic_math_parened() {440 assert_eq!(441 parse!("2+(2+2*2)"),442 el!(Expr::BinaryOp(443 el!(Expr::Num(2.0)),444 Add,445 el!(Expr::Parened(expressions::basic_math())),446 ))447 );448 }449450 /// Comments should not affect parsing451 #[test]452 fn comments() {453 assert_eq!(454 parse!("2//comment\n+//comment\n3/*test*/*/*test*/4"),455 el!(Expr::BinaryOp(456 el!(Expr::Num(2.0)),457 Add,458 el!(Expr::BinaryOp(459 el!(Expr::Num(3.0)),460 Mul,461 el!(Expr::Num(4.0))462 ))463 ))464 );465 }466467 /// Comments should be able to be escaped468 #[test]469 fn comment_escaping() {470 assert_eq!(471 parse!("2/*\\*/+*/ - 22"),472 el!(Expr::BinaryOp(473 el!(Expr::Num(2.0)),474 Sub,475 el!(Expr::Num(22.0))476 ))477 );478 }479480 #[test]481 fn suffix() {482 // assert_eq!(parse!("std.test"), el!(Expr::Num(2.2)));483 // assert_eq!(parse!("std(2)"), el!(Expr::Num(2.2)));484 // assert_eq!(parse!("std.test(2)"), el!(Expr::Num(2.2)));485 // assert_eq!(parse!("a[b]"), el!(Expr::Num(2.2)))486 }487488 #[test]489 fn array_comp() {490 use Expr::*;491 assert_eq!(492 parse!("[std.deepJoin(x) for x in arr]"),493 el!(ArrComp(494 el!(Apply(495 el!(Index(el!(Var("std".into())), el!(Str("deepJoin".into())))),496 ArgsDesc(vec![Arg(None, el!(Var("x".into())))]),497 false,498 )),499 vec![CompSpec::ForSpec(ForSpecData(500 "x".into(),501 el!(Var("arr".into()))502 ))]503 )),504 )505 }506507 #[test]508 fn reserved() {509 use Expr::*;510 assert_eq!(parse!("null"), el!(Literal(LiteralType::Null)));511 assert_eq!(parse!("nulla"), el!(Var("nulla".into())));512 }513514 #[test]515 fn multiple_args_buf() {516 parse!("a(b, null_fields)");517 }518519 #[test]520 fn infix_precedence() {521 use Expr::*;522 assert_eq!(523 parse!("!a && !b"),524 el!(BinaryOp(525 el!(UnaryOp(UnaryOpType::Not, el!(Var("a".into())))),526 And,527 el!(UnaryOp(UnaryOpType::Not, el!(Var("b".into()))))528 ))529 );530 }531532 #[test]533 fn infix_precedence_division() {534 use Expr::*;535 assert_eq!(536 parse!("!a / !b"),537 el!(BinaryOp(538 el!(UnaryOp(UnaryOpType::Not, el!(Var("a".into())))),539 Div,540 el!(UnaryOp(UnaryOpType::Not, el!(Var("b".into()))))541 ))542 );543 }544545 #[test]546 fn double_negation() {547 use Expr::*;548 assert_eq!(549 parse!("!!a"),550 el!(UnaryOp(551 UnaryOpType::Not,552 el!(UnaryOp(UnaryOpType::Not, el!(Var("a".into()))))553 ))554 )555 }556557 #[test]558 fn array_test_error() {559 parse!("[a for a in b if c for e in f]");560 // ^^^^ failed code561 }562563 #[test]564 fn can_parse_stdlib() {565 parse!(jrsonnet_stdlib::STDLIB_STR);566 }567568 // From source code569 /*570 #[bench]571 fn bench_parse_peg(b: &mut Bencher) {572 b.iter(|| parse!(jrsonnet_stdlib::STDLIB_STR))573 }574 */575}1#![allow(clippy::redundant_closure_call)]23use peg::parser;4use std::{5 path::{Path, PathBuf},6 rc::Rc,7};8mod expr;9pub use expr::*;10pub use jrsonnet_interner::IStr;11pub use peg;1213pub struct ParserSettings {14 pub loc_data: bool,15 pub file_name: Rc<Path>,16}1718macro_rules! expr_bin {19 ($a:ident $op:ident $b:ident) => {20 loc_expr_todo!(Expr::BinaryOp($a, $op, $b))21 };22}23macro_rules! expr_un {24 ($op:ident $a:ident) => {25 loc_expr_todo!(Expr::UnaryOp($op, $a))26 };27}2829parser! {30 grammar jsonnet_parser() for str {31 use peg::ParseLiteral;3233 /// Standard C-like comments34 rule comment()35 = "//" (!['\n'][_])* "\n"36 / "/*" ("\\*/" / "\\\\" / (!("*/")[_]))* "*/"37 / "#" (!['\n'][_])* "\n"3839 rule single_whitespace() = quiet!{([' ' | '\r' | '\n' | '\t'] / comment())} / expected!("<whitespace>")40 rule _() = single_whitespace()*4142 /// For comma-delimited elements43 rule comma() = quiet!{_ "," _} / expected!("<comma>")44 rule alpha() -> char = c:$(['_' | 'a'..='z' | 'A'..='Z']) {c.chars().next().unwrap()}45 rule digit() -> char = d:$(['0'..='9']) {d.chars().next().unwrap()}46 rule end_of_ident() = !['0'..='9' | '_' | 'a'..='z' | 'A'..='Z']47 /// Sequence of digits48 rule uint_str() -> &'input str = a:$(digit()+) { a }49 /// Number in scientific notation format50 rule number() -> f64 = quiet!{a:$(uint_str() ("." uint_str())? (['e'|'E'] (s:['+'|'-'])? uint_str())?) {? a.parse().map_err(|_| "<number>") }} / expected!("<number>")5152 /// Reserved word followed by any non-alphanumberic53 rule reserved() = ("assert" / "else" / "error" / "false" / "for" / "function" / "if" / "import" / "importstr" / "in" / "local" / "null" / "tailstrict" / "then" / "self" / "super" / "true") end_of_ident()54 rule id() = quiet!{ !reserved() alpha() (alpha() / digit())*} / expected!("<identifier>")5556 rule keyword(id: &'static str) -> ()57 = ##parse_string_literal(id) end_of_ident()58 // Adds location data information to existing expression59 rule l(s: &ParserSettings, x: rule<Expr>) -> LocExpr60 = start:position!() v:x() end:position!() {loc_expr!(v, s.loc_data, (s.file_name.clone(), start, end))}6162 pub rule param(s: &ParserSettings) -> expr::Param = name:$(id()) expr:(_ "=" _ expr:expr(s){expr})? { expr::Param(name.into(), expr) }63 pub rule params(s: &ParserSettings) -> expr::ParamsDesc64 = params:param(s) ** comma() comma()? {65 let mut defaults_started = false;66 for param in ¶ms {67 defaults_started = defaults_started || param.1.is_some();68 assert_eq!(defaults_started, param.1.is_some(), "defauld parameters should be used after all positionals");69 }70 expr::ParamsDesc(Rc::new(params))71 }72 / { expr::ParamsDesc(Rc::new(Vec::new())) }7374 pub rule arg(s: &ParserSettings) -> (Option<IStr>, LocExpr)75 = quiet! { name:(s:$(id()) _ "=" _ {s})? expr:expr(s) {(name.map(Into::into), expr)} }76 / expected!("<argument>")7778 pub rule args(s: &ParserSettings) -> expr::ArgsDesc79 = args:arg(s)**comma() comma()? {?80 let unnamed_count = args.iter().take_while(|(n, _)| n.is_none()).count();81 let mut unnamed = Vec::with_capacity(unnamed_count);82 let mut named = Vec::with_capacity(args.len() - unnamed_count);83 let mut named_started = false;84 for (name, value) in args {85 if let Some(name) = name {86 named_started = true;87 named.push((name, value));88 } else {89 if named_started {90 return Err("<named argument>")91 }92 unnamed.push(value);93 }94 }95 Ok(expr::ArgsDesc::new(unnamed, named))96 }9798 pub rule bind(s: &ParserSettings) -> expr::BindSpec99 = name:$(id()) _ "=" _ expr:expr(s) {expr::BindSpec{name:name.into(), params: None, value: expr}}100 / name:$(id()) _ "(" _ params:params(s) _ ")" _ "=" _ expr:expr(s) {expr::BindSpec{name:name.into(), params: Some(params), value: expr}}101 pub rule assertion(s: &ParserSettings) -> expr::AssertStmt102 = keyword("assert") _ cond:expr(s) msg:(_ ":" _ e:expr(s) {e})? { expr::AssertStmt(cond, msg) }103104 pub rule whole_line() -> &'input str105 = str:$((!['\n'][_])* "\n") {str}106 pub rule string_block() -> String107 = "|||" (!['\n']single_whitespace())* "\n"108 empty_lines:$(['\n']*)109 prefix:[' ' | '\t']+ first_line:whole_line()110 lines:("\n" {"\n"} / [' ' | '\t']*<{prefix.len()}> s:whole_line() {s})*111 [' ' | '\t']*<, {prefix.len() - 1}> "|||"112 {let mut l = empty_lines.to_owned(); l.push_str(first_line); l.extend(lines); l}113 pub rule string() -> String114 = quiet!{ "\"" str:$(("\\\"" / "\\\\" / (!['"'][_]))*) "\"" {unescape::unescape(str).unwrap()}115 / "'" str:$(("\\'" / "\\\\" / (!['\''][_]))*) "'" {unescape::unescape(str).unwrap()}116 / "@'" str:$(("''" / (!['\''][_]))*) "'" {str.replace("''", "'")}117 / "@\"" str:$(("\"\"" / (!['"'][_]))*) "\"" {str.replace("\"\"", "\"")}118 / string_block() } / expected!("<string>")119120 pub rule field_name(s: &ParserSettings) -> expr::FieldName121 = name:$(id()) {expr::FieldName::Fixed(name.into())}122 / name:string() {expr::FieldName::Fixed(name.into())}123 / "[" _ expr:expr(s) _ "]" {expr::FieldName::Dyn(expr)}124 pub rule visibility() -> expr::Visibility125 = ":::" {expr::Visibility::Unhide}126 / "::" {expr::Visibility::Hidden}127 / ":" {expr::Visibility::Normal}128 pub rule field(s: &ParserSettings) -> expr::FieldMember129 = name:field_name(s) _ plus:"+"? _ visibility:visibility() _ value:expr(s) {expr::FieldMember{130 name,131 plus: plus.is_some(),132 params: None,133 visibility,134 value,135 }}136 / name:field_name(s) _ "(" _ params:params(s) _ ")" _ visibility:visibility() _ value:expr(s) {expr::FieldMember{137 name,138 plus: false,139 params: Some(params),140 visibility,141 value,142 }}143 pub rule obj_local(s: &ParserSettings) -> BindSpec144 = keyword("local") _ bind:bind(s) {bind}145 pub rule member(s: &ParserSettings) -> expr::Member146 = bind:obj_local(s) {expr::Member::BindStmt(bind)}147 / assertion:assertion(s) {expr::Member::AssertStmt(assertion)}148 / field:field(s) {expr::Member::Field(field)}149 pub rule objinside(s: &ParserSettings) -> expr::ObjBody150 = pre_locals:(b: obj_local(s) comma() {b})* "[" _ key:expr(s) _ "]" _ plus:"+"? _ ":" _ value:expr(s) post_locals:(comma() b:obj_local(s) {b})* _ forspec:forspec(s) others:(_ rest:compspec(s) {rest})? {151 let mut compspecs = vec![CompSpec::ForSpec(forspec)];152 compspecs.extend(others.unwrap_or_default());153 expr::ObjBody::ObjComp(expr::ObjComp{154 pre_locals,155 key,156 plus: plus.is_some(),157 value,158 post_locals,159 compspecs,160 })161 }162 / members:(member(s) ** comma()) comma()? {expr::ObjBody::MemberList(members)}163 pub rule ifspec(s: &ParserSettings) -> IfSpecData164 = keyword("if") _ expr:expr(s) {IfSpecData(expr)}165 pub rule forspec(s: &ParserSettings) -> ForSpecData166 = keyword("for") _ id:$(id()) _ keyword("in") _ cond:expr(s) {ForSpecData(id.into(), cond)}167 pub rule compspec(s: &ParserSettings) -> Vec<expr::CompSpec>168 = s:(i:ifspec(s) { expr::CompSpec::IfSpec(i) } / f:forspec(s) {expr::CompSpec::ForSpec(f)} ) ** _ {s}169 pub rule local_expr(s: &ParserSettings) -> LocExpr170 = l(s,<keyword("local") _ binds:bind(s) ** comma() _ ";" _ expr:expr(s) { Expr::LocalExpr(binds, expr) }>)171 pub rule string_expr(s: &ParserSettings) -> LocExpr172 = l(s, <s:string() {Expr::Str(s.into())}>)173 pub rule obj_expr(s: &ParserSettings) -> LocExpr174 = l(s,<"{" _ body:objinside(s) _ "}" {Expr::Obj(body)}>)175 pub rule array_expr(s: &ParserSettings) -> LocExpr176 = l(s,<"[" _ elems:(expr(s) ** comma()) _ comma()? "]" {Expr::Arr(elems)}>)177 pub rule array_comp_expr(s: &ParserSettings) -> LocExpr178 = l(s,<"[" _ expr:expr(s) _ comma()? _ forspec:forspec(s) _ others:(others: compspec(s) _ {others})? "]" {179 let mut specs = vec![CompSpec::ForSpec(forspec)];180 specs.extend(others.unwrap_or_default());181 Expr::ArrComp(expr, specs)182 }>)183 pub rule number_expr(s: &ParserSettings) -> LocExpr184 = l(s,<n:number() { expr::Expr::Num(n) }>)185 pub rule var_expr(s: &ParserSettings) -> LocExpr186 = l(s,<n:$(id()) { expr::Expr::Var(n.into()) }>)187 pub rule if_then_else_expr(s: &ParserSettings) -> LocExpr188 = l(s,<cond:ifspec(s) _ keyword("then") _ cond_then:expr(s) cond_else:(_ keyword("else") _ e:expr(s) {e})? {Expr::IfElse{189 cond,190 cond_then,191 cond_else,192 }}>)193194 pub rule literal(s: &ParserSettings) -> LocExpr195 = l(s,<v:(196 keyword("null") {LiteralType::Null}197 / keyword("true") {LiteralType::True}198 / keyword("false") {LiteralType::False}199 / keyword("self") {LiteralType::This}200 / keyword("$") {LiteralType::Dollar}201 / keyword("super") {LiteralType::Super}202 ) {Expr::Literal(v)}>)203204 pub rule expr_basic(s: &ParserSettings) -> LocExpr205 = literal(s)206207 / quiet!{l(s,<"$intrinsic(" name:$(id()) ")" {Expr::Intrinsic(name.into())}>)}208209 / string_expr(s) / number_expr(s)210 / array_expr(s)211 / obj_expr(s)212 / array_expr(s)213 / array_comp_expr(s)214215 / l(s,<keyword("importstr") _ path:string() {Expr::ImportStr(PathBuf::from(path))}>)216 / l(s,<keyword("import") _ path:string() {Expr::Import(PathBuf::from(path))}>)217218 / var_expr(s)219 / local_expr(s)220 / if_then_else_expr(s)221222 / l(s,<keyword("function") _ "(" _ params:params(s) _ ")" _ expr:expr(s) {Expr::Function(params, expr)}>)223 / l(s,<assertion:assertion(s) _ ";" _ expr:expr(s) { Expr::AssertExpr(assertion, expr) }>)224225 / l(s,<keyword("error") _ expr:expr(s) { Expr::ErrorStmt(expr) }>)226227 rule slice_part(s: &ParserSettings) -> Option<LocExpr>228 = e:(_ e:expr(s) _{e})? {e}229 pub rule slice_desc(s: &ParserSettings) -> SliceDesc230 = start:slice_part(s) ":" pair:(end:slice_part(s) step:(":" e:slice_part(s){e})? {(end, step.flatten())})? {231 let (end, step) = if let Some((end, step)) = pair {232 (end, step)233 }else{234 (None, None)235 };236237 SliceDesc { start, end, step }238 }239240 rule binop(x: rule<()>) -> ()241 = quiet!{ x() } / expected!("<binary op>")242 rule unaryop(x: rule<()>) -> ()243 = quiet!{ x() } / expected!("<unary op>")244245246 use BinaryOpType::*;247 use UnaryOpType::*;248 rule expr(s: &ParserSettings) -> LocExpr249 = start:position!() a:precedence! {250 a:(@) _ binop(<"||">) _ b:@ {expr_bin!(a Or b)}251 --252 a:(@) _ binop(<"&&">) _ b:@ {expr_bin!(a And b)}253 --254 a:(@) _ binop(<"|">) _ b:@ {expr_bin!(a BitOr b)}255 --256 a:@ _ binop(<"^">) _ b:(@) {expr_bin!(a BitXor b)}257 --258 a:(@) _ binop(<"&">) _ b:@ {expr_bin!(a BitAnd b)}259 --260 a:(@) _ binop(<"==">) _ b:@ {expr_bin!(a Eq b)}261 a:(@) _ binop(<"!=">) _ b:@ {expr_bin!(a Neq b)}262 --263 a:(@) _ binop(<"<">) _ b:@ {expr_bin!(a Lt b)}264 a:(@) _ binop(<">">) _ b:@ {expr_bin!(a Gt b)}265 a:(@) _ binop(<"<=">) _ b:@ {expr_bin!(a Lte b)}266 a:(@) _ binop(<">=">) _ b:@ {expr_bin!(a Gte b)}267 a:(@) _ binop(<keyword("in")>) _ b:@ {expr_bin!(a In b)}268 --269 a:(@) _ binop(<"<<">) _ b:@ {expr_bin!(a Lhs b)}270 a:(@) _ binop(<">>">) _ b:@ {expr_bin!(a Rhs b)}271 --272 a:(@) _ binop(<"+">) _ b:@ {expr_bin!(a Add b)}273 a:(@) _ binop(<"-">) _ b:@ {expr_bin!(a Sub b)}274 --275 a:(@) _ binop(<"*">) _ b:@ {expr_bin!(a Mul b)}276 a:(@) _ binop(<"/">) _ b:@ {expr_bin!(a Div b)}277 a:(@) _ binop(<"%">) _ b:@ {expr_bin!(a Mod b)}278 --279 unaryop(<"-">) _ b:@ {expr_un!(Minus b)}280 unaryop(<"!">) _ b:@ {expr_un!(Not b)}281 unaryop(<"~">) _ b:@ {expr_un!(BitNot b)}282 --283 a:(@) _ "[" _ s:slice_desc(s) _ "]" {loc_expr_todo!(Expr::Slice(a, s))}284 a:(@) _ "." _ s:$(id()) {loc_expr_todo!(Expr::Index(a, el!(Expr::Str(s.into()))))}285 a:(@) _ "[" _ s:expr(s) _ "]" {loc_expr_todo!(Expr::Index(a, s))}286 a:(@) _ "(" _ args:args(s) _ ")" ts:(_ keyword("tailstrict"))? {loc_expr_todo!(Expr::Apply(a, args, ts.is_some()))}287 a:(@) _ "{" _ body:objinside(s) _ "}" {loc_expr_todo!(Expr::ObjExtend(a, body))}288 --289 e:expr_basic(s) {e}290 "(" _ e:expr(s) _ ")" {loc_expr_todo!(Expr::Parened(e))}291 } end:position!() {292 let LocExpr(e, _) = a;293 LocExpr(e, if s.loc_data {294 Some(ExprLocation(s.file_name.clone(), start, end))295 } else {296 None297 })298 }299 / e:expr_basic(s) {e}300301 pub rule jsonnet(s: &ParserSettings) -> LocExpr = _ e:expr(s) _ {e}302 }303}304305pub type ParseError = peg::error::ParseError<peg::str::LineCol>;306pub fn parse(str: &str, settings: &ParserSettings) -> Result<LocExpr, ParseError> {307 jsonnet_parser::jsonnet(str, settings)308}309310#[macro_export]311macro_rules! el {312 ($expr:expr) => {313 LocExpr(std::rc::Rc::new($expr), None)314 };315}316317#[cfg(test)]318pub mod tests {319 use super::{expr::*, parse};320 use crate::ParserSettings;321 use std::path::PathBuf;322 use BinaryOpType::*;323324 macro_rules! parse {325 ($s:expr) => {326 parse(327 $s,328 &ParserSettings {329 loc_data: false,330 file_name: PathBuf::from("/test.jsonnet").into(),331 },332 )333 .unwrap()334 };335 }336337 mod expressions {338 use super::*;339340 pub fn basic_math() -> LocExpr {341 el!(Expr::BinaryOp(342 el!(Expr::Num(2.0)),343 Add,344 el!(Expr::BinaryOp(345 el!(Expr::Num(2.0)),346 Mul,347 el!(Expr::Num(2.0)),348 )),349 ))350 }351 }352353 #[test]354 fn multiline_string() {355 assert_eq!(356 parse!("|||\n Hello world!\n a\n|||"),357 el!(Expr::Str("Hello world!\n a\n".into())),358 );359 assert_eq!(360 parse!("|||\n Hello world!\n a\n|||"),361 el!(Expr::Str("Hello world!\n a\n".into())),362 );363 assert_eq!(364 parse!("|||\n\t\tHello world!\n\t\t\ta\n|||"),365 el!(Expr::Str("Hello world!\n\ta\n".into())),366 );367 assert_eq!(368 parse!("|||\n Hello world!\n a\n |||"),369 el!(Expr::Str("Hello world!\n a\n".into())),370 );371 }372373 #[test]374 fn slice() {375 parse!("a[1:]");376 parse!("a[1::]");377 parse!("a[:1:]");378 parse!("a[::1]");379 parse!("str[:len - 1]");380 }381382 #[test]383 fn string_escaping() {384 assert_eq!(385 parse!(r#""Hello, \"world\"!""#),386 el!(Expr::Str(r#"Hello, "world"!"#.into())),387 );388 assert_eq!(389 parse!(r#"'Hello \'world\'!'"#),390 el!(Expr::Str("Hello 'world'!".into())),391 );392 assert_eq!(parse!(r#"'\\\\'"#), el!(Expr::Str("\\\\".into())),);393 }394395 #[test]396 fn string_unescaping() {397 assert_eq!(398 parse!(r#""Hello\nWorld""#),399 el!(Expr::Str("Hello\nWorld".into())),400 );401 }402403 #[test]404 fn string_verbantim() {405 assert_eq!(406 parse!(r#"@"Hello\n""World""""#),407 el!(Expr::Str("Hello\\n\"World\"".into())),408 );409 }410411 #[test]412 fn imports() {413 assert_eq!(414 parse!("import \"hello\""),415 el!(Expr::Import(PathBuf::from("hello"))),416 );417 assert_eq!(418 parse!("importstr \"garnish.txt\""),419 el!(Expr::ImportStr(PathBuf::from("garnish.txt")))420 );421 }422423 #[test]424 fn empty_object() {425 assert_eq!(parse!("{}"), el!(Expr::Obj(ObjBody::MemberList(vec![]))));426 }427428 #[test]429 fn basic_math() {430 assert_eq!(431 parse!("2+2*2"),432 el!(Expr::BinaryOp(433 el!(Expr::Num(2.0)),434 Add,435 el!(Expr::BinaryOp(436 el!(Expr::Num(2.0)),437 Mul,438 el!(Expr::Num(2.0))439 ))440 ))441 );442 }443444 #[test]445 fn basic_math_with_indents() {446 assert_eq!(parse!("2 + 2 * 2 "), expressions::basic_math());447 }448449 #[test]450 fn basic_math_parened() {451 assert_eq!(452 parse!("2+(2+2*2)"),453 el!(Expr::BinaryOp(454 el!(Expr::Num(2.0)),455 Add,456 el!(Expr::Parened(expressions::basic_math())),457 ))458 );459 }460461 /// Comments should not affect parsing462 #[test]463 fn comments() {464 assert_eq!(465 parse!("2//comment\n+//comment\n3/*test*/*/*test*/4"),466 el!(Expr::BinaryOp(467 el!(Expr::Num(2.0)),468 Add,469 el!(Expr::BinaryOp(470 el!(Expr::Num(3.0)),471 Mul,472 el!(Expr::Num(4.0))473 ))474 ))475 );476 }477478 /// Comments should be able to be escaped479 #[test]480 fn comment_escaping() {481 assert_eq!(482 parse!("2/*\\*/+*/ - 22"),483 el!(Expr::BinaryOp(484 el!(Expr::Num(2.0)),485 Sub,486 el!(Expr::Num(22.0))487 ))488 );489 }490491 #[test]492 fn suffix() {493 // assert_eq!(parse!("std.test"), el!(Expr::Num(2.2)));494 // assert_eq!(parse!("std(2)"), el!(Expr::Num(2.2)));495 // assert_eq!(parse!("std.test(2)"), el!(Expr::Num(2.2)));496 // assert_eq!(parse!("a[b]"), el!(Expr::Num(2.2)))497 }498499 #[test]500 fn array_comp() {501 use Expr::*;502 assert_eq!(503 parse!("[std.deepJoin(x) for x in arr]"),504 el!(ArrComp(505 el!(Apply(506 el!(Index(el!(Var("std".into())), el!(Str("deepJoin".into())))),507 ArgsDesc::new(vec![el!(Var("x".into()))], vec![]),508 false,509 )),510 vec![CompSpec::ForSpec(ForSpecData(511 "x".into(),512 el!(Var("arr".into()))513 ))]514 )),515 )516 }517518 #[test]519 fn reserved() {520 use Expr::*;521 assert_eq!(parse!("null"), el!(Literal(LiteralType::Null)));522 assert_eq!(parse!("nulla"), el!(Var("nulla".into())));523 }524525 #[test]526 fn multiple_args_buf() {527 parse!("a(b, null_fields)");528 }529530 #[test]531 fn infix_precedence() {532 use Expr::*;533 assert_eq!(534 parse!("!a && !b"),535 el!(BinaryOp(536 el!(UnaryOp(UnaryOpType::Not, el!(Var("a".into())))),537 And,538 el!(UnaryOp(UnaryOpType::Not, el!(Var("b".into()))))539 ))540 );541 }542543 #[test]544 fn infix_precedence_division() {545 use Expr::*;546 assert_eq!(547 parse!("!a / !b"),548 el!(BinaryOp(549 el!(UnaryOp(UnaryOpType::Not, el!(Var("a".into())))),550 Div,551 el!(UnaryOp(UnaryOpType::Not, el!(Var("b".into()))))552 ))553 );554 }555556 #[test]557 fn double_negation() {558 use Expr::*;559 assert_eq!(560 parse!("!!a"),561 el!(UnaryOp(562 UnaryOpType::Not,563 el!(UnaryOp(UnaryOpType::Not, el!(Var("a".into()))))564 ))565 )566 }567568 #[test]569 fn array_test_error() {570 parse!("[a for a in b if c for e in f]");571 // ^^^^ failed code572 }573574 #[test]575 fn can_parse_stdlib() {576 parse!(jrsonnet_stdlib::STDLIB_STR);577 }578579 // From source code580 /*581 #[bench]582 fn bench_parse_peg(b: &mut Bencher) {583 b.iter(|| parse!(jrsonnet_stdlib::STDLIB_STR))584 }585 */586}