Fix Monaco and Trumbowyg editor settings

src/OrchardCore.Modules/OrchardCore.ContentFields/OrchardCore.ContentFields.csproj

@@ -4,16 +4,22 @@
  <AddRazorSupportForMvc>true</AddRazorSupportForMvc>
  <!-- NuGet properties-->
  <Title>OrchardCore Content Fields</Title>
- <Description>$(OCCMSDescription)
+ <Description>
+ $(OCCMSDescription)
 
- Provides features to add content fields and indexing them for a content type.</Description>
+ Provides features to add content fields and indexing them for a content type.
+ </Description>
  <PackageTags>$(PackageTags) OrchardCoreCMS ContentManagement</PackageTags>
  </PropertyGroup>
 
  <ItemGroup>
  <FrameworkReference Include="Microsoft.AspNetCore.App" />
  </ItemGroup>
 
+ <ItemGroup>
+ <PackageReference Include="Jint" />
+ </ItemGroup>
+
  <ItemGroup>
  <ProjectReference Include="..\..\OrchardCore\OrchardCore.Admin.Abstractions\OrchardCore.Admin.Abstractions.csproj" />
  <ProjectReference Include="..\..\OrchardCore\OrchardCore.ContentLocalization.Abstractions\OrchardCore.ContentLocalization.Abstractions.csproj" />

src/OrchardCore.Modules/OrchardCore.ContentFields/Settings/HtmlFieldMonacoEditorSettingsDriver.cs

@@ -1,23 +1,24 @@
+using System;
 using System.Text.Json;
-using System.Text.Json.Nodes;
 using System.Threading.Tasks;
+using Jint;
 using Microsoft.Extensions.Localization;
 using OrchardCore.ContentFields.Fields;
 using OrchardCore.ContentFields.ViewModels;
 using OrchardCore.ContentManagement.Metadata.Models;
 using OrchardCore.ContentTypes.Editors;
 using OrchardCore.DisplayManagement.Views;
