Changeset 6711 for trunk/src/ole32/filemoniker.c

Timestamp:

Sep 15, 2001, 11:32:00 AM (24 years ago)

Author:

sandervl

Message:

restored old version + wine update

File:

• trunk/src/ole32/filemoniker.c (modified) (47 diffs)

trunk/src/ole32/filemoniker.c

@@ -1 @@
-/* $Id: filemoniker.c,v 1.2 2001-09-05 13:17:09 bird Exp $ */
 /***************************************************************************************
- *                        FileMonikers implementation
+ *                            FileMonikers implementation
  *
  *               Copyright 1999  Noomen Hamza
@@ -27 +26 @@
     ICOM_VTABLE(IMoniker)*  lpvtbl1;  /* VTable relative to the IMoniker interface.*/
 
-    /* The ROT (RunningObjectTable implementation) uses the IROTData interface to test whether
+    /* The ROT (RunningObjectTable implementation) uses the IROTData interface to test whether 
      * two monikers are equal. That's whay IROTData interface is implemented by monikers.
      */
@@ -137 +136 @@
 {
     ICOM_THIS(FileMonikerImpl,iface);
-
+  
   TRACE("(%p,%p,%p)\n",This,riid,ppvObject);
 
     /* Perform a sanity check on the parameters.*/
     if ( (This==0) || (ppvObject==0) )
-    return E_INVALIDARG;
-
+        return E_INVALIDARG;
+  
     /* Initialize the return parameter */
   *ppvObject = 0;
@@ -154 +153 @@
        )
         *ppvObject = iface;
-
+    
     else if (IsEqualIID(&IID_IROTData, riid))
         *ppvObject = (IROTData*)&(This->lpvtbl2);
@@ -161 +160 @@
     if ((*ppvObject)==0)
         return E_NOINTERFACE;
-
+  
     /* Query Interface always increases the reference count by one when it is successful */
   FileMonikerImpl_AddRef(iface);
@@ -213 +212 @@
 
     *pClassID = CLSID_FileMoniker;
-
+        
     return S_OK;
 }
@@ -253 +252 @@
     if (bread!=sizeof(WORD) || wbuffer!=0)
         return E_FAIL;
-
+    
     /* read filePath string length (plus one) */
     res=IStream_Read(pStm,&length,sizeof(DWORD),&bread);
@@ -269 +268 @@
     if (bread != sizeof(DWORD) || dwbuffer != 0xDEADFFFF)
         return E_FAIL;
-
+        
     length--;
-
+        
     for(i=0;i<10;i++){
         res=IStream_Read(pStm,&wbuffer,sizeof(WORD),&bread);
@@ -277 +276 @@
             return E_FAIL;
     }
-
+    
     if (length>8)
         length=0;
-
+        
     doubleLenHex=doubleLenDec=2*length;
     if (length > 5)
@@ -291 +290 @@
     if (length==0)
         return res;
-
+        
     res=IStream_Read(pStm,&dwbuffer,sizeof(DWORD),&bread);
     if (bread!=sizeof(DWORD) || dwbuffer!=doubleLenHex)
@@ -312 +311 @@
 
     HeapFree(GetProcessHeap(),0,filePathA);
-
+    
     return res;
 }
@@ -325 +324 @@
     /* this function saves data of this object. In the begining I thougth that I have just to write
      * the filePath string on Stream. But, when I tested this function whith windows programs samples !
-     * I noted that it was not the case. So I analysed data written by this function on Windows system and
+     * I noted that it was not the case. So I analysed data written by this function on Windows system and 
      * what did this function do exactly ! but I have no idear a bout its logic !
      * I guessed data who must be written on stream wich is:
@@ -334 +333 @@
      */
 
-    ICOM_THIS(FileMonikerImpl,iface);
+    ICOM_THIS(FileMonikerImpl,iface);        
 
     HRESULT res;
@@ -369 +368 @@
     /* write a DWORD set to 0xDEADFFFF: constant */
     res=IStream_Write(pStm,&constant1,sizeof(DWORD),NULL);
-
+        
     len--;
     /* write 10 times a DWORD set to 0 : constants */
     for(i=0;i<10;i++)
         res=IStream_Write(pStm,&zero,sizeof(WORD),NULL);
-
+        
     if (len>8)
         len=0;
-
+        
     doubleLenHex=doubleLenDec=2*len;
     if (len > 5)
@@ -416 +415 @@
 
     /* for more details see FileMonikerImpl_Save coments */
-
+    
     sizeMAx =  sizeof(WORD) +           /* first WORD is 0 */
                sizeof(DWORD)+           /* length of filePath including "\0" in the end of the string */
