~drizzle-trunk/drizzle/development

1933.1.3 by Brian Aker
First pass though barriers.
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
21
#include "config.h"
22
#include "plugin/user_locks/module.h"
23
#include "plugin/user_locks/barrier_storage.h"
24
25
#include <string>
26
27
namespace user_locks {
1933.1.4 by Brian Aker
Fix errror messages and namespace.
28
namespace barriers {
1933.1.3 by Brian Aker
First pass though barriers.
29
30
int64_t CreateBarrier::val_int()
31
{
32
  drizzled::String *res= args[0]->val_str(&value);
33
1955.1.2 by Brian Aker
Update such that we can now do a lock test with a wait.
34
  if (not res || not res->length())
1933.1.3 by Brian Aker
First pass though barriers.
35
  {
1955.1.2 by Brian Aker
Update such that we can now do a lock test with a wait.
36
    my_error(drizzled::ER_USER_LOCKS_INVALID_NAME_BARRIER, MYF(0));
1933.1.3 by Brian Aker
First pass though barriers.
37
    return 0;
38
  }
39
  null_value= false;
40
41
  barriers::Storable *list= static_cast<barriers::Storable *>(getSession().getProperty(barriers::property_key));
42
2008.1.1 by Brian Aker
Adding user identifier that makes use of a shared ptr to handle concurrency
43
  bool result;
1933.1.5 by Brian Aker
Implemented barrier wait_count feature.
44
2008.1.1 by Brian Aker
Adding user identifier that makes use of a shared ptr to handle concurrency
45
  drizzled::identifier::User::const_shared_ptr user_identifier(getSession().user());
1933.1.5 by Brian Aker
Implemented barrier wait_count feature.
46
  if (arg_count == 2)
47
  {
48
    int64_t wait_for;
49
    wait_for= args[1]->val_int();
50
2008.1.1 by Brian Aker
Adding user identifier that makes use of a shared ptr to handle concurrency
51
    result= Barriers::getInstance().create(Key(*user_identifier, res->c_str()), getSession().getSessionId(), wait_for);
1933.1.5 by Brian Aker
Implemented barrier wait_count feature.
52
  }
53
  else
54
  {
2008.1.1 by Brian Aker
Adding user identifier that makes use of a shared ptr to handle concurrency
55
    result= Barriers::getInstance().create(Key(*user_identifier, res->c_str()), getSession().getSessionId());
1933.1.5 by Brian Aker
Implemented barrier wait_count feature.
56
  }
57
1933.1.3 by Brian Aker
First pass though barriers.
58
59
  if (result)
60
  {
61
    if (not list)
62
    {
63
      list= new barriers::Storable(getSession().getSessionId());
64
      getSession().setProperty(barriers::property_key, list);
65
    }
66
2008.1.1 by Brian Aker
Adding user identifier that makes use of a shared ptr to handle concurrency
67
    list->insert(Key(*user_identifier, res->c_str()));
1933.1.3 by Brian Aker
First pass though barriers.
68
69
    return 1;
70
  }
71
72
  return 0;
73
}
74
1933.1.4 by Brian Aker
Fix errror messages and namespace.
75
} /* namespace barriers */
1933.1.3 by Brian Aker
First pass though barriers.
76
} /* namespace user_locks */