-using OrchardCore.Mvc.Utilities;
+using OrchardCore.Mvc.ModelBinding;
 
 namespace OrchardCore.ContentFields.Settings
 {
  public class HtmlFieldMonacoEditorSettingsDriver : ContentPartFieldDefinitionDisplayDriver<HtmlField>
  {
  protected readonly IStringLocalizer S;
 
- public HtmlFieldMonacoEditorSettingsDriver(IStringLocalizer<HtmlFieldMonacoEditorSettingsDriver> localizer)
+ public HtmlFieldMonacoEditorSettingsDriver(IStringLocalizer<HtmlFieldMonacoEditorSettingsDriver> stringLocalizer)
  {
- S = localizer;
+ S = stringLocalizer;
  }
 
  public override IDisplayResult Edit(ContentPartFieldDefinition partFieldDefinition)
@@ -44,16 +45,27 @@ public override async Task<IDisplayResult> UpdateAsync(ContentPartFieldDefinitio
 
  await context.Updater.TryUpdateModelAsync(model, Prefix);
 
- if (!model.Options.IsJson())
+ try
  {
- context.Updater.ModelState.AddModelError(Prefix + "." + nameof(MonacoSettingsViewModel.Options), S["The options are written in an incorrect format."]);
+ var options = model.Options.Trim();
+
+ if (!options.StartsWith('{') || !options.EndsWith('}'))
+ {
+ throw new Exception();
+ }
+
+ var engine = new Engine()
+ .Execute("var config = " + options + "; config.language = 'html';");
+
+ var jsValue = engine.Evaluate("JSON.stringify(config, null, 4)");
+
+ settings.Options = jsValue.AsString();
+
+ context.Builder.WithSettings(settings);
  }
- else
+ catch
  {
- var jsonSettings = JObject.Parse(model.Options);
- jsonSettings["language"] = "html";
- settings.Options = jsonSettings.ToString();
- context.Builder.WithSettings(settings);
+ context.Updater.ModelState.AddModelError(Prefix, nameof(model.Options), S["The options are written in an incorrect format."]);
  }
  }
 

src/OrchardCore.Modules/OrchardCore.ContentFields/Settings/HtmlFieldTrumbowygEditorSettingsDriver.cs

@@ -1,21 +1,23 @@
+using System;
 using System.Threading.Tasks;
+using Esprima;
 using Microsoft.Extensions.Localization;
 using OrchardCore.ContentFields.Fields;
 using OrchardCore.ContentFields.ViewModels;
 using OrchardCore.ContentManagement.Metadata.Models;
 using OrchardCore.ContentTypes.Editors;
 using OrchardCore.DisplayManagement.Views;
-using OrchardCore.Mvc.Utilities;
+using OrchardCore.Mvc.ModelBinding;
 
 namespace OrchardCore.ContentFields.Settings
 {
  public class HtmlFieldTrumbowygEditorSettingsDriver : ContentPartFieldDefinitionDisplayDriver<HtmlField>
  {
  protected readonly IStringLocalizer S;
 
- public HtmlFieldTrumbowygEditorSettingsDriver(IStringLocalizer<HtmlFieldTrumbowygEditorSettingsDriver> localizer)
+ public HtmlFieldTrumbowygEditorSettingsDriver(IStringLocalizer<HtmlFieldTrumbowygEditorSettingsDriver> stringLocalizer)
  {
- S = localizer;
+ S = stringLocalizer;
  }
 
  public override IDisplayResult Edit(ContentPartFieldDefinition partFieldDefinition)
@@ -39,17 +41,27 @@ public override async Task<IDisplayResult> UpdateAsync(ContentPartFieldDefinitio
 
  await context.Updater.TryUpdateModelAsync(model, Prefix);
 
- if (!model.Options.IsJson())
- {
- context.Updater.ModelState.AddModelError(Prefix + '.' + nameof(TrumbowygSettingsViewModel.Options), S["The options are written in an incorrect format."]);
- }
- else
+ try
  {
+ var options = model.Options.Trim();
+
+ if (!options.StartsWith('{') || !options.EndsWith('}'))
+ {
+ throw new Exception();
+ }
+
+ var parser = new JavaScriptParser();
+
+ var optionsScript = parser.ParseScript("var config = " + options);
  settings.InsertMediaWithUrl = model.InsertMediaWithUrl;
- settings.Options = model.Options;
+ settings.Options = options;
 
  context.Builder.WithSettings(settings);
  }
+ catch
+ {
+ context.Updater.ModelState.AddModelError(Prefix, nameof(model.Options), S["The options are written in an incorrect format."]);
+ }
  }
 
  return Edit(partFieldDefinition);

src/OrchardCore.Modules/OrchardCore.Html/OrchardCore.Html.csproj

@@ -4,16 +4,22 @@
  <AddRazorSupportForMvc>true</AddRazorSupportForMvc>
  <!-- NuGet properties-->
  <Title>OrchardCore Html</Title>
- <Description>$(OCCMSDescription)
+ <Description>
+ $(OCCMSDescription)
 
- The Html module enables content items to have rich content using Html syntax."</Description>
+ The Html module enables content items to have rich content using Html syntax."
+ </Description>
  <PackageTags>$(PackageTags) OrchardCoreCMS</PackageTags>
  </PropertyGroup>
 
  <ItemGroup>
  <FrameworkReference Include="Microsoft.AspNetCore.App" />
  </ItemGroup>
 
+ <ItemGroup>
+ <PackageReference Include="Jint" />
+ </ItemGroup>
+
  <ItemGroup>
  <ProjectReference Include="..\..\OrchardCore\OrchardCore.Admin.Abstractions\OrchardCore.Admin.Abstractions.csproj" />
  <ProjectReference Include="..\..\OrchardCore\OrchardCore.Apis.GraphQL.Abstractions\OrchardCore.Apis.GraphQL.Abstractions.csproj" />

src/OrchardCore.Modules/OrchardCore.Html/Settings/HtmlBodyPartMonacoEditorSettingsDriver.cs

@@ -1,14 +1,16 @@
+using System;
 using System.Text.Json;
-using System.Text.Json.Nodes;
 using System.Threading.Tasks;
+using Jint;
+using Microsoft.AspNetCore.Mvc.ModelBinding;
 using Microsoft.Extensions.Localization;
 using OrchardCore.ContentManagement.Metadata.Models;
 using OrchardCore.ContentTypes.Editors;
 using OrchardCore.DisplayManagement.ModelBinding;
 using OrchardCore.DisplayManagement.Views;
 using OrchardCore.Html.Models;
 using OrchardCore.Html.ViewModels;
-using OrchardCore.Mvc.Utilities;
+using OrchardCore.Mvc.ModelBinding;
 
 namespace OrchardCore.Html.Settings
 {
@@ -44,16 +46,27 @@ public override async Task<IDisplayResult> UpdateAsync(ContentTypePartDefinition
 
  await context.Updater.TryUpdateModelAsync(model, Prefix);
 
- if (!model.Options.IsJson())
+ try
  {
- context.Updater.ModelState.AddModelError(Prefix + "." + nameof(MonacoSettingsViewModel.Options), S["The options are written in an incorrect format."]);
+ var options = model.Options.Trim();
+
+ if (!options.StartsWith('{') || !options.EndsWith('}'))
+ {
+ throw new Exception();
+ }
+
+ var engine = new Engine()
+ .Execute("var config = " + options + "; config.language = 'html';");
+
+ var jsValue = engine.Evaluate("JSON.stringify(config, null, 4)");
+
+ settings.Options = jsValue.AsString();
+
+ context.Builder.WithSettings(settings);
  }
- else
+ catch
  {
- var jsonSettings = JObject.Parse(model.Options);
- jsonSettings["language"] = "html";
- settings.Options = jsonSettings.ToString();
- context.Builder.WithSettings(settings);
+ context.Updater.ModelState.AddModelError(Prefix, nameof(model.Options), S["The options are written in an incorrect format."]);
  }
  }
 

src/OrchardCore.Modules/OrchardCore.Html/Settings/HtmlBodyPartTrumbowygEditorSettingsDriver.cs

@@ -1,25 +1,26 @@
+using System;
 using System.Threading.Tasks;
+using Esprima;
 using Microsoft.Extensions.Localization;
 using OrchardCore.ContentManagement.Metadata.Models;
 using OrchardCore.ContentTypes.Editors;
-using OrchardCore.DisplayManagement.ModelBinding;
 using OrchardCore.DisplayManagement.Views;
 using OrchardCore.Html.Models;
 using OrchardCore.Html.ViewModels;
-using OrchardCore.Mvc.Utilities;
+using OrchardCore.Mvc.ModelBinding;
 
 namespace OrchardCore.Html.Settings
 {
  public class HtmlBodyPartTrumbowygEditorSettingsDriver : ContentTypePartDefinitionDisplayDriver<HtmlBodyPart>
  {
  protected readonly IStringLocalizer S;
 
- public HtmlBodyPartTrumbowygEditorSettingsDriver(IStringLocalizer<HtmlBodyPartTrumbowygEditorSettingsDriver> localizer)
+ public HtmlBodyPartTrumbowygEditorSettingsDriver(IStringLocalizer<HtmlBodyPartTrumbowygEditorSettingsDriver> stringLocalizer)
  {
- S = localizer;
+ S = stringLocalizer;
  }
 
- public override IDisplayResult Edit(ContentTypePartDefinition contentTypePartDefinition, IUpdateModel updater)
+ public override IDisplayResult Edit(ContentTypePartDefinition contentTypePartDefinition)
  {
  return Initialize<TrumbowygSettingsViewModel>("HtmlBodyPartTrumbowygSettings_Edit", model =>
  {
@@ -40,19 +41,30 @@ public override async Task<IDisplayResult> UpdateAsync(ContentTypePartDefinition
 
  await context.Updater.TryUpdateModelAsync(model, Prefix);
 
- if (!model.Options.IsJson())
- {
- context.Updater.ModelState.AddModelError(Prefix + "." + nameof(TrumbowygSettingsViewModel.Options), S["The options are written in an incorrect format."]);
- }
- else
+ try
  {
+ var options = model.Options.Trim();
+
+ if (!options.StartsWith('{') || !options.EndsWith('}'))
+ {
+ throw new Exception();
+ }
+
+ var parser = new JavaScriptParser();
+
+ var optionsScript = parser.ParseScript("var config = " + options);
  settings.InsertMediaWithUrl = model.InsertMediaWithUrl;
- settings.Options = model.Options;
+ settings.Options = options;
+
  context.Builder.WithSettings(settings);
  }
+ catch
+ {
+ context.Updater.ModelState.AddModelError(Prefix, nameof(model.Options), S["The options are written in an incorrect format."]);
+ }
  }
 
- return Edit(contentTypePartDefinition, context.Updater);
+ return Edit(contentTypePartDefinition);
  }
  }
 }