[ros-diffs] [ekohl] 20512: Forward QueryServiceLockStatusA/W to services.exe.

[ekohl at svn.reactos.org]

Forward QueryServiceLockStatusA/W to services.exe.
Modified: trunk/reactos/lib/advapi32/service/scm.c
  _____  

Modified: trunk/reactos/lib/advapi32/service/scm.c
--- trunk/reactos/lib/advapi32/service/scm.c	2006-01-01 13:45:09 UTC
(rev 20511)
+++ trunk/reactos/lib/advapi32/service/scm.c	2006-01-01 14:26:25 UTC
(rev 20512)
@@ -1665,38 +1665,84 @@

 /**********************************************************************
  *  QueryServiceLockStatusA
  *
- * @unimplemented
+ * @implemented
  */
-BOOL
-STDCALL
-QueryServiceLockStatusA(
-    SC_HANDLE           hSCManager,
-    LPQUERY_SERVICE_LOCK_STATUSA    lpLockStatus,
-    DWORD               cbBufSize,
-    LPDWORD             pcbBytesNeeded)
+BOOL STDCALL
+QueryServiceLockStatusA(SC_HANDLE hSCManager,
+                        LPQUERY_SERVICE_LOCK_STATUSA lpLockStatus,
+                        DWORD cbBufSize,
+                        LPDWORD pcbBytesNeeded)
 {
-    DPRINT1("QueryServiceLockStatusA is unimplemented\n");
-    SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
-    return FALSE;
+    DWORD dwError;
+
+    DPRINT("QueryServiceLockStatusA() called\n");
+
+    HandleBind();
+
+    /* Call to services.exe using RPC */
+    dwError = ScmrQueryServiceLockStatusA(BindingHandle,
+                                          (unsigned int)hSCManager,
+                                          (unsigned char
*)lpLockStatus,
+                                          cbBufSize,
+                                          pcbBytesNeeded);
+    if (dwError != ERROR_SUCCESS)
+    {
+        DPRINT("ScmrQueryServiceLockStatusA() failed (Error %lu)\n",
dwError);
+        SetLastError(dwError);
+        return FALSE;
+    }
+
+    if (lpLockStatus->lpLockOwner != NULL)
+    {
+        lpLockStatus->lpLockOwner =
+            (LPSTR)((UINT_PTR)lpLockStatus +
(UINT_PTR)lpLockStatus->lpLockOwner);
+    }
+
+    DPRINT("QueryServiceLockStatusA() done\n");
+
+    return TRUE;
 }
 
 
 /**********************************************************************
  *  QueryServiceLockStatusW
  *
- * @unimplemented
+ * @implemented
  */
-BOOL
-STDCALL
-QueryServiceLockStatusW(
-    SC_HANDLE           hSCManager,
-    LPQUERY_SERVICE_LOCK_STATUSW    lpLockStatus,
-    DWORD               cbBufSize,
-    LPDWORD             pcbBytesNeeded)
+BOOL STDCALL
+QueryServiceLockStatusW(SC_HANDLE hSCManager,
+                        LPQUERY_SERVICE_LOCK_STATUSW lpLockStatus,
+                        DWORD cbBufSize,
+                        LPDWORD pcbBytesNeeded)
 {
-    DPRINT1("QueryServiceLockStatusW is unimplemented\n");
-    SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
-    return FALSE;
+    DWORD dwError;
+
+    DPRINT("QueryServiceLockStatusW() called\n");
+
+    HandleBind();
+
+    /* Call to services.exe using RPC */
+    dwError = ScmrQueryServiceLockStatusW(BindingHandle,
+                                          (unsigned int)hSCManager,
+                                          (unsigned char
*)lpLockStatus,
+                                          cbBufSize,
+                                          pcbBytesNeeded);
+    if (dwError != ERROR_SUCCESS)
+    {
+        DPRINT("ScmrQueryServiceLockStatusW() failed (Error %lu)\n",
dwError);
+        SetLastError(dwError);
+        return FALSE;
+    }
+
+    if (lpLockStatus->lpLockOwner != NULL)
+    {
+        lpLockStatus->lpLockOwner =
+            (LPWSTR)((UINT_PTR)lpLockStatus +
(UINT_PTR)lpLockStatus->lpLockOwner);
+    }
+
+    DPRINT("QueryServiceLockStatusW() done\n");
+
+    return TRUE;
 }
 
 
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://www.reactos.org/pipermail/ros-diffs/attachments/20060101/7f1b6b1d/attachment.html