snarkvm_synthesizer_program/
parse.rs1use super::*;
17
18impl<N: Network> Parser for ProgramCore<N> {
19 #[inline]
21 fn parse(string: &str) -> ParserResult<Self> {
22 enum P<N: Network> {
24 Constructor(ConstructorCore<N>),
25 M(Mapping<N>),
26 S(StructType<N>),
27 R(RecordType<N>),
28 C(ClosureCore<N>),
29 F(FunctionCore<N>),
30 }
31
32 let (string, imports) = many0(Import::parse)(string)?;
34 let (string, _) = Sanitizer::parse(string)?;
36 let (string, _) = tag(Self::type_name())(string)?;
38 let (string, _) = Sanitizer::parse_whitespaces(string)?;
40 let (string, id) = ProgramID::parse(string)?;
42 let (string, _) = Sanitizer::parse_whitespaces(string)?;
44 let (string, _) = tag(";")(string)?;
46
47 fn intermediate<N: Network>(string: &str) -> ParserResult<P<N>> {
48 let (string, _) = Sanitizer::parse(string)?;
50
51 if string.starts_with(ConstructorCore::<N>::type_name()) {
52 map(ConstructorCore::parse, |constructor| P::<N>::Constructor(constructor))(string)
53 } else if string.starts_with(Mapping::<N>::type_name()) {
54 map(Mapping::parse, |mapping| P::<N>::M(mapping))(string)
55 } else if string.starts_with(StructType::<N>::type_name()) {
56 map(StructType::parse, |struct_| P::<N>::S(struct_))(string)
57 } else if string.starts_with(RecordType::<N>::type_name()) {
58 map(RecordType::parse, |record| P::<N>::R(record))(string)
59 } else if string.starts_with(ClosureCore::<N>::type_name()) {
60 map(ClosureCore::parse, |closure| P::<N>::C(closure))(string)
61 } else if string.starts_with(FunctionCore::<N>::type_name()) {
62 map(FunctionCore::parse, |function| P::<N>::F(function))(string)
63 } else {
64 Err(Err::Error(make_error(string, ErrorKind::Alt)))
65 }
66 }
67
68 let (string, components) = many1(intermediate)(string)?;
70 let (string, _) = Sanitizer::parse(string)?;
72
73 let mut program = match ProgramCore::<N>::new(id) {
75 Ok(program) => program,
76 Err(error) => {
77 eprintln!("{error}");
78 return map_res(take(0usize), Err)(string);
79 }
80 };
81 for component in components {
83 let result = match component {
84 P::Constructor(constructor) => program.add_constructor(constructor),
85 P::M(mapping) => program.add_mapping(mapping),
86 P::S(struct_) => program.add_struct(struct_),
87 P::R(record) => program.add_record(record),
88 P::C(closure) => program.add_closure(closure),
89 P::F(function) => program.add_function(function),
90 };
91
92 match result {
93 Ok(_) => (),
94 Err(error) => {
95 eprintln!("{error}");
96 return map_res(take(0usize), Err)(string);
97 }
98 }
99 }
100 for import in imports {
102 match program.add_import(import) {
103 Ok(_) => (),
104 Err(error) => {
105 eprintln!("{error}");
106 return map_res(take(0usize), Err)(string);
107 }
108 }
109 }
110
111 Ok((string, program))
112 }
113}
114
115impl<N: Network> FromStr for ProgramCore<N> {
116 type Err = Error;
117
118 fn from_str(string: &str) -> Result<Self> {
120 ensure!(string.len() <= N::MAX_PROGRAM_SIZE, "Program length exceeds N::MAX_PROGRAM_SIZE.");
122
123 match Self::parse(string) {
124 Ok((remainder, object)) => {
125 ensure!(remainder.is_empty(), "Failed to parse string. Remaining invalid string is: \"{remainder}\"");
127 Ok(object)
129 }
130 Err(error) => bail!("Failed to parse string. {error}"),
131 }
132 }
133}
134
135impl<N: Network> Debug for ProgramCore<N> {
136 fn fmt(&self, f: &mut Formatter) -> fmt::Result {
138 Display::fmt(self, f)
139 }
140}
141
142impl<N: Network> Display for ProgramCore<N> {
143 fn fmt(&self, f: &mut Formatter<'_>) -> fmt::Result {
145 if !self.imports.is_empty() {
146 for import in self.imports.values() {
148 writeln!(f, "{import}")?;
149 }
150
151 writeln!(f)?;
153 }
154
155 write!(f, "{} {};\n\n", Self::type_name(), self.id)?;
157
158 let mut components_iter = self.components.iter().peekable();
160 while let Some((label, definition)) = components_iter.next() {
161 match label {
162 ProgramLabel::Constructor => {
163 if let Some(constructor) = &self.constructor {
165 writeln!(f, "{constructor}")?;
166 }
167 }
168 ProgramLabel::Identifier(identifier) => match definition {
169 ProgramDefinition::Constructor => return Err(fmt::Error),
170 ProgramDefinition::Mapping => match self.mappings.get(identifier) {
171 Some(mapping) => writeln!(f, "{mapping}")?,
172 None => return Err(fmt::Error),
173 },
174 ProgramDefinition::Struct => match self.structs.get(identifier) {
175 Some(struct_) => writeln!(f, "{struct_}")?,
176 None => return Err(fmt::Error),
177 },
178 ProgramDefinition::Record => match self.records.get(identifier) {
179 Some(record) => writeln!(f, "{record}")?,
180 None => return Err(fmt::Error),
181 },
182 ProgramDefinition::Closure => match self.closures.get(identifier) {
183 Some(closure) => writeln!(f, "{closure}")?,
184 None => return Err(fmt::Error),
185 },
186 ProgramDefinition::Function => match self.functions.get(identifier) {
187 Some(function) => writeln!(f, "{function}")?,
188 None => return Err(fmt::Error),
189 },
190 },
191 }
192
193 if components_iter.peek().is_some() {
195 writeln!(f)?;
196 }
197 }
198
199 Ok(())
200 }
201}
202
203#[cfg(test)]
204mod tests {
205 use super::*;
206 use crate::Program;
207 use console::network::MainnetV0;
208
209 type CurrentNetwork = MainnetV0;
210
211 #[test]
212 fn test_program_parse() -> Result<()> {
213 let (string, program) = Program::<CurrentNetwork>::parse(
215 r"
216program to_parse.aleo;
217
218struct message:
219 first as field;
220 second as field;
221
222function compute:
223 input r0 as message.private;
224 add r0.first r0.second into r1;
225 output r1 as field.private;",
226 )
227 .unwrap();
228 assert!(string.is_empty(), "Parser did not consume all of the string: '{string}'");
229
230 assert!(program.contains_struct(&Identifier::from_str("message")?));
232 assert!(program.contains_function(&Identifier::from_str("compute")?));
234
235 Ok(())
236 }
237
238 #[test]
239 fn test_program_parse_function_zero_inputs() -> Result<()> {
240 let (string, program) = Program::<CurrentNetwork>::parse(
242 r"
243program to_parse.aleo;
244
245function compute:
246 add 1u32 2u32 into r0;
247 output r0 as u32.private;",
248 )
249 .unwrap();
250 assert!(string.is_empty(), "Parser did not consume all of the string: '{string}'");
251
252 assert!(program.contains_function(&Identifier::from_str("compute")?));
254
255 Ok(())
256 }
257
258 #[test]
259 fn test_program_display() -> Result<()> {
260 let expected = r"program to_parse.aleo;
261
262struct message:
263 first as field;
264 second as field;
265
266function compute:
267 input r0 as message.private;
268 add r0.first r0.second into r1;
269 output r1 as field.private;
270";
271 let program = Program::<CurrentNetwork>::from_str(expected)?;
273 assert_eq!(expected, format!("{program}"));
275
276 Ok(())
277 }
278
279 #[test]
280 fn test_program_size() {
281 let var_name = "a";
283
284 let gen_import_string = |n: usize| -> String {
286 let mut s = String::new();
287 for i in 0..n {
288 s.push_str(&format!("import foo{i}.aleo;\n"));
289 }
290 s
291 };
292
293 let gen_struct_string = |n: usize| -> String {
295 let mut s = String::with_capacity(CurrentNetwork::MAX_PROGRAM_SIZE);
296 for i in 0..n {
297 s.push_str(&format!("struct m{i}:\n"));
298 for j in 0..10 {
299 s.push_str(&format!(" {var_name}{j} as u128;\n"));
300 }
301 }
302 s
303 };
304
305 let gen_record_string = |n: usize| -> String {
307 let mut s = String::with_capacity(CurrentNetwork::MAX_PROGRAM_SIZE);
308 for i in 0..n {
309 s.push_str(&format!("record r{i}:\n owner as address.private;\n"));
310 for j in 0..10 {
311 s.push_str(&format!(" {var_name}{j} as u128.private;\n"));
312 }
313 }
314 s
315 };
316
317 let gen_mapping_string = |n: usize| -> String {
319 let mut s = String::with_capacity(CurrentNetwork::MAX_PROGRAM_SIZE);
320 for i in 0..n {
321 s.push_str(&format!("mapping {var_name}{i}:\n key as field.public;\n value as field.public;\n"));
322 }
323 s
324 };
325
326 let gen_closure_string = |n: usize| -> String {
328 let mut s = String::with_capacity(CurrentNetwork::MAX_PROGRAM_SIZE);
329 for i in 0..n {
330 s.push_str(&format!("closure c{i}:\n input r0 as u128;\n"));
331 for j in 0..10 {
332 s.push_str(&format!(" add r0 r0 into r{j};\n"));
333 }
334 s.push_str(&format!(" output r{} as u128;\n", 4000));
335 }
336 s
337 };
338
339 let gen_function_string = |n: usize| -> String {
341 let mut s = String::with_capacity(CurrentNetwork::MAX_PROGRAM_SIZE);
342 for i in 0..n {
343 s.push_str(&format!("function f{i}:\n add 1u128 1u128 into r0;\n"));
344 for j in 0..10 {
345 s.push_str(&format!(" add r0 r0 into r{j};\n"));
346 }
347 }
348 s
349 };
350
351 let test_parse = |imports: &str, body: &str, should_succeed: bool| {
353 let program = format!("{imports}\nprogram to_parse.aleo;\n\n{body}");
354 let result = Program::<CurrentNetwork>::from_str(&program);
355 if result.is_ok() != should_succeed {
356 println!("Program failed to parse: {program}");
357 }
358 assert_eq!(result.is_ok(), should_succeed);
359 };
360
361 test_parse(&gen_import_string(CurrentNetwork::MAX_IMPORTS), &gen_struct_string(1), true);
363 test_parse(&gen_import_string(CurrentNetwork::MAX_IMPORTS + 1), &gen_struct_string(1), false);
365 test_parse("", &gen_struct_string(CurrentNetwork::MAX_STRUCTS), true);
367 test_parse("", &gen_struct_string(CurrentNetwork::MAX_STRUCTS + 1), false);
369 test_parse("", &gen_record_string(CurrentNetwork::MAX_RECORDS), true);
371 test_parse("", &gen_record_string(CurrentNetwork::MAX_RECORDS + 1), false);
373 test_parse("", &gen_mapping_string(CurrentNetwork::MAX_MAPPINGS), true);
375 test_parse("", &gen_mapping_string(CurrentNetwork::MAX_MAPPINGS + 1), false);
377 test_parse("", &gen_closure_string(CurrentNetwork::MAX_CLOSURES), true);
379 test_parse("", &gen_closure_string(CurrentNetwork::MAX_CLOSURES + 1), false);
381 test_parse("", &gen_function_string(CurrentNetwork::MAX_FUNCTIONS), true);
383 test_parse("", &gen_function_string(CurrentNetwork::MAX_FUNCTIONS + 1), false);
385
386 let program_too_big = format!(
388 "{} {} {} {} {}",
389 gen_struct_string(CurrentNetwork::MAX_STRUCTS),
390 gen_record_string(CurrentNetwork::MAX_RECORDS),
391 gen_mapping_string(CurrentNetwork::MAX_MAPPINGS),
392 gen_closure_string(CurrentNetwork::MAX_CLOSURES),
393 gen_function_string(CurrentNetwork::MAX_FUNCTIONS)
394 );
395 test_parse("", &program_too_big, false);
397 }
398}