@@ -426 +425 @@
     if (len==0 || len > 8)
         return S_OK;
-
+    
     sizeMAx += sizeof(DWORD)+           /* size of the unicode filePath: "\0" not included */
                sizeof(WORD)+            /* constant : 0x3 */
                len*sizeof(WCHAR);       /* unicde filePath string */
-
+    
     pcbSize->s.LowPart=sizeMAx;
     pcbSize->s.HighPart=0;
@@ -448 +447 @@
     WCHAR bkSlash[]={'\\',0};
     BYTE addBkSlash;
-
+    
     TRACE("(%p,%p)\n",This,lpszPathName);
 
@@ -493 +492 @@
 
         *This->filePathName=0;
-
+    
         for(i=0;tabStr[i]!=NULL;i++)
             strcatW(This->filePathName,tabStr[i]);
-
+    
         if (addBkSlash)
             strcatW(This->filePathName,bkSlash);
@@ -539 +538 @@
     IClassFactory *pcf=0;
     IClassActivator *pca=0;
-
-    ICOM_THIS(FileMonikerImpl,iface);
+    
+    ICOM_THIS(FileMonikerImpl,iface);    
 
     *ppvResult=0;
@@ -547 +546 @@
 
     if(pmkToLeft==NULL){
-
+        
         res=IBindCtx_GetRunningObjectTable(pbc,&prot);
 
@@ -579 +578 @@
 
             res=IMoniker_BindToObject(pmkToLeft,pbc,NULL,&IID_IClassActivator,(void**)&pca);
-
+        
             if (res==E_NOINTERFACE)
                 return MK_E_INTERMEDIATEINTERFACENOTSUPPORTED;
@@ -598 +597 @@
 
             FIXME("()");
-
+            
             /*res=GetClassFile(This->filePathName,&clsID);
 
@@ -634 +633 @@
     if (pcf!=NULL)
         IClassFactory_Release(pcf);
-
+    
     return res;
 }
@@ -737 +736 @@
 
     if (pmkRight==NULL)
-    return E_INVALIDARG;
+        return E_INVALIDARG;
 
     *ppmkComposite=0;
-
+    
     IMoniker_IsSystemMoniker(pmkRight,&mkSys);
 
@@ -769 +768 @@
         /* the length of the composed path string  is raised by the sum of the two paths lengths  */
         newStr=HeapAlloc(GetProcessHeap(),0,sizeof(WCHAR)*(lstrlenW(str1)+lstrlenW(str2)+1));
-
-      if (newStr==NULL)
-        return E_OUTOFMEMORY;
+        
+          if (newStr==NULL)
+                return E_OUTOFMEMORY;
 
         /* new path is the concatenation of the rest of str1 and str2 */
@@ -779 +778 @@
         if ((strDec2[i]==NULL && lastIdx1>-1 && lastIdx2>-1) || lstrcmpW(strDec2[i],bkSlash)!=0)
             strcatW(newStr,bkSlash);
-
+            
         for(j=i;j<=lastIdx2;j++)
             strcatW(newStr,strDec2[j]);
-
+        
         /* create a new moniker with the new string */
         res=CreateFileMoniker(newStr,ppmkComposite);
@@ -858 +857 @@
 
     IMoniker_GetDisplayName(pmkOtherMoniker,bind,NULL,&filePath);
-
+    
     if (lstrcmpiW(filePath,
                   This->filePathName)!=0)
 
         return S_FALSE;
-
+    
     return S_OK;
 }
@@ -880 +879 @@
     if (pdwHash==NULL)
         return E_POINTER;
-
+    
     val =  This->filePathName;
     len = lstrlenW(val);
@@ -887 +886 @@
         for (i = len ; i > 0; i--) {
             h = (h * 37) + val[off++];
-    }
+        }
     } else {
         /* only sample some characters */
-    skip = len / 8;
-    for (i = len ; i > 0; i -= skip, off += skip) {
+        skip = len / 8;
+        for (i = len ; i > 0; i -= skip, off += skip) {
             h = (h * 39) + val[off];
-    }
+        }
 }
 
@@ -964 +963 @@
         if (!GetFileAttributesExW(This->filePathName,GetFileExInfoStandard,&info))
             return MK_E_NOOBJECT;
-
+        
         *pFileTime=info.ftLastWriteTime;
 }
@@ -999 +998 @@
     if (pmkOther==NULL)
         return E_INVALIDARG;
-
+    
     *ppmkPrefix=0;
-
+    
     /* check if we have the same type of moniker */
     IMoniker_IsSystemMoniker(pmkOther,&mkSys);
@@ -1023 +1022 @@
 
         *commonPath=0;
