1 // ER diagram description parser
4 constructor(description
)
7 this.inheritances
= [ ];
8 this.associations
= [ ];
10 this.mcdParsing(description
);
12 // Cache SVG graphs returned by server (in addition to server cache = good perfs)
30 ///////////////////////////////
31 // PARSING STAGE 1: text to MCD
32 ///////////////////////////////
34 // Parse a textual description into a json object
37 let lines
= text
.split("\n");
38 lines
.push(""); //easier parsing: always empty line at the end
40 for (let i
=0; i
< lines
.length
; i
++)
42 lines
[i
] = lines
[i
].trim();
44 if (lines
[i
].length
== 0)
46 if (start
>= 0) //there is some group of lines to parse
48 this.parseThing(lines
, start
, i
);
52 else //not empty line: just register starting point
60 // Parse a group of lines into entity, association, ...
61 parseThing(lines
, start
, end
) //start included, end excluded
63 switch (lines
[start
].charAt(0))
66 // Entity = { name: { attributes, [weak] } }
67 let name
= lines
[start
].match(/[^\[\]"\s]+/)[0];
68 let entity
= { attributes: this.parseAttributes(lines
, start
+1, end
) };
69 if (lines
[start
].charAt(1) == '[')
71 this.entities
[name
] = entity
;
73 case 'i': //inheritance (arrows)
74 this.inheritances
= this.inheritances
.concat(this.parseInheritance(lines
, start
+1, end
));
76 case '{': //association
77 // Association = { [name], [attributes], [weak], entities: ArrayOf entity indices }
78 let relationship
= { };
79 let nameRes
= lines
[start
].match(/[^{}"\s]+/);
81 relationship
.name
= nameRes
[0];
82 if (lines
[start
].charAt(1) == '{')
83 relationship
.weak
= true;
84 this.associations
.push(Object
.assign({}, relationship
, this.parseAssociation(lines
, start
+1, end
)));
89 // attributes: ArrayOf {name, [isKey], [type], [qualifiers]}
90 parseAttributes(lines
, start
, end
)
93 for (let i
=start
; i
<end
; i
++)
97 if (line
.charAt(0) == '+')
100 line
= line
.slice(1);
102 field
.name
= line
.match(/[^()"\s]+/)[0];
103 let parenthesis
= line
.match(/\((.+)\)/);
104 if (parenthesis
!== null)
106 let sqlClues
= parenthesis
[1];
107 field
.type
= sqlClues
.match(/[^\s]+/)[0]; //type is always the first indication (mandatory)
108 field
.qualifiers
= sqlClues
.substring(field
.type
.length
).trim();
110 attributes
.push(field
);
115 // GroupOf Inheritance: { parent, children: ArrayOf entity indices }
116 parseInheritance(lines
, start
, end
)
118 let inheritance
= [];
119 for (let i
=start
; i
<end
; i
++)
121 let lineParts
= lines
[i
].split(" ");
123 for (let j
=1; j
<lineParts
.length
; j
++)
124 children
.push(lineParts
[j
]);
125 inheritance
.push({ parent:lineParts
[0], children: children
});
130 // Association (parsed here): {
131 // entities: ArrayOf entity names + cardinality,
132 // [attributes: ArrayOf {name, [isKey], [type], [qualifiers]}]
134 parseAssociation(lines
, start
, end
)
141 if (lines
[i
].charAt(0) == '-')
143 assoce
.attributes
= this.parseAttributes(lines
, i
+1, end
);
148 // Read entity name + cardinality
149 let lineParts
= lines
[i
].split(" ");
150 entities
.push({ name:lineParts
[0], card:lineParts
[1] });
154 assoce
.entities
= entities
;
158 //////////////////////////////
159 // PARSING STAGE 2: MCD to MLD
160 //////////////////////////////
162 // From entities + relationships to tables
165 // Pass 1: initialize tables
166 Object
.keys(this.entities
).forEach( name
=> {
167 let newTable
= [ ]; //array of fields
168 this.entities
[name
].attributes
.forEach( attr
=> {
173 qualifiers: attr
.qualifiers
,
176 this.tables
[name
] = newTable
;
178 // Add foreign keys information for children (inheritance). TODO: allow several levels
179 // NOTE: modelisation assume each child has its own table, refering parent (other options exist)
180 this.inheritances
.forEach( inh
=> {
181 let idx
= this.tables
[inh
.parent
].findIndex( item
=> { return item
.isKey
; });
182 inh
.children
.forEach( c
=> {
183 this.tables
[c
].push({
184 name: inh
.parent
+ "_id",
185 type: this.tables
[inh
.parent
][idx
].type
,
187 qualifiers: (this.tables
[inh
.parent
][idx
].qualifiers
|| "") + " foreign key references " + inh
.parent
,
192 // Pass 2: parse associations, add foreign keys when cardinality is 0,1 or 1,1
193 this.associations
.forEach( a
=> {
194 let newTableAttrs
= [ ];
195 let hasZeroOne
= false;
196 a
.entities
.forEach( e
=> {
197 if (['?','1'].includes(e
.card
[0]))
200 // Foreign key apparition (for each entity in association minus current one, for each identifying attribute)
201 a
.entities
.forEach( e2
=> {
202 if (e2
.name
== e
.name
)
204 this.entities
[e2
.name
].attributes
.forEach( attr
=> {
207 this.tables
[e
.name
].push({
208 isKey: e
.card
.length
>= 2 && e
.card
[1] == 'R', //"weak tables" foreign keys become part of the key
209 name: e2
.name
+ "_" + attr
.name
,
211 qualifiers: "foreign key references " + e2
.name
+ " " + (e
.card
[0]=='1' ? "not null" : ""),
212 ref: e2
.name
, //easier drawMld function (fewer regexps)
220 // Add all keys in current entity
221 let fields
= this.entities
[e
.name
].attributes
.filter( attr
=> { return attr
.isKey
; });
228 if (!hasZeroOne
&& newTableAttrs
.length
> 1)
230 // Ok, really create a new table
232 name: a
.name
|| newTableAttrs
.map( item
=> { return item
.entity
; }).join("_"),
235 newTableAttrs
.forEach( item
=> {
236 item
.fields
.forEach( f
=> {
237 newTable
.fields
.push({
238 name: item
.entity
+ "_" + f
.name
,
241 qualifiers: (f
.qualifiers
|| "") + " foreign key references " + item
.entity
+ " not null",
246 // Add relationship potential own attributes
247 (a
.attributes
|| [ ]).forEach( attr
=> {
248 newTable
.fields
.push({
252 qualifiers: attr
.qualifiers
,
255 this.tables
[newTable
.name
] = newTable
.fields
;
260 /////////////////////////////////
261 // DRAWING + GET SQL FROM PARSING
262 /////////////////////////////////
264 static AjaxGet(dotInput
, callback
)
266 let xhr
= new XMLHttpRequest();
267 xhr
.onreadystatechange = function() {
268 if (this.readyState
== 4 && this.status
== 200)
269 callback(this.responseText
);
271 xhr
.open("GET", "scripts/getGraphSvg.php?dot=" + encodeURIComponent(dotInput
), true);
275 // "Modèle conceptuel des données". TODO: option for graph size
276 // NOTE: randomizing helps to obtain better graphs (sometimes)
277 drawMcd(id
, mcdStyle
) //mcdStyle: bubble, or compact
279 let element
= document
.getElementById(id
);
280 mcdStyle
= mcdStyle
|| "compact";
281 if (this.mcdGraph
.length
> 0)
283 element
.innerHTML
= this.mcdGraph
;
286 // Build dot graph input
287 let mcdDot
= 'graph {\n';
288 mcdDot
+= 'rankdir="LR";\n';
290 if (mcdStyle
== "compact")
291 mcdDot
+= 'node [shape=plaintext];\n';
292 _
.shuffle(Object
.keys(this.entities
)).forEach( name
=> {
293 if (mcdStyle
== "bubble")
295 mcdDot
+= '"' + name
+ '" [shape=rectangle, label="' + name
+ '"';
296 if (this.entities
[name
].weak
)
297 mcdDot
+= ', peripheries=2';
299 if (!!this.entities
[name
].attributes
)
301 this.entities
[name
].attributes
.forEach( a
=> {
302 let label
= (a
.isKey
? '#' : '') + a
.name
;
303 let attrName
= name
+ '_' + a
.name
;
304 mcdDot
+= '"' + attrName
+ '" [shape=ellipse, label="' + label
+ '"];\n';
305 if (Math
.random() < 0.5)
306 mcdDot
+= '"' + attrName
+ '" -- "' + name
+ '";\n';
308 mcdDot
+= '"' + name
+ '" -- "' + attrName
+ '";\n';
314 mcdDot
+= '"' + name
+ '" [label=<';
315 if (this.entities
[name
].weak
)
317 mcdDot
+= '<table port="name" BORDER="1" ALIGN="LEFT" CELLPADDING="0" CELLSPACING="3" CELLBORDER="0">' +
318 '<tr><td><table BORDER="1" ALIGN="LEFT" CELLPADDING="5" CELLSPACING="0">\n';
321 mcdDot
+= '<table port="name" BORDER="1" ALIGN="LEFT" CELLPADDING="5" CELLSPACING="0">\n';
322 mcdDot
+= '<tr><td BGCOLOR="#ae7d4e" BORDER="0"><font COLOR="#FFFFFF">' + name
+ '</font></td></tr>\n';
323 if (!!this.entities
[name
].attributes
)
325 this.entities
[name
].attributes
.forEach( a
=> {
326 let label
= (a
.isKey
? '<u>' : '') + a
.name
+ (a
.isKey
? '</u>' : '');
327 mcdDot
+= '<tr><td BGCOLOR="#FFFFFF" BORDER="0" ALIGN="LEFT"><font COLOR="#000000" >' + label
+ '</font></td></tr>\n';
330 mcdDot
+= '</table>';
331 if (this.entities
[name
].weak
)
332 mcdDot
+= '</td></tr></table>';
337 _
.shuffle(this.inheritances
).forEach( i
=> {
338 // TODO: node shape = triangle fill yellow. See
339 // https://merise.developpez.com/faq/?page=MCD#CIF-ou-dependance-fonctionnelle-de-A-a-Z
340 // https://merise.developpez.com/faq/?page=MLD#Comment-transformer-un-MCD-en-MLD
341 // https://www.developpez.net/forums/d1088964/general-developpement/alm/modelisation/structure-agregation-l-association-d-association/
342 _
.shuffle(i
.children
).forEach( c
=> {
343 if (Math
.random() < 0.5)
344 mcdDot
+= '"' + c
+ '":name -- "' + i
.parent
+ '":name [dir="forward",arrowhead="vee",';
346 mcdDot
+= '"' + i
.parent
+ '":name -- "' + c
+ '":name [dir="back",arrowtail="vee",';
347 mcdDot
+= 'style="dashed"];\n';
351 if (mcdStyle
== "compact")
352 mcdDot
+= 'node [shape=rectangle, style=rounded];\n';
353 let assoceCounter
= 0;
354 _
.shuffle(this.associations
).forEach( a
=> {
355 let name
= a
.name
|| "_assoce" + assoceCounter
++;
356 if (mcdStyle
== "bubble")
358 mcdDot
+= '"' + name
+ '" [shape="diamond", style="filled", color="lightgrey", label="' + name
+ '"';
360 mcdDot
+= ', peripheries=2';
364 a
.attributes
.forEach( attr
=> {
365 let label
= (attr
.isKey
? '#' : '') + attr
.name
;
366 mcdDot
+= '"' + name
+ '_' + attr
.name
+ '" [shape=ellipse, label="' + label
+ '"];\n';
367 let attrName
= name
+ '_' + attr
.name
;
368 if (Math
.random() < 0.5)
369 mcdDot
+= '"' + attrName
+ '" -- "' + name
+ '";\n';
371 mcdDot
+= '"' + name
+ '" -- "' + attrName
+ '";\n';
377 let label
= '<' + name
+ '>';
380 a
.attributes
.forEach( attr
=> {
381 let attrLabel
= (attr
.isKey
? '#' : '') + attr
.name
;
382 label
+= '\\n' + attrLabel
;
385 mcdDot
+= '"' + name
+ '" [color="lightgrey", label="' + label
+ '"';
387 mcdDot
+= ', peripheries=2';
390 _
.shuffle(a
.entities
).forEach( e
=> {
391 if (Math
.random() < 0.5)
392 mcdDot
+= '"' + e
.name
+ '":name -- "' + name
+ '"';
394 mcdDot
+= '"' + name
+ '" -- "' + e
.name
+ '":name';
395 mcdDot
+= '[label="' + ErDiags
.CARDINAL
[e
.card
] + '"];\n';
399 //console.log(mcdDot);
400 ErDiags
.AjaxGet(mcdDot
, graphSvg
=> {
401 this.mcdGraph
= graphSvg
;
402 element
.innerHTML
= graphSvg
;
406 // "Modèle logique des données", from MCD without anomalies
407 // TODO: this one should draw links from foreign keys to keys (port=... in <TD>)
410 let element
= document
.getElementById(id
);
411 if (this.mldGraph
.length
> 0)
413 element
.innerHTML
= this.mcdGraph
;
416 // Build dot graph input (assuming foreign keys not already present...)
417 let mldDot
= 'graph {\n';
418 mldDot
+= 'rankdir="LR";\n';
419 mldDot
+= 'node [shape=plaintext];\n';
421 _
.shuffle(Object
.keys(this.tables
)).forEach( name
=> {
422 mldDot
+= '"' + name
+ '" [label=<<table BORDER="1" ALIGN="LEFT" CELLPADDING="5" CELLSPACING="0">\n';
423 mldDot
+= '<tr><td BGCOLOR="#ae7d4e" BORDER="0"><font COLOR="#FFFFFF">' + name
+ '</font></td></tr>\n';
424 this.tables
[name
].forEach( f
=> {
425 let label
= (f
.isKey
? '<u>' : '') + (!!f
.qualifiers
&& f
.qualifiers
.indexOf("foreign")>=0 ? '#' : '') + f
.name
+ (f
.isKey
? '</u>' : '');
426 mldDot
+= '<tr><td port="' + f
.name
+ '"' + ' BGCOLOR="#FFFFFF" BORDER="0" ALIGN="LEFT"><font COLOR="#000000" >' + label
+ '</font></td></tr>\n';
429 // Need to find a key attribute in reference entity (the first...)
431 for (let field
of this.tables
[f
.ref
])
435 keyInRef
= field
.name
;
439 if (Math
.random() < 0.5)
440 links
+= '"' + f
.ref
+ '":"' + keyInRef
+ '" -- "' + name
+'":"'+f
.name
+ '" [dir="forward",arrowhead="dot"';
442 links
+= '"'+name
+'":"'+f
.name
+'" -- "' + f
.ref
+ '":"' + keyInRef
+ '" [dir="back",arrowtail="dot"';
446 mldDot
+= '</table>>];\n';
448 mldDot
+= links
+ '\n';
450 //console.log(mldDot);
451 ErDiags
.AjaxGet(mldDot
, graphSvg
=> {
452 this.mldGraph
= graphSvg
;
453 element
.innerHTML
= graphSvg
;
459 let element
= document
.getElementById(id
);
460 if (this.sqlText
.length
> 0)
462 element
.innerHTML
= this.sqlText
;
466 Object
.keys(this.tables
).forEach( name
=> {
467 sqlText
+= "CREATE TABLE " + name
+ " (\n";
469 this.tables
[name
].forEach( f
=> {
470 sqlText
+= "\t" + f
.name
+ " " + (f
.type
|| "TEXT") + " " + (f
.qualifiers
|| "") + ",\n";
472 key
+= (key
.length
>0 ? "," : "") + f
.name
;
474 sqlText
+= "\tPRIMARY KEY (" + key
+ ")\n";
477 //console.log(sqlText);
478 this.sqlText
= sqlText
;
479 element
.innerHTML
= "<pre><code>" + sqlText
+ "</code></pre>";