map.h

Go to the documentation of this file.

/*
 * Copyright 2006-2009 Savarese Software Research Corporation
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *     https://www.savarese.com/software/ApacheLicense-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 */

#ifndef __SSRC_WSPR_LUA_MAP_H
#define __SSRC_WSPR_LUA_MAP_H

#include <ssrc/wispers/lua/lua.h>

__BEGIN_NS_SSRC_WSPR_LUA

template<typename container_type>
void map_to_table(lua_State *state, const container_type & map) {
  typedef typename container_type::const_iterator const_iterator;

  lua_newtable(state);

  for(const_iterator && it = map.begin(), && end = map.end(); it != end;) {
    const_iterator value = it++;

    if(it != end && value->first == it->first) {
      int pos = 0;

      push_value(state, value->first);
      lua_newtable(state);

      // We assume equivalent keys are contiguous.
      do {
        push_value(state, value->second);
        lua_rawseti(state, -2, ++pos);
        ++value;
      } while(value != end && value->first == it->first);

      lua_settable(state, -3);
      it = value;
    } else {
      set_field(state, -1, value->second, value->first);
    }
  }
}

__END_NS_SSRC_WSPR_LUA

#endif