static int

lread(lua_State *L) {

    struct socket * s = lua_touserdata(L,);

    if (s == NULL || s->listen_fd < ) {

        return luaL_error(L, "start socket first");

    }

    size_t sz = ;

    const char * welcome = luaL_checklstring(L,,&sz);

    int fd = test(s, welcome,sz);

    if (fd >= ) {

        char buffer[BUFFER_SIZE];

        int rd = recv(fd, buffer, BUFFER_SIZE, );

        if (rd <= ) {

            s->closed = ;

            lua_pushboolean(L, );

            return ;

        }

        lua_pushlstring(L, buffer, rd);

        return ;

    }

    return ;

}

static int

lstart(lua_State *L) {

    const char * addr = luaL_checkstring(L,);

    int port = luaL_checkinteger(L,);

    struct socket * s = lua_newuserdata(L, sizeof(*s));

    s->listen_fd = -;

    s->fd = -;

    s->closed = ;

    int lfd = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);

    int reuse = ;

    setsockopt(s->listen_fd, SOL_SOCKET, SO_REUSEADDR, (void *)&reuse, sizeof(int));

    struct sockaddr_in service;

    service.sin_family = AF_INET;

    service.sin_addr.s_addr = inet_addr(addr);

    service.sin_port = htons(port);

    if (bind(lfd, (const struct sockaddr *)&service, sizeof(service)) < ) {

        closesocket(lfd);

        printf("bind() failed");

        exit();

    }

    if (listen(lfd, ) < ) {

        printf("listen(): Error");

        exit();

    }

    s->listen_fd = lfd;

    return ;

}

function ldebug.start(host)

    local ip = (host and host.ip) or "127.0.0.1"

    local port = (host and host.port) or

    socks_fd = csock.start(ip , port)

end

function readline()

    local ret = split()

    if ret then

        return ret

    end

    local data = csock.read(socks_fd, socks_prompt)

    if data then

        socks_buffer = socks_buffer .. data

        return split()

    end

    return data

end

function ldebug.start(host)

    local ip = (host and host.ip) or "127.0.0.1"

    local port = (host and host.port) or

    socks_fd = csock.start(ip , port)

end

ldebug.start { ip = "127.0.0.1", port =  }

static int

lstart(lua_State *L) {

    const char * addr = luaL_checkstring(L,);

    int port = luaL_checkinteger(L,);

    struct socket * s = lua_newuserdata(L, sizeof(*s));

    s->listen_fd = -;

    s->fd = -;

    s->closed = ;

    int lfd = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);

    int reuse = ;

    setsockopt(s->listen_fd, SOL_SOCKET, SO_REUSEADDR, (void *)&reuse, sizeof(int));

    struct sockaddr_in service;

    service.sin_family = AF_INET;

    service.sin_addr.s_addr = inet_addr(addr);

    service.sin_port = htons(port);

    if (bind(lfd, (const struct sockaddr *)&service, sizeof(service)) < ) {

        closesocket(lfd);

        printf("bind() failed");

        exit();

    }

    if (listen(lfd, ) < ) {

        printf("listen(): Error");

        exit();

    }

    s->listen_fd = lfd;

    return ;

}

--[[--

使用 TTF 字体创建文字显示对象，并返回 CCLabelTTF 对象。

可用参数：

-    text: 要显示的文本

-    font: 字体名，如果是非系统自带的 TTF 字体，那么指定为字体文件名

-    size: 文字尺寸，因为是 TTF 字体，所以可以任意指定尺寸

-    color: 文字颜色（可选），用 ccc3() 指定，默认为白色

-    align: 文字的水平对齐方式（可选）

-    valign: 文字的垂直对齐方式（可选），仅在指定了 dimensions 参数时有效

-    dimensions: 文字显示对象的尺寸（可选），使用 CCSize() 指定

-    x, y: 坐标（可选）

align 和 valign 参数可用的值：

-    ui.TEXT_ALIGN_LEFT 左对齐

-    ui.TEXT_ALIGN_CENTER 水平居中对齐

-    ui.TEXT_ALIGN_RIGHT 右对齐

-    ui.TEXT_VALIGN_TOP 垂直顶部对齐

-    ui.TEXT_VALIGN_CENTER 垂直居中对齐

-    ui.TEXT_VALIGN_BOTTOM 垂直底部对齐

~~~ lua

-- 创建一个居中对齐的文字显示对象

local label = ui.newTTFLabel({

    text = "Hello, World",

    font = "Marker Felt",

    size = 64,

    align = ui.TEXT_ALIGN_CENTER -- 文字内部居中对齐

})

-- 左对齐，并且多行文字顶部对齐

local label = ui.newTTFLabel({

    text = "Hello, World\n您好，世界",

    font = "Arial",

    size = 64,

    color = ccc3(255, 0, 0), -- 使用纯红色

    align = ui.TEXT_ALIGN_LEFT,

    valign = ui.TEXT_VALIGN_TOP,

    dimensions = CCSize(400, 200)

})

~~~

@param table params 参数表格对象

@return CCLabelTTF CCLabelTTF对象

]]

function ui.newTTFLabel(params)

    assert(type(params) == "table",

           "[framework.ui] newTTFLabel() invalid params")

    local text       = tostring(params.text)

    local font       = params.font or ui.DEFAULT_TTF_FONT

    local size       = params.size or ui.DEFAULT_TTF_FONT_SIZE

    local color      = params.color or display.COLOR_WHITE

    local textAlign  = params.align or ui.TEXT_ALIGN_LEFT

    local textValign = params.valign or ui.TEXT_VALIGN_CENTER

    local x, y       = params.x, params.y

    local dimensions = params.dimensions

    assert(type(size) == "number",

           "[framework.ui] newTTFLabel() invalid params.size")

    local label

    if dimensions then

        label = CCLabelTTF:create(text, font, size, dimensions, textAlign, textValign)

    else

        label = CCLabelTTF:create(text, font, size)

    end

    if label then

        label:setColor(color)

        function label:realign(x, y)

            if textAlign == ui.TEXT_ALIGN_LEFT then

                label:setPosition(math.round(x + label:getContentSize().width / ), y)

            elseif textAlign == ui.TEXT_ALIGN_RIGHT then

                label:setPosition(x - math.round(label:getContentSize().width / ), y)

            else

                label:setPosition(x, y)

            end

        end

        if x and y then label:realign(x, y) end

    end

    return label

end