//////////////////////////////////////////////////////////////////////////

// test code for luabridge

class A

{

public:

  A()

  {

  }

  ~A()

  {

  }

public:

  std::string get_title() const

  {

    return title;

  }

  void set_title( const std::string& s )

  {

    title = s;

  }

private:

  std::string title;

};

class B : public A

{

public:

  B() : A()

  {

  }

  ~B()

  {

  }

};

void trace( const std::string& strOutput)

{

  OutputDebugStringA(strOutput.c_str());

  OutputDebugStringA("\n");

}

class lua_test

{

public:

  lua_test()

    : L_()

    , B_()

  {

    L_ = luaL_newstate();

    luaL_openlibs(L_);

    luaopen_string(L_);

    luabridge::getGlobalNamespace( L_ )

      .addFunction( "trace", trace )

      .beginNamespace( "test" )

        .beginClass< A >( "A" )

          .addConstructor <void (*) (void)> ()

          .addProperty( "title", &A::get_title, &A::set_title )

        .endClass()

        .deriveClass< B, A >( "B" )

          .addConstructor <void (*) (void)> ()

        .endClass()

      .endNamespace()

    ;

  }

  ~lua_test()

  {

    lua_close( L_ );

  }

  bool run( )

  {

    luabridge::setglobal<A*>( L_, (A*)&this->B_, "classb" );

    B_.set_title( "B.title ");

    std::string lua_string;

    FILE* f = fopen( "D:/test.lua", "r" );

    if( f ) {

      char buf[] = {};

      int r = fread( buf, , sizeof( buf ), f );

      if( r >  )

        lua_string = std::string( buf, r );

      fclose( f );

      f = ;

    }

    try

    {

      //2.加载Lua文件

      int bRet = luaL_loadstring( L_, lua_string.c_str() );

      if(bRet) {

        OutputDebugStringA(lua_tostring( L_, - ) );

        return false;

      }

      //3.运行Lua文件   CHttpCall::~CHttpCall

      bRet = lua_pcall( L_, , , );

      if(bRet)

      {

        OutputDebugStringA(lua_tostring( L_, - ) );

        return false;

      }

    } catch (...) {

      OutputDebugStringA( lua_tostring( L_, - ) );

    }

    return true;

  }

private:

  lua_State* L_;

  B B_;

};

// 运行代码

lua_test t;
  t.run();

function test_func()

  local a = test.B();

  a.title = "abcdefg";

  trace( a.title )

  trace( classb.title );

end

test_func();