mirror of
https://github.com/cloudwu/skynet.git
synced 2026-07-22 02:53:09 +00:00
457 lines
11 KiB
Lua
457 lines
11 KiB
Lua
local bson = require "bson"
|
|
local socket = require "socket"
|
|
local socketchannel = require "socketchannel"
|
|
local skynet = require "skynet"
|
|
local driver = require "mongo.driver"
|
|
local md5 = require "md5"
|
|
local rawget = rawget
|
|
local assert = assert
|
|
|
|
local bson_encode = bson.encode
|
|
local bson_encode_order = bson.encode_order
|
|
local bson_decode = bson.decode
|
|
local empty_bson = bson_encode {}
|
|
|
|
local mongo = {}
|
|
mongo.null = assert(bson.null)
|
|
mongo.maxkey = assert(bson.maxkey)
|
|
mongo.minkey = assert(bson.minkey)
|
|
mongo.type = assert(bson.type)
|
|
|
|
local mongo_cursor = {}
|
|
local cursor_meta = {
|
|
__index = mongo_cursor,
|
|
}
|
|
|
|
local mongo_client = {}
|
|
|
|
local client_meta = {
|
|
__index = function(self, key)
|
|
return rawget(mongo_client, key) or self:getDB(key)
|
|
end,
|
|
__tostring = function (self)
|
|
local port_string
|
|
if self.port then
|
|
port_string = ":" .. tostring(self.port)
|
|
else
|
|
port_string = ""
|
|
end
|
|
|
|
return "[mongo client : " .. self.host .. port_string .."]"
|
|
end,
|
|
-- DO NOT need disconnect, because channel will shutdown during gc
|
|
}
|
|
|
|
local mongo_db = {}
|
|
|
|
local db_meta = {
|
|
__index = function (self, key)
|
|
return rawget(mongo_db, key) or self:getCollection(key)
|
|
end,
|
|
__tostring = function (self)
|
|
return "[mongo db : " .. self.name .. "]"
|
|
end
|
|
}
|
|
|
|
local mongo_collection = {}
|
|
local collection_meta = {
|
|
__index = function(self, key)
|
|
return rawget(mongo_collection, key) or self:getCollection(key)
|
|
end ,
|
|
__tostring = function (self)
|
|
return "[mongo collection : " .. self.full_name .. "]"
|
|
end
|
|
}
|
|
|
|
local function dispatch_reply(so)
|
|
local len_reply = so:read(4)
|
|
local reply = so:read(driver.length(len_reply))
|
|
local result = { result = {} }
|
|
local succ, reply_id, document, cursor_id, startfrom = driver.reply(reply, result.result)
|
|
result.document = document
|
|
result.cursor_id = cursor_id
|
|
result.startfrom = startfrom
|
|
result.data = reply
|
|
return reply_id, succ, result
|
|
end
|
|
|
|
local function __parse_addr(addr)
|
|
local host, port = string.match(addr, "([^:]+):(.+)")
|
|
return host, tonumber(port)
|
|
end
|
|
|
|
local function mongo_auth(mongoc)
|
|
local user = rawget(mongoc, "username")
|
|
local pass = rawget(mongoc, "password")
|
|
|
|
return function()
|
|
if user ~= nil and pass ~= nil then
|
|
assert(mongoc:auth(user, pass))
|
|
end
|
|
local rs_data = mongoc:runCommand("ismaster")
|
|
if rs_data.ok == 1 then
|
|
if rs_data.hosts then
|
|
local backup = {}
|
|
for _, v in ipairs(rs_data.hosts) do
|
|
local host, port = __parse_addr(v)
|
|
table.insert(backup, {host = host, port = port})
|
|
end
|
|
mongoc.__sock:changebackup(backup)
|
|
end
|
|
if rs_data.ismaster then
|
|
return
|
|
else
|
|
local host, port = __parse_addr(rs_data.primary)
|
|
mongoc.host = host
|
|
mongoc.port = port
|
|
mongoc.__sock:changehost(host, port)
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
function mongo.client( conf )
|
|
local first = conf
|
|
local backup = nil
|
|
if conf.rs then
|
|
first = conf.rs[1]
|
|
backup = conf.rs
|
|
end
|
|
local obj = {
|
|
host = first.host,
|
|
port = first.port or 27017,
|
|
username = first.username,
|
|
password = first.password,
|
|
}
|
|
|
|
obj.__id = 0
|
|
obj.__sock = socketchannel.channel {
|
|
host = obj.host,
|
|
port = obj.port,
|
|
response = dispatch_reply,
|
|
auth = mongo_auth(obj),
|
|
backup = backup,
|
|
nodelay = true,
|
|
}
|
|
setmetatable(obj, client_meta)
|
|
obj.__sock:connect(true) -- try connect only once
|
|
return obj
|
|
end
|
|
|
|
function mongo_client:getDB(dbname)
|
|
local db = {
|
|
connection = self,
|
|
name = dbname,
|
|
full_name = dbname,
|
|
database = false,
|
|
__cmd = dbname .. "." .. "$cmd",
|
|
}
|
|
db.database = db
|
|
|
|
return setmetatable(db, db_meta)
|
|
end
|
|
|
|
function mongo_client:disconnect()
|
|
if self.__sock then
|
|
local so = self.__sock
|
|
self.__sock = false
|
|
so:close()
|
|
end
|
|
end
|
|
|
|
function mongo_client:genId()
|
|
local id = self.__id + 1
|
|
self.__id = id
|
|
return id
|
|
end
|
|
|
|
function mongo_client:runCommand(...)
|
|
if not self.admin then
|
|
self.admin = self:getDB "admin"
|
|
end
|
|
return self.admin:runCommand(...)
|
|
end
|
|
|
|
function mongo_client:auth(user,password)
|
|
local password = md5.sumhexa(string.format("%s:mongo:%s",user,password))
|
|
local result= self:runCommand "getnonce"
|
|
if result.ok ~=1 then
|
|
return false
|
|
end
|
|
|
|
local key = md5.sumhexa(string.format("%s%s%s",result.nonce,user,password))
|
|
local result= self:runCommand ("authenticate",1,"user",user,"nonce",result.nonce,"key",key)
|
|
return result.ok == 1
|
|
end
|
|
|
|
function mongo_client:logout()
|
|
local result = self:runCommand "logout"
|
|
return result.ok == 1
|
|
end
|
|
|
|
function mongo_db:runCommand(cmd,cmd_v,...)
|
|
local conn = self.connection
|
|
local request_id = conn:genId()
|
|
local sock = conn.__sock
|
|
local bson_cmd
|
|
if not cmd_v then
|
|
bson_cmd = bson_encode_order(cmd,1)
|
|
else
|
|
bson_cmd = bson_encode_order(cmd,cmd_v,...)
|
|
end
|
|
local pack = driver.query(request_id, 0, self.__cmd, 0, 1, bson_cmd)
|
|
-- we must hold req (req.data), because req.document is a lightuserdata, it's a pointer to the string (req.data)
|
|
local req = sock:request(pack, request_id)
|
|
local doc = req.document
|
|
return bson_decode(doc)
|
|
end
|
|
|
|
function mongo_db:getCollection(collection)
|
|
local col = {
|
|
connection = self.connection,
|
|
name = collection,
|
|
full_name = self.full_name .. "." .. collection,
|
|
database = self.database,
|
|
}
|
|
self[collection] = setmetatable(col, collection_meta)
|
|
return col
|
|
end
|
|
|
|
mongo_collection.getCollection = mongo_db.getCollection
|
|
|
|
function mongo_collection:insert(doc)
|
|
if doc._id == nil then
|
|
doc._id = bson.objectid()
|
|
end
|
|
local sock = self.connection.__sock
|
|
local pack = driver.insert(0, self.full_name, bson_encode(doc))
|
|
-- flags support 1: ContinueOnError
|
|
sock:request(pack)
|
|
end
|
|
|
|
function mongo_collection:safe_insert(doc)
|
|
return self.database:runCommand("insert", self.name, "documents", {bson_encode(doc)})
|
|
end
|
|
|
|
function mongo_collection:batch_insert(docs)
|
|
for i=1,#docs do
|
|
if docs[i]._id == nil then
|
|
docs[i]._id = bson.objectid()
|
|
end
|
|
docs[i] = bson_encode(docs[i])
|
|
end
|
|
local sock = self.connection.__sock
|
|
local pack = driver.insert(0, self.full_name, docs)
|
|
sock:request(pack)
|
|
end
|
|
|
|
function mongo_collection:update(selector,update,upsert,multi)
|
|
local flags = (upsert and 1 or 0) + (multi and 2 or 0)
|
|
local sock = self.connection.__sock
|
|
local pack = driver.update(self.full_name, flags, bson_encode(selector), bson_encode(update))
|
|
sock:request(pack)
|
|
end
|
|
|
|
function mongo_collection:delete(selector, single)
|
|
local sock = self.connection.__sock
|
|
local pack = driver.delete(self.full_name, single, bson_encode(selector))
|
|
sock:request(pack)
|
|
end
|
|
|
|
function mongo_collection:findOne(query, selector)
|
|
local conn = self.connection
|
|
local request_id = conn:genId()
|
|
local sock = conn.__sock
|
|
local pack = driver.query(request_id, 0, self.full_name, 0, 1, query and bson_encode(query) or empty_bson, selector and bson_encode(selector))
|
|
-- we must hold req (req.data), because req.document is a lightuserdata, it's a pointer to the string (req.data)
|
|
local req = sock:request(pack, request_id)
|
|
local doc = req.document
|
|
return bson_decode(doc)
|
|
end
|
|
|
|
function mongo_collection:find(query, selector)
|
|
return setmetatable( {
|
|
__collection = self,
|
|
__query = query and bson_encode(query) or empty_bson,
|
|
__selector = selector and bson_encode(selector),
|
|
__ptr = nil,
|
|
__data = nil,
|
|
__cursor = nil,
|
|
__document = {},
|
|
__flags = 0,
|
|
__skip = 0,
|
|
__sortquery = nil,
|
|
__limit = 0,
|
|
} , cursor_meta)
|
|
end
|
|
|
|
function mongo_cursor:sort(key_list)
|
|
self.__sortquery = bson_encode {['$query'] = self.__query, ['$orderby'] = key_list}
|
|
return self
|
|
end
|
|
|
|
function mongo_cursor:skip(amount)
|
|
self.__skip = amount
|
|
return self
|
|
end
|
|
|
|
function mongo_cursor:limit(amount)
|
|
self.__limit = amount
|
|
return self
|
|
end
|
|
|
|
function mongo_cursor:count(with_limit_and_skip)
|
|
local cmd = {
|
|
'count', self.__collection.name,
|
|
'query', self.__query,
|
|
}
|
|
if with_limit_and_skip then
|
|
local len = #cmd
|
|
cmd[len+1] = 'limit'
|
|
cmd[len+2] = self.__limit
|
|
cmd[len+3] = 'skip'
|
|
cmd[len+4] = self.__skip
|
|
end
|
|
local ret = self.__collection.database:runCommand(table.unpack(cmd))
|
|
assert(ret and ret.ok == 1)
|
|
return ret.n
|
|
end
|
|
|
|
|
|
-- collection:createIndex({username = 1}, {unique = true})
|
|
function mongo_collection:createIndex(keys, option)
|
|
local name = option.name
|
|
option.name = nil
|
|
|
|
if not name then
|
|
for k, v in pairs(keys) do
|
|
name = (name == nil) and k or (name .. "_" .. k)
|
|
name = name .. "_" .. v
|
|
end
|
|
end
|
|
|
|
|
|
local doc = {};
|
|
doc.name = name
|
|
doc.key = keys
|
|
for k, v in pairs(option) do
|
|
doc[k] = v
|
|
end
|
|
return self.database:runCommand("createIndexes", self.name, "indexes", {doc})
|
|
end
|
|
|
|
mongo_collection.ensureIndex = mongo_collection.createIndex;
|
|
|
|
|
|
function mongo_collection:drop()
|
|
return self.database:runCommand("drop", self.name)
|
|
end
|
|
|
|
-- collection:dropIndex("age_1")
|
|
-- collection:dropIndex("*")
|
|
function mongo_collection:dropIndex(indexName)
|
|
return self.database:runCommand("dropIndexes", self.name, "index", indexName)
|
|
end
|
|
|
|
-- collection:findAndModify({query = {name = "userid"}, update = {["$inc"] = {nextid = 1}}, })
|
|
-- keys, value type
|
|
-- query, table
|
|
-- sort, table
|
|
-- remove, bool
|
|
-- update, table
|
|
-- new, bool
|
|
-- fields, bool
|
|
-- upsert, boolean
|
|
function mongo_collection:findAndModify(doc)
|
|
assert(doc.query)
|
|
assert(doc.update or doc.remove)
|
|
|
|
local cmd = {"findAndModify", self.name};
|
|
for k, v in pairs(doc) do
|
|
table.insert(cmd, k)
|
|
table.insert(cmd, v)
|
|
end
|
|
return self.database:runCommand(table.unpack(cmd))
|
|
end
|
|
|
|
function mongo_cursor:hasNext()
|
|
if self.__ptr == nil then
|
|
if self.__document == nil then
|
|
return false
|
|
end
|
|
local conn = self.__collection.connection
|
|
local request_id = conn:genId()
|
|
local sock = conn.__sock
|
|
local pack
|
|
if self.__data == nil then
|
|
local query = self.__sortquery or self.__query
|
|
pack = driver.query(request_id, self.__flags, self.__collection.full_name, self.__skip, -self.__limit, query, self.__selector)
|
|
else
|
|
if self.__cursor then
|
|
pack = driver.more(request_id, self.__collection.full_name, -self.__limit, self.__cursor)
|
|
else
|
|
-- no more
|
|
self.__document = nil
|
|
self.__data = nil
|
|
return false
|
|
end
|
|
end
|
|
|
|
local ok, result = pcall(sock.request,sock,pack, request_id)
|
|
|
|
local doc = result.document
|
|
local cursor = result.cursor_id
|
|
|
|
if ok then
|
|
if doc then
|
|
self.__document = result.result
|
|
self.__data = result.data
|
|
self.__ptr = 1
|
|
self.__cursor = cursor
|
|
return true
|
|
else
|
|
self.__document = nil
|
|
self.__data = nil
|
|
self.__cursor = nil
|
|
return false
|
|
end
|
|
else
|
|
self.__document = nil
|
|
self.__data = nil
|
|
self.__cursor = nil
|
|
if doc then
|
|
local err = bson_decode(doc)
|
|
error(err["$err"])
|
|
else
|
|
error("Reply from mongod error")
|
|
end
|
|
end
|
|
end
|
|
|
|
return true
|
|
end
|
|
|
|
function mongo_cursor:next()
|
|
if self.__ptr == nil then
|
|
error "Call hasNext first"
|
|
end
|
|
local r = bson_decode(self.__document[self.__ptr])
|
|
self.__ptr = self.__ptr + 1
|
|
if self.__ptr > #self.__document then
|
|
self.__ptr = nil
|
|
end
|
|
|
|
return r
|
|
end
|
|
|
|
function mongo_cursor:close()
|
|
-- todo: warning hasNext after close
|
|
if self.__cursor then
|
|
local sock = self.__collection.connection.__sock
|
|
local pack = driver.kill(self.__cursor)
|
|
sock:request(pack)
|
|
end
|
|
end
|
|
|
|
return mongo
|