MongoDB query based on ObjectID, getting MongoDB ObjectID from String

MongoQueryObjectID

# getting an objectId object from a string
getObjectID = function(str) {
    return(mongo.oid.from.string(str))
}

database = ""
mongo = NULL
namespace = ""

connectToMongoDB = function(host, db, collection) {
    database <<- db
    mongo <<- mongo.create(host=host, db=database)
    namespace <<- paste(database, collection, sep=".")
}

papi2 = function(host="122.122.122.122:27017", db="test", collection="requests") {
    connectToMongoDB(host, db, collection)
    
    buf <- mongo.bson.buffer.create()
    # Let's pretend we want to get all the requests for a certain client, for whom we know his ObjectID
    mongo.bson.buffer.append(buf, "clientID", getObjectID("5446687c0cf2521ace5e1111"))
    query <- mongo.bson.from.buffer(buf)
    
    cursor <- mongo.find(mongo, namespace, query)
    
    success = c()
    
    while (mongo.cursor.next(cursor)) {
        val <- mongo.cursor.value(cursor)
        
        # collecting successes
        success <- c(success, mongo.bson.value(val, "scs"))        
        
        # might be useful to transform every entry into a list
        list <- mongo.bson.to.list(val)       
    }
}