/// <summary> /// Insert a code in a buffer at given position, and check if line exceed int Cobol ReferenceFormat /// </summary> /// <param name="from">The from position int the buffer</param> /// <param name="to">The to position in the buffer</param> /// <param name="buffer">The target buffer</param> /// <param name="code">The code to insert</param> /// <param name="lineNumber">The current lien number</param> private void GenerateIntoBufferCheckLineExceed(Position from, Position to, SourceText buffer, string code, int lineNumber) { //Lines_73_80_Map int start = Math.Min(from.Pos, buffer.Size); int end = Math.Min(to.Pos, buffer.Size); if (this.Layout != ColumnsLayout.CobolReferenceFormat) {//Maybe Free Format buffer.Insert(code, start, end); return; } int lineLen = -1; int lineStartOffset = -1; int lineEndOffset = -1; if (ExceedLines != null) { ExceedLines.Remove(lineNumber); } lineLen = buffer.GetLineInfo(start, out lineStartOffset, out lineEndOffset); if (!Lines_73_80_Flags.Contains(lineNumber)) {//Replace by spaces any characters in columns[73-80] Lines_73_80_Flags.Add(lineNumber); if (lineLen > LEGAL_COBOL_LINE_LENGTH) { int replace_len = lineLen - LEGAL_COBOL_LINE_LENGTH; buffer.Insert(new string(' ', replace_len), LEGAL_COBOL_LINE_LENGTH, lineLen); } } buffer.Insert(code, start, end); int delta = -(end - start) + code.Length; int newLineLen = lineLen + delta; bool newHas73Chars = false; if (newLineLen > LEGAL_COBOL_LINE_LENGTH) { for (int k = LEGAL_COBOL_LINE_LENGTH; k < newLineLen & !newHas73Chars; k++) { char ch = buffer[lineStartOffset + k]; newHas73Chars = !(ch == '\r' || ch == '\n' || Char.IsWhiteSpace(ch)); } //Error //Emit an error. if (newHas73Chars) { if (ExceedLines == null) { ExceedLines = new Dictionary <int, Tuple <int, int> >(); } ExceedLines.Add(lineNumber, new Tuple <int, int>(lineStartOffset, newLineLen)); } else if (newLineLen > MAX_COBOL_LINE_LENGTH) {//Here we know that the line the line exceed with only white characters. ==> Remove extra white characters buffer.Delete(LEGAL_COBOL_LINE_LENGTH, newLineLen); } } //Hanlde Buffer Exceed Map. if (ExceedLines != null && ExceedLines.ContainsKey(lineNumber)) { if (BufferExceedMap == null) { BufferExceedMap = new Dictionary <SourceText, Dictionary <int, List <Position> > >(); } if (!BufferExceedMap.ContainsKey(buffer)) { BufferExceedMap[buffer] = new Dictionary <int, List <Position> >(); } if (!BufferExceedMap[buffer].ContainsKey(lineNumber)) { BufferExceedMap[buffer][lineNumber] = new List <Position>(); } //Add the position at the code added BufferExceedMap[buffer][lineNumber].Add(new Position(start)); //Add the position after the code added BufferExceedMap[buffer][lineNumber].Add(new Position(start + code.Length)); } else {//Remove any line reference in the buffer exceed map. if (BufferExceedMap != null) { if (BufferExceedMap.ContainsKey(buffer)) { if (BufferExceedMap[buffer].ContainsKey(lineNumber)) { BufferExceedMap[buffer].Remove(lineNumber); if (BufferExceedMap[buffer].Count == 0) { BufferExceedMap.Remove(buffer); } } } } } }