-
+        
         for(sameIdx=0; ( (stringTable1[sameIdx]!=NULL) &&
                          (stringTable2[sameIdx]!=NULL) &&
@@ -1042 +1041 @@
         if (machimeNameCase && *stringTable1[sameIdx-1]=='\\')
             sameIdx--;
-
+        
         if (machimeNameCase && (sameIdx<=3) && (nb1 > 3 || nb2 > 3) )
             return MK_E_NOPREFIX;
@@ -1048 +1047 @@
         for(i=0;i<sameIdx;i++)
             strcatW(commonPath,stringTable1[i]);
-
+        
         for(i=0;i<nb1;i++)
             CoTaskMemFree(stringTable1[i]);
@@ -1060 +1059 @@
 
         HeapFree(GetProcessHeap(),0,commonPath);
-
+        
         return CreateFileMoniker(commonPath,ppmkPrefix);
     }
@@ -1080 +1079 @@
 
     strgtable =CoTaskMemAlloc(len*sizeof(LPOLESTR));
-
+    
     if (strgtable==NULL)
-    return E_OUTOFMEMORY;
-
+        return E_OUTOFMEMORY;
+    
     while(str[i]!=0){
 
@@ -1091 +1090 @@
 
             if (strgtable[tabIndex]==NULL)
-            return E_OUTOFMEMORY;
+                return E_OUTOFMEMORY;
 
             strcpyW(strgtable[tabIndex++],bSlash);
@@ -1114 +1113 @@
     }
     strgtable[tabIndex]=NULL;
-
+    
     *stringTable=strgtable;
-
+    
     return tabIndex;
 }
@@ -1130 +1129 @@
     DWORD len1=0,len2=0,sameIdx=0,j=0;
     WCHAR back[] ={'.','.','\\',0};
-
+    
     TRACE("(%p,%p,%p)\n",iface,pmOther,ppmkRelPath);
 
@@ -1138 +1137 @@
     if (pmOther==NULL)
         return E_INVALIDARG;
-
+    
     res=CreateBindCtx(0,&bind);
     if (FAILED(res))
-    return res;
+        return res;
 
     res=IMoniker_GetDisplayName(iface,bind,NULL,&str1);
     if (FAILED(res))
-    return res;
+        return res;
     res=IMoniker_GetDisplayName(pmOther,bind,NULL,&str2);
     if (FAILED(res))
-    return res;
+        return res;
 
     len1=FileMonikerImpl_DecomposePath(str1,&tabStr1);
@@ -1154 +1153 @@
 
     if (FAILED(len1) || FAILED(len2))
-    return E_OUTOFMEMORY;
-
+        return E_OUTOFMEMORY;
+        
     /* count the number of similar items from the begin of the two paths */
     for(sameIdx=0; ( (tabStr1[sameIdx]!=NULL) &&
-           (tabStr2[sameIdx]!=NULL) &&
+                   (tabStr2[sameIdx]!=NULL) &&
                (lstrcmpiW(tabStr1[sameIdx],tabStr2[sameIdx])==0)); sameIdx++);
 
@@ -1176 +1175 @@
     for(j=sameIdx;tabStr2[j]!=NULL;j++)
         strcatW(relPath,tabStr2[j]);
-
+    
     res=CreateFileMoniker(relPath,ppmkRelPath);
-
+    
     for(j=0; tabStr1[j]!=NULL;j++)
         CoTaskMemFree(tabStr1[j]);
@@ -1220 +1219 @@
 
     strcpyW(*ppszDisplayName,This->filePathName);
-
+    
     return S_OK;
 }
@@ -1247 +1246 @@
     if (!pwdMksys)
         return E_POINTER;
-
+    
     (*pwdMksys)=MKSYS_FILEMONIKER;
 
@@ -1284 +1283 @@
 {
     ICOM_THIS_From_IROTData(IMoniker, iface);
-
+    
     TRACE("(%p)\n",This);
 
@@ -1328 +1327 @@
     if(lpszPathName==NULL)
         return MK_E_SYNTAX;
-
+            
     *ppmk=0;
-
+        
     newFileMoniker = HeapAlloc(GetProcessHeap(), 0, sizeof(FileMonikerImpl));
 
@@ -1339 +1338 @@
 
     if (SUCCEEDED(hr))
-    hr = FileMonikerImpl_QueryInterface((IMoniker*)newFileMoniker,&riid,(void**)ppmk);
+        hr = FileMonikerImpl_QueryInterface((IMoniker*)newFileMoniker,&riid,(void**)ppmk);
     else
         HeapFree(GetProcessHeap(),0,newFileMoniker);