skynet_main.c浅析

Posted 2020-08-05 mr_yu

tags:

篇首语：本文由小常识网(cha138.com)小编为大家整理，主要介绍了skynet_main.c浅析相关的知识，希望对你有一定的参考价值。

1.作为skynet的启动文件,主要完成了一些初始化和读取并存取配置文件内容的工作. 在这里只将代码读取配置文件的部分抽取出来，就算没有skynet环境，这些代码也是可以运行的，了解以后再对照源码进行分析，希望能对理解skynet带来一些帮助

#include "lua.h"
#include "lualib.h"
#include "lauxlib.h"

#include <signal.h>
#include <assert.h>
#include "env.h"

struct config
{
int thread;
int harbor;
const char *deamon;
const char *module_path;
const char *bootstrap;
const char *logger;
const char *logservice;
};

void popn(lua_State *L, int n);

static int
optint(const char *key, int opt)
{
const char *str = env_getenv(key);
if (str == NULL)
{
  char tmp[20];
  sprintf(tmp, "%d", opt);
  env_setenv(key, tmp);
  return opt;
}
return strtol(str, NULL, 10);
}

static const char *
optstring(const char *key, const char *opt)
{
const char *str = env_getenv(key);
if (str == NULL)
{
  if (opt)
  {
   env_setenv(key, opt);
   opt = env_getenv(key);
  }
  return opt;
}
return str;
}

static const char * load_config = "\
local config_name = ...\
local f = assert(io.open(config_name))\
local code = assert(f:read \‘*a\‘)\
print(\"code is \", code)\
local function getenv(name) return assert(os.getenv(name), \‘os.getenv() failed: \‘ .. name) end\
code = string.gsub(code, \‘%$([%w_%d]+)\‘, getenv)\
f:close()\
print(\"code after replace is \", code)\
local result = {}\
assert(load(code,\‘=(load)\‘,\‘t\‘,result))()\
return result\
";

static void
_init_env(lua_State *L)
{
lua_pushnil(L);
while(lua_next(L, -2) != 0)
{
  int keyt = lua_type(L, -2);
  if (keyt != LUA_TSTRING)
  {
   fprintf(stderr, "Invalid, config table\n");
   exit(1);
  }

  const char *key = lua_tostring(L, -2);
  if (lua_type(L, -1) == LUA_TBOOLEAN)
  {
   int b = lua_toboolean(L, -1);
   env_setenv(key, b ? "true" : "false");
  }
  else
  {
   const char *value = lua_tostring(L, -1);
   if (value == NULL)
   {
    fprintf(stderr, "Invalud config table key = %s\n", key);
    exit(1);
   }
   env_setenv(key, value);
  }
  lua_pop(L, 1);
}
lua_pop(L, 1);
}

void popn(lua_State *L, int n)
{
lua_pop(L, -(n) - 1);
}

int
sigign()
{
struct sigaction sa;
sa.sa_handler = SIG_IGN;
sigaction(SIGPIPE, &sa, 0);
return 0;
}

void
init_conf(struct config *conf)
{
conf->thread = optint("thread", 8);
conf->module_path = optstring("cpath", "./cservice/?.so");
conf->harbor = optint("harbor", 1);
conf->bootstrap = optstring("bootstrap", "snlua bootstrap");
conf->deamon = optstring("deamon", NULL);
conf->deamon = optstring("logger", NULL);
conf->logservice = optstring("logservice", "logger");
}

void test_env()
{
printf("thread: %s\n", env_getenv("thread"));
printf("harbor: %s\n", env_getenv("harbor"));
}

