Initial revision

1 files changed, 36 insertions, 0 deletions

diff --git a/libdiskfs/file-lock-stat.c b/libdiskfs/file-lock-stat.c
new file mode 100644
index 00000000..a529cd84
--- /dev/null
+++ b/libdiskfs/file-lock-stat.c
@@ -0,0 +1,36 @@
+/*
+   Copyright (C) 1993, 1994 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"
+
+error_t
+diskfs_S_file_lock_stat (struct protid *cred,
+			 int *mystatus,
+			 int *otherstatus)
+{
+  if (!cred)
+    return EOPNOTSUPP;
+  
+  *mystatus = cred->po->lock_status;
+  *otherstatus = cred->po->node->userlock->type;
+  return 0;
+}