// // RANGE.CPP // // 2-20-96: (EricAn) // Hacked from the Route66 source tree, eliminated stuff we don't use. // Original copyright below - where did this thing come from? // // -*- C -*- // // Copyright 1992 Software Innovations, Inc. // // $Source: D:\CLASS\SOURCE\range.c-v $ // $Author: martin $ // $Date: 92/07/15 05:09:24 $ // $Revision: 1.1 $ // // #include "pch.hxx" #include "range.h" #include "rangetst.h" // QUANTUM defines the number of m_rangeTable cells to be allocated at // one time. Whenever the m_rangeTable becomes full, it is expanded // by QUANTUM range cells. m_rangeTable's never shrink. const int QUANTUM = 64; inline int inRange(RangeType r, ULONG x) { return ((x>=r.low) && (x<=r.high)); }; CRangeList::CRangeList() { m_cRef = 1; m_numRanges = 0; m_rangeTableSize = 0; m_rangeTable = NULL; } #if 0 /* CRangeList::CRangeList(CRangeList& r) { m_numRanges = r.m_numRanges; m_rangeTableSize = r.m_rangeTableSize; m_rangeTable = new RangeType[m_rangeTableSize]; CopyMemory(m_rangeTable, r.m_rangeTable, m_numRanges * sizeof(RangeType)); } */ #endif CRangeList::~CRangeList() { if (m_rangeTable) MemFree(m_rangeTable); } ULONG CRangeList::AddRef(void) { return (ULONG)InterlockedIncrement((LPLONG)&m_cRef); } ULONG CRangeList::Release(void) { ULONG cRefT = (ULONG)InterlockedDecrement((LPLONG)&m_cRef); if (cRefT == 0) delete this; return (cRefT); } BOOL CRangeList::IsInRange(const ULONG value) const { for (int i=0; i 0); if (!MemAlloc((void **)&pRangeTable, cb)) return(FALSE); m_numRanges = m_rangeTableSize = cb / sizeof(RangeType); if (m_rangeTable) MemFree(m_rangeTable); CopyMemory(pRangeTable, pb, cb); m_rangeTable = pRangeTable; return TRUE; } BOOL CRangeList::NextLowerAntiRange(const ULONG value, RangeType *const rt) const { if (RANGE_ERROR == value || m_numRanges < 2 || !rt) return FALSE; for (register int i=0; ihigh = m_rangeTable[i].low-1; rt->low = m_rangeTable[i-1].high+1; return TRUE; } return FALSE; } BOOL CRangeList::NextHigherAntiRange(const ULONG value, RangeType *const rt) const { if (RANGE_ERROR == value || m_numRanges < 2 || !rt) return FALSE; for (register int i=0; ilow = m_rangeTable[i].high+1; rt->high = m_rangeTable[i+1].low-1; return TRUE; } return FALSE; } BOOL CRangeList::HighestAntiRange(RangeType *const rt) const { if (m_numRanges < 2 || !rt) return FALSE; rt->high = m_rangeTable[m_numRanges-1].low-1; rt->low = m_rangeTable[m_numRanges-2].high+1; return TRUE; } BOOL CRangeList::LowestAntiRange(RangeType *const rt) const { if (m_numRanges < 2 || !rt) return FALSE; rt->high = m_rangeTable[1].low-1; rt->low = m_rangeTable[0].high+1; return TRUE; } BOOL CRangeList::AddRange(const ULONG value) { RangeType r = { value, value }; return AddRange(r); } BOOL CRangeList::AddRange(const ULONG low, const ULONG high) { RangeType r = { low, high }; return AddRange(r); } BOOL CRangeList::AddRange(CRangeList& r) { for (int i=0 ; i range.high) { DOUTL(2, "Empty range passed to AddRange()"); return FALSE; } if (m_numRanges==0) { if (m_rangeTableSize == 0) if (!Expand()) return FALSE; m_numRanges = 1; CopyMemory(&m_rangeTable[0], &range, sizeof(RangeType)); } else { possibleLoc = BinarySearch(range.low); if (!((possibleLoc > -1) && (inRange(m_rangeTable[possibleLoc], range.low)) && (inRange(m_rangeTable[possibleLoc], range.high)))) { insertPosition = possibleLoc + 1; if (m_numRanges == m_rangeTableSize) if (!Expand()) return FALSE; ShiftRight(insertPosition, 1); CopyMemory(&m_rangeTable[insertPosition], &range, sizeof(RangeType)); if (insertPosition > 0) SubsumeDown(insertPosition); if (insertPosition < m_numRanges) SubsumeUpwards(insertPosition); } } return TRUE; } BOOL CRangeList::DeleteRange(const ULONG value) { RangeType r = { value, value }; return DeleteRange(r); } BOOL CRangeList::DeleteRange(const ULONG low, const ULONG high) { RangeType r = { low, high }; return DeleteRange(r); } BOOL CRangeList::DeleteRange(CRangeList& r) { for (int i=0 ; i range.high) { DOUTL(2, "Empty range passed to DeleteRange()"); return FALSE; } lowEndChange = BinarySearch(range.low); highEndChange = BinarySearch(range.high); if ((lowEndChange != -1) && (highEndChange == lowEndChange)) { if (inRange(m_rangeTable[lowEndChange], range.low)) { if (inRange(m_rangeTable[lowEndChange], range.high)) { if ((m_rangeTable[lowEndChange].low == range.low) && (m_rangeTable[lowEndChange].high == range.high)) { if (lowEndChange == (m_numRanges-1)) { m_numRanges--; } else { ShiftLeft(lowEndChange + 1, 1); } } else { if (m_rangeTable[lowEndChange].low == range.low) { m_rangeTable[lowEndChange].low = range.high + 1; } else { if (m_rangeTable[lowEndChange].high == range.high) { Assert(range.low > 0); m_rangeTable[lowEndChange].high = range.low - 1; } else { // the range to be deleted is properly contained in // m_rangeTable[lowEndChange] if (m_numRanges == m_rangeTableSize) if (!Expand()) return FALSE; ShiftRight(lowEndChange + 1, 1); m_rangeTable[lowEndChange + 1].low = range.high + 1; m_rangeTable[lowEndChange + 1].high = m_rangeTable[lowEndChange].high; Assert(range.low > 0); m_rangeTable[lowEndChange].high = range.low - 1; } } } } else { // range.low is in m_rangeTable[lowEndChange], but range.high // is not if (m_rangeTable[lowEndChange].low == range.low) { ShiftLeft(lowEndChange + 1, 1); } else { Assert(range.low > 0); m_rangeTable[lowEndChange].high = range.low - 1; } } } // of the cases where range.low actually in m_rangeTable[lowEndChange] } else { // of the cases where highEndChange == lowEndChange if (lowEndChange != -1) { if (inRange(m_rangeTable[lowEndChange], range.low)) { if (range.low == m_rangeTable[lowEndChange].low) { lowEndChange = lowEndChange - 1; } else { Assert(range.low > 0); m_rangeTable[lowEndChange].high = range.low - 1; } } } if (highEndChange != -1) { if (inRange(m_rangeTable[highEndChange], range.high)) { if (range.high == m_rangeTable[highEndChange].high) { highEndChange = highEndChange + 1; } else { m_rangeTable[highEndChange].low = range.high + 1; } } else { highEndChange++; } } if (!(lowEndChange > highEndChange)) { // (0 <= lowEndChange < m_numRanges => m_rangeTable[lowEndChange] has received // any requisite adjustments and is to be kept) // and (0 <= highEndChange < m_numRanges => m_rangeTable[highEndChange] // has received any requistie adjs. and is a keeper) // and "forall" i [ lowEndChange < i < highEndChange => // m_rangeTable[i] is to be overwritten] if (highEndChange >= m_numRanges) { m_numRanges = lowEndChange + 1; } else { if ((highEndChange - lowEndChange - 1) > 0) { ShiftLeft(highEndChange, (highEndChange-lowEndChange-1)); } } } // else there's a problem with this code... } return TRUE; } ULONG CRangeList::Next(const ULONG current) const { int loc; if (m_numRanges == 0) return RANGE_ERROR; if ((loc = BinarySearch(current)) == -1) return m_rangeTable[0].low; else if (loc == (m_numRanges-1)) { if (inRange(m_rangeTable[m_numRanges-1], current)) { if (inRange(m_rangeTable[m_numRanges-1], current + 1)) return current + 1; else return RANGE_ERROR; } else return RANGE_ERROR; } else // case where loc == m_numRanges-1 { // 1 <= loc < m_numRanges if (inRange(m_rangeTable[loc], current)) { if (inRange(m_rangeTable[loc], current + 1)) return current + 1; else return m_rangeTable[loc + 1].low; } else return m_rangeTable[loc + 1].low; } } ULONG CRangeList::Prev(const ULONG current) const { int loc; if (m_numRanges == 0) return RANGE_ERROR; if ((loc = BinarySearch(current)) == -1) { return RANGE_ERROR; } else if (loc == 0) { if (inRange(m_rangeTable[0], current)) { if (current > 0 && inRange(m_rangeTable[0], current - 1)) return current - 1; else return RANGE_ERROR; } else return m_rangeTable[0].high; } else { // 1 < loc <= m_numRanges if (inRange(m_rangeTable[loc], current)) { if (current > 0 && inRange(m_rangeTable[loc], current - 1)) return current - 1; else return m_rangeTable[loc-1].high; } else return m_rangeTable[loc].high; } } ULONG CRangeList::Cardinality(void) const { ULONG card = 0; for (int i=0 ; i // (m_rangeTable[loc].low < rangeNum) // "and" (m_rangeTable[loc + 1].low > rangeNum)) // "and" (loc = m_numRanges => rangeNum > m_rangeTable[m_numRanges].low) // "and" (loc = -1 => m_numRanges = 0 // "or" rangeNum < m_rangeTable[0].low) } long low, high, mid; int loc=-1; if (m_numRanges == 0) return -1; if (value < m_rangeTable[0].low) return -1; low = 0; high = m_numRanges - 1; while (low <= high) { // inv: low < high - 1, and if rngNum is any where in m_rangeTable, it is in // the range from m_rangeTable[low] to m_rangeTable[high] mid = (low + high) / 2; if ((value >= m_rangeTable[mid].low) && ((mid == (m_numRanges-1)) || (value < m_rangeTable[mid + 1].low))) { loc = mid; high = low - 1; } else { if (value > m_rangeTable[mid].low) low = mid + 1; else high = mid - 1; } } return loc; } // Expand() will grow the m_rangeTable by QUANTUM range cells. BOOL CRangeList::Expand() { RangeType *newRangeTable; if (!MemAlloc((LPVOID*)&newRangeTable, (m_rangeTableSize + QUANTUM) * sizeof(RangeType))) return FALSE; m_rangeTableSize += QUANTUM; if (m_rangeTable) { if (m_numRanges > 0) CopyMemory(newRangeTable, m_rangeTable, m_numRanges * sizeof(RangeType)); MemFree(m_rangeTable); } m_rangeTable = newRangeTable; return TRUE; } void CRangeList::ShiftLeft(int low, int distance) { if (m_numRanges - low) MoveMemory(&m_rangeTable[low-distance], &m_rangeTable[low], (m_numRanges-low)*sizeof(RangeType)); m_numRanges -= distance; } void CRangeList::ShiftRight(int low, int distance) { if (m_numRanges - low) MoveMemory(&m_rangeTable[low+distance], &m_rangeTable[low], (m_numRanges-low)*sizeof(RangeType)); m_numRanges += distance; } // pre: (m_rangeTable[anchorPosition] has probably just been added to m_rangeTable.) // 1 <= anchorPosition <= m_numRanges // and ( anchorPosition = 1 // or (m_rangeTable[anchorPosition].low > // m_rangeTable[anchorPosition - 1].high) ) // post: No overlapping or contiguous ranges from 1 to m_numRanges. } void CRangeList::SubsumeUpwards(const int anchor) { int posOfLargerLow; int copyDownDistance; int copyPos; posOfLargerLow = anchor + 1; while ((posOfLargerLow < m_numRanges) && (m_rangeTable[posOfLargerLow].low <= m_rangeTable[anchor].high + 1)) posOfLargerLow++; if (posOfLargerLow == m_numRanges) { if (m_rangeTable[m_numRanges-1].high > m_rangeTable[anchor].high) m_rangeTable[anchor].high = m_rangeTable[m_numRanges-1].high; m_numRanges = anchor + 1; } else { // posOfLargerLow now indexes the first element of m_rangeTable, looking from // m_rangeTable[anchor], with .low > m_rangeTable[anchor].high + 1 if (posOfLargerLow > (anchor + 1)) { if (m_rangeTable[posOfLargerLow - 1].high > m_rangeTable[anchor].high) m_rangeTable[anchor].high = m_rangeTable[posOfLargerLow - 1].high; copyDownDistance = posOfLargerLow - anchor - 1; copyPos = posOfLargerLow; while (copyPos < m_numRanges) { m_rangeTable[copyPos - copyDownDistance] = m_rangeTable[copyPos]; copyPos = copyPos + 1; } m_numRanges -= copyDownDistance; } } } void CRangeList::SubsumeDown(int& anchor) { int posOfSmallerHigh; int copyDownDistance; int copyPos; posOfSmallerHigh = anchor - 1; while ((posOfSmallerHigh >= 0) && (m_rangeTable[posOfSmallerHigh].high + 1 >= m_rangeTable[anchor].low)) { posOfSmallerHigh--; } if (posOfSmallerHigh < 0) { if (m_rangeTable[0].low < m_rangeTable[anchor].low) m_rangeTable[anchor].low = m_rangeTable[0].low; } // posOfSmallerHigh either has value 0 or subscripts the first element of // m_rangeTable, looking down from anchor, with a .high that is // less than m_rangeTable[anchor].low - 1. if (m_rangeTable[posOfSmallerHigh + 1].low < m_rangeTable[anchor].low) m_rangeTable[anchor].low = m_rangeTable[posOfSmallerHigh + 1].low; copyDownDistance = anchor - posOfSmallerHigh - 1; if (copyDownDistance > 0) { copyPos = anchor; while (copyPos < m_numRanges) { m_rangeTable[copyPos - copyDownDistance] = m_rangeTable[copyPos]; copyPos++; } m_numRanges -= copyDownDistance; anchor -= copyDownDistance; } } #if 0 /* * We might need these ones again if we decide to import .newsrc files * void CRangeList::AddRange(const char *s) { char *token, *q; char *p = new char[strlen(s)+1]; strcpy(p, s); if ((token = strtok(p, ","))==NULL) return; while (token!=NULL) { if ((q = strchr(token, '-'))==NULL) { // no dash - single value AddRange(atol(token)); } else { long low, high; low = atol(token); high = atol(q+1); if (low<=high) AddRange(low, high); } token = strtok(NULL, ","); } } void CRangeList::DeleteRange(const char *s) { char *token, *q; char *p = new char[strlen(s)+1]; strcpy(p, s); if ((token = strtok(p, ","))==NULL) return; while (token!=NULL) { if ((q = strchr(token, '-'))==NULL) { // no dash - single value DeleteRange(atol(token)); } else { long low, high; low = atol(token); high = atol(q+1); if (low<=high) DeleteRange(low, high); } token = strtok(NULL, ","); } } */ #endif #ifdef DEBUG #define WORK_BUFSIZ 256 LPTSTR CRangeList::RangeToString() { LPTSTR p, buffer; TCHAR temp[20]; int buffsize = m_numRanges ? WORK_BUFSIZ : 1; if (!MemAlloc((LPVOID*)&buffer, buffsize * sizeof(TCHAR))) return NULL; *buffer = '\0'; // nothing to do? if (m_numRanges == 0) return buffer; // dump the ranges as a string: "low-high, low-high, singleton, low-high\n" for (int i=0; i buffsize) { // buffer is about to overflow... double its size if (!MemAlloc((LPVOID*)&p, 2 * buffsize)) { MemFree(buffer); return NULL; } buffsize *= 2; StrCpyN(p, buffer, buffsize); MemFree(buffer); buffer = p; } StrCatBuff(buffer, temp, buffsize); if (i < (m_numRanges-1)) StrCatBuff(buffer, ",", buffsize); } // save some space, trim the buffer down buffsize = lstrlen(buffer)+1; if (MemAlloc((LPVOID*)&p, buffsize * sizeof(TCHAR))) { StrCpyN(p, buffer, buffsize); MemFree(buffer); buffer = p; } return buffer; } void CRangeList::DebugOutput(LPTSTR szComment) { LPTSTR szRange = RangeToString(); OutputDebugString(szComment); if (szRange) { OutputDebugString(szRange); MemFree(szRange); } OutputDebugString("\r\n"); } #endif #ifdef DEBUG INT_PTR CALLBACK RangeTestDlgProc(HWND hwnd, UINT msg, WPARAM wp, LPARAM lp) { CRangeList *pRL = (CRangeList *)GetWindowLongPtr(hwnd, DWLP_USER); switch(msg) { case WM_INITDIALOG: { pRL = new CRangeList(); SetWindowLongPtr(hwnd, DWLP_USER, (LPARAM)pRL); break; } case WM_COMMAND: { int i1 = GetDlgItemInt(hwnd, idcInput1, NULL, FALSE); int i2 = GetDlgItemInt(hwnd, idcInput2, NULL, FALSE); BOOL fRet; LPTSTR szRange; switch(GET_WM_COMMAND_ID(wp,lp)) { case IDOK: case IDCANCEL: delete pRL; SetWindowLongPtr(hwnd, DWLP_USER, 0); EndDialog(hwnd, TRUE); return TRUE; case idcAddRange: fRet = pRL->AddRange(i1, i2); szRange = pRL->RangeToString(); SetDlgItemText(hwnd, idcPrint, szRange); if (szRange) MemFree(szRange); SetDlgItemInt(hwnd, idcResult, fRet, FALSE); return TRUE; case idcDeleteRange: fRet = pRL->DeleteRange(i1, i2); szRange = pRL->RangeToString(); SetDlgItemText(hwnd, idcPrint, szRange); if (szRange) MemFree(szRange); SetDlgItemInt(hwnd, idcResult, fRet, FALSE); return TRUE; case idcIsInRange: SetDlgItemInt(hwnd, idcResult, pRL->IsInRange(i1), FALSE); return TRUE; case idcNextInRange: SetDlgItemInt(hwnd, idcResult, pRL->Next(i1), TRUE); return TRUE; case idcPrevInRange: SetDlgItemInt(hwnd, idcResult, pRL->Prev(i1), TRUE); return TRUE; case idcClear: pRL->Clear(); SetDlgItemText(hwnd, idcPrint, NULL); SetDlgItemInt(hwnd, idcResult, TRUE, FALSE); return TRUE; } } break; } return FALSE; } #endif