private static void FindReferences(TNameToken r, TDeletedRanges DeletedRanges)
{
int NameId = r.NameIndex - 1;
if (NameId < 0 || NameId >= DeletedRanges.Count)
{
return;
}
if (DeletedRanges.Referenced(NameId))
{
return; //Avoid infinite loop if one range refers to other and vice versa.
}
DeletedRanges.Reference(NameId);
//We also need to recursively find all other names referenced by this name.
TNameRecord Name = DeletedRanges.Names[NameId];
Name.UpdateDeletedRanges(DeletedRanges);
}
internal static void UpdateDeletedRanges(TParsedTokenList Data, TDeletedRanges DeletedRanges)
{
Data.ResetPositionToLast();
while (!Data.Bof())
{
TBaseParsedToken tk = Data.LightPop();
TBaseFunctionToken ft = tk as TBaseFunctionToken;
if (ft != null)
{
//we need to ensure we don't delete the used _xlfn. ranges. Used def fn don't need to check, because they use the name in the tokenlist.
if (ft.GetFunctionData().FutureInXls)
{
int NameId = DeletedRanges.Names.GetNamePos(-1, ft.GetFunctionData().FutureName);
if (NameId >= 0)
{
DeletedRanges.Reference(NameId); //No need for recursion here, this name can't use anything else. Also, we don't need to update refs to this range.
}
}
continue;
}
TNameToken r = tk as TNameToken; //this includes namex
if (r == null)
{
continue;
}
if (r.GetBaseId == ptg.NameX && !DeletedRanges.References.IsLocalSheet(r.ExternSheet))
{
return; //This name does not point to a name in the NAME table.
}
if (DeletedRanges.Update)
{
UpdateRange(r, DeletedRanges);
}
else
{
FindReferences(r, DeletedRanges);
}
}
}
internal void UpdateDeletedRanges(int SheetIndex, int SheetCount, TDeletedRanges DeletedRanges)
{
if (Name == null)
{
return;
}
int sheet = -1;
int NameIndex = DeletedRanges.Names.GetNamePos(sheet, Name);
if (NameIndex < 0)
{
return;
}
if (DeletedRanges.Update)
{
//Nothing to do here, as we save the name string, not position
}
else
{
TNameRecord NameRec = DeletedRanges.Names[NameIndex];
DeletedRanges.Reference(NameIndex);
NameRec.UpdateDeletedRanges(DeletedRanges);
}
}
