How To Obtain a List of All Pinned Files from OLE Automation in Visual C++ (257990)

MORE INFORMATION

void CheckPaths()
{
   // Reference to the VSS objects
   IVSSDatabasePtr   objVSSDatabase;
   IVSSItemPtr       objItem;
   IVSSItemsPtr      objItems;
   IVSSItemPtr       vssItem;
   IUnknownPtr       lpunk;
   IEnumVARIANTPtr   ppvobj;
   ULONG             fetched;
   VARIANT           st;

   try {
      // Create the database object and open a connection to our database
      objVSSDatabase.CreateInstance(__uuidof(VSSDatabase));
      objVSSDatabase->Open(L"C:\\Program Files\\Microsoft Visual Studio\\Common\\VSS60a\\srcsafe.ini", L"Admin", L"");

      // Create the Item object and set it to be $/ (the root project)
      objItem = objVSSDatabase->GetVSSItem("$/", false);

      // Check for pinned files in this project
      Links(objItem);

      // Get the items for this project
      objItems = objItem->GetItems(false);

      // Prepare to loop through the items
      lpunk = objItems->_NewEnum();
      lpunk.QueryInterface(IID_IEnumVARIANT, (void **)&ppvobj);

      // Loop through the items
      do {
         ppvobj->Next( 1UL, &st, &fetched );
         if( fetched != 0 ) {
            // Try to get the item
            if(!FAILED(st.punkVal->
               QueryInterface(__uuidof(IVSSItem), (void**)&vssItem))) {
               // If the item is a project, call the function to check if there
               // are subprojects in this project
               if (vssItem->GetType() == 0)
                  CheckSubProjects(vssItem);
            }
            st.punkVal->Release();
         }
      } while (fetched != 0);

      ppvobj->Release();
      lpunk->Release();

      // Inform the user that you are finished
      AfxMessageBox("All Done!");

   } catch (_com_error e) {
      // Some error handlers
   }
}

void CheckSubProjects(IVSSItemPtr objVSSProject)
{
   // Reference to the VSS objects
   IVSSItemsPtr     objItems;
   IVSSItemPtr      vssItem;
   IUnknownPtr      lpunk;
   IEnumVARIANTPtr  ppvobj;
   ULONG            fetched;
   VARIANT          st;

   try {
      // Check for pinned files in this project
      Links(objVSSProject);

      // Get the items for this project
      objItems = objVSSProject->GetItems(false);

      // Prepare to loop through the items
      lpunk = objItems->_NewEnum();
      lpunk.QueryInterface(IID_IEnumVARIANT, (void **)&ppvobj);

      // Loop through the items
      do {
         ppvobj->Next( 1UL, &st, &fetched );
         if( fetched != 0 ) {
            // Try to get the item
            if(!FAILED(st.punkVal->
               QueryInterface(__uuidof(IVSSItem), (void**)&vssItem))) {
               // If the item is a project, call the function to check if there
               // are subprojects in this project
               if (vssItem->GetType() == 0)
                  CheckSubProjects(vssItem);
            }
            st.punkVal->Release();
         }
      } while (fetched != 0);

      ppvobj->Release();
      lpunk->Release();
   } catch (_com_error e) {
      // Some error handlers
   }
}

void Links(IVSSItemPtr objVSSFile)
{
   // Reference to the VSS objects
   IVSSVersionsPtr   objVersions;
   IVSSVersionPtr    objVersion;
   CString           UnpinArray[40];
   CString           vssAction;
   IUnknownPtr       lpunk;
   IEnumVARIANTPtr   ppvobj;
   ULONG             fetched;
   VARIANT           st;
   int               i, j, found;

   try {
      // Initialize variables
      found = i = j = 0;

      // Get the items for this project
      objVersions = objVSSFile->GetVersions(0L);

      // Prepare to loop through the items
      lpunk = objVersions->_NewEnum();
      lpunk.QueryInterface(IID_IEnumVARIANT, (void **)&ppvobj);

      // Loop through the items
      do {
         ppvobj->Next( 1UL, &st, &fetched );
         if( fetched != 0 ) {
            // Try to get the item
            if(!FAILED(st.punkVal->
               QueryInterface(__uuidof(IVSSVersion), (void**)&objVersion))) {
               // See what the event is that you are looking at
               vssAction = (LPCTSTR) objVersion->GetAction();
               // If it is a pin, check if you already have an unpin for this file
               if (vssAction.Left(6) == "Pinned") {
                  for (j = 0; j <= i; j++) {
                     if ((!UnpinArray[j].IsEmpty()) && (vssAction.Find(UnpinArray[j], 0) != -1)) {
                        // Set found to 1, the file is not pinned.
                        found = 1;
                        break;
                     }
                  }

                  // If you found it, print it out
                  if (found == 0)
                     OutputDebugString(vssAction);

               } else if (vssAction.Left(8) == "Unpinned") {
                  UnpinArray[i] = vssAction.Right(vssAction.GetLength() - 10);
                  i++;
               }
            }
            st.punkVal->Release();
         }
      } while (fetched != 0);

      ppvobj->Release();
      lpunk->Release();
   } catch (_com_error e) {
      // Some error handlers
   }
}