Initial commit: OpenRA game engine

Fork from OpenRA/OpenRA with one-click launch script (start-ra.cmd)

Co-Authored-By: Claude Opus 4.5 <noreply@anthropic.com>

OpenRA.Mods.Common/Traits/Palettes/PaletteFromGimpOrJascFile.cs

@@ -0,0 +1,141 @@
+#region Copyright & License Information
+/*
+ * Copyright (c) The OpenRA Developers and Contributors
+ * This file is part of OpenRA, which is free software. It is made
+ * available to you under the terms of the GNU General Public License
+ * as published by the Free Software Foundation, either version 3 of
+ * the License, or (at your option) any later version. For more
+ * information, see COPYING.
+ */
+#endregion
+
+using System;
+using System.Collections.Frozen;
+using System.Collections.Generic;
+using System.IO;
+using OpenRA.FileSystem;
+using OpenRA.Graphics;
+using OpenRA.Primitives;
+using OpenRA.Traits;
+
+namespace OpenRA.Mods.Common.Traits
+{
+	[TraitLocation(SystemActors.World | SystemActors.EditorWorld)]
+	[Desc("Load a GIMP .gpl or JASC .pal palette file. Supports per-color alpha.")]
+	sealed class PaletteFromGimpOrJascFileInfo : TraitInfo, IProvidesCursorPaletteInfo
+	{
+		[PaletteDefinition]
+		[FieldLoader.Require]
+		[Desc("Palette name used internally.")]
+		public readonly string Name = null;
+
+		[Desc("Defines for which tileset IDs this palette should be loaded.",
+			"If none specified, it applies to all tileset IDs not explicitly excluded.")]
+		public readonly FrozenSet<string> Tilesets = FrozenSet<string>.Empty;
+
+		[Desc("Don't load palette for these tileset IDs.")]
+		public readonly FrozenSet<string> ExcludeTilesets = FrozenSet<string>.Empty;
+
+		[FieldLoader.Require]
+		[Desc("Name of the file to load.")]
+		public readonly string Filename = null;
+
+		[Desc("Premultiply colors with their alpha values.")]
+		public readonly bool Premultiply = true;
+
+		public readonly bool AllowModifiers = true;
+
+		[Desc("Index set to be fully transparent/invisible.")]
+		public readonly int TransparentIndex = 0;
+
+		[Desc("Whether this palette is available for cursors.")]
+		public readonly bool CursorPalette = false;
+
+		public override object Create(ActorInitializer init) { return new PaletteFromGimpOrJascFile(init.World, this); }
+
+		string IProvidesCursorPaletteInfo.Palette => CursorPalette ? Name : null;
+
+		ImmutablePalette IProvidesCursorPaletteInfo.ReadPalette(IReadOnlyFileSystem fileSystem)
+		{
+			using (var s = fileSystem.Open(Filename))
+			{
+				var colors = new uint[Palette.Size];
+				using (var lines = s.ReadAllLines().GetEnumerator())
+				{
+					if (!lines.MoveNext() || (lines.Current != "GIMP Palette" && lines.Current != "JASC-PAL"))
+						throw new InvalidDataException($"File `{Filename}` is not a valid GIMP or JASC palette.");
+
+					byte a;
+					a = 255;
+					var i = 0;
+
+					while (lines.MoveNext() && i < Palette.Size)
+					{
+						// Skip until first color. Ignore # comments, Name/Columns and blank lines as well as JASC header values.
+						if (string.IsNullOrEmpty(lines.Current) || !char.IsDigit(lines.Current.Trim()[0]) || lines.Current == "0100" || lines.Current == "256")
+							continue;
+
+						var rgba = lines.Current.Split((char[])null, StringSplitOptions.RemoveEmptyEntries);
+						if (rgba.Length < 3)
+							throw new InvalidDataException($"Invalid RGB(A) triplet/quartet: ({string.Join(" ", rgba)})");
+
+						if (!byte.TryParse(rgba[0], out var r))
+							throw new InvalidDataException($"Invalid R value: {rgba[0]}");
+
+						if (!byte.TryParse(rgba[1], out var g))
+							throw new InvalidDataException($"Invalid G value: {rgba[1]}");
+
+						if (!byte.TryParse(rgba[2], out var b))
+							throw new InvalidDataException($"Invalid B value: {rgba[2]}");
+
+						// Check if color has a (valid) alpha value.
+						// Note: We can't throw on "rgba.Length > 3 but parse failed", because in GIMP palettes the 'invalid' value is probably a color name string.
+						var noAlpha = rgba.Length <= 3 || !byte.TryParse(rgba[3], out a);
+
+						// Index should be completely transparent/background color
+						if (i == TransparentIndex)
+							colors[i] = 0;
+						else if (noAlpha)
+							colors[i] = Color.FromArgb(r, g, b).ToArgb();
+						else if (Premultiply)
+							colors[i] = Color.FromArgb(a, r * a / 255, g * a / 255, b * a / 255).ToArgb();
+						else
+							colors[i] = Color.FromArgb(a, r, g, b).ToArgb();
+
+						i++;
+					}
+				}
+
+				return new ImmutablePalette(colors);
+			}
+		}
+	}
+
+	sealed class PaletteFromGimpOrJascFile : ILoadsPalettes, IProvidesAssetBrowserPalettes
+	{
+		readonly World world;
+		readonly PaletteFromGimpOrJascFileInfo info;
+
+		public PaletteFromGimpOrJascFile(World world, PaletteFromGimpOrJascFileInfo info)
+		{
+			this.world = world;
+			this.info = info;
+		}
+
+		public void LoadPalettes(WorldRenderer wr)
+		{
+			wr.AddPalette(info.Name, ((IProvidesCursorPaletteInfo)info).ReadPalette(world.Map), info.AllowModifiers);
+		}
+
+		public IEnumerable<string> PaletteNames
+		{
+			get
+			{
+				// Only expose the palette if it is available for the shellmap's tileset (which is a requirement for its use).
+				if ((info.Tilesets.Count == 0 || info.Tilesets.Contains(world.Map.Rules.TerrainInfo.Id))
+					&& !info.ExcludeTilesets.Contains(world.Map.Rules.TerrainInfo.Id))
+					yield return info.Name;
+			}
+		}
+	}
+}