| 1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753 | /******************************************************************************* copyright: Copyright (c) 2005 Kris Bell. All rights reserved license: BSD style: $(LICENSE) version: Initial release: December 2005 author: Kris Text is a class for managing and manipulating Unicode character arrays. Text maintains a current "selection", controlled via the select() and search() methods. Each of append(), prepend(), replace() and remove() operate with respect to the selection. The search() methods also operate with respect to the current selection, providing a means of iterating across matched patterns. To set a selection across the entire content, use the select() method with no arguments. Indexes and lengths of content always count code units, not code points. This is similar to traditional ascii string handling, yet indexing is rarely used in practice due to the selection idiom: substring indexing is generally implied as opposed to manipulated directly. This allows for a more streamlined model with regard to utf-surrogates. Strings support a range of functionality, from insert and removal to utf encoding and decoding. There is also an immutable subset called TextView, intended to simplify life in a multi-threaded environment. However, TextView must expose the raw content as needed and thus immutability depends to an extent upon so-called "honour" of a callee. D does not enable immutability enforcement at this time, but this class will be modified to support such a feature when it arrives - via the slice() method. The class is templated for use with char[], wchar[], and dchar[], and should migrate across encodings seamlessly. In particular, all functions in tango.text.Util are compatible with Text content in any of the supported encodings. In future, this class will become a principal gateway to the extensive ICU unicode library. Note that several common text operations can be constructed through combining tango.text.Text with tango.text.Util e.g. lines of text can be processed thusly: --- auto source = new Text!(char)("one\ntwo\nthree"); foreach (line; Util.lines(source.slice)) // do something with line --- Speaking a bit like Yoda might be accomplished as follows: --- auto dst = new Text!(char); foreach (element; Util.delims ("all cows eat grass", " ")) dst.prepend (element); --- Below is an overview of the API and class hierarchy: --- class Text(T) : TextView!(T) { // set or reset the content Text set (T[] chars, bool mutable=true); Text set (TextView other, bool mutable=true); // retrieve currently selected text T[] selection (); // set and retrieve current selection point Text point (uint index); uint point (); // mark a selection Text select (int start=0, int length=int.max); // return an iterator to move the selection around. // Also exposes "replace all" functionality Search search (T chr); Search search (T[] pattern); // format arguments behind current selection Text format (T[] format, ...); // append behind current selection Text append (T[] text); Text append (TextView other); Text append (T chr, int count=1); Text append (InputStream source); // transcode behind current selection Text encode (char[]); Text encode (wchar[]); Text encode (dchar[]); // insert before current selection Text prepend (T[] text); Text prepend (TextView other); Text prepend (T chr, int count=1); // replace current selection Text replace (T chr); Text replace (T[] text); Text replace (TextView other); // remove current selection Text remove (); // clear content Text clear (); // trim leading and trailing whitespace Text trim (); // trim leading and trailing chr instances Text strip (T chr); // truncate at point, or current selection Text truncate (int point = int.max); // reserve some space for inserts/additions Text reserve (int extra); // write content to stream Text write (OutputStream sink); } class TextView(T) : UniText { // hash content hash_t toHash (); // return length of content uint length (); // compare content bool equals (T[] text); bool equals (TextView other); bool ends (T[] text); bool ends (TextView other); bool starts (T[] text); bool starts (TextView other); int compare (T[] text); int compare (TextView other); int opEquals (Object other); int opCmp (Object other); // copy content T[] copy (T[] dst); // return content T[] slice (); // return data type typeinfo encoding (); // replace the comparison algorithm Comparator comparator (Comparator other); } class UniText { // convert content abstract char[] toString (char[] dst = null); abstract wchar[] toString16 (wchar[] dst = null); abstract dchar[] toString32 (dchar[] dst = null); } struct Search { // select prior instance bool prev(); // select next instance bool next(); // return instance count size_t count(); // contains instance? bool within(); // replace all with char void replace(T); // replace all with text (null == remove all) void replace(T[]); } --- *******************************************************************************/ module tango.text.Text; private import tango.text.Search; private import tango.io.model.IConduit; private import tango.text.convert.Layout; private import Util = tango.text.Util; private import Utf = tango.text.convert.Utf; private import Float = tango.text.convert.Float; private import Integer = tango.text.convert.Integer; private import tango.stdc.string : memmove; version(GNU) { private import tango.core.Vararg; } else version(DigitalMars) { private import tango.core.Vararg; version(X86_64) version=DigitalMarsX64; } /******************************************************************************* The mutable Text class actually implements the full API, whereas the superclasses are purely abstract (could be interfaces instead). *******************************************************************************/ class Text(T) : TextView!(T) { public alias set opAssign; public alias append opCatAssign; private alias TextView!(T) TextViewT; private alias Layout!(T) LayoutT; private T[] content; private bool mutable; private Comparator comparator_; private uint selectPoint, selectLength, contentLength; /*********************************************************************** Search Iterator ***********************************************************************/ private struct Search(T) { private alias SearchFruct!(T) Engine; private alias size_t delegate(T[], size_t) Call; private Text text; private Engine engine; /*************************************************************** Construct a Search instance ***************************************************************/ static Search opCall (Text text, T[] match) { Search s = void; s.engine.match = match; text.selectLength = 0; s.text = text; return s; } /*************************************************************** Search backward, starting at the character prior to the selection point ***************************************************************/ bool prev () { return locate (&engine.reverse, text.slice, text.point - 1); } /*************************************************************** Search forward, starting just after the currently selected text ***************************************************************/ bool next () { return locate (&engine.forward, text.slice, text.selectPoint + text.selectLength); } /*************************************************************** Returns true if there is a match within the associated text ***************************************************************/ bool within () { return engine.within (text.slice); } /*************************************************************** Returns number of matches within the associated text ***************************************************************/ size_t count () { return engine.count (text.slice); } /*************************************************************** Replace all matches with the given character ***************************************************************/ void replace (T chr) { replace ((&chr)[0..1]); } /*************************************************************** Replace all matches with the given substitution ***************************************************************/ void replace (T[] sub = null) { auto dst = new T[text.length]; dst.length = 0; foreach (token; engine.tokens (text.slice, sub)) dst ~= token; text.set (dst, false); } /*************************************************************** locate pattern index and select as appropriate ***************************************************************/ private bool locate (Call call, T[] content, size_t from) { auto index = call (content, from); if (index < content.length) { text.select (index, engine.match.length); return true; } return false; } } /*********************************************************************** Selection span deprecated: use point() instead ***********************************************************************/ deprecated public struct Span { uint begin, /// index of selection point length; /// length of selection } /*********************************************************************** Create an empty Text with the specified available space Note: A character like 'a' will be implicitly converted to uint and thus will be accepted for this constructor, making it appear like you can initialize a Text instance with a single character, something which is not supported. ***********************************************************************/ this (uint space = 0) { content.length = space; this.comparator_ = &simpleComparator; } /*********************************************************************** Create a Text upon the provided content. If said content is immutable (read-only) then you might consider setting the 'copy' parameter to false. Doing so will avoid allocating heap-space for the content until it is modified via Text methods. This can be useful when wrapping an array "temporarily" with a stack-based Text ***********************************************************************/ this (T[] content, bool copy = true) { set (content, copy); this.comparator_ = &simpleComparator; } /*********************************************************************** Create a Text via the content of another. If said content is immutable (read-only) then you might consider setting the 'copy' parameter to false. Doing so will avoid allocating heap-space for the content until it is modified via Text methods. This can be useful when wrapping an array temporarily with a stack-based Text ***********************************************************************/ this (TextViewT other, bool copy = true) { this (other.slice, copy); } /*********************************************************************** Set the content to the provided array. Parameter 'copy' specifies whether the given array is likely to change. If not, the array is aliased until such time it is altered via this class. This can be useful when wrapping an array "temporarily" with a stack-based Text. Also resets the curent selection to null ***********************************************************************/ final Text set (T[] chars, bool copy = true) { contentLength = chars.length; if ((this.mutable = copy) is true) content = chars.dup; else content = chars; // no selection return select (0, 0); } /*********************************************************************** Replace the content of this Text. If the new content is immutable (read-only) then you might consider setting the 'copy' parameter to false. Doing so will avoid allocating heap-space for the content until it is modified via one of these methods. This can be useful when wrapping an array "temporarily" with a stack-based Text. Also resets the curent selection to null ***********************************************************************/ final Text set (TextViewT other, bool copy = true) { return set (other.slice, copy); } /*********************************************************************** Explicitly set the current selection to the given start and length. values are pinned to the content extents ***********************************************************************/ final Text select (int start=0, int length=int.max) { pinIndices (start, length); selectPoint = start; selectLength = length; return this; } /*********************************************************************** Return the currently selected content ***********************************************************************/ final T[] selection () { return slice [selectPoint .. selectPoint+selectLength]; } /*********************************************************************** Return the index and length of the current selection deprecated: use point() instead ***********************************************************************/ deprecated final Span span () { Span s; s.begin = selectPoint; s.length = selectLength; return s; } /*********************************************************************** Return the current selection point ***********************************************************************/ final uint point () { return selectPoint; } /*********************************************************************** Set the current selection point, and resets selection length ***********************************************************************/ final Text point (uint index) { return select (index, 0); } /*********************************************************************** Return a search iterator for a given pattern. The iterator sets the current text selection as appropriate. For example: --- auto t = new Text ("hello world"); auto s = t.search ("world"); assert (s.next); assert (t.selection == "world"); --- Replacing patterns operates in a similar fashion: --- auto t = new Text ("hello world"); auto s = t.search ("world"); // replace all instances of "world" with "everyone" assert (s.replace ("everyone")); assert (s.count is 0); --- ***********************************************************************/ Search!(T) search (T[] match) { return Search!(T) (this, match); } Search!(T) search (ref T match) { return search ((&match)[0..1]); } /*********************************************************************** Find and select the next occurrence of a BMP code point in a string. Returns true if found, false otherwise deprecated: use search() instead ***********************************************************************/ deprecated final bool select (T c) { auto s = slice(); auto x = Util.locate (s, c, selectPoint); if (x < s.length) { select (x, 1); return true; } return false; } /*********************************************************************** Find and select the next substring occurrence. Returns true if found, false otherwise deprecated: use search() instead ***********************************************************************/ deprecated final bool select (TextViewT other) { return select (other.slice); } /*********************************************************************** Find and select the next substring occurrence. Returns true if found, false otherwise deprecated: use search() instead ***********************************************************************/ deprecated final bool select (T[] chars) { auto s = slice(); auto x = Util.locatePattern (s, chars, selectPoint); if (x < s.length) { select (x, chars.length); return true; } return false; } /*********************************************************************** Find and select a prior occurrence of a BMP code point in a string. Returns true if found, false otherwise deprecated: use search() instead ***********************************************************************/ deprecated final bool selectPrior (T c) { auto s = slice(); auto x = Util.locatePrior (s, c, selectPoint); if (x < s.length) { select (x, 1); return true; } return false; } /*********************************************************************** Find and select a prior substring occurrence. Returns true if found, false otherwise deprecated: use search() instead ***********************************************************************/ deprecated final bool selectPrior (TextViewT other) { return selectPrior (other.slice); } /*********************************************************************** Find and select a prior substring occurrence. Returns true if found, false otherwise deprecated: use search() instead ***********************************************************************/ deprecated final bool selectPrior (T[] chars) { auto s = slice(); auto x = Util.locatePatternPrior (s, chars, selectPoint); if (x < s.length) { select (x, chars.length); return true; } return false; } /*********************************************************************** Append formatted content to this Text ***********************************************************************/ final Text format (T[] format, ...) { uint emit (T[] s) { append (s); return s.length; } version (DigitalMarsX64) { va_list ap; va_start(ap, __va_argsave); scope(exit) va_end(ap); LayoutT.instance.convert (&emit, _arguments, ap, format); } else LayoutT.instance.convert (&emit, _arguments, _argptr, format); return this; } /*********************************************************************** Append text to this Text ***********************************************************************/ final Text append (TextViewT other) { return append (other.slice); } /*********************************************************************** Append text to this Text ***********************************************************************/ final Text append (T[] chars) { return append (chars.ptr, chars.length); } /*********************************************************************** Append a count of characters to this Text ***********************************************************************/ final Text append (T chr, int count=1) { uint point = selectPoint + selectLength; expand (point, count); return set (chr, point, count); } /*********************************************************************** Append an integer to this Text deprecated: use format() instead ***********************************************************************/ deprecated final Text append (int v, T[] fmt = null) { return append (cast(long) v, fmt); } /*********************************************************************** Append a long to this Text deprecated: use format() instead ***********************************************************************/ deprecated final Text append (long v, T[] fmt = null) { T[64] tmp = void; return append (Integer.format(tmp, v, fmt)); } /*********************************************************************** Append a double to this Text deprecated: use format() instead ***********************************************************************/ deprecated final Text append (double v, uint decimals=2, int e=10) { T[64] tmp = void; return append (Float.format(tmp, v, decimals, e)); } /*********************************************************************** Append content from input stream at insertion point. Use tango.io.stream.Utf as a wrapper to perform conversion as necessary ***********************************************************************/ final Text append (InputStream source) { T[8192/T.sizeof] tmp = void; while (true) { auto len = source.read (tmp); if (len is source.Eof) break; // check to ensure UTF conversion is ok assert ((len & (T.sizeof-1)) is 0); append (tmp [0 .. len/T.sizeof]); } return this; } /*********************************************************************** Insert characters into this Text ***********************************************************************/ final Text prepend (T chr, int count=1) { expand (selectPoint, count); return set (chr, selectPoint, count); } /*********************************************************************** Insert text into this Text ***********************************************************************/ final Text prepend (T[] other) { expand (selectPoint, other.length); content[selectPoint..selectPoint+other.length] = other; return this; } /*********************************************************************** Insert another Text into this Text ***********************************************************************/ final Text prepend (TextViewT other) { return prepend (other.slice); } /*********************************************************************** Append encoded text at the current selection point. The text is converted as necessary to the appropritate utf encoding. ***********************************************************************/ final Text encode (char[] s) { T[1024] tmp = void; static if (is (T == char)) return append(s); static if (is (T == wchar)) return append (Utf.toString16(s, tmp)); static if (is (T == dchar)) return append (Utf.toString32(s, tmp)); } /// ditto final Text encode (wchar[] s) { T[1024] tmp = void; static if (is (T == char)) return append (Utf.toString(s, tmp)); static if (is (T == wchar)) return append (s); static if (is (T == dchar)) return append (Utf.toString32(s, tmp)); } /// ditto final Text encode (dchar[] s) { T[1024] tmp = void; static if (is (T == char)) return append (Utf.toString(s, tmp)); static if (is (T == wchar)) return append (Utf.toString16(s, tmp)); static if (is (T == dchar)) return append (s); } /// ditto final Text encode (Object o) { return encode (o.toString); } /*********************************************************************** Replace a section of this Text with the specified character ***********************************************************************/ final Text replace (T chr) { return set (chr, selectPoint, selectLength); } /*********************************************************************** Replace a section of this Text with the specified array ***********************************************************************/ final Text replace (T[] chars) { int chunk = chars.length - selectLength; if (chunk >= 0) expand (selectPoint, chunk); else remove (selectPoint, -chunk); content [selectPoint .. selectPoint+chars.length] = chars; return select (selectPoint, chars.length); } /*********************************************************************** Replace a section of this Text with another ***********************************************************************/ final Text replace (TextViewT other) { return replace (other.slice); } /*********************************************************************** Remove the selection from this Text and reset the selection to zero length (at the current position) ***********************************************************************/ final Text remove () { remove (selectPoint, selectLength); return select (selectPoint, 0); } /*********************************************************************** Remove the selection from this Text ***********************************************************************/ private Text remove (int start, int count) { pinIndices (start, count); if (count > 0) { if (! mutable) realloc (); uint i = start + count; memmove (content.ptr+start, content.ptr+i, (contentLength-i) * T.sizeof); contentLength -= count; } return this; } /*********************************************************************** Truncate this string at an optional index. Default behaviour is to truncate at the current append point. Current selection is moved to the truncation point, with length 0 ***********************************************************************/ final Text truncate (int index = int.max) { if (index is int.max) index = selectPoint + selectLength; pinIndex (index); return select (contentLength = index, 0); } /*********************************************************************** Clear the string content ***********************************************************************/ final Text clear () { return select (contentLength = 0, 0); } /*********************************************************************** Remove leading and trailing whitespace from this Text, and reset the selection to the trimmed content ***********************************************************************/ final Text trim () { content = Util.trim (slice); select (0, contentLength = content.length); return this; } /*********************************************************************** Remove leading and trailing matches from this Text, and reset the selection to the stripped content ***********************************************************************/ final Text strip (T matches) { content = Util.strip (slice, matches); select (0, contentLength = content.length); return this; } /*********************************************************************** Reserve some extra room ***********************************************************************/ final Text reserve (uint extra) { realloc (extra); return this; } /*********************************************************************** Write content to output stream ***********************************************************************/ Text write (OutputStream sink) { sink.write (slice); return this; } /* ======================== TextView methods ======================== */ /*********************************************************************** Get the encoding type ***********************************************************************/ final TypeInfo encoding() { return typeid(T); } /*********************************************************************** Set the comparator delegate. Where other is null, we behave as a getter only ***********************************************************************/ final Comparator comparator (Comparator other) { auto tmp = comparator_; if (other) comparator_ = other; return tmp; } /*********************************************************************** Hash this Text ***********************************************************************/ override hash_t toHash () { return Util.jhash (cast(ubyte*) content.ptr, contentLength * T.sizeof); } /*********************************************************************** Return the length of the valid content ***********************************************************************/ final uint length () { return contentLength; } /*********************************************************************** Is this Text equal to another? ***********************************************************************/ final bool equals (TextViewT other) { if (other is this) return true; return equals (other.slice); } /*********************************************************************** Is this Text equal to the provided text? ***********************************************************************/ final bool equals (T[] other) { if (other.length == contentLength) return Util.matching (other.ptr, content.ptr, contentLength); return false; } /*********************************************************************** Does this Text end with another? ***********************************************************************/ final bool ends (TextViewT other) { return ends (other.slice); } /*********************************************************************** Does this Text end with the specified string? ***********************************************************************/ final bool ends (T[] chars) { if (chars.length <= contentLength) return Util.matching (content.ptr+(contentLength-chars.length), chars.ptr, chars.length); return false; } /*********************************************************************** Does this Text start with another? ***********************************************************************/ final bool starts (TextViewT other) { return starts (other.slice); } /*********************************************************************** Does this Text start with the specified string? ***********************************************************************/ final bool starts (T[] chars) { if (chars.length <= contentLength) return Util.matching (content.ptr, chars.ptr, chars.length); return false; } /*********************************************************************** Compare this Text start with another. Returns 0 if the content matches, less than zero if this Text is "less" than the other, or greater than zero where this Text is "bigger". ***********************************************************************/ final int compare (TextViewT other) { if (other is this) return 0; return compare (other.slice); } /*********************************************************************** Compare this Text start with an array. Returns 0 if the content matches, less than zero if this Text is "less" than the other, or greater than zero where this Text is "bigger". ***********************************************************************/ final int compare (T[] chars) { return comparator_ (slice, chars); } /*********************************************************************** Return content from this Text A slice of dst is returned, representing a copy of the content. The slice is clipped to the minimum of either the length of the provided array, or the length of the content minus the stipulated start point ***********************************************************************/ final T[] copy (T[] dst) { uint i = contentLength; if (i > dst.length) i = dst.length; return dst [0 .. i] = content [0 .. i]; } /*********************************************************************** Return an alias to the content of this TextView. Note that you are bound by honour to leave this content wholly unmolested. D surely needs some way to enforce immutability upon array references ***********************************************************************/ final T[] slice () { return content [0 .. contentLength]; } /*********************************************************************** Convert to the UniText types. The optional argument dst will be resized as required to house the conversion. To minimize heap allocation during subsequent conversions, apply the following pattern: --- Text string; wchar[] buffer; wchar[] result = string.utf16 (buffer); if (result.length > buffer.length) buffer = result; --- You can also provide a buffer from the stack, but the output will be moved to the heap if said buffer is not large enough ***********************************************************************/ final char[] toString (char[] dst = null) { static if (is (T == char)) return slice(); static if (is (T == wchar)) return Utf.toString (slice, dst); static if (is (T == dchar)) return Utf.toString (slice, dst); } /// ditto final wchar[] toString16 (wchar[] dst = null) { static if (is (T == char)) return Utf.toString16 (slice, dst); static if (is (T == wchar)) return slice; static if (is (T == dchar)) return Utf.toString16 (slice, dst); } /// ditto final dchar[] toString32 (dchar[] dst = null) { static if (is (T == char)) return Utf.toString32 (slice, dst); static if (is (T == wchar)) return Utf.toString32 (slice, dst); static if (is (T == dchar)) return slice; } /*********************************************************************** Compare this Text to another. We compare against other Strings only. Literals and other objects are not supported ***********************************************************************/ override int opCmp (Object o) { auto other = cast (TextViewT) o; if (other is null) return -1; return compare (other); } /*********************************************************************** Is this Text equal to the text of something else? ***********************************************************************/ override int opEquals (Object o) { auto other = cast (TextViewT) o; if (other) return equals (other); // this can become expensive ... char[1024] tmp = void; return this.toString(tmp) == o.toString; } /// ditto final int opEquals (T[] s) { return slice == s; } /*********************************************************************** Pin the given index to a valid position. ***********************************************************************/ private void pinIndex (ref int x) { if (x > contentLength) x = contentLength; } /*********************************************************************** Pin the given index and length to a valid position. ***********************************************************************/ private void pinIndices (ref int start, ref int length) { if (start > contentLength) start = contentLength; if (length > (contentLength - start)) length = contentLength - start; } /*********************************************************************** Compare two arrays. Returns 0 if the content matches, less than zero if A is "less" than B, or greater than zero where A is "bigger". Where the substrings match, the shorter is considered "less". ***********************************************************************/ private int simpleComparator (T[] a, T[] b) { uint i = a.length; if (b.length < i) i = b.length; for (int j, k; j < i; ++j) if ((k = a[j] - b[j]) != 0) return k; return a.length - b.length; } /*********************************************************************** Make room available to insert or append something ***********************************************************************/ private void expand (uint index, uint count) { if (!mutable || (contentLength + count) > content.length) realloc (count); memmove (content.ptr+index+count, content.ptr+index, (contentLength - index) * T.sizeof); selectLength += count; contentLength += count; } /*********************************************************************** Replace a section of this Text with the specified character ***********************************************************************/ private Text set (T chr, uint start, uint count) { content [start..start+count] = chr; return this; } /*********************************************************************** Allocate memory due to a change in the content. We handle the distinction between mutable and immutable here. ***********************************************************************/ private void realloc (uint count = 0) { uint size = (content.length + count + 127) & ~127; if (mutable) content.length = size; else { mutable = true; T[] x = content; content = new T[size]; if (contentLength) content[0..contentLength] = x; } } /*********************************************************************** Internal method to support Text appending ***********************************************************************/ private Text append (T* chars, uint count) { uint point = selectPoint + selectLength; expand (point, count); content[point .. point+count] = chars[0 .. count]; return this; } } /******************************************************************************* Immutable string *******************************************************************************/ class TextView(T) : UniText { public typedef int delegate (T[] a, T[] b) Comparator; /*********************************************************************** Return the length of the valid content ***********************************************************************/ abstract uint length (); /*********************************************************************** Is this Text equal to another? ***********************************************************************/ abstract bool equals (TextView other); /*********************************************************************** Is this Text equal to the the provided text? ***********************************************************************/ abstract bool equals (T[] other); /*********************************************************************** Does this Text end with another? ***********************************************************************/ abstract bool ends (TextView other); /*********************************************************************** Does this Text end with the specified string? ***********************************************************************/ abstract bool ends (T[] chars); /*********************************************************************** Does this Text start with another? ***********************************************************************/ abstract bool starts (TextView other); /*********************************************************************** Does this Text start with the specified string? ***********************************************************************/ abstract bool starts (T[] chars); /*********************************************************************** Compare this Text start with another. Returns 0 if the content matches, less than zero if this Text is "less" than the other, or greater than zero where this Text is "bigger". ***********************************************************************/ abstract int compare (TextView other); /*********************************************************************** Compare this Text start with an array. Returns 0 if the content matches, less than zero if this Text is "less" than the other, or greater than zero where this Text is "bigger". ***********************************************************************/ abstract int compare (T[] chars); /*********************************************************************** Return content from this Text. A slice of dst is returned, representing a copy of the content. The slice is clipped to the minimum of either the length of the provided array, or the length of the content minus the stipulated start point ***********************************************************************/ abstract T[] copy (T[] dst); /*********************************************************************** Compare this Text to another ***********************************************************************/ abstract int opCmp (Object o); /*********************************************************************** Is this Text equal to another? ***********************************************************************/ abstract int opEquals (Object other); /*********************************************************************** Is this Text equal to another? ***********************************************************************/ abstract int opEquals (T[] other); /*********************************************************************** Get the encoding type ***********************************************************************/ abstract TypeInfo encoding(); /*********************************************************************** Set the comparator delegate ***********************************************************************/ abstract Comparator comparator (Comparator other); /*********************************************************************** Hash this Text ***********************************************************************/ abstract hash_t toHash (); /*********************************************************************** Return an alias to the content of this TextView. Note that you are bound by honour to leave this content wholly unmolested. D surely needs some way to enforce immutability upon array references ***********************************************************************/ abstract T[] slice (); } /******************************************************************************* A string abstraction that converts to anything *******************************************************************************/ class UniText { abstract char[] toString (char[] dst = null); abstract wchar[] toString16 (wchar[] dst = null); abstract dchar[] toString32 (dchar[] dst = null); abstract TypeInfo encoding(); } /******************************************************************************* *******************************************************************************/ debug (UnitTest) { import tango.io.device.Array; //void main() {} unittest { auto s = new Text!(char); s = "hello"; auto array = new Array(1024); s.write (array); assert (array.slice == "hello"); s.select (1, 0); assert (s.append(array) == "hhelloello"); s = "hello"; s.search("hello").next; assert (s.selection == "hello"); s.replace ("1"); assert (s.selection == "1"); assert (s == "1"); assert (s.clear == ""); assert (s.format("{}", 12345) == "12345"); assert (s.selection == "12345"); s ~= "fubar"; assert (s.selection == "12345fubar"); assert (s.search("5").next); assert (s.selection == "5"); assert (s.remove == "1234fubar"); assert (s.search("fubar").next); assert (s.selection == "fubar"); assert (s.search("wumpus").next is false); assert (s.selection == ""); assert (s.clear.format("{:f4}", 1.2345) == "1.2345"); assert (s.clear.format("{:b}", 0xf0) == "11110000"); assert (s.clear.encode("one"d).toString == "one"); assert (Util.splitLines(s.clear.append("a\nb").slice).length is 2); assert (s.select.replace("almost ") == "almost "); foreach (element; Util.patterns ("all cows eat grass", "eat", "chew")) s.append (element); assert (s.selection == "almost all cows chew grass"); assert (s.clear.format("{}:{}", 1, 2) == "1:2"); } } debug (Text) { void main() { auto t = new Text!(char); t = "hello world"; auto s = t.search ("o"); assert (s.next); assert (t.selection == "o"); assert (t.point is 4); assert (s.next); assert (t.selection == "o"); assert (t.point is 7); assert (!s.next); t.point = 9; assert (s.prev); assert (t.selection == "o"); assert (t.point is 7); assert (s.prev); assert (t.selection == "o"); assert (t.point is 4); assert (s.next); assert (t.point is 7); assert (s.prev); assert (t.selection == "o"); assert (t.point is 4); assert (!s.prev); assert (s.count is 2); s.replace ('O'); assert (t.slice == "hellO wOrld"); assert (s.count is 0); t.point = 0; assert (t.search("hellO").next); assert (t.selection == "hellO"); assert (t.search("hellO").next); assert (t.selection == "hellO"); } } |