Melbourne's Alt.NET Group: June 2010

Last night's presentation from Simon Cuce was fantastic and a great geek-out session. A big thanks once again to Simon for coming along and sharing his knowledge and passion of DSL's and MGrammar with the group. And don't forget to keep and eye out for Martin Fowler's book on DSL's :)

The following is a list of resources provided by Simon for anyone interested in learning more:

Videos

Pages

Sample Code

MGrammar Sample Code

module ConsoleApplication2
{
    language Language1
    {
           syntax Main=  a:List(DomainName) b:List(EmailDetails)  => {Domains [valuesof(a)], valuesof(b)};
        
          syntax EmailDetails =(a:EmailAddress b:EmailFullname => {Address {a}, Fullname {b}})
           | (a:EmailAddress c:EmailAlias b:EmailFullname => {Address {a}, Fullname {b}, Alias {c}});
        
        syntax EmailAddress = Email a:NameWithDot => a;
        syntax EmailFullname = Fullname b:QuotedName => b;
        syntax EmailAlias = Alias c:NameWithDot => c;
        
          syntax DomainName = Domain a:NameWithDot =>a;
        
        syntax List(element) = e:element | es:List(element) e:element => [valuesof(es),e];
       
        
           interleave whitespace = '\t' | ' ' | '\r' | '\n';
    
         @{Classification["Keyword"]} token Begin = "Begin";
         @{Classification["Keyword"]} token End = "End";
         @{Classification["Keyword"]} token Domain = "Domain";
         @{Classification["Keyword"]} token Email = "Email";
         @{Classification["Keyword"]} token Fullname = "Fullname";
         @{Classification["Keyword"]} token Alias = "Alias";
    
    
       token TextEscape = '\\"';
       token TextCharacter = !( '"' ) | TextEscape | '_';
       token TextCharacters = TextCharacter*;
      
       @{Classification["String"]} token QuotedName = '"' TextCharacters '"';
    
        token Name = ('A'..'Z'| 'a'..'z')+;
        token NameWithDot = (Name | "." | DecimalDigit)+;
          token DecimalDigit ='0'..'9';
    
    }
}

Compiler Code in C#

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using Microsoft.M;
using System.Reflection;
using System.Dataflow;
 
namespace ConsoleApplication2
{
    class Program
    {
        static void Main(string[] args)
        {
 
            using (var image = MImage.LoadFromAssembly(Assembly.GetExecutingAssembly()))
            {
 
                var language = image.ParserFactories["ConsoleApplication2.Language1"].Create();
 
                language.GraphBuilder = new NodeGraphBuilder();
 
                Node root = (Node)language.Parse(@"..\..\TextFile1.txt", ErrorReporter.Standard);
 
                foreach (var item in root.ViewAllNodes())
                {
                    if (item.Brand.Text == "Domains")
                    {
                        Console.WriteLine("Domains");
 
                        foreach (var i in item.Edges)
                        {
                            Console.WriteLine(i.Node.AtomicValue);
                        }
 
                    }
                    else if (item.Brand.Text == "EmailDetails")
                    {
                        Console.WriteLine("Emails");
 
                        foreach (var i in item.Edges)
                        {
                            foreach (var j in i.Node.Edges)
                            {
                                if (j.Node.Brand.Text == "Address")
                                { Console.WriteLine("Address " + j.Node.Edges.First().Node.AtomicValue); }
                                else if (j.Node.Brand.Text == "Fullname")
                                { Console.WriteLine("Fullname " + j.Node.Edges.First().Node.AtomicValue); }
                                else if (j.Node.Brand.Text == "Alias")
                                { Console.WriteLine("Alias " + j.Node.Edges.First().Node.AtomicValue); }
                            }
                        }
 
 
                    }
 
                }
 
                Console.WriteLine("Code Compiled");
 
            }
            Environment.Exit(0);
 
        }
    }
}

Update (29/06/10):

David Burela who filmed Simon's presentation has uploaded the video to his blog.
Nice one, thanks for that David.

This month we're having a presentation from Dr Simon Cuce on DSL's.

Simon will explore the hidden gem within the SQL Server Modelling tool (formally Olso), called MGrammer. This is a language to create languages in a similar vain as YACC and Antlr. He will cover in detail how to build a language grammar in MGrammar, including understanding tokens, white space parsing and language syntax. As part of demo, he will show how InteilliPad can be used to speed up the creation of these grammars. The final part will be to create an actual compiler, using the newly created grammar and dealing with the resulting Abstract Syntax Tree (AST). Afterwards there will be plenty of time for Q&A.

Simon's Bio:
Dr Simon Cuce is a Melbourne software developer working mainly in the .NET area. He has worked for start ups, academia and large organisations creating unique software solutions using .NET technologies. Simon was one of the few Australians involved in the early adopter program for both .NET and the Compact Framework. Some of his claims to fame include building Australia’s first commercial XML web service for Solution 6 and the first SOAP enabled web server for Mobile Devices. Simon has a Bachelor in Computing (with Honours) and a PhD and is currently undertaking an MBA.

Don't forget that we're on for the 23rd of June and not the 30th this month. And please just click on the poll on the right to indicate if you're coming along.

Melbourne's Alt.NET Group

June Meeting - Summary of DSL's & MGrammar Talk

MGrammar Sample Code

Compiler Code in C#

Update (29/06/10):

June Meeting - DSL's