1 files changed, 38 insertions, 0 deletions
diff --git a/libdiskfs/file-lock-stat.c b/libdiskfs/file-lock-stat.c
new file mode 100644
index 00000000..75341617
--- /dev/null
+++ b/libdiskfs/file-lock-stat.c
@@ -0,0 +1,38 @@
+/*
+   Copyright (C) 1994, 1995 Free Software Foundation
+
+This file is part of the GNU Hurd.
+
+The GNU Hurd is free software; you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation; either version 2, or (at your option)
+any later version.
+
+The GNU Hurd is distributed in the hope that it will be useful, 
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with the GNU Hurd; see the file COPYING.  If not, write to
+the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
+
+/* Written by Michael I. Bushnell.  */
+
+#include "priv.h"
+#include "fs_S.h"
+
+kern_return_t
+diskfs_S_file_lock_stat (struct protid *cred,
+			 int *mystatus,
+			 int *otherstatus)
+{
+  if (!cred)
+    return EOPNOTSUPP;
+  
+  mutex_lock (&cred->po->np->lock);
+  *mystatus = cred->po->lock_status;
+  *otherstatus = cred->po->np->userlock.type;
+  mutex_unlock (&cred->po->np->lock);
+  return 0;
+}