From mboxrd@z Thu Jan  1 00:00:00 1970
From: Sergey Suleymanov <solt@eatpbank.ru>
Subject: Re: CLIPPER LOCKS
Date: 17 Jun 2002 09:45:53 +0400
Sender: linux-msdos-owner@vger.kernel.org
Message-ID: <87hek2fofi.fsf@eatpbank.ru>
References: <02061412210400.01276@anderson.cdc.net>
Mime-Version: 1.0
Return-path: <linux-msdos-owner@vger.kernel.org>
In-Reply-To: <02061412210400.01276@anderson.cdc.net>
List-Id: <linux-msdos.vger.kernel.org>
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
To: Linux-MSDOS Mailing list <linux-msdos@vger.kernel.org>

>>>>> Anderson Pereira Ataides writes:

 Anderson> Hi, I've got an application develop using Clipper 5.01 and
 Anderson> I'm having trouble with locks.

 Anderson> How can I solve this problem? Is it a dosemu bug?

        Can you try this fix?

diff -rubN dosemu-1.1.3/src/dosext/mfs/mfs.c dosemu-1.1.3.my2/src/dosext/mfs/mfs.c
--- dosemu-1.1.3/src/dosext/mfs/mfs.c	Tue Apr 23 15:16:39 2002
+++ dosemu-1.1.3.my2/src/dosext/mfs/mfs.c	Mon May  6 10:18:53 2002
@@ -3795,6 +3866,7 @@
 		ret = fcntl (fd,F_SETLK,&larg);
 		Debug0((dbg_fd, "lock fd=%x rc=%x type=%x whence=%x start=%lx, len=%lx\n",
 			fd, ret, larg.l_type, larg.l_whence, larg.l_start,larg.l_len));
+		if (ret == -1) SETWORD(&(state->eax), ACCESS_DENIED);
 		return ret != -1 ? TRUE : FALSE;
 	}
     break;

-- 
  Sergey Suleymanov