int
main(int argc, char *argv[])
{
const char *config_file = NULL;
if (argc > 1)
{
  config_file = argv[1];
}
else
{
  fprintf(stderr, "Need a config file. Please read skynet wiki : https://github.com/cloudwu/skynet/wiki/Config\n"
   "usage: skynet configfilename\n");
}

sigign();
env_env_init();

struct config conf;
struct lua_State *L = luaL_newstate();
luaL_openlibs(L);
int err = luaL_loadstring(L, load_config);
assert(err == LUA_OK);
lua_pushstring(L, config_file);

err = lua_pcall(L, 1, 1, 0);
if (err)
{
  fprintf(stderr, "%s,\n", lua_tostring(L, -1));
  lua_close(L);
  return 1;
}
_init_env(L);

init_conf(&conf);

test_env();

lua_close(L);

return 0;
}

首先看main函数：

const char *config_file = NULL;

if (argc > 1) {

config_file = argv[1];

} else {

fprintf(stderr, "Need a config file. Please read skynet wiki : https://github.com/cloudwu/skynet/wiki/Config\n" "usage: skynet configfilename\n");

}

这句话是读取配置文件路径:正如运行skynet的命令行为：./skynet ./examples/config.我将config拿出来放到和可执行文件用级，运行方式为: ./test ./config

于是config_file = argv[1]便保存了配置文件名.

下面两句: sigign(); env_env_init();

设置信号处理函数,调用env_env_init()初始化保存配置文件的环境,该函数在env.c中，对应的是skynet_env.c（这里内容是一样的）,代码如下:

env.c:

#include "env.h"
#include "spinlock.h"
#include "lauxlib.h"
#include "lua.h"
#include <stdlib.h>
#include <assert.h>
#include <error.h>
#include <string.h>

struct env
{
struct spinlock lock;
lua_State *L;
};

static struct env *E = NULL;

const char*
env_getenv(const char *key)
{
SPIN_LOCK(E);
lua_State *L = E->L;
lua_getglobal(L, key);
const char *result = lua_tostring(L, -1);
//nil may return if there is no such a key-pair.
lua_pop(L, 1);
SPIN_UNLOCK(E);

return result;
}

void
env_setenv(const char *key, const char *value)
{
SPIN_LOCK(E);
lua_State *L = E->L;
lua_getglobal(L, key);
//after getglobal , if there is a value crosponds to the key , then it will be pushed onto stack, otherwise nil is pushed
assert(lua_isnil(L, -1));
lua_pop(L, 1); //pop nil from the stack
lua_pushstring(L, value);
lua_setglobal(L, key); //after setglobal the value on the stack will be poped.

SPIN_UNLOCK(E);
}

void
env_env_init()
{
E = (struct env*)malloc(sizeof(*E));
SPIN_INIT(E);
E->L = luaL_newstate();
}

由此可见env.c创建了静态变量 static struct env *E 来保存配置。

继续main函数：

struct lua_State *L = luaL_newstate();

luaL_openlibs(L);

int err = luaL_loadstring(L, load_config);

assert(err == LUA_OK);

lua_pushstring(L, config_file); err = lua_pcall(L, 1, 1, 0);

if (err) {

fprintf(stderr, "%s,\n", lua_tostring(L, -1)); lua_close(L);

return 1;

}

_init_env(L);

这几句话便完成了读取配置文件并保存到env.c中的E的lua虚拟机里.

int err = luaL_loadstring(L, load_config);

这句话将load_config作为一个chunk加载到打开的L的函数堆栈里，我们看一下load_config：

发现load_config其实是一段lua代码字符串，load到函数栈上以后，便可以执行，

但是根据 local config_name = ...\ 看出，需要传入一个参数，也就是配置文件的路径那么如何传呢?继续看main函数 lua_pushstring(L, config_file); 这句话便将config_file这个字符串放到了栈上供

int err = luaL_loadstring(L, load_config); 产生的chunk调用.

于是执行 err = lua_pcall(L, 1, 1, 0); if (err) { fprintf(stderr, "%s,\n", lua_tostring(L, -1)); lua_close(L); return 1; }

这句话便是开始执行lua函数栈上的chunk，参数为刚才push进去的config_file，那么chunk做了哪些事情呢?

local f = assert(io.open(config_name))\

local code = assert(f:read \‘*a\‘)\

