123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684 |
- using System;
- using System.Collections;
- using System.Globalization;
- using System.IO;
- using System.Security.Cryptography;
- using System.Text;
- using System.Xml;
- using OpenMetaverse;
- namespace OpenSim.Framework.Capabilities
- {
-
-
-
- public static class LLSD
- {
-
-
-
- public class LLSDParseException : Exception
- {
- public LLSDParseException(string message) : base(message)
- {
- }
- }
-
-
-
- public class LLSDSerializeException : Exception
- {
- public LLSDSerializeException(string message) : base(message)
- {
- }
- }
-
-
-
-
-
- public static object LLSDDeserialize(byte[] b)
- {
- using (MemoryStream ms = new MemoryStream(b, false))
- {
- return LLSDDeserialize(ms);
- }
- }
-
-
-
-
-
- public static object LLSDDeserialize(Stream st)
- {
- using (XmlTextReader reader = new XmlTextReader(st))
- {
- reader.Read();
- SkipWS(reader);
- if (reader.NodeType != XmlNodeType.Element || reader.LocalName != "llsd")
- throw new LLSDParseException("Expected <llsd>");
- reader.Read();
- object ret = LLSDParseOne(reader);
- SkipWS(reader);
- if (reader.NodeType != XmlNodeType.EndElement || reader.LocalName != "llsd")
- throw new LLSDParseException("Expected </llsd>");
- return ret;
- }
- }
-
-
-
-
-
- public static byte[] LLSDSerialize(object obj)
- {
- StringWriter sw = new StringWriter();
- XmlTextWriter writer = new XmlTextWriter(sw);
- writer.Formatting = Formatting.None;
- writer.WriteStartElement(String.Empty, "llsd", String.Empty);
- LLSDWriteOne(writer, obj);
- writer.WriteEndElement();
- writer.Close();
- return Util.UTF8.GetBytes(sw.ToString());
- }
-
-
-
-
-
- public static void LLSDWriteOne(XmlTextWriter writer, object obj)
- {
- if (obj == null)
- {
- writer.WriteStartElement(String.Empty, "undef", String.Empty);
- writer.WriteEndElement();
- return;
- }
- if (obj is string)
- {
- writer.WriteStartElement(String.Empty, "string", String.Empty);
- writer.WriteString((string) obj);
- writer.WriteEndElement();
- }
- else if (obj is int)
- {
- writer.WriteStartElement(String.Empty, "integer", String.Empty);
- writer.WriteString(obj.ToString());
- writer.WriteEndElement();
- }
- else if (obj is double)
- {
- writer.WriteStartElement(String.Empty, "real", String.Empty);
- writer.WriteString(obj.ToString());
- writer.WriteEndElement();
- }
- else if (obj is bool)
- {
- bool b = (bool) obj;
- writer.WriteStartElement(String.Empty, "boolean", String.Empty);
- writer.WriteString(b ? "1" : "0");
- writer.WriteEndElement();
- }
- else if (obj is ulong)
- {
- throw new Exception("ulong in LLSD is currently not implemented, fix me!");
- }
- else if (obj is UUID)
- {
- UUID u = (UUID) obj;
- writer.WriteStartElement(String.Empty, "uuid", String.Empty);
- writer.WriteString(u.ToString());
- writer.WriteEndElement();
- }
- else if (obj is Hashtable)
- {
- Hashtable h = obj as Hashtable;
- writer.WriteStartElement(String.Empty, "map", String.Empty);
- foreach (string key in h.Keys)
- {
- writer.WriteStartElement(String.Empty, "key", String.Empty);
- writer.WriteString(key);
- writer.WriteEndElement();
- LLSDWriteOne(writer, h[key]);
- }
- writer.WriteEndElement();
- }
- else if (obj is ArrayList)
- {
- ArrayList a = obj as ArrayList;
- writer.WriteStartElement(String.Empty, "array", String.Empty);
- foreach (object item in a)
- {
- LLSDWriteOne(writer, item);
- }
- writer.WriteEndElement();
- }
- else if (obj is byte[])
- {
- byte[] b = obj as byte[];
- writer.WriteStartElement(String.Empty, "binary", String.Empty);
- writer.WriteStartAttribute(String.Empty, "encoding", String.Empty);
- writer.WriteString("base64");
- writer.WriteEndAttribute();
-
-
-
-
-
-
-
- writer.WriteString(Convert.ToBase64String(b));
- writer.WriteEndElement();
- }
- else
- {
- throw new LLSDSerializeException("Unknown type " + obj.GetType().Name);
- }
- }
-
-
-
-
-
- public static object LLSDParseOne(XmlTextReader reader)
- {
- SkipWS(reader);
- if (reader.NodeType != XmlNodeType.Element)
- throw new LLSDParseException("Expected an element");
- string dtype = reader.LocalName;
- object ret = null;
- switch (dtype)
- {
- case "undef":
- {
- if (reader.IsEmptyElement)
- {
- reader.Read();
- return null;
- }
- reader.Read();
- SkipWS(reader);
- ret = null;
- break;
- }
- case "boolean":
- {
- if (reader.IsEmptyElement)
- {
- reader.Read();
- return false;
- }
- reader.Read();
- string s = reader.ReadString().Trim();
- if (s == String.Empty || s == "false" || s == "0")
- ret = false;
- else if (s == "true" || s == "1")
- ret = true;
- else
- throw new LLSDParseException("Bad boolean value " + s);
- break;
- }
- case "integer":
- {
- if (reader.IsEmptyElement)
- {
- reader.Read();
- return 0;
- }
- reader.Read();
- ret = Convert.ToInt32(reader.ReadString().Trim());
- break;
- }
- case "real":
- {
- if (reader.IsEmptyElement)
- {
- reader.Read();
- return 0.0f;
- }
- reader.Read();
- ret = Convert.ToDouble(reader.ReadString().Trim());
- break;
- }
- case "uuid":
- {
- if (reader.IsEmptyElement)
- {
- reader.Read();
- return UUID.Zero;
- }
- reader.Read();
- ret = new UUID(reader.ReadString().Trim());
- break;
- }
- case "string":
- {
- if (reader.IsEmptyElement)
- {
- reader.Read();
- return String.Empty;
- }
- reader.Read();
- ret = reader.ReadString();
- break;
- }
- case "binary":
- {
- if (reader.IsEmptyElement)
- {
- reader.Read();
- return new byte[0];
- }
- if (reader.GetAttribute("encoding") != null &&
- reader.GetAttribute("encoding") != "base64")
- {
- throw new LLSDParseException("Unknown encoding: " + reader.GetAttribute("encoding"));
- }
- reader.Read();
- FromBase64Transform b64 = new FromBase64Transform(FromBase64TransformMode.IgnoreWhiteSpaces);
- byte[] inp = Util.UTF8.GetBytes(reader.ReadString());
- ret = b64.TransformFinalBlock(inp, 0, inp.Length);
- break;
- }
- case "date":
- {
- reader.Read();
- throw new Exception("LLSD TODO: date");
- }
- case "map":
- {
- return LLSDParseMap(reader);
- }
- case "array":
- {
- return LLSDParseArray(reader);
- }
- default:
- throw new LLSDParseException("Unknown element <" + dtype + ">");
- }
- if (reader.NodeType != XmlNodeType.EndElement || reader.LocalName != dtype)
- {
- throw new LLSDParseException("Expected </" + dtype + ">");
- }
- reader.Read();
- return ret;
- }
-
-
-
-
-
- public static Hashtable LLSDParseMap(XmlTextReader reader)
- {
- Hashtable ret = new Hashtable();
- if (reader.NodeType != XmlNodeType.Element || reader.LocalName != "map")
- throw new LLSDParseException("Expected <map>");
- if (reader.IsEmptyElement)
- {
- reader.Read();
- return ret;
- }
- reader.Read();
- while (true)
- {
- SkipWS(reader);
- if (reader.NodeType == XmlNodeType.EndElement && reader.LocalName == "map")
- {
- reader.Read();
- break;
- }
- if (reader.NodeType != XmlNodeType.Element || reader.LocalName != "key")
- throw new LLSDParseException("Expected <key>");
- string key = reader.ReadString();
- if (reader.NodeType != XmlNodeType.EndElement || reader.LocalName != "key")
- throw new LLSDParseException("Expected </key>");
- reader.Read();
- object val = LLSDParseOne(reader);
- ret[key] = val;
- }
- return ret;
- }
-
-
-
-
-
- public static ArrayList LLSDParseArray(XmlTextReader reader)
- {
- ArrayList ret = new ArrayList();
- if (reader.NodeType != XmlNodeType.Element || reader.LocalName != "array")
- throw new LLSDParseException("Expected <array>");
- if (reader.IsEmptyElement)
- {
- reader.Read();
- return ret;
- }
- reader.Read();
- while (true)
- {
- SkipWS(reader);
- if (reader.NodeType == XmlNodeType.EndElement && reader.LocalName == "array")
- {
- reader.Read();
- break;
- }
- ret.Insert(ret.Count, LLSDParseOne(reader));
- }
- return ret;
- }
-
-
-
-
-
- private static string GetSpaces(int count)
- {
- StringBuilder b = new StringBuilder();
- for (int i = 0; i < count; i++) b.Append(" ");
- return b.ToString();
- }
-
-
-
-
-
-
- public static String LLSDDump(object obj, int indent)
- {
- if (obj == null)
- {
- return GetSpaces(indent) + "- undef\n";
- }
- else if (obj is string)
- {
- return GetSpaces(indent) + "- string \"" + (string) obj + "\"\n";
- }
- else if (obj is int)
- {
- return GetSpaces(indent) + "- integer " + obj.ToString() + "\n";
- }
- else if (obj is double)
- {
- return GetSpaces(indent) + "- float " + obj.ToString() + "\n";
- }
- else if (obj is UUID)
- {
- return GetSpaces(indent) + "- uuid " + ((UUID) obj).ToString() + Environment.NewLine;
- }
- else if (obj is Hashtable)
- {
- StringBuilder ret = new StringBuilder();
- ret.Append(GetSpaces(indent) + "- map" + Environment.NewLine);
- Hashtable map = (Hashtable) obj;
- foreach (string key in map.Keys)
- {
- ret.Append(GetSpaces(indent + 2) + "- key \"" + key + "\"" + Environment.NewLine);
- ret.Append(LLSDDump(map[key], indent + 3));
- }
- return ret.ToString();
- }
- else if (obj is ArrayList)
- {
- StringBuilder ret = new StringBuilder();
- ret.Append(GetSpaces(indent) + "- array\n");
- ArrayList list = (ArrayList) obj;
- foreach (object item in list)
- {
- ret.Append(LLSDDump(item, indent + 2));
- }
- return ret.ToString();
- }
- else if (obj is byte[])
- {
- return GetSpaces(indent) + "- binary\n" + Utils.BytesToHexString((byte[]) obj, GetSpaces(indent)) +
- Environment.NewLine;
- }
- else
- {
- return GetSpaces(indent) + "- unknown type " + obj.GetType().Name + Environment.NewLine;
- }
- }
- public static object ParseTerseLLSD(string llsd)
- {
- int notused;
- return ParseTerseLLSD(llsd, out notused);
- }
- public static object ParseTerseLLSD(string llsd, out int endPos)
- {
- if (llsd.Length == 0)
- {
- endPos = 0;
- return null;
- }
-
- switch (llsd[0])
- {
- case '!':
- throw new LLSDParseException("Undefined value type encountered");
- case '1':
- endPos = 1;
- return true;
- case '0':
- endPos = 1;
- return false;
- case 'i':
- {
- if (llsd.Length < 2) throw new LLSDParseException("Integer value type with no value");
- int value;
- endPos = FindEnd(llsd, 1);
- if (Int32.TryParse(llsd.Substring(1, endPos - 1), out value))
- return value;
- else
- throw new LLSDParseException("Failed to parse integer value type");
- }
- case 'r':
- {
- if (llsd.Length < 2) throw new LLSDParseException("Real value type with no value");
- double value;
- endPos = FindEnd(llsd, 1);
- if (Double.TryParse(llsd.Substring(1, endPos - 1), NumberStyles.Float,
- Utils.EnUsCulture.NumberFormat, out value))
- return value;
- else
- throw new LLSDParseException("Failed to parse double value type");
- }
- case 'u':
- {
- if (llsd.Length < 17) throw new LLSDParseException("UUID value type with no value");
- UUID value;
- endPos = FindEnd(llsd, 1);
- if (UUID.TryParse(llsd.Substring(1, endPos - 1), out value))
- return value;
- else
- throw new LLSDParseException("Failed to parse UUID value type");
- }
- case 'b':
-
-
-
- throw new LLSDParseException("Binary value type is unimplemented");
- case 's':
- case 'l':
- if (llsd.Length < 2) throw new LLSDParseException("String value type with no value");
- endPos = FindEnd(llsd, 1);
- return llsd.Substring(1, endPos - 1);
- case 'd':
-
- throw new LLSDParseException("Date value type is unimplemented");
- case '[':
- {
- if (llsd.IndexOf(']') == -1) throw new LLSDParseException("Invalid array");
- int pos = 0;
- ArrayList array = new ArrayList();
- while (llsd[pos] != ']')
- {
- ++pos;
-
- if (llsd[pos] == ',') ++pos;
-
- if (pos < llsd.Length && llsd[pos] == ' ') ++pos;
- int end;
- array.Add(ParseTerseLLSD(llsd.Substring(pos), out end));
- pos += end;
- }
- endPos = pos + 1;
- return array;
- }
- case '{':
- {
- if (llsd.IndexOf('}') == -1) throw new LLSDParseException("Invalid map");
- int pos = 0;
- Hashtable hashtable = new Hashtable();
- while (llsd[pos] != '}')
- {
- ++pos;
-
- if (llsd[pos] == ',') ++pos;
-
- if (pos < llsd.Length && llsd[pos] == ' ') ++pos;
- if (llsd[pos] != '\'') throw new LLSDParseException("Expected a map key");
- int endquote = llsd.IndexOf('\'', pos + 1);
- if (endquote == -1 || (endquote + 1) >= llsd.Length || llsd[endquote + 1] != ':')
- throw new LLSDParseException("Invalid map format");
- string key = llsd.Substring(pos, endquote - pos);
- key = key.Replace("'", String.Empty);
- pos += (endquote - pos) + 2;
- int end;
- hashtable.Add(key, ParseTerseLLSD(llsd.Substring(pos), out end));
- pos += end;
- }
- endPos = pos + 1;
- return hashtable;
- }
- default:
- throw new Exception("Unknown value type");
- }
- }
- private static int FindEnd(string llsd, int start)
- {
- int end = llsd.IndexOfAny(new char[] {',', ']', '}'});
- if (end == -1) end = llsd.Length - 1;
- return end;
- }
-
-
-
-
- private static void SkipWS(XmlTextReader reader)
- {
- while (
- reader.NodeType == XmlNodeType.Comment ||
- reader.NodeType == XmlNodeType.Whitespace ||
- reader.NodeType == XmlNodeType.SignificantWhitespace ||
- reader.NodeType == XmlNodeType.XmlDeclaration)
- {
- reader.Read();
- }
- }
- }
- }
|