~drizzle-trunk/drizzle/development

1823.6.1 by Brian Aker
First pass through adding back user_locks.
1
/* - mode: c; c-basic-offset: 2; indent-tabs-mode: nil; -*-
2
 *  vim:expandtab:shiftwidth=2:tabstop=2:smarttab:
3
 *
4
 *  Copyright (C) 2010 Brian Aker
5
 *
6
 *  This program is free software; you can redistribute it and/or modify
7
 *  it under the terms of the GNU General Public License as published by
8
 *  the Free Software Foundation; either version 2 of the License, or
9
 *  (at your option) any later version.
10
 *
11
 *  This program is distributed in the hope that it will be useful,
12
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
13
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14
 *  GNU General Public License for more details.
15
 *
16
 *  You should have received a copy of the GNU General Public License
17
 *  along with this program; if not, write to the Free Software
18
 *  Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
19
 */
20
2173.2.1 by Monty Taylor
Fixes incorrect usage of include
21
#include <config.h>
22
#include <plugin/user_locks/module.h>
23
#include <plugin/user_locks/lock_storage.h>
1823.6.1 by Brian Aker
First pass through adding back user_locks.
24
25
#include <string>
26
27
namespace user_locks {
28
29
int64_t GetLock::val_int()
30
{
31
  drizzled::String *res= args[0]->val_str(&value);
1823.6.3 by Brian Aker
Time out code now inserted for user locks.
32
  int64_t wait_time= 0;
33
34
  if (arg_count == 2)
35
  {
36
    wait_time= args[1]->val_int();
37
  }
1823.6.1 by Brian Aker
First pass through adding back user_locks.
38
1955.1.2 by Brian Aker
Update such that we can now do a lock test with a wait.
39
  if (not res || not res->length())
1823.6.1 by Brian Aker
First pass through adding back user_locks.
40
  {
1955.1.2 by Brian Aker
Update such that we can now do a lock test with a wait.
41
    my_error(drizzled::ER_USER_LOCKS_INVALID_NAME_LOCK, MYF(0));
1823.6.1 by Brian Aker
First pass through adding back user_locks.
42
    return 0;
43
  }
44
  null_value= false;
45
2240.5.1 by Olaf van der Spek
Session::getProperty
46
  user_locks::Storable *list= getSession().getProperty<user_locks::Storable>("user_locks");
1823.6.4 by Brian Aker
Enables the MySQL behavior where if you take a lock with get_lock(), you
47
  if (list) // To be compatible with MySQL, we will now release all other locks we might have.
48
    list->erase_all();
49
2252.1.8 by Olaf van der Spek
Common fwd
50
  drizzled::identifier::user::ptr user_identifier(getSession().user());
1933.2.5 by Brian Aker
Merge in the ability to kill off locks as well as barriers.
51
  {
52
    boost::this_thread::restore_interruption dl(getSession().getThreadInterupt());
53
2240.5.7 by Olaf van der Spek
Refactor
54
    try 
55
    {
56
      if (not user_locks::Locks::getInstance().lock(getSession().getSessionId(), Key(*user_identifier, res->c_str()), wait_time))
57
        return 0;
1933.2.5 by Brian Aker
Merge in the ability to kill off locks as well as barriers.
58
    }
2240.5.7 by Olaf van der Spek
Refactor
59
    catch (boost::thread_interrupted const&)
1933.2.5 by Brian Aker
Merge in the ability to kill off locks as well as barriers.
60
    {
61
      my_error(drizzled::ER_QUERY_INTERRUPTED, MYF(0));
62
      null_value= true;
63
      return 0;
64
    }
65
  }
2240.5.7 by Olaf van der Spek
Refactor
66
  if (not list)
2240.5.15 by Olaf van der Spek
Damn
67
    list= getSession().setProperty("user_locks", new user_locks::Storable(getSession().getSessionId()));
2240.5.7 by Olaf van der Spek
Refactor
68
  list->insert(Key(*user_identifier, res->c_str()));
69
  return 1;
1823.6.1 by Brian Aker
First pass through adding back user_locks.
70
}
71
72
} /* namespace user_locks */