首先打开配置文件，并读取所有内容,接下来定义了一个函数:

local function getenv(name) return assert(os.getenv(name), \‘os.getenv() failed: \‘ .. name) end\

这个函数执行返回 os.getenv(name), 也就是name为环境变量的名称，这里得到其值例如： print(os.getenv("HOME")),便会输出$(HOME)对应的值，

接下来：code = string.gsub(code, \‘%$([%w_%d]+)\‘, getenv)\

可以看到用string.gsub来讲code（配置文件内容）中的$(...)环境变量用getenv中得到的来替换

.但是skynet中得config 没有类似的环境变量，所以得到的code没有变化.

接下来

f:close()\

local result = {}

assert(load(code,\‘=(load)\‘,\‘t\‘,result))()\

return result

关闭配置文件，将code load到result表中，然后返回result表，

我们注意到我们调用lua_pcall（L， 1，1，0），因此，result表此时在栈顶的位置. 到此为止，配置文件的内容已经存放在result表中，并且这个表在lua调用栈的栈顶

,接下来便是从栈上的表中读取表中的内容，然后存放到env中：紧接着调用

_init_env(L);

这个函数是一个典型的读取table中以字符串作为键的table的内容,尤其是不知道table中的具体内容是什么的时候.

这里我们只知道是以键值对形式，且键是字符串，table为非数组。

上边我们知道此时lua函数栈的栈顶为存放了配置文件内容的table，那么这个函数就是挨个遍历table内容，并调用env_env_set（）来存放。

首先lua_next(L, -2)先将栈顶元素弹出然后将table中的一个键值对放到栈上，键在-2位置上，值在-1位置上。因为lua_next(L, -2)先弹栈顶元素，因此在调用之前先pushnil，放进一个nil在栈顶，调用lua_next() nil 被弹出然后table中的第一个键值对依次放到栈上,然后获得键值，调用 env_setenv()来存放内容到E。循环读取table的值，直到读完跳出循环。至此，config文件中的内容全部存放到env中的全局变量E中的虚拟机中，并可在其他地方调用来获得配置文件内容. 最后： init_conf(&conf); test_env(); lua_close(L); 其实就是仿照skynet_main.c来测试，test_env()可以替换成skynet_start(&conf)来继续启动skynet，这里简单的用来测试。到此为止，读取config配置文件的工作就做完了，并保存到了env.c中的局部静态变量里。供其它地方使用配置。

基础有限，研究skynet时间有限，难免讲述不清或出现错误，望指正。最后贴出全部测试文件代码:

----------------------------------------------------------------------------------------------------------

start.c

#include "lua.h"
#include "lualib.h"
#include "lauxlib.h"

#include <signal.h>
#include <assert.h>
#include "env.h"

struct config
{
int thread;
int harbor;
const char *deamon;
const char *module_path;
const char *bootstrap;
const char *logger;
const char *logservice;
};

void popn(lua_State *L, int n);

void popn(lua_State *L, int n)
{
lua_pop(L, -(n) - 1);
}

int
sigign()
{
struct sigaction sa;
sa.sa_handler = SIG_IGN;
sigaction(SIGPIPE, &sa, 0);
return 0;
}

void test_env()
{
printf("thread: %s\n", env_getenv("thread"));
printf("harbor: %s\n", env_getenv("harbor"));
}

err = lua_pcall(L, 1, 1, 0);
if (err)
{
  fprintf(stderr, "%s,\n", lua_tostring(L, -1));
  lua_close(L);
  return 1;
}
_init_env(L);

init_conf(&conf);

test_env();

lua_close(L);

return 0;
}

env.c

#include "env.h"
#include "spinlock.h"
#include "lauxlib.h"
#include "lua.h"
#include <stdlib.h>
#include <assert.h>
#include <error.h>
#include <string.h>

struct env
{
struct spinlock lock;
lua_State *L;
};

static struct env *E = NULL;

return result;
}

SPIN_UNLOCK(E);
}

void
env_env_init()
{
E = (struct env*)malloc(sizeof(*E));
SPIN_INIT(E);
E->L = luaL_newstate();
}

env.h

#ifndef __ENV_H_
#define __ENV_H_

const char* env_getenv(const char*key);
void env_setenv(const char *key, const char *value);
void env_env_init();

#endif

spinlock.h

#ifndef SKYNET_SPINLOCK_H
#define SKYNET_SPINLOCK_H

#define SPIN_INIT(q) spinlock_init(&(q)->lock);
#define SPIN_LOCK(q) spinlock_lock(&(q)->lock);
#define SPIN_UNLOCK(q) spinlock_unlock(&(q)->lock);
#define SPIN_DESTROY(q) spinlock_destroy(&(q)->lock);

#ifndef USE_PTHREAD_LOCK

struct spinlock {
int lock;
};

static inline void
spinlock_init(struct spinlock *lock) {
lock->lock = 0;
}

static inline void
spinlock_lock(struct spinlock *lock) {
while (__sync_lock_test_and_set(&lock->lock,1)) {}
}

static inline int
spinlock_trylock(struct spinlock *lock) {
return __sync_lock_test_and_set(&lock->lock,1) == 0;
}

static inline void
spinlock_unlock(struct spinlock *lock) {
__sync_lock_release(&lock->lock);
}

static inline void
spinlock_destroy(struct spinlock *lock) {
(void) lock;
}

#else

#include <pthread.h>

// we use mutex instead of spinlock for some reason
// you can also replace to pthread_spinlock

struct spinlock {
pthread_mutex_t lock;
};

static inline void
spinlock_init(struct spinlock *lock) {
pthread_mutex_init(&lock->lock, NULL);
}

static inline void
spinlock_lock(struct spinlock *lock) {
pthread_mutex_lock(&lock->lock);
}

static inline int
spinlock_trylock(struct spinlock *lock) {
return pthread_mutex_trylock(&lock->lock) == 0;
}

static inline void
spinlock_unlock(struct spinlock *lock) {
pthread_mutex_unlock(&lock->lock);
}

static inline void
spinlock_destroy(struct spinlock *lock) {
pthread_mutex_destroy(&lock->lock);
}

#endif

#endife

config

root        = "./"
thread      = 8
--logger      = nil
logger      = "userlog"
logservice = "snlua"
--logservice = "catlogger"
logpath     = "./../../log/cat/"
harbor      = 1
address     = "127.0.0.1:2401"
master      = "127.0.0.1:2013"
start       = "main" -- main script
bootstrap   = "snlua bootstrap" -- The service for bootstrap
standalone = "0.0.0.0:2013"
luaservice = "./../../service/logind/?.lua;./../../service/db/?.lua;./../../service/web/?.lua;./../../service/cat/?.lua;./../../service/?.lua;./service/?.lua"
lualoader   = "lualib/loader.lua"
preload     = "./../../lualib/preload.lua" -- run preload.lua before every lua service run
snax        = root.."../logind/?.lua;"..root.."test/?.lua"
-- snax_interface_g = "snax_g"
cpath       = "./../../cservice/?.so;./cservice/?.so"
-- daemon = "./skynet.pid"

makefile:

CC= gcc
CFLAGS= -g -O2 -Wall
LUA_INC= /usr/include/lua5.2

all: main

main : start.c env.c env.h spinlock.h
$(CC) $(CFLAGS) -o [email protected] $^ -I$(LUA_INC) -llua5.2 -lpthread -lm

clean :
rm -f main

以上是关于skynet_main.c浅析的主要内容，如果未能解决你的问题，请参考以下文章

skynet教程（3）--服务的别名

游戏开发实战手把手教你从零跑一个Skynet，详细教程，含案例讲解（服务端 | Skynet | Ubuntu）

转：云风skynet服务端框架研究

skynet中动态库的处理

使用skynet 的一个简单范例，附分析