summaryrefslogtreecommitdiff
path: root/source4/cluster/ctdb/brlock_ctdb.c
diff options
context:
space:
mode:
Diffstat (limited to 'source4/cluster/ctdb/brlock_ctdb.c')
-rw-r--r--source4/cluster/ctdb/brlock_ctdb.c945
1 files changed, 0 insertions, 945 deletions
diff --git a/source4/cluster/ctdb/brlock_ctdb.c b/source4/cluster/ctdb/brlock_ctdb.c
deleted file mode 100644
index 1cc6beb789..0000000000
--- a/source4/cluster/ctdb/brlock_ctdb.c
+++ /dev/null
@@ -1,945 +0,0 @@
-/*
- Unix SMB/CIFS implementation.
-
- generic byte range locking code - ctdb backend
-
- Copyright (C) Andrew Tridgell 2006
-
- This program 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 3 of the License, or
- (at your option) any later version.
-
- This program 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 this program. If not, see <http://www.gnu.org/licenses/>.
-*/
-
-#include "includes.h"
-#include "system/filesys.h"
-#include "../tdb/include/tdb.h"
-#include "messaging/messaging.h"
-#include "lib/messaging/irpc.h"
-#include "libcli/libcli.h"
-#include "cluster/cluster.h"
-#include "ntvfs/ntvfs.h"
-#include "ntvfs/common/brlock.h"
-#include "include/ctdb.h"
-
-enum my_functions {FUNC_BRL_LOCK=1, FUNC_BRL_UNLOCK=2,
- FUNC_BRL_REMOVE_PENDING=3, FUNC_BRL_LOCKTEST=4,
- FUNC_BRL_CLOSE=5};
-
-/*
- in this module a "DATA_BLOB *file_key" is a blob that uniquely identifies
- a file. For a local posix filesystem this will usually be a combination
- of the device and inode numbers of the file, but it can be anything
- that uniquely idetifies a file for locking purposes, as long
- as it is applied consistently.
-*/
-
-/* this struct is typically attached to tcon */
-struct brl_context {
- struct ctdb_context *ctdb;
- struct ctdb_db_context *ctdb_db;
- struct server_id server;
- struct messaging_context *messaging_ctx;
-};
-
-/*
- the lock context contains the elements that define whether one
- lock is the same as another lock
-*/
-struct lock_context {
- struct server_id server;
- uint16_t smbpid;
- struct brl_context *ctx;
-};
-
-/* The data in brlock records is an unsorted linear array of these
- records. It is unnecessary to store the count as tdb provides the
- size of the record */
-struct lock_struct {
- struct lock_context context;
- struct ntvfs_handle *ntvfs;
- uint64_t start;
- uint64_t size;
- enum brl_type lock_type;
- void *notify_ptr;
-};
-
-/* this struct is attached to on open file handle */
-struct brl_handle {
- DATA_BLOB key;
- struct ntvfs_handle *ntvfs;
- struct lock_struct last_lock;
-};
-
-#if 0
-static void show_locks(const char *op, struct lock_struct *locks, int count)
-{
- int i;
- DEBUG(0,("OP: %s\n", op));
- if (locks == NULL) return;
- for (i=0;i<count;i++) {
- DEBUG(0,("%2d: %4d %4d %d.%d.%d %p %p\n",
- i, (int)locks[i].start, (int)locks[i].size,
- locks[i].context.server.node,
- locks[i].context.server.id,
- locks[i].context.smbpid,
- locks[i].context.ctx,
- locks[i].ntvfs));
- }
-}
-#endif
-
-/*
- Open up the brlock.tdb database. Close it down using
- talloc_free(). We need the messaging_ctx to allow for
- pending lock notifications.
-*/
-static struct brl_context *brl_ctdb_init(TALLOC_CTX *mem_ctx, struct server_id server, struct loadparm_context *lp_ctx,
- struct messaging_context *messaging_ctx)
-{
- struct ctdb_context *ctdb = talloc_get_type(cluster_backend_handle(),
- struct ctdb_context);
- struct brl_context *brl;
-
- brl = talloc(mem_ctx, struct brl_context);
- if (brl == NULL) {
- return NULL;
- }
-
- brl->ctdb = ctdb;
- brl->ctdb_db = ctdb_db_handle(ctdb, "brlock");
- if (brl->ctdb_db == NULL) {
- DEBUG(0,("Failed to get attached ctdb db handle for brlock\n"));
- talloc_free(brl);
- return NULL;
- }
- brl->server = server;
- brl->messaging_ctx = messaging_ctx;
-
- return brl;
-}
-
-static struct brl_handle *brl_ctdb_create_handle(TALLOC_CTX *mem_ctx, struct ntvfs_handle *ntvfs,
- DATA_BLOB *file_key)
-{
- struct brl_handle *brlh;
-
- brlh = talloc(mem_ctx, struct brl_handle);
- if (brlh == NULL) {
- return NULL;
- }
-
- brlh->key = *file_key;
- brlh->ntvfs = ntvfs;
- ZERO_STRUCT(brlh->last_lock);
-
- return brlh;
-}
-
-/*
- see if two locking contexts are equal
-*/
-static bool brl_ctdb_same_context(struct lock_context *ctx1, struct lock_context *ctx2)
-{
- return (cluster_id_equal(&ctx1->server, &ctx2->server) &&
- ctx1->smbpid == ctx2->smbpid &&
- ctx1->ctx == ctx2->ctx);
-}
-
-/*
- see if lck1 and lck2 overlap
-*/
-static bool brl_ctdb_overlap(struct lock_struct *lck1,
- struct lock_struct *lck2)
-{
- /* this extra check is not redundent - it copes with locks
- that go beyond the end of 64 bit file space */
- if (lck1->size != 0 &&
- lck1->start == lck2->start &&
- lck1->size == lck2->size) {
- return true;
- }
-
- if (lck1->start >= (lck2->start+lck2->size) ||
- lck2->start >= (lck1->start+lck1->size)) {
- return false;
- }
- return true;
-}
-
-/*
- See if lock2 can be added when lock1 is in place.
-*/
-static bool brl_ctdb_conflict(struct lock_struct *lck1,
- struct lock_struct *lck2)
-{
- /* pending locks don't conflict with anything */
- if (lck1->lock_type >= PENDING_READ_LOCK ||
- lck2->lock_type >= PENDING_READ_LOCK) {
- return false;
- }
-
- if (lck1->lock_type == READ_LOCK && lck2->lock_type == READ_LOCK) {
- return false;
- }
-
- if (brl_ctdb_same_context(&lck1->context, &lck2->context) &&
- lck2->lock_type == READ_LOCK && lck1->ntvfs == lck2->ntvfs) {
- return false;
- }
-
- return brl_ctdb_overlap(lck1, lck2);
-}
-
-
-/*
- Check to see if this lock conflicts, but ignore our own locks on the
- same fnum only.
-*/
-static bool brl_ctdb_conflict_other(struct lock_struct *lck1, struct lock_struct *lck2)
-{
- /* pending locks don't conflict with anything */
- if (lck1->lock_type >= PENDING_READ_LOCK ||
- lck2->lock_type >= PENDING_READ_LOCK) {
- return false;
- }
-
- if (lck1->lock_type == READ_LOCK && lck2->lock_type == READ_LOCK)
- return false;
-
- /*
- * note that incoming write calls conflict with existing READ
- * locks even if the context is the same. JRA. See LOCKTEST7
- * in smbtorture.
- */
- if (brl_ctdb_same_context(&lck1->context, &lck2->context) &&
- lck1->ntvfs == lck2->ntvfs &&
- (lck2->lock_type == READ_LOCK || lck1->lock_type == WRITE_LOCK)) {
- return false;
- }
-
- return brl_ctdb_overlap(lck1, lck2);
-}
-
-
-/*
- amazingly enough, w2k3 "remembers" whether the last lock failure
- is the same as this one and changes its error code. I wonder if any
- app depends on this?
-*/
-static NTSTATUS brl_ctdb_lock_failed(struct brl_handle *brlh, struct lock_struct *lock)
-{
- /*
- * this function is only called for non pending lock!
- */
-
- /* in SMB2 mode always return NT_STATUS_LOCK_NOT_GRANTED! */
- if (lock->ntvfs->ctx->protocol == PROTOCOL_SMB2) {
- return NT_STATUS_LOCK_NOT_GRANTED;
- }
-
- /*
- * if the notify_ptr is non NULL,
- * it means that we're at the end of a pending lock
- * and the real lock is requested after the timeout went by
- * In this case we need to remember the last_lock and always
- * give FILE_LOCK_CONFLICT
- */
- if (lock->notify_ptr) {
- brlh->last_lock = *lock;
- return NT_STATUS_FILE_LOCK_CONFLICT;
- }
-
- /*
- * amazing the little things you learn with a test
- * suite. Locks beyond this offset (as a 64 bit
- * number!) always generate the conflict error code,
- * unless the top bit is set
- */
- if (lock->start >= 0xEF000000 && (lock->start >> 63) == 0) {
- brlh->last_lock = *lock;
- return NT_STATUS_FILE_LOCK_CONFLICT;
- }
-
- /*
- * if the current lock matches the last failed lock on the file handle
- * and starts at the same offset, then FILE_LOCK_CONFLICT should be returned
- */
- if (cluster_id_equal(&lock->context.server, &brlh->last_lock.context.server) &&
- lock->context.ctx == brlh->last_lock.context.ctx &&
- lock->ntvfs == brlh->last_lock.ntvfs &&
- lock->start == brlh->last_lock.start) {
- return NT_STATUS_FILE_LOCK_CONFLICT;
- }
-
- brlh->last_lock = *lock;
- return NT_STATUS_LOCK_NOT_GRANTED;
-}
-
-struct ctdb_lock_req {
- uint16_t smbpid;
- uint64_t start;
- uint64_t size;
- enum brl_type lock_type;
- void *notify_ptr;
- struct server_id server;
- struct brl_context *brl;
- struct ntvfs_handle *ntvfs;
-};
-
-/*
- ctdb call handling brl_lock()
-*/
-static int brl_ctdb_lock_func(struct ctdb_call_info *call)
-{
- struct ctdb_lock_req *req = (struct ctdb_lock_req *)call->call_data->dptr;
- TDB_DATA dbuf;
- int count=0, i;
- struct lock_struct lock, *locks=NULL;
- NTSTATUS status = NT_STATUS_OK;
-
- /* if this is a pending lock, then with the chainlock held we
- try to get the real lock. If we succeed then we don't need
- to make it pending. This prevents a possible race condition
- where the pending lock gets created after the lock that is
- preventing the real lock gets removed */
- if (req->lock_type >= PENDING_READ_LOCK) {
- enum brl_type lock_type = req->lock_type;
- req->lock_type = (req->lock_type==PENDING_READ_LOCK? READ_LOCK : WRITE_LOCK);
- if (brl_ctdb_lock_func(call) == 0 && call->status == NT_STATUS_V(NT_STATUS_OK)) {
- return 0;
- }
- req->lock_type = lock_type;
- }
-
- dbuf = call->record_data;
-
- ZERO_STRUCT(lock);
- lock.context.smbpid = req->smbpid;
- lock.context.server = req->server;
- lock.context.ctx = req->brl;
- lock.ntvfs = req->ntvfs;
- lock.start = req->start;
- lock.size = req->size;
- lock.lock_type = req->lock_type;
- lock.notify_ptr = req->notify_ptr;
-
- if (dbuf.dptr) {
- /* there are existing locks - make sure they don't conflict */
- locks = (struct lock_struct *)dbuf.dptr;
- count = dbuf.dsize / sizeof(*locks);
-
- for (i=0; i<count; i++) {
- if (brl_ctdb_conflict(&locks[i], &lock)) {
- status = NT_STATUS_LOCK_NOT_GRANTED;
- goto reply;
- }
- }
- }
-
- call->new_data = talloc(call, TDB_DATA);
- if (call->new_data == NULL) {
- return CTDB_ERR_NOMEM;
- }
-
- call->new_data->dptr = talloc_size(call, dbuf.dsize + sizeof(lock));
- if (call->new_data->dptr == NULL) {
- return CTDB_ERR_NOMEM;
- }
- memcpy(call->new_data->dptr, locks, dbuf.dsize);
- memcpy(call->new_data->dptr+dbuf.dsize, &lock, sizeof(lock));
- call->new_data->dsize = dbuf.dsize + sizeof(lock);
-
- if (req->lock_type >= PENDING_READ_LOCK) {
- status = NT_STATUS_LOCK_NOT_GRANTED;
- }
-
-reply:
- call->status = NT_STATUS_V(status);
-
- return 0;
-}
-
-
-/*
- Lock a range of bytes. The lock_type can be a PENDING_*_LOCK, in
- which case a real lock is first tried, and if that fails then a
- pending lock is created. When the pending lock is triggered (by
- someone else closing an overlapping lock range) a messaging
- notification is sent, identified by the notify_ptr
-*/
-static NTSTATUS brl_ctdb_lock(struct brl_context *brl,
- struct brl_handle *brlh,
- uint32_t smbpid,
- uint64_t start, uint64_t size,
- enum brl_type lock_type,
- void *notify_ptr)
-{
- struct ctdb_lock_req req;
- struct ctdb_call call;
- int ret;
- NTSTATUS status;
-
- call.call_id = FUNC_BRL_LOCK;
- call.key.dptr = brlh->key.data;
- call.key.dsize = brlh->key.length;
- call.call_data.dptr = (uint8_t *)&req;
- call.call_data.dsize = sizeof(req);
- call.flags = 0;
- call.status = 0;
-
- ZERO_STRUCT(req);
- req.smbpid = smbpid;
- req.start = start;
- req.size = size;
- req.lock_type = lock_type;
- req.notify_ptr = notify_ptr;
- req.server = brl->server;
- req.brl = brl;
- req.ntvfs = brlh->ntvfs;
-
- ret = ctdb_call(brl->ctdb_db, &call);
- if (ret == -1) {
- return NT_STATUS_INTERNAL_DB_CORRUPTION;
- }
-
- status = NT_STATUS(call.status);
-
- if (NT_STATUS_EQUAL(status, NT_STATUS_LOCK_NOT_GRANTED)) {
- struct lock_struct lock;
- lock.context.smbpid = smbpid;
- lock.context.server = brl->server;
- lock.context.ctx = brl;
- lock.ntvfs = brlh->ntvfs;
- lock.start = start;
- lock.size = size;
- lock.lock_type = lock_type;
- lock.notify_ptr = notify_ptr;
- status = brl_ctdb_lock_failed(brlh, &lock);
- }
-
- return status;
-}
-
-/*
- we are removing a lock that might be holding up a pending lock. Scan
- for pending locks that cover this range and if we find any then
- notify the server that it should retry the lock. In this backend, we
- notify by sending the list of locks that need to be notified on back
- in the reply_data of the ctdb call. The caller then does the
- messaging for us.
-*/
-static int brl_ctdb_notify_unlock(struct ctdb_call_info *call,
- struct lock_struct *locks, int count,
- struct lock_struct *removed_lock)
-{
- int i, last_notice;
-
- /* the last_notice logic is to prevent stampeding on a lock
- range. It prevents us sending hundreds of notifies on the
- same range of bytes. It doesn't prevent all possible
- stampedes, but it does prevent the most common problem */
- last_notice = -1;
-
- for (i=0;i<count;i++) {
- if (locks[i].lock_type >= PENDING_READ_LOCK &&
- brl_ctdb_overlap(&locks[i], removed_lock)) {
- struct lock_struct *nlocks;
- int ncount;
-
- if (last_notice != -1 && brl_ctdb_overlap(&locks[i], &locks[last_notice])) {
- continue;
- }
- if (locks[i].lock_type == PENDING_WRITE_LOCK) {
- last_notice = i;
- }
- if (call->reply_data == NULL) {
- call->reply_data = talloc_zero(call, TDB_DATA);
- if (call->reply_data == NULL) {
- return CTDB_ERR_NOMEM;
- }
- }
- /* add to the list of pending locks to notify caller of */
- ncount = call->reply_data->dsize / sizeof(struct lock_struct);
- nlocks = talloc_realloc(call->reply_data, call->reply_data->dptr,
- struct lock_struct, ncount + 1);
- if (nlocks == NULL) {
- return CTDB_ERR_NOMEM;
- }
- call->reply_data->dptr = (uint8_t *)nlocks;
- nlocks[ncount] = locks[i];
- call->reply_data->dsize += sizeof(struct lock_struct);
- }
- }
-
- return 0;
-}
-
-/*
- send notifications for all pending locks - the file is being closed by this
- user
-*/
-static int brl_ctdb_notify_all(struct ctdb_call_info *call,
- struct lock_struct *locks, int count)
-{
- int i;
- for (i=0;i<count;i++) {
- if (locks->lock_type >= PENDING_READ_LOCK) {
- int ret = brl_ctdb_notify_unlock(call, locks, count, &locks[i]);
- if (ret != 0) return ret;
- }
- }
- return 0;
-}
-
-/*
- send off any messages needed to notify of pending locks that should now retry
-*/
-static void brl_ctdb_notify_send(struct brl_context *brl, TDB_DATA *reply_data)
-{
- struct lock_struct *locks = (struct lock_struct *)reply_data->dptr;
- int i, count = reply_data->dsize / sizeof(struct lock_struct);
- for (i=0;i<count;i++) {
- messaging_send_ptr(brl->messaging_ctx, locks[i].context.server,
- MSG_BRL_RETRY, locks[i].notify_ptr);
- }
-}
-
-
-struct ctdb_unlock_req {
- uint16_t smbpid;
- uint64_t start;
- uint64_t size;
- struct server_id server;
- struct brl_context *brl;
- struct ntvfs_handle *ntvfs;
-};
-
-/*
- Unlock a range of bytes.
-*/
-static int brl_ctdb_unlock_func(struct ctdb_call_info *call)
-{
- struct ctdb_unlock_req *req = (struct ctdb_unlock_req *)call->call_data->dptr;
- TDB_DATA dbuf;
- int count, i;
- struct lock_struct *locks, *lock;
- struct lock_context context;
- NTSTATUS status = NT_STATUS_OK;
-
- dbuf = call->record_data;
-
- context.smbpid = req->smbpid;
- context.server = req->server;
- context.ctx = req->brl;
-
- /* there are existing locks - find a match */
- locks = (struct lock_struct *)dbuf.dptr;
- count = dbuf.dsize / sizeof(*locks);
-
- for (i=0; i<count; i++) {
- lock = &locks[i];
- if (brl_ctdb_same_context(&lock->context, &context) &&
- lock->ntvfs == req->ntvfs &&
- lock->start == req->start &&
- lock->size == req->size &&
- lock->lock_type == WRITE_LOCK) {
- break;
- }
- }
- if (i < count) goto found;
-
- for (i=0; i<count; i++) {
- lock = &locks[i];
- if (brl_ctdb_same_context(&lock->context, &context) &&
- lock->ntvfs == req->ntvfs &&
- lock->start == req->start &&
- lock->size == req->size &&
- lock->lock_type < PENDING_READ_LOCK) {
- break;
- }
- }
-
-found:
- if (i < count) {
- struct lock_struct removed_lock = *lock;
-
- call->new_data = talloc(call, TDB_DATA);
- if (call->new_data == NULL) {
- return CTDB_ERR_NOMEM;
- }
-
- call->new_data->dptr = talloc_size(call, dbuf.dsize - sizeof(*lock));
- if (call->new_data->dptr == NULL) {
- return CTDB_ERR_NOMEM;
- }
- call->new_data->dsize = dbuf.dsize - sizeof(*lock);
-
- memcpy(call->new_data->dptr, locks, i*sizeof(*lock));
- memcpy(call->new_data->dptr+i*sizeof(*lock), locks+i+1,
- (count-(i+1))*sizeof(*lock));
-
- if (count > 1) {
- int ret = brl_ctdb_notify_unlock(call, locks, count, &removed_lock);
- if (ret != 0) return ret;
- }
- }
-
- if (i == count) {
- /* we didn't find it */
- status = NT_STATUS_RANGE_NOT_LOCKED;
- }
-
- call->status = NT_STATUS_V(status);
-
- return 0;
-}
-
-
-/*
- Unlock a range of bytes.
-*/
-static NTSTATUS brl_ctdb_unlock(struct brl_context *brl,
- struct brl_handle *brlh,
- uint32_t smbpid,
- uint64_t start, uint64_t size)
-{
- struct ctdb_call call;
- struct ctdb_unlock_req req;
- int ret;
-
- call.call_id = FUNC_BRL_UNLOCK;
- call.key.dptr = brlh->key.data;
- call.key.dsize = brlh->key.length;
- call.call_data.dptr = (uint8_t *)&req;
- call.call_data.dsize = sizeof(req);
-
- ZERO_STRUCT(req);
- req.smbpid = smbpid;
- req.start = start;
- req.size = size;
- req.server = brl->server;
- req.brl = brl;
- req.ntvfs = brlh->ntvfs;
-
- ret = ctdb_call(brl->ctdb_db, &call);
- if (ret == -1) {
- DEBUG(0,("ctdb_call failed - %s\n", __location__));
- return NT_STATUS_INTERNAL_DB_CORRUPTION;
- }
-
- brl_ctdb_notify_send(brl, &call.reply_data);
-
- return NT_STATUS(call.status);
-}
-
-
-struct ctdb_remove_pending_req {
- struct server_id server;
- void *notify_ptr;
-};
-
-/*
- remove a pending lock. This is called when the caller has either
- given up trying to establish a lock or when they have succeeded in
- getting it. In either case they no longer need to be notified.
-*/
-static int brl_ctdb_remove_pending_func(struct ctdb_call_info *call)
-{
- struct ctdb_remove_pending_req *req = (struct ctdb_remove_pending_req *)call->call_data->dptr;
- TDB_DATA dbuf;
- int count, i;
- struct lock_struct *locks;
- NTSTATUS status = NT_STATUS_OK;
-
- dbuf = call->record_data;
-
- /* there are existing locks - find a match */
- locks = (struct lock_struct *)dbuf.dptr;
- count = dbuf.dsize / sizeof(*locks);
-
- for (i=0; i<count; i++) {
- struct lock_struct *lock = &locks[i];
-
- if (lock->lock_type >= PENDING_READ_LOCK &&
- lock->notify_ptr == req->notify_ptr &&
- cluster_id_equal(&lock->context.server, &req->server)) {
- call->new_data = talloc(call, TDB_DATA);
- if (call->new_data == NULL) {
- return CTDB_ERR_NOMEM;
- }
-
- call->new_data->dptr = talloc_size(call, dbuf.dsize - sizeof(*lock));
- if (call->new_data->dptr == NULL) {
- return CTDB_ERR_NOMEM;
- }
- call->new_data->dsize = dbuf.dsize - sizeof(*lock);
-
- memcpy(call->new_data->dptr, locks, i*sizeof(*lock));
- memcpy(call->new_data->dptr+i*sizeof(*lock), locks+i+1,
- (count-(i+1))*sizeof(*lock));
- break;
- }
- }
-
- if (i == count) {
- /* we didn't find it */
- status = NT_STATUS_RANGE_NOT_LOCKED;
- }
-
- call->status = NT_STATUS_V(status);
-
- return 0;
-}
-
-static NTSTATUS brl_ctdb_remove_pending(struct brl_context *brl,
- struct brl_handle *brlh,
- void *notify_ptr)
-{
- struct ctdb_call call;
- struct ctdb_remove_pending_req req;
- int ret;
-
- call.call_id = FUNC_BRL_REMOVE_PENDING;
- call.key.dptr = brlh->key.data;
- call.key.dsize = brlh->key.length;
- call.call_data.dptr = (uint8_t *)&req;
- call.call_data.dsize = sizeof(req);
-
- ZERO_STRUCT(req);
- req.notify_ptr = notify_ptr;
- req.server = brl->server;
-
- ret = ctdb_call(brl->ctdb_db, &call);
- if (ret == -1) {
- DEBUG(0,("ctdb_call failed - %s\n", __location__));
- return NT_STATUS_INTERNAL_DB_CORRUPTION;
- }
-
- return NT_STATUS(call.status);
-}
-
-
-struct ctdb_locktest_req {
- uint16_t smbpid;
- uint64_t start;
- uint64_t size;
- enum brl_type lock_type;
- struct brl_context *brl;
- struct server_id server;
- struct ntvfs_handle *ntvfs;
-};
-
-/*
- remove a pending lock. This is called when the caller has either
- given up trying to establish a lock or when they have succeeded in
- getting it. In either case they no longer need to be notified.
-*/
-static int brl_ctdb_locktest_func(struct ctdb_call_info *call)
-{
- struct ctdb_locktest_req *req = (struct ctdb_locktest_req *)call->call_data->dptr;
- TDB_DATA dbuf;
- int count, i;
- struct lock_struct *locks, lock;
- NTSTATUS status = NT_STATUS_OK;
-
- lock.context.smbpid = req->smbpid;
- lock.context.server = req->server;
- lock.context.ctx = req->brl;
- lock.ntvfs = req->ntvfs;
- lock.start = req->start;
- lock.size = req->size;
- lock.lock_type = req->lock_type;
-
- dbuf = call->record_data;
-
- /* there are existing locks - find a match */
- locks = (struct lock_struct *)dbuf.dptr;
- count = dbuf.dsize / sizeof(*locks);
-
- for (i=0; i<count; i++) {
- if (brl_ctdb_conflict_other(&locks[i], &lock)) {
- status = NT_STATUS_FILE_LOCK_CONFLICT;
- break;
- }
- }
-
- call->status = NT_STATUS_V(status);
-
- return 0;
-}
-
-/*
- Test if we are allowed to perform IO on a region of an open file
-*/
-static NTSTATUS brl_ctdb_locktest(struct brl_context *brl,
- struct brl_handle *brlh,
- uint32_t smbpid,
- uint64_t start, uint64_t size,
- enum brl_type lock_type)
-{
- struct ctdb_call call;
- struct ctdb_locktest_req req;
- int ret;
-
- call.call_id = FUNC_BRL_LOCKTEST;
- call.key.dptr = brlh->key.data;
- call.key.dsize = brlh->key.length;
- call.call_data.dptr = (uint8_t *)&req;
- call.call_data.dsize = sizeof(req);
-
- ZERO_STRUCT(req);
- req.smbpid = smbpid;
- req.start = start;
- req.size = size;
- req.lock_type = lock_type;
- req.server = brl->server;
- req.brl = brl;
- req.ntvfs = brlh->ntvfs;
-
- ret = ctdb_call(brl->ctdb_db, &call);
- if (ret == -1) {
- DEBUG(0,("ctdb_call failed - %s\n", __location__));
- return NT_STATUS_INTERNAL_DB_CORRUPTION;
- }
-
- return NT_STATUS(call.status);
-}
-
-
-struct ctdb_close_req {
- struct brl_context *brl;
- struct server_id server;
- struct ntvfs_handle *ntvfs;
-};
-
-/*
- remove a pending lock. This is called when the caller has either
- given up trying to establish a lock or when they have succeeded in
- getting it. In either case they no longer need to be notified.
-*/
-static int brl_ctdb_close_func(struct ctdb_call_info *call)
-{
- struct ctdb_close_req *req = (struct ctdb_close_req *)call->call_data->dptr;
- TDB_DATA dbuf;
- int count, dcount=0, i;
- struct lock_struct *locks;
- NTSTATUS status = NT_STATUS_OK;
-
- dbuf = call->record_data;
-
- /* there are existing locks - find a match */
- locks = (struct lock_struct *)dbuf.dptr;
- count = dbuf.dsize / sizeof(*locks);
-
- for (i=0; i<count; i++) {
- struct lock_struct *lock = &locks[i];
-
- if (lock->context.ctx == req->brl &&
- cluster_id_equal(&lock->context.server, &req->server) &&
- lock->ntvfs == req->ntvfs) {
- /* found it - delete it */
- if (count > 1 && i < count-1) {
- memmove(&locks[i], &locks[i+1],
- sizeof(*locks)*((count-1) - i));
- }
- count--;
- i--;
- dcount++;
- }
- }
-
- if (dcount > 0) {
- call->new_data = talloc(call, TDB_DATA);
- if (call->new_data == NULL) {
- return CTDB_ERR_NOMEM;
- }
-
- brl_ctdb_notify_all(call, locks, count);
-
- call->new_data->dptr = talloc_size(call, count*sizeof(struct lock_struct));
- if (call->new_data->dptr == NULL) {
- return CTDB_ERR_NOMEM;
- }
- call->new_data->dsize = count*sizeof(struct lock_struct);
-
- memcpy(call->new_data->dptr, locks, count*sizeof(struct lock_struct));
- }
-
- call->status = NT_STATUS_V(status);
-
- return 0;
-}
-
-/*
- Test if we are allowed to perform IO on a region of an open file
-*/
-static NTSTATUS brl_ctdb_close(struct brl_context *brl,
- struct brl_handle *brlh)
-{
- struct ctdb_call call;
- struct ctdb_close_req req;
- int ret;
-
- call.call_id = FUNC_BRL_CLOSE;
- call.key.dptr = brlh->key.data;
- call.key.dsize = brlh->key.length;
- call.call_data.dptr = (uint8_t *)&req;
- call.call_data.dsize = sizeof(req);
-
- ZERO_STRUCT(req);
- req.brl = brl;
- req.server = brl->server;
- req.ntvfs = brlh->ntvfs;
-
- ret = ctdb_call(brl->ctdb_db, &call);
- if (ret == -1) {
- DEBUG(0,("ctdb_call failed - %s\n", __location__));
- return NT_STATUS_INTERNAL_DB_CORRUPTION;
- }
-
- brl_ctdb_notify_send(brl, &call.reply_data);
-
- return NT_STATUS(call.status);
-}
-
-
-static const struct brlock_ops brlock_tdb_ops = {
- .brl_init = brl_ctdb_init,
- .brl_create_handle = brl_ctdb_create_handle,
- .brl_lock = brl_ctdb_lock,
- .brl_unlock = brl_ctdb_unlock,
- .brl_remove_pending = brl_ctdb_remove_pending,
- .brl_locktest = brl_ctdb_locktest,
- .brl_close = brl_ctdb_close
-};
-
-
-void brl_ctdb_init_ops(void)
-{
- struct ctdb_context *ctdb = talloc_get_type(cluster_backend_handle(),
- struct ctdb_context);
- struct ctdb_db_context *ctdb_db;
-
- brl_set_ops(&brlock_tdb_ops);
-
- ctdb_db = ctdb_db_handle(ctdb, "brlock");
- if (ctdb_db == NULL) {
- DEBUG(0,("Failed to get attached ctdb db handle for brlock\n"));
- return;
- }
-
- ctdb_set_call(ctdb_db, brl_ctdb_lock_func, FUNC_BRL_LOCK);
- ctdb_set_call(ctdb_db, brl_ctdb_unlock_func, FUNC_BRL_UNLOCK);
- ctdb_set_call(ctdb_db, brl_ctdb_remove_pending_func, FUNC_BRL_REMOVE_PENDING);
- ctdb_set_call(ctdb_db, brl_ctdb_locktest_func, FUNC_BRL_LOCKTEST);
- ctdb_set_call(ctdb_db, brl_ctdb_close_func, FUNC_BRL_CLOSE);
-}