Google Git
Sign in
apache / thrift / refs/tags/thrift-0.7.0 / . / compiler / cpp / src / generate / t_c_glib_generator.cc
blob: d1fc70287d6d0198ee694906acd480bf7cf00347 [file] [log] [blame]
/*
* Licensed to the Apache Software Foundation (ASF) under one
* or more contributor license agreements. See the NOTICE file
* distributed with this work for additional information
* regarding copyright ownership. The ASF licenses this file
* to you 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
*
* http://www.apache.org/licenses/LICENSE-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.
*
* Contains some contributions under the Thrift Software License.
* Please see doc/old-thrift-license.txt in the Thrift distribution for
* details.
*/
#include <fstream>
#include <iostream>
#include <string>
#include <vector>
#include <ctype.h>
#include "platform.h"
#include "t_oop_generator.h"
using namespace std;
/* forward declarations */
string initial_caps_to_underscores(string name);
string to_upper_case(string name);
string to_lower_case(string name);
/**
* C code generator, using glib for C typing.
*/
class t_c_glib_generator : public t_oop_generator {
public:
/* constructor */
t_c_glib_generator(t_program *program,
const map<string, string> &parsed_options,
const string &option_string) : t_oop_generator(program)
{
(void) parsed_options;
(void) option_string;
/* set the output directory */
this->out_dir_base_ = "gen-c_glib";
/* set the namespace */
this->nspace = program_->get_namespace("c_glib");
if (this->nspace.empty()) {
this->nspace = "";
this->nspace_u = "";
this->nspace_uc = "";
this->nspace_lc = "";
} else {
/* replace dots with underscores */
char *tmp = strdup(this->nspace.c_str());
for (unsigned int i = 0; i < strlen(tmp); i++) {
if (tmp[i] == '.') {
tmp[i] = '_';
}
}
this->nspace = string(tmp, strlen(tmp));
free(tmp);
/* clean up the namespace for C.
* An input of 'namespace foo' should result in:
* - nspace = foo - for thrift objects and typedefs
* - nspace_u = Foo - for internal GObject prefixes
* - nspace_uc = FOO_ - for macro prefixes
* - nspace_lc = foo_ - for filename and method prefixes
* The underscores are there since uc and lc strings are used as file and
* variable prefixes.
*/
this->nspace_u = initial_caps_to_underscores(this->nspace);
this->nspace_uc = to_upper_case(this->nspace_u) + "_";
this->nspace_lc = to_lower_case(this->nspace_u) + "_";
}
}
/* initialization and destruction */
void init_generator();
void close_generator();
/* generation functions */
void generate_typedef(t_typedef *ttypedef);
void generate_enum(t_enum *tenum);
void generate_consts(vector<t_const *> consts);
void generate_struct(t_struct *tstruct);
void generate_service(t_service *tservice);
void generate_xception(t_struct *tstruct);
private:
/* file streams */
ofstream f_types_;
ofstream f_types_impl_;
ofstream f_header_;
ofstream f_service_;
/* namespace variables */
string nspace;
string nspace_u;
string nspace_uc;
string nspace_lc;
/* helper functions */
bool is_complex_type(t_type *ttype);
string type_name(t_type* ttype, bool in_typedef=false, bool is_const=false);
string base_type_name(t_base_type *type);
string type_to_enum(t_type *type);
string constant_value(string name, t_type *type, t_const_value *value);
string function_signature(t_function *tfunction);
string argument_list(t_struct *tstruct);
string xception_list(t_struct *tstruct);
string declare_field(t_field *tfield, bool init=false, bool pointer=false, bool constant=false, bool reference=false);
/* generation functions */
void generate_const_initializer(string name, t_type *type, t_const_value *value);
void generate_service_client(t_service *tservice);
void generate_service_server(t_service *tservice);
void generate_object(t_struct *tstruct);
void generate_struct_writer(ofstream &out, t_struct *tstruct, string this_name, string this_get="", bool is_function=true);
void generate_struct_reader(ofstream &out, t_struct *tstruct, string this_name, string this_get="", bool is_function=true);
void generate_serialize_field(ofstream &out, t_field *tfield, string prefix, string suffix, int error_ret);
void generate_serialize_struct(ofstream &out, t_struct *tstruct, string prefix, int error_ret);
void generate_serialize_container(ofstream &out, t_type *ttype, string prefix, int error_ret);
void generate_serialize_map_element(ofstream &out, t_map *tmap, string key, string value, int error_ret);
void generate_serialize_set_element(ofstream &out, t_set *tset, string element, int error_ret);
void generate_serialize_list_element(ofstream &out, t_list *tlist, string list, string index, int error_ret);
void generate_deserialize_field(ofstream &out, t_field *tfield, string prefix, string suffix, int error_ret);
void generate_deserialize_struct(ofstream &out, t_struct *tstruct, string prefix, int error_ret);
void generate_deserialize_container(ofstream &out, t_type *ttype, string prefix, int error_ret);
void generate_deserialize_map_element(ofstream &out, t_map *tmap, string prefix, int error_ret);
void generate_deserialize_set_element(ofstream &out, t_set *tset, string prefix, int error_ret);
void generate_deserialize_list_element(ofstream &out, t_list *tlist, string prefix, string index, int error_ret);
string generate_new_hash_from_type(t_type * ttype);
string generate_new_array_from_type(t_type * ttype);
};
/**
* Prepare for file generation by opening up the necessary file
* output streams.
*/
void t_c_glib_generator::init_generator() {
/* create output directory */
MKDIR(get_out_dir().c_str());
string program_name_u = initial_caps_to_underscores(program_name_);
string program_name_uc = to_upper_case(program_name_u);
string program_name_lc = to_lower_case(program_name_u);
/* create output files */
string f_types_name = get_out_dir() + this->nspace_lc
+ program_name_lc + "_types.h";
f_types_.open(f_types_name.c_str());
string f_types_impl_name = get_out_dir() + this->nspace_lc
+ program_name_lc + "_types.c";
f_types_impl_.open(f_types_impl_name.c_str());
/* add thrift boilerplate headers */
f_types_ << autogen_comment();
f_types_impl_ << autogen_comment();
/* include inclusion guard */
f_types_ <<
"#ifndef " << this->nspace_uc << program_name_uc << "_TYPES_H" << endl <<
"#define " << this->nspace_uc << program_name_uc << "_TYPES_H" << endl <<
endl;
/* include base types */
f_types_ <<
"/* base includes */" << endl <<
"#include <glib-object.h>" << endl <<
"#include <thrift_struct.h>" << endl <<
"#include <protocol/thrift_protocol.h>" << endl;
/* include other thrift includes */
const vector<t_program *> &includes = program_->get_includes();
for (size_t i = 0; i < includes.size(); ++i) {
f_types_ <<
"/* other thrift includes */" << endl <<
"#include \"" << this->nspace_lc << includes[i]->get_name() <<
"_types.h\"" << endl;
}
f_types_ << endl;
/* include custom headers */
const vector<string> &c_includes = program_->get_c_includes();
f_types_ << "/* custom thrift includes */" << endl;
for (size_t i = 0; i < c_includes.size(); ++i) {
if (c_includes[i][0] == '<') {
f_types_ <<
"#include " << c_includes[i] << endl;
} else {
f_types_ <<
"#include \"" << c_includes[i] << "\"" << endl;
}
}
f_types_ << endl;
// include the types file
f_types_impl_ <<
endl <<
"#include \"" << this->nspace_lc << program_name_u <<
"_types.h\"" << endl <<
"#include <thrift.h>" << endl <<
endl;
f_types_ <<
"/* begin types */" << endl << endl;
}
/**
* Finish up generation and close all file streams.
*/
void t_c_glib_generator::close_generator() {
string program_name_uc = to_upper_case
(initial_caps_to_underscores(program_name_));
/* end the header inclusion guard */
f_types_ <<
"#endif /* " << this->nspace_uc << program_name_uc << "_TYPES_H */" << endl;
/* close output file */
f_types_.close();
f_types_impl_.close();
}
/**
* Generates a Thrift typedef in C code. For example:
*
* Thrift:
* typedef map<i32,i32> SomeMap
*
* C:
* typedef GHashTable * ThriftSomeMap;
*/
void t_c_glib_generator::generate_typedef(t_typedef* ttypedef) {
f_types_ <<
indent() << "typedef " << type_name(ttypedef->get_type(), true) <<
" " << this->nspace << ttypedef->get_symbolic() << ";" << endl <<
endl;
}
/**
* Generates a C enumeration. For example:
*
* Thrift:
* enum MyEnum {
* ONE = 1,
* TWO
* }
*
* C:
* enum _ThriftMyEnum {
* THRIFT_MY_ENUM_ONE = 1,
* THRIFT_MY_ENUM_TWO
* };
* typedef enum _ThriftMyEnum ThriftMyEnum;
*/
void t_c_glib_generator::generate_enum(t_enum *tenum) {
string name = tenum->get_name();
string name_uc = to_upper_case(initial_caps_to_underscores(name));
f_types_ <<
indent() << "enum _" << this->nspace << name << " {" << endl;
indent_up();
vector<t_enum_value *> constants = tenum->get_constants();
vector<t_enum_value *>::iterator c_iter;
bool first = true;
/* output each of the enumeration elements */
for (c_iter = constants.begin(); c_iter != constants.end(); ++c_iter) {
if (first) {
first = false;
} else {
f_types_ << "," << endl;
}
f_types_ <<
indent() << this->nspace_uc << name_uc << "_" << (*c_iter)->get_name();
if ((*c_iter)->has_value()) {
f_types_ <<
" = " << (*c_iter)->get_value();
}
}
indent_down();
f_types_ <<
endl <<
"};" << endl <<
"typedef enum _" << this->nspace << name << " " << this->nspace << name << ";" << endl <<
endl;
}
/**
* Generates Thrift constants in C code.
*/
void t_c_glib_generator::generate_consts (vector<t_const *> consts) {
f_types_ << "/* constants */" << endl;
f_types_impl_ << "/* constants */" << endl;
vector<t_const *>::iterator c_iter;
for (c_iter = consts.begin(); c_iter != consts.end(); ++c_iter) {
string name = (*c_iter)->get_name();
string name_uc = to_upper_case(name);
string name_lc = to_lower_case(name);
t_type *type = (*c_iter)->get_type();
t_const_value *value = (*c_iter)->get_value();
f_types_ <<
indent() << "#define " << this->nspace_uc << name_uc << " " <<
constant_value (name_lc, type, value) << endl;
generate_const_initializer (name_lc, type, value);
}
f_types_ << endl;
f_types_impl_ << endl;
}
/**
* Generate Thrift structs in C code, as GObjects. Example:
*
* Thrift:
* struct Bonk
* {
* 1: string message,
* 2: i32 type
* }
*
* C GObject instance header:
* struct _ThriftBonk
* {
* GObject parent;
*
* gchar * message;
* gint32 type;
* };
* typedef struct _ThriftBonk ThriftBonk
* // ... additional GObject boilerplate ...
*/
void t_c_glib_generator::generate_struct (t_struct *tstruct) {
f_types_ << "/* struct " << tstruct->get_name() << " */" << endl;
generate_object(tstruct);
}
/**
* Generate C code to represent Thrift services. Creates a new GObject
* which can be used to access the service.
*/
void t_c_glib_generator::generate_service (t_service *tservice) {
string svcname_u = initial_caps_to_underscores(tservice->get_name());
string svcname_uc = this->nspace_uc + to_upper_case(svcname_u);
string filename = this->nspace_lc + to_lower_case(svcname_u);
// make output files
string f_header_name = get_out_dir() + filename + ".h";
f_header_.open(f_header_name.c_str());
string program_name_u = initial_caps_to_underscores(program_name_);
string program_name_lc = to_lower_case(program_name_u);
// add header file boilerplate
f_header_ <<
autogen_comment();
// add an inclusion guard
f_header_ <<
"#ifndef " << svcname_uc << "_H" << endl <<
"#define " << svcname_uc << "_H" << endl <<
endl;
// add standard includes
f_header_ <<
"#include \"" << this->nspace_lc << program_name_lc << "_types.h\"" << endl;
// if we are inheriting from another service, include its header
t_service *extends_service = tservice->get_extends();
if (extends_service != NULL) {
f_header_ <<
"#include \"" << this->nspace_lc << to_lower_case(initial_caps_to_underscores(extends_service->get_name())) << ".h\"" << endl;
}
f_header_ << endl;
// create the service implementation
string f_service_name = get_out_dir() + filename + ".c";
f_service_.open(f_service_name.c_str());
// add the boilerplace header
f_service_ <<
autogen_comment();
// include the headers
f_service_ <<
"#include <string.h>" << endl <<
"#include <thrift.h>" << endl <<
"#include <thrift_application_exception.h>" << endl <<
"#include \"" << filename << ".h\"" << endl <<
endl;
// generate the client objects
generate_service_client (tservice);
// generate the server objects
generate_service_server (tservice);
// end the header inclusion guard
f_header_ <<
"#endif /* " << svcname_uc << "_H */" << endl;
// close the files
f_service_.close();
f_header_.close();
}
/**
*
*/
void t_c_glib_generator::generate_xception (t_struct *tstruct) {
string name = tstruct->get_name();
string name_u = initial_caps_to_underscores(name);
string name_lc = to_lower_case(name_u);
string name_uc = to_upper_case(name_u);
generate_object(tstruct);
f_types_ << "/* exception */" << endl <<
"typedef enum" << endl <<
"{" << endl <<
" " << this->nspace_uc << name_uc << "_ERROR_CODE," << endl <<
"} " << this->nspace << name << "Error;" << endl <<
endl <<
"GQuark " << this->nspace_lc << name_lc << "_error_quark (void);" << endl <<
"#define " << this->nspace_uc << name_uc << "_ERROR (" <<
this->nspace_lc << name_lc << "_error_quark())" << endl <<
endl <<
endl;
f_types_impl_ <<
"/* define the GError domain for exceptions */" << endl <<
"#define " << this->nspace_uc << name_uc << "_ERROR_DOMAIN \"" <<
this->nspace_lc << name_lc << "_error_quark\"" << endl <<
"GQuark" << endl <<
this->nspace_lc << name_lc << "_error_quark (void)" << endl <<
"{" << endl <<
" return g_quark_from_static_string (" << this->nspace_uc << name_uc <<
"_ERROR_DOMAIN);" << endl <<
"}" << endl <<
endl;
}
/********************
* HELPER FUNCTIONS *
********************/
/**
* Returns true if ttype is not a primitive.
*/
bool t_c_glib_generator::is_complex_type(t_type *ttype) {
ttype = get_true_type (ttype);
return ttype->is_container()
|| ttype->is_struct()
|| ttype->is_xception()
|| (ttype->is_base_type()
&& (((t_base_type *) ttype)->get_base()
== t_base_type::TYPE_STRING));
}
/**
* Maps a Thrift t_type to a C type.
*/
string t_c_glib_generator::type_name (t_type* ttype, bool in_typedef, bool is_const) {
(void) in_typedef;
if (ttype->is_base_type()) {
string bname = base_type_name ((t_base_type *) ttype);
if (is_const) {
return "const " + bname;
} else {
return bname;
}
}
if (ttype->is_container()) {
string cname;
t_container *tcontainer = (t_container *) ttype;
if (tcontainer->has_cpp_name()) {
cname = tcontainer->get_cpp_name();
} else if (ttype->is_map()) {
cname = "GHashTable *";
} else if (ttype->is_set()) {
// since a set requires unique elements, use a GHashTable, and
// populate the keys and values with the same data, using keys for
// the actual writes and reads.
// TODO: discuss whether or not to implement TSet, THashSet or GHashSet
cname = "GHashTable *";
} else if (ttype->is_list()) {
// TODO: investigate other implementations besides GPtrArray
cname = "GPtrArray *";
t_type *etype = ((t_list *) ttype)->get_elem_type();
if (etype->is_base_type()) {
t_base_type::t_base tbase = ((t_base_type *) etype)->get_base();
switch (tbase) {
case t_base_type::TYPE_VOID:
throw "compiler error: cannot determine array type";
case t_base_type::TYPE_BOOL:
case t_base_type::TYPE_BYTE:
case t_base_type::TYPE_I16:
case t_base_type::TYPE_I32:
case t_base_type::TYPE_I64:
case t_base_type::TYPE_DOUBLE:
cname = "GArray *";
break;
case t_base_type::TYPE_STRING:
break;
default:
throw "compiler error: no array info for type";
}
}
}
if (is_const) {
return "const " + cname;
} else {
return cname;
}
}
// check for a namespace
string pname = this->nspace + ttype->get_name();
if (is_complex_type (ttype)) {
pname += " *";
}
if (is_const) {
return "const " + pname;
} else {
return pname;
}
}
/**
* Maps a Thrift primitive to a C primitive.
*/
string t_c_glib_generator::base_type_name(t_base_type *type) {
t_base_type::t_base tbase = type->get_base();
switch (tbase) {
case t_base_type::TYPE_VOID:
return "void";
case t_base_type::TYPE_STRING:
if (type->is_binary()) {
return "GByteArray *";
} else {
return "gchar *";
}
case t_base_type::TYPE_BOOL:
return "gboolean";
case t_base_type::TYPE_BYTE:
return "gint8";
case t_base_type::TYPE_I16:
return "gint16";
case t_base_type::TYPE_I32:
return "gint32";
case t_base_type::TYPE_I64:
return "gint64";
case t_base_type::TYPE_DOUBLE:
return "gdouble";
default:
throw "compiler error: no C base type name for base type "
+ t_base_type::t_base_name (tbase);
}
}
/**
* Returns a member of the ThriftType C enumeration in thrift_protocol.h
* for a Thrift type.
*/
string t_c_glib_generator::type_to_enum (t_type *type) {
type = get_true_type (type);
if (type->is_base_type()) {
t_base_type::t_base tbase = ((t_base_type *) type)->get_base();
switch (tbase) {
case t_base_type::TYPE_VOID:
throw "NO T_VOID CONSTRUCT";
case t_base_type::TYPE_STRING:
return "T_STRING";
case t_base_type::TYPE_BOOL:
return "T_BOOL";
case t_base_type::TYPE_BYTE:
return "T_BYTE";
case t_base_type::TYPE_I16:
return "T_I16";
case t_base_type::TYPE_I32:
return "T_I32";
case t_base_type::TYPE_I64:
return "T_I64";
case t_base_type::TYPE_DOUBLE:
return "T_DOUBLE";
}
} else if (type->is_enum()) {
return "T_I32";
} else if (type->is_struct()) {
return "T_STRUCT";
} else if (type->is_xception()) {
return "T_STRUCT";
} else if (type->is_map()) {
return "T_MAP";
} else if (type->is_set()) {
return "T_SET";
} else if (type->is_list()) {
return "T_LIST";
}
throw "INVALID TYPE IN type_to_enum: " + type->get_name();
}
/**
* Returns C code that represents a Thrift constant.
*/
string t_c_glib_generator::constant_value(string name, t_type *type, t_const_value *value) {
ostringstream render;
if (type->is_base_type()) {
/* primitives */
t_base_type::t_base tbase = ((t_base_type *) type)->get_base();
switch (tbase) {
case t_base_type::TYPE_STRING:
render << "\"" + value->get_string() + "\"";
break;
case t_base_type::TYPE_BOOL:
render << ((value->get_integer() != 0) ? 1 : 0);
break;
case t_base_type::TYPE_BYTE:
case t_base_type::TYPE_I16:
case t_base_type::TYPE_I32:
case t_base_type::TYPE_I64:
render << value->get_integer();
break;
case t_base_type::TYPE_DOUBLE:
if (value->get_type() == t_const_value::CV_INTEGER) {
render << value->get_integer();
} else {
render << value->get_double();
}
break;
default:
throw "compiler error: no const of base type "
+ t_base_type::t_base_name (tbase);
}
} else if (type->is_enum()) {
render << "(" << type_name (type) << ")" << value->get_integer();
} else if (type->is_struct() || type->is_xception() || type->is_list()
|| type->is_set() || type->is_map()) {
render << "(" << this->nspace_lc <<
to_lower_case(name) << "_constant())";
} else {
render << "NULL /* not supported */";
}
return render.str();
}
/**
* Renders a function signature of the form 'type name(args)'
*
* @param tfunction Function definition
* @return String of rendered function definition
*/
string t_c_glib_generator::function_signature(t_function* tfunction) {
t_type* ttype = tfunction->get_returntype();
t_struct* arglist = tfunction->get_arglist();
t_struct* xlist = tfunction->get_xceptions();
string fname = initial_caps_to_underscores(tfunction->get_name());
bool has_return = !ttype->is_void();
bool has_args = arglist->get_members().size() == 0;
bool has_xceptions = xlist->get_members().size() == 0;
return
"gboolean " + this->nspace_lc + fname + " (" + this->nspace
+ service_name_ + "If * iface"
+ (has_return ? ", " + type_name(ttype) + "* _return" : "")
+ (has_args ? "" : (", " + argument_list (arglist)))
+ (has_xceptions ? "" : (", " + xception_list (xlist)))
+ ", GError ** error)";
}
/**
* Renders a field list
*
* @param tstruct The struct definition
* @return Comma sepearated list of all field names in that struct
*/
string t_c_glib_generator::argument_list (t_struct* tstruct) {
string result = "";
const vector<t_field*>& fields = tstruct->get_members();
vector<t_field*>::const_iterator f_iter;
bool first = true;
for (f_iter = fields.begin(); f_iter != fields.end(); ++f_iter) {
if (first) {
first = false;
} else {
result += ", ";
}
result += type_name((*f_iter)->get_type(), false, true) + " " +
(*f_iter)->get_name();
}
return result;
}
/**
* Renders mutable exception lists
*
* @param tstruct The struct definition
* @return Comma sepearated list of all field names in that struct
*/
string t_c_glib_generator::xception_list (t_struct* tstruct) {
string result = "";
const vector<t_field*>& fields = tstruct->get_members();
vector<t_field*>::const_iterator f_iter;
bool first = true;
for (f_iter = fields.begin(); f_iter != fields.end(); ++f_iter) {
if (first) {
first = false;
} else {
result += ", ";
}
result += type_name((*f_iter)->get_type(), false, false) + "* " +
(*f_iter)->get_name();
}
return result;
}
/**
* Declares a field, including any necessary initialization.
*/
string t_c_glib_generator::declare_field(t_field *tfield,
bool init,
bool pointer,
bool constant,
bool reference) {
string result = "";
if (constant) {
result += "const ";
}
result += type_name(tfield->get_type());
if (pointer) {
result += "*";
}
if (reference) {
result += "*";
}
result += " " + tfield->get_name();
if (init) {
t_type* type = get_true_type(tfield->get_type());
if (type->is_base_type()) {
t_base_type::t_base tbase = ((t_base_type *) type)->get_base();
switch (tbase) {
case t_base_type::TYPE_VOID:
break;
case t_base_type::TYPE_BOOL:
case t_base_type::TYPE_BYTE:
case t_base_type::TYPE_I16:
case t_base_type::TYPE_I32:
case t_base_type::TYPE_I64:
result += " = 0";
break;
case t_base_type::TYPE_DOUBLE:
result += " = (gdouble) 0";
break;
case t_base_type::TYPE_STRING:
result += " = NULL";
break;
default:
throw "compiler error: no C intializer for base type "
+ t_base_type::t_base_name (tbase);
}
} else if (type->is_enum()) {
result += " = (" + type_name (type) + ") 0";
}
}
if (!reference) {
result += ";";
}
return result;
}
/**
* Generates C code that initializes complex constants.
*/
void t_c_glib_generator::generate_const_initializer(string name, t_type *type, t_const_value *value) {
string name_u = initial_caps_to_underscores(name);
string name_lc = to_lower_case(name_u);
string type_u = initial_caps_to_underscores(type->get_name());
string type_uc = to_upper_case(type_u);
if (type->is_struct() || type->is_xception()) {
const vector<t_field *> &fields = ((t_struct *) type)->get_members();
vector<t_field *>::const_iterator f_iter;
const map<t_const_value *, t_const_value *> &val = value->get_map();
map<t_const_value *, t_const_value *>::const_iterator v_iter;
ostringstream initializers;
// initialize any constants that may be referenced by this initializer
for (v_iter = val.begin(); v_iter != val.end(); ++v_iter) {
t_type *field_type = NULL;
string field_name = "";
for (f_iter = fields.begin(); f_iter != fields.end(); ++f_iter) {
if ((*f_iter)->get_name() == v_iter->first->get_string()) {
field_type = (*f_iter)->get_type();
field_name = (*f_iter)->get_name();
}
}
if (field_type == NULL) {
throw "type error: " + type->get_name() + " has no field "
+ v_iter->first->get_string();
}
field_name = tmp (field_name);
generate_const_initializer (name + "_constant_" + field_name,
field_type, v_iter->second);
initializers <<
" constant->" << v_iter->first->get_string() << " = " <<
constant_value (name + "_constant_" + field_name,
field_type, v_iter->second) << ";" << endl <<
" constant->__isset_" << v_iter->first->get_string() <<
" = TRUE;" << endl;
}
// implement the initializer
f_types_impl_ <<
"static " << this->nspace << type->get_name() << " *" << endl <<
this->nspace_lc << name_lc << "_constant (void)" << endl <<
"{" << endl <<
" static " << this->nspace << type->get_name() <<
" *constant = NULL;" << endl <<
" if (constant == NULL)" << endl <<
" {" << endl <<
" constant = g_object_new (" << this->nspace_uc << "TYPE_" <<
type_uc << ", NULL);" << endl <<
initializers.str() << endl <<
" }" << endl <<
" return constant;" << endl <<
"}" << endl <<
endl;
} else if (type->is_list()) {
string list_type = "GPtrArray *";
string list_initializer = "g_ptr_array_new()";
string list_appender = "g_ptr_array_add";
bool list_variable = false;
t_type* etype = ((t_list*)type)->get_elem_type();
const vector<t_const_value*>& val = value->get_list();
vector<t_const_value*>::const_iterator v_iter;
ostringstream initializers;
if (etype->is_base_type()) {
t_base_type::t_base tbase = ((t_base_type *) etype)->get_base();
switch (tbase) {
case t_base_type::TYPE_VOID:
throw "compiler error: cannot determine array type";
case t_base_type::TYPE_BOOL:
case t_base_type::TYPE_BYTE:
case t_base_type::TYPE_I16:
case t_base_type::TYPE_I32:
case t_base_type::TYPE_I64:
case t_base_type::TYPE_DOUBLE:
list_type = "GArray *";
list_initializer = generate_new_array_from_type (etype);
list_appender = "g_array_append_val";
list_variable = true;
break;
case t_base_type::TYPE_STRING:
break;
default:
throw "compiler error: no array info for type";
}
}
for (v_iter = val.begin(); v_iter != val.end(); ++v_iter) {
string fname = tmp (name);
generate_const_initializer (fname, etype, (*v_iter));
if (list_variable) {
initializers <<
" " << type_name (etype) << " " << fname << " = " <<
constant_value (fname, (t_type *) etype, (*v_iter)) << ";" <<
endl <<
" " << list_appender << "(constant, " << fname << ");" << endl;
} else {
initializers <<
" " << list_appender << "(constant, " <<
constant_value (fname, (t_type *) etype, (*v_iter)) << ");" << endl;
}
}
f_types_impl_ <<
"static " << list_type << endl <<
this->nspace_lc << name_lc << "_constant (void)" << endl <<
"{" << endl <<
" static " << list_type << " constant = NULL;" << endl <<
" if (constant == NULL)" << endl <<
" {" << endl <<
" constant = " << list_initializer << ";" << endl <<
initializers.str() << endl <<
" }" << endl <<
" return constant;" << endl <<
"}" << endl <<
endl;
} else if (type->is_set()) {
t_type *etype = ((t_set *) type)->get_elem_type();
const vector<t_const_value *>& val = value->get_list();
vector<t_const_value*>::const_iterator v_iter;
ostringstream initializers;
for (v_iter = val.begin(); v_iter != val.end(); ++v_iter) {
string fname = tmp (name);
generate_const_initializer (fname, etype, (*v_iter));
initializers <<
" " << type_name (etype) << " " << fname << " = " <<
constant_value (fname, (t_type *) etype, (*v_iter)) << ";" << endl <<
" g_hash_table_insert (constant, &" << fname << ", &" << fname <<
");" << endl;
}
f_types_impl_ <<
"static GHashTable *" << endl <<
this->nspace_lc << name_lc << "_constant (void)" << endl <<
"{" << endl <<
" static GHashTable *constant = NULL;" << endl <<
" if (constant == NULL)" << endl <<
" {" << endl <<
" constant = g_hash_table_new (NULL, NULL);" << endl <<
initializers.str() << endl <<
" }" << endl <<
" return constant;" << endl <<
"}" << endl <<
endl;
} else if (type->is_map()) {
t_type *ktype = ((t_map *) type)->get_key_type();
t_type *vtype = ((t_map *) type)->get_val_type();
const vector<t_const_value *>& val = value->get_list();
vector<t_const_value*>::const_iterator v_iter;
ostringstream initializers;
for (v_iter = val.begin(); v_iter != val.end(); ++v_iter) {
string fname = tmp (name);
string kname = fname + "key";
string vname = fname + "val";
generate_const_initializer (kname, ktype, (*v_iter));
generate_const_initializer (vname, vtype, (*v_iter));
initializers <<
" " << type_name (ktype) << " " << kname << " = " <<
constant_value (kname, (t_type *) ktype, (*v_iter)) << ";" << endl <<
" " << type_name (vtype) << " " << vname << " = " <<
constant_value (vname, (t_type *) vtype, (*v_iter)) << ";" << endl <<
" g_hash_table_insert (constant, &" << fname << ", &" << fname <<
");" << endl;
}
f_types_impl_ <<
"static GHashTable *" << endl <<
this->nspace_lc << name_lc << "_constant (void)" << endl <<
"{" << endl <<
" static GHashTable *constant = NULL;" << endl <<
" if (constant == NULL)" << endl <<
" {" << endl <<
" constant = g_hash_table_new (NULL, NULL);" << endl <<
initializers.str() << endl <<
" }" << endl <<
" return constant;" << endl <<
"}" << endl <<
endl;
}
}
/**
* Generates C code that represents a Thrift service client.
*/
void t_c_glib_generator::generate_service_client(t_service *tservice) {
/* get some C friendly service names */
string service_name_lc = to_lower_case(initial_caps_to_underscores(service_name_));
string service_name_uc = to_upper_case(service_name_lc);
// Generate the client interface dummy object in the header.
f_header_ <<
"/* " << service_name_ << " service interface */" << endl <<
"typedef struct _" << this->nspace << service_name_ << "If " <<
this->nspace << service_name_ << "If; " <<
" /* dummy object */" << endl <<
endl;
// Generate the client interface object in the header.
f_header_ <<
"struct _" << this->nspace << service_name_ << "IfInterface" << endl <<
"{" << endl <<
" GTypeInterface parent;" << endl <<
endl;
/* write out the functions for this interface */
indent_up();
vector<t_function*> functions = tservice->get_functions();
vector<t_function*>::const_iterator f_iter;
for (f_iter = functions.begin(); f_iter != functions.end(); ++f_iter) {
/* make the function name C friendly */
string funname = initial_caps_to_underscores((*f_iter)->get_name());
t_type *ttype = (*f_iter)->get_returntype();
t_struct *arglist = (*f_iter)->get_arglist();
t_struct *xlist = (*f_iter)->get_xceptions();
bool has_return = !ttype->is_void();
bool has_args = arglist->get_members().size() == 0;
bool has_xceptions = xlist->get_members().size() == 0;
string params = "(" + this->nspace + service_name_ + "If *iface"
+ (has_return ? ", " + type_name (ttype) + "* _return" : "")
+ (has_args ? "" : (", " + argument_list (arglist)))
+ (has_xceptions ? "" : (", " + xception_list (xlist)))
+ ", GError **error)";
indent(f_header_) << "gboolean (*" << funname << ") " << params << ";" <<
endl;
}
indent_down();
f_header_ <<
"};" << endl <<
"typedef struct _" << this->nspace << service_name_ << "IfInterface " <<
this->nspace << service_name_ << "IfInterface;" << endl <<
endl;
// generate all the interface boilerplate
f_header_ <<
"GType " << this->nspace_lc << service_name_lc <<
"_if_get_type (void);" << endl <<
"#define " << this->nspace_uc << "TYPE_" << service_name_uc << "_IF " <<
"(" << this->nspace_lc << service_name_lc << "_if_get_type())" <<
endl <<
"#define " << this->nspace_uc << service_name_uc << "_IF(obj) " <<
"(G_TYPE_CHECK_INSTANCE_CAST ((obj), " <<
this->nspace_uc << "TYPE_" << service_name_uc << "_IF, " <<
this->nspace << service_name_ << "If))" << endl <<
"#define " << this->nspace_uc << "IS_" << service_name_uc << "_IF(obj) " <<
"(G_TYPE_CHECK_INSTANCE_TYPE ((obj, " <<
this->nspace_uc << "TYPE_" << service_name_uc << "_IF))" << endl <<
"#define " << this->nspace_uc << service_name_uc <<
"_IF_GET_INTERFACE(inst) (G_TYPE_INSTANCE_GET_INTERFACE ((inst), " <<
this->nspace_uc << "TYPE_" << service_name_uc << "_IF, " <<
this->nspace << service_name_ << "IfInterface))" << endl <<
endl;
// write out all the interface function prototypes
for (f_iter = functions.begin(); f_iter != functions.end(); ++f_iter) {
/* make the function name C friendly */
string funname = initial_caps_to_underscores((*f_iter)->get_name());
t_type *ttype = (*f_iter)->get_returntype();
t_struct *arglist = (*f_iter)->get_arglist();
t_struct *xlist = (*f_iter)->get_xceptions();
bool has_return = !ttype->is_void();
bool has_args = arglist->get_members().size() == 0;
bool has_xceptions = xlist->get_members().size() == 0;
string params = "(" + this->nspace + service_name_ + "If *iface"
+ (has_return ? ", " + type_name (ttype) + "* _return" : "")
+ (has_args ? "" : (", " + argument_list (arglist)))
+ (has_xceptions ? "" : (", " + xception_list (xlist)))
+ ", GError **error)";
f_header_ << "gboolean " << this->nspace_lc << service_name_lc <<
"_if_" << funname << " " << params << ";" << endl;
}
f_header_ << endl;
// Generate the client object instance definition in the header.
f_header_ <<
"/* " << service_name_ << " service client */" << endl <<
"struct _" << this->nspace << service_name_ << "Client" << endl <<
"{" << endl <<
" GObject parent;" << endl <<
endl <<
" ThriftProtocol *input_protocol;" << endl <<
" ThriftProtocol *output_protocol;" << endl <<
"};" << endl <<
"typedef struct _" << this->nspace << service_name_ << "Client " <<
this->nspace << service_name_ << "Client;" << endl <<
endl;
// Generate the class definition in the header.
f_header_ <<
"struct _" << this->nspace << service_name_ << "ClientClass" << endl <<
"{" << endl <<
" GObjectClass parent;" << endl <<
"};" << endl <<
"typedef struct _" << this->nspace << service_name_ << "ClientClass " <<
this->nspace << service_name_ << "ClientClass;" << endl <<
endl;
// Create all the GObject boilerplate
f_header_ <<
"GType " << this->nspace_lc << service_name_lc <<
"_client_get_type (void);" << endl <<
"#define " << this->nspace_uc << "TYPE_" << service_name_uc << "_CLIENT " <<
"(" << this->nspace_lc << service_name_lc << "_client_get_type())" <<
endl <<
"#define " << this->nspace_uc << service_name_uc << "_CLIENT(obj) " <<
"(G_TYPE_CHECK_INSTANCE_CAST ((obj), " <<
this->nspace_uc << "TYPE_" << service_name_uc << "_CLIENT, " <<
this->nspace << service_name_ << "Client))" << endl <<
"#define " << this->nspace_uc << service_name_uc << "_CLIENT_CLASS(c) " <<
"(G_TYPE_CHECK_CLASS_CAST ((c), " <<
this->nspace_uc << "TYPE_" << service_name_uc << "_CLIENT, " <<
this->nspace << service_name_ << "ClientClass))" << endl <<
"#define " << this->nspace_uc << service_name_uc << "_IS_CLIENT(obj) " <<
"(G_TYPE_CHECK_INSTANCE_TYPE ((obj), " <<
this->nspace_uc << "TYPE_" << service_name_uc << "_CLIENT))" << endl <<
"#define " << this->nspace_uc << service_name_uc <<
"_IS_CLIENT_CLASS(c) " << "(G_TYPE_CHECK_CLASS_TYPE ((c), " <<
this->nspace_uc << "TYPE_" << service_name_uc << "_CLIENT))" << endl <<
"#define " << this->nspace_uc << service_name_uc <<
"_CLIENT_GET_CLASS(obj) " << "(G_TYPE_INSTANCE_GET_CLASS ((obj), " <<
this->nspace_uc << "TYPE_" << service_name_uc << "_CLIENT, " <<
this->nspace << service_name_ << "ClientClass))" << endl <<
endl;
/* write out the function prototypes */
for (f_iter = functions.begin(); f_iter != functions.end(); ++f_iter) {
/* make the function name C friendly */
string funname = to_lower_case(initial_caps_to_underscores((*f_iter)->get_name()));
t_function service_function ((*f_iter)->get_returntype(),
service_name_lc + string ("_client_")
+ funname,
(*f_iter)->get_arglist(),
(*f_iter)->get_xceptions());
indent(f_header_) << function_signature (&service_function) << ";" << endl;
t_function send_function (g_type_void,
service_name_lc + string ("_client_send_")
+ funname,
(*f_iter)->get_arglist());
indent(f_header_) << function_signature (&send_function) << ";" << endl;
// implement recv if not a oneway service
if (!(*f_iter)->is_oneway()) {
t_struct noargs (program_);
t_function recv_function ((*f_iter)->get_returntype(),
service_name_lc + string ("_client_recv_")
+ funname,
&noargs,
(*f_iter)->get_xceptions());
indent(f_header_) << function_signature (&recv_function) << ";" << endl;
}
}
f_header_ << endl;
// end of header code
// Generate interface method implementations
for (f_iter = functions.begin(); f_iter != functions.end(); ++f_iter) {
/* make the function name C friendly */
string funname = initial_caps_to_underscores((*f_iter)->get_name());
t_type *ttype = (*f_iter)->get_returntype();
t_struct *arglist = (*f_iter)->get_arglist();
t_struct *xlist = (*f_iter)->get_xceptions();
bool has_return = !ttype->is_void();
bool has_args = arglist->get_members().size() == 0;
bool has_xceptions = xlist->get_members().size() == 0;
string params = "(" + this->nspace + service_name_ + "If *iface"
+ (has_return ? ", " + type_name (ttype) + "* _return" : "")
+ (has_args ? "" : (", " + argument_list (arglist)))
+ (has_xceptions ? "" : (", " + xception_list (xlist)))
+ ", GError **error)";
string params_without_type = string("iface, ")
+ (has_return ? "_return, " : "");
const vector<t_field *>& fields = arglist->get_members();
vector<t_field *>::const_iterator f_iter_field;
for (f_iter_field = fields.begin(); f_iter_field != fields.end(); ++f_iter_field) {
params_without_type += (*f_iter_field)->get_name();
params_without_type += ", ";
}
const vector<t_field *>& xceptions = xlist->get_members();
vector<t_field *>::const_iterator x_iter;
for (x_iter = xceptions.begin(); x_iter != xceptions.end(); ++x_iter) {
params_without_type += (*x_iter)->get_name();
params_without_type += ", ";
}
f_service_ <<
"gboolean" << endl <<
this->nspace_lc << service_name_lc << "_if_" << funname << " " <<
params << endl <<
"{" << endl <<
" return " << this->nspace_uc << service_name_uc <<
"_IF_GET_INTERFACE (iface)->" << funname << " (" <<
params_without_type << "error);" << endl <<
"}" << endl <<
endl;
}
// Generate interface boilerplate
f_service_ <<
"GType" << endl <<
this->nspace_lc << service_name_lc << "_if_get_type (void)" << endl <<
"{" << endl <<
" static GType type = 0;" << endl <<
" if (type == 0)" << endl <<
" {" << endl <<
" static const GTypeInfo type_info =" << endl <<
" {" << endl <<
" sizeof (" << this->nspace << service_name_ << "IfInterface)," <<
endl <<
" NULL, /* base_init */" << endl <<
" NULL /* base_finalize */" << endl <<
" };" << endl <<
" type = g_type_register_static (G_TYPE_INTERFACE," << endl <<
" \"" << this->nspace << service_name_ <<
"If\"," << endl <<
" &type_info, 0);" << endl <<
" }" << endl <<
" return type;" << endl <<
"}" << endl <<
endl;
// Generate client boilerplate
f_service_ <<
"static void " << endl <<
this->nspace_lc << service_name_lc <<
"_if_interface_init (" << this->nspace << service_name_ <<
"IfInterface *iface);" << endl <<
endl <<
"G_DEFINE_TYPE_WITH_CODE (" << this->nspace << service_name_ <<
"Client, " << this->nspace_lc << service_name_lc << "_client," << endl <<
" G_TYPE_OBJECT, " << endl <<
" G_IMPLEMENT_INTERFACE (" <<
this->nspace_uc << "TYPE_" << service_name_uc << "_IF," << endl <<
" " <<
this->nspace_lc << service_name_lc << "_if_interface_init));" << endl <<
endl;
// Generate client properties
f_service_ <<
"enum _" << this->nspace << service_name_ << "ClientProperties" << endl <<
"{" << endl <<
" PROP_0," << endl <<
" PROP_" << this->nspace_uc << service_name_uc <<
"_CLIENT_INPUT_PROTOCOL," <<
endl <<
" PROP_" << this->nspace_uc << service_name_uc <<
"_CLIENT_OUTPUT_PROTOCOL" <<
endl <<
"};" << endl <<
endl;
// generate property setter
f_service_ <<
"void" << endl <<
this->nspace_lc << service_name_lc << "_client_set_property (" <<
"GObject *object, guint property_id, const GValue *value, " <<
"GParamSpec *pspec)" << endl <<
"{" << endl <<
" " << this->nspace << service_name_ << "Client *client = " <<
this->nspace_uc << service_name_uc << "_CLIENT (object);" << endl <<
endl <<
" THRIFT_UNUSED_VAR (pspec);" << endl <<
endl <<
" switch (property_id)" << endl <<
" {" << endl <<
" case PROP_" << this->nspace_uc << service_name_uc <<
"_CLIENT_INPUT_PROTOCOL:" << endl <<
" client->input_protocol = g_value_get_object (value);" << endl <<
" break;" << endl <<
" case PROP_" << this->nspace_uc << service_name_uc <<
"_CLIENT_OUTPUT_PROTOCOL:" << endl <<
" client->output_protocol = g_value_get_object (value);" << endl <<
" break;" << endl <<
" }" << endl <<
"}" << endl <<
endl;
// generate property getter
f_service_ <<
"void" << endl <<
this->nspace_lc << service_name_lc << "_client_get_property (" <<
"GObject *object, guint property_id, GValue *value, " <<
"GParamSpec *pspec)" << endl <<
"{" << endl <<
" " << this->nspace << service_name_ << "Client *client = " <<
this->nspace_uc << service_name_uc << "_CLIENT (object);" << endl <<
endl <<
" THRIFT_UNUSED_VAR (pspec);" << endl <<
endl <<
" switch (property_id)" << endl <<
" {" << endl <<
" case PROP_" << this->nspace_uc << service_name_uc <<
"_CLIENT_INPUT_PROTOCOL:" << endl <<
" g_value_set_object (value, client->input_protocol);" << endl <<
" break;" << endl <<
" case PROP_" << this->nspace_uc << service_name_uc <<
"_CLIENT_OUTPUT_PROTOCOL:" << endl <<
" g_value_set_object (value, client->output_protocol);" << endl <<
" break;" << endl <<
" }" << endl <<
"}" << endl <<
endl;
// Generate client method implementations
for (f_iter = functions.begin(); f_iter != functions.end(); ++f_iter) {
string name = (*f_iter)->get_name();
string funname = initial_caps_to_underscores(name);
// Get the struct of function call params and exceptions
t_struct* arg_struct = (*f_iter)->get_arglist();
// Function for sending
t_function send_function (g_type_void,
service_name_lc + string ("_client_send_")
+ funname,
(*f_iter)->get_arglist());
// Open the send function
indent(f_service_) <<
function_signature (&send_function) << endl;
scope_up(f_service_);
// Serialize the request
f_service_ <<
indent() << "gint32 cseqid = 0;" << endl <<
indent() << "ThriftProtocol * protocol = " <<
this->nspace_uc << service_name_uc <<
"_CLIENT (iface)->output_protocol;" << endl <<
endl <<
indent() << "if (thrift_protocol_write_message_begin (protocol, \"" <<
name << "\", T_CALL, cseqid, error) < 0)" << endl <<
indent() << " return FALSE;" << endl <<
endl;
generate_struct_writer (f_service_, arg_struct, "", "", false);
f_service_ <<
indent() <<
"if (thrift_protocol_write_message_end (protocol, error) < 0)" <<
endl <<
indent() <<
" return FALSE;" << endl <<
indent() <<
"if (!thrift_transport_flush (protocol->transport, error))" << endl <<
indent() <<
" return FALSE;" << endl <<
indent() <<
"if (!thrift_transport_write_end (protocol->transport, error))" <<
endl <<
indent() <<
" return FALSE;" << endl <<
endl <<
indent() <<
"return TRUE;" << endl;
scope_down(f_service_);
f_service_ << endl;
// Generate recv function only if not an async function
if (!(*f_iter)->is_oneway()) {
t_struct noargs (program_);
t_function recv_function ((*f_iter)->get_returntype(),
service_name_lc
+ string ("_client_recv_") + funname, &noargs,
(*f_iter)->get_xceptions());
// Open function
indent(f_service_) <<
function_signature (&recv_function) << endl;
scope_up(f_service_);
f_service_ << endl <<
indent() << "gint32 rseqid;" << endl <<
indent() << "gchar * fname;" << endl <<
indent() << "ThriftMessageType mtype;" << endl <<
indent() << "ThriftProtocol * protocol = " <<
this->nspace_uc << service_name_uc <<
"_CLIENT (iface)->input_protocol;" << endl <<
endl <<
indent() << "if (thrift_protocol_read_message_begin " <<
"(protocol, &fname, &mtype, &rseqid, error) < 0)" <<
endl <<
indent() << "{" << endl <<
indent() << " if (fname) g_free (fname);" << endl <<
indent() << " return FALSE;" << endl <<
indent() << "}" << endl <<
endl <<
indent() << "if (mtype == T_EXCEPTION) {" << endl <<
indent() << " if (fname) g_free (fname);" << endl <<
indent() << " ThriftApplicationException *xception = g_object_new (THRIFT_TYPE_APPLICATION_EXCEPTION, NULL);" << endl <<
indent() << " thrift_struct_read (THRIFT_STRUCT (xception), protocol, NULL);" << endl <<
indent() << " thrift_protocol_read_message_end (protocol, NULL);" << endl <<
indent() << " thrift_transport_read_end (protocol->transport, NULL);" << endl <<
indent() << " g_set_error (error, THRIFT_APPLICATION_EXCEPTION_ERROR, xception->type, \"application error: %s\", xception->message);" << endl <<
indent() << " g_object_unref (xception);" << endl <<
indent() << " return FALSE;" << endl <<
indent() << "} else if (mtype != T_REPLY) {" << endl <<
indent() << " if (fname) g_free (fname);" << endl <<
indent() << " thrift_protocol_skip (protocol, T_STRUCT, NULL);" << endl <<
indent() << " thrift_protocol_read_message_end (protocol, NULL);" << endl <<
indent() << " thrift_transport_read_end (protocol->transport, NULL);" << endl <<
indent() << " g_set_error (error, THRIFT_APPLICATION_EXCEPTION_ERROR, THRIFT_APPLICATION_EXCEPTION_ERROR_INVALID_MESSAGE_TYPE, \"invalid message type %d, expected T_REPLY\", mtype);" << endl <<
indent() << " return FALSE;" << endl <<
indent() << "} else if (strncmp (fname, \"" << name << "\", " << name.length() << ") != 0) {" << endl <<
indent() << " thrift_protocol_skip (protocol, T_STRUCT, NULL);" << endl <<
indent() << " thrift_protocol_read_message_end (protocol, error);" << endl <<
indent() << " thrift_transport_read_end (protocol->transport, error);" << endl <<
indent() << " g_set_error (error, THRIFT_APPLICATION_EXCEPTION_ERROR, THRIFT_APPLICATION_EXCEPTION_ERROR_WRONG_METHOD_NAME, \"wrong method name %s, expected " << name << "\", fname);" << endl <<
indent() << " if (fname) g_free (fname);" << endl <<
indent() << " return FALSE;" << endl <<
indent() << "}" << endl <<
indent() << "if (fname) g_free (fname);" << endl <<
endl;
t_struct* xs = (*f_iter)->get_xceptions();
const std::vector<t_field*>& xceptions = xs->get_members();
vector<t_field*>::const_iterator x_iter;
{
t_struct result(program_, tservice->get_name() + "_" +
(*f_iter)->get_name() + "_result");
t_field success((*f_iter)->get_returntype(), "*_return", 0);
if (!(*f_iter)->get_returntype()->is_void()) {
result.append(&success);
}
// add readers for exceptions, dereferencing the pointer.
for (x_iter = xceptions.begin(); x_iter != xceptions.end(); x_iter++) {
t_field *xception = new t_field((*x_iter)->get_type(),
"*" + (*x_iter)->get_name(),
(*x_iter)->get_key());
result.append (xception);
}
generate_struct_reader (f_service_, &result, "", "", false);
}
f_service_ <<
indent() << "if (thrift_protocol_read_message_end (protocol, error) < 0)" << endl <<
indent() << " return FALSE;" << endl <<
endl <<
indent() << "if (!thrift_transport_read_end (protocol->transport, error))" << endl <<
indent() << " return FALSE;" << endl <<
endl;
// copy over any throw exceptions and return failure
for (x_iter = xceptions.begin(); x_iter != xceptions.end(); x_iter++) {
f_service_ <<
indent() << "if (*" << (*x_iter)->get_name() << " != NULL)" << endl <<
indent() << "{" << endl <<
indent() << " g_set_error (error, " << this->nspace_uc <<
to_upper_case(initial_caps_to_underscores(
(*x_iter)->get_type()->get_name())) <<
"_ERROR, " <<
this->nspace_uc <<
to_upper_case(initial_caps_to_underscores(
(*x_iter)->get_type()->get_name())) <<
"_ERROR_CODE, \"" << (*x_iter)->get_type()->get_name() <<
"\");" << endl <<
indent() << " return FALSE;" << endl <<
indent() << "}" << endl;
}
// Close function
indent(f_service_) << "return TRUE;" << endl;
scope_down(f_service_);
f_service_ << endl;
}
// Open function
t_function service_function((*f_iter)->get_returntype(),
service_name_lc
+ string ("_client_") + funname,
(*f_iter)->get_arglist(),
(*f_iter)->get_xceptions());
indent(f_service_) <<
function_signature (&service_function) << endl;
scope_up(f_service_);
// wrap each function
f_service_ <<
indent() << "if (!" << this->nspace_lc << service_name_lc <<
"_client_send_" << funname <<
" (iface";
// Declare the function arguments
const vector<t_field *> &fields = arg_struct->get_members();
vector<t_field *>::const_iterator fld_iter;
for (fld_iter = fields.begin(); fld_iter != fields.end(); ++fld_iter) {
f_service_ << ", " << (*fld_iter)->get_name();
}
f_service_ << ", error))" << endl <<
indent() << " return FALSE;" << endl;
// if not oneway, implement recv
if (!(*f_iter)->is_oneway()) {
string ret = (*f_iter)->get_returntype()->is_void() ? "" : "_return, ";
const vector<t_field *>& xceptions =
(*f_iter)->get_xceptions()->get_members();
vector<t_field *>::const_iterator x_iter;
for (x_iter = xceptions.begin(); x_iter != xceptions.end(); ++x_iter) {
ret += (*x_iter)->get_name();
ret += ", ";
}
f_service_ <<
indent() << "if (!" << this->nspace_lc << service_name_lc <<
"_client_recv_" << funname <<
" (iface, " << ret << "error))" << endl <<
indent() << " return FALSE;" << endl;
}
// return TRUE which means all functions were called OK
indent(f_service_) << "return TRUE;" << endl;
scope_down(f_service_);
f_service_ << endl;
}
// create the interface initializer
f_service_ <<
"static void" << endl <<
this->nspace_lc << service_name_lc << "_if_interface_init (" <<
this->nspace << service_name_ << "IfInterface *iface)" << endl <<
"{" << endl;
for (f_iter = functions.begin(); f_iter != functions.end(); ++f_iter) {
/* make the function name C friendly */
string funname = initial_caps_to_underscores((*f_iter)->get_name());
f_service_ <<
" iface->" << funname << " = " << this->nspace_lc << service_name_lc <<
"_client_" << funname << ";" << endl;
}
f_service_ <<
"}" << endl <<
endl;
// create the client instance initializer
f_service_ <<
"static void" << endl <<
this->nspace_lc << service_name_lc << "_client_init (" <<
this->nspace << service_name_ << "Client *client)" << endl <<
"{" << endl <<
" client->input_protocol = NULL;" << endl <<
" client->output_protocol = NULL;" << endl <<
"}" << endl <<
endl;
// create the client class initializer
f_service_ <<
"static void" << endl <<
this->nspace_lc << service_name_lc << "_client_class_init (" <<
this->nspace << service_name_ << "ClientClass *cls)" << endl <<
"{" << endl <<
" GObjectClass *gobject_class = G_OBJECT_CLASS (cls);" << endl <<
" GParamSpec *param_spec;" << endl <<
endl <<
" gobject_class->set_property = " << this->nspace_lc <<
service_name_lc << "_client_set_property;" << endl <<
" gobject_class->get_property = " << this->nspace_lc <<
service_name_lc << "_client_get_property;" << endl <<
endl <<
" param_spec = g_param_spec_object (\"input_protocol\"," << endl <<
" \"input protocol (construct)\"," <<
endl <<
" \"Set the client input protocol\"," <<
endl <<
" THRIFT_TYPE_PROTOCOL," << endl <<
" G_PARAM_READWRITE);" << endl <<
" g_object_class_install_property (gobject_class," << endl <<
" PROP_" << this->nspace_uc <<
service_name_uc << "_CLIENT_INPUT_PROTOCOL, param_spec);" << endl <<
endl <<
" param_spec = g_param_spec_object (\"output_protocol\"," << endl <<
" \"output protocol (construct)\"," <<
endl <<
" \"Set the client output protocol\"," <<
endl <<
" THRIFT_TYPE_PROTOCOL," << endl <<
" G_PARAM_READWRITE);" << endl <<
" g_object_class_install_property (gobject_class," << endl <<
" PROP_" << this->nspace_uc <<
service_name_uc << "_CLIENT_OUTPUT_PROTOCOL, param_spec);" << endl <<
"}" << endl <<
endl;
}
/**
* Generates C code that represents a Thrift service server.
*/
void t_c_glib_generator::generate_service_server (t_service *tservice) {
(void) tservice;
/* get some C friendly service names */
string service_name_u = initial_caps_to_underscores(service_name_);
string service_name_uc = to_upper_case(service_name_u);
// write the server object instance definition in the header.
// TODO: implement after implement TServer and TProcessor
}
/**
* Generates C code to represent a THrift structure as a GObject.
*/
void t_c_glib_generator::generate_object(t_struct *tstruct) {
string name = tstruct->get_name();
string name_u = initial_caps_to_underscores(name);
string name_uc = to_upper_case(name_u);
// write the instance definition
f_types_ <<
"struct _" << this->nspace << name << endl <<
"{ " << endl <<
" ThriftStruct parent; " << endl <<
endl <<
" /* public */" << endl;
// for each field, add a member variable
bool has_nonrequired_fields = false;
vector<t_field *>::const_iterator m_iter;
const vector<t_field *> &members = tstruct->get_members();
for (m_iter = members.begin(); m_iter != members.end(); ++m_iter) {
t_type *t = get_true_type ((*m_iter)->get_type());
f_types_ <<
" " << type_name (t) << " " << (*m_iter)->get_name() << ";" << endl;
if ((*m_iter)->get_req() != t_field::T_REQUIRED) {
has_nonrequired_fields = true;
f_types_ <<
" gboolean __isset_" << (*m_iter)->get_name() << ";" << endl;
}
}
// close the structure definition and create a typedef
f_types_ <<
"};" << endl <<
"typedef struct _" << this->nspace << name << " " <<
this->nspace << name << ";" << endl <<
endl;
// write the class definition
f_types_ <<
"struct _" << this->nspace << name << "Class" << endl <<
"{" << endl <<
" ThriftStructClass parent;" << endl <<
"};" << endl <<
"typedef struct _" << this->nspace << name << "Class " << this->nspace << name << "Class;" << endl <<
endl;
// write the standard GObject boilerplate
f_types_ <<
"GType " << this->nspace_lc << name_u << "_get_type (void);" << endl <<
"#define " << this->nspace_uc << "TYPE_" << name_uc << " (" << this->nspace_lc << name_u << "_get_type())" << endl <<
"#define " << this->nspace_uc << name_uc << "(obj) (G_TYPE_CHECK_INSTANCE_CAST ((obj), " << this->nspace_uc << "TYPE_" << name_uc << ", " << this->nspace << name << "))" << endl <<
"#define " << this->nspace_uc << name_uc << "_CLASS(c) (G_TYPE_CHECK_CLASS_CAST ((c), " << this->nspace_uc << "_TYPE_" << name_uc << ", " << this->nspace << name << "Class))" << endl <<
"#define " << this->nspace_uc << "IS_" << name_uc << "(obj) (G_TYPE_CHECK_INSTANCE_TYPE ((obj), " << this->nspace_uc << "TYPE_" << name_uc << "))" << endl <<
"#define " << this->nspace_uc << "IS_" << name_uc << "_CLASS(c) (G_TYPE_CHECK_CLASS_TYPE ((c), " << this->nspace_uc << "TYPE_" << name_uc << "))" << endl <<
"#define " << this->nspace_uc << name_uc << "_GET_CLASS(obj) (G_TYPE_INSTANCE_GET_CLASS ((obj), " << this->nspace_uc << "TYPE_" << name_uc << ", " << this->nspace << name << "Class))" << endl <<
endl;
// start writing the object implementation .c file
// generate struct I/O methods
string this_get = this->nspace + name + " * this_object = "
+ this->nspace_uc + name_uc + "(object);";
generate_struct_reader (f_types_impl_, tstruct, "this_object->", this_get);
generate_struct_writer (f_types_impl_, tstruct, "this_object->", this_get);
// generate the instance init function
f_types_impl_ <<
"void " << endl <<
this->nspace_lc << name_u << "_instance_init (" << this->nspace << name << " * object)" << endl <<
"{" << endl;
// satisfy compilers with -Wall turned on
indent_up();
indent(f_types_impl_) << "/* satisfy -Wall */" << endl <<
indent() << "THRIFT_UNUSED_VAR (object);" << endl;
for (m_iter = members.begin(); m_iter != members.end(); ++m_iter) {
t_type* t = get_true_type ((*m_iter)->get_type());
if (t->is_base_type()) {
// only have init's for base types
string dval = " = ";
if (t->is_enum()) {
dval += "(" + type_name (t) + ")";
}
t_const_value* cv = (*m_iter)->get_value();
if (cv != NULL) {
dval += constant_value ("", t, cv);
} else {
dval += t->is_string() ? "NULL" : "0";
}
indent(f_types_impl_) << "object->" << (*m_iter)->get_name() << dval << ";" << endl;
} else if (t->is_struct()) {
string name = (*m_iter)->get_name();
string type_name_uc = to_upper_case
(initial_caps_to_underscores((*m_iter)->get_type()->get_name()));
indent(f_types_impl_) << "object->" << name << " = g_object_new (" << this->nspace_uc << "TYPE_" << type_name_uc << ", NULL);" << endl;
} else if (t->is_xception()) {
string name = (*m_iter)->get_name();
indent(f_types_impl_) << "object->" << name << " = NULL;" << endl;
} else if (t->is_container()) {
string name = (*m_iter)->get_name();
if (t->is_map() || t->is_set()) {
indent(f_types_impl_) << "object->" << name << " = g_hash_table_new (NULL, NULL);" << endl;
} else if (t->is_list()) {
t_type *etype = ((t_list *) t)->get_elem_type();
string init_function = "g_ptr_array_new()";
if (etype->is_base_type()) {
t_base_type::t_base tbase = ((t_base_type *) etype)->get_base();
switch (tbase) {
case t_base_type::TYPE_VOID:
throw "compiler error: cannot determine array type";
case t_base_type::TYPE_BOOL:
case t_base_type::TYPE_BYTE:
case t_base_type::TYPE_I16:
case t_base_type::TYPE_I32:
case t_base_type::TYPE_I64:
case t_base_type::TYPE_DOUBLE:
init_function = generate_new_array_from_type (etype);
break;
case t_base_type::TYPE_STRING:
break;
default:
throw "compiler error: no array info for type";
}
}
indent(f_types_impl_) << "object->" << name << " = " <<
init_function << ";" << endl;
}
}
/* if not required, initialize the __isset variable */
if ((*m_iter)->get_req() != t_field::T_REQUIRED) {
indent(f_types_impl_) << "object->__isset_" << (*m_iter)->get_name() << " = FALSE;" << endl;
}
}
indent_down();
f_types_impl_ << "}" << endl <<
endl;
/* create the destructor */
f_types_impl_ <<
"void " << endl <<
this->nspace_lc << name_u << "_finalize (GObject *object)" << endl <<
"{" << endl;
indent_up();
f_types_impl_ <<
indent() <<
this->nspace << name << " *tobject = " << this->nspace_uc <<
name_uc << " (object);" << endl << endl;
f_types_impl_ <<
indent() << "/* satisfy -Wall in case we don't use tobject */" << endl <<
indent() << "THRIFT_UNUSED_VAR (tobject);" << endl;
for (m_iter = members.begin(); m_iter != members.end(); ++m_iter) {
t_type* t = get_true_type ((*m_iter)->get_type());
if (t->is_container()) {
string name = (*m_iter)->get_name();
if (t->is_map() || t->is_set()) {
f_types_impl_ <<
indent() << "g_hash_table_unref (tobject->" << name << ");" << endl;
} else if (t->is_list()) {
t_type *etype = ((t_list *) t)->get_elem_type();
string destructor_function = "g_ptr_array_free";
if (etype->is_base_type()) {
t_base_type::t_base tbase = ((t_base_type *) etype)->get_base();
switch (tbase) {
case t_base_type::TYPE_VOID:
throw "compiler error: cannot determine array type";
case t_base_type::TYPE_BOOL:
case t_base_type::TYPE_BYTE:
case t_base_type::TYPE_I16:
case t_base_type::TYPE_I32:
case t_base_type::TYPE_I64:
case t_base_type::TYPE_DOUBLE:
destructor_function = "g_array_free";
break;
case t_base_type::TYPE_STRING:
break;
default:
throw "compiler error: no array info for type";
}
}
f_types_impl_ <<
indent() << destructor_function << " (tobject->" << name <<
", FALSE);" << endl;
}
}
}
indent_down();
f_types_impl_ <<
"}" << endl <<
endl;
f_types_impl_ <<
"void " << endl <<
this->nspace_lc << name_u << "_class_init (ThriftStructClass * cls)" << endl <<
"{" << endl;
indent_up();
f_types_impl_ <<
indent() << "GObjectClass *gobject_class = G_OBJECT_CLASS (cls);" << endl <<
endl <<
indent() << "gobject_class->finalize = " << this->nspace_lc << name_u << "_finalize;" << endl <<
indent() << "cls->read = " << this->nspace_lc << name_u << "_read;" << endl <<
indent() << "cls->write = " << this->nspace_lc << name_u << "_write;" << endl;
indent_down();
f_types_impl_ <<
"}" << endl <<
endl;
f_types_impl_ <<
"GType" << endl <<
this->nspace_lc << name_u << "_get_type (void)" << endl <<
"{" << endl <<
" static GType type = 0;" << endl <<
endl <<
" if (type == 0) " << endl <<
" {" << endl <<
" static const GTypeInfo type_info = " << endl <<
" {" << endl <<
" sizeof (" << this->nspace << name << "Class)," << endl <<
" NULL, /* base_init */" << endl <<
" NULL, /* base_finalize */" << endl <<
" (GClassInitFunc) " << this->nspace_lc << name_u << "_class_init," << endl <<
" NULL, /* class_finalize */" << endl <<
" NULL, /* class_data */" << endl <<
" sizeof (" << this->nspace << name << ")," << endl <<
" 0, /* n_preallocs */" << endl <<
" (GInstanceInitFunc) " << this->nspace_lc << name_u << "_instance_init," << endl <<
" NULL, /* value_table */" << endl <<
" };" << endl <<
endl <<
" type = g_type_register_static (THRIFT_TYPE_STRUCT, " << endl <<
" \"" << this->nspace << name << "Type\"," << endl <<
" &type_info, 0);" << endl <<
" }" << endl <<
endl <<
" return type;" << endl <<
"}" << endl <<
endl;
}
/**
* Generates functions to write Thrift structures to a stream.
*/
void t_c_glib_generator::generate_struct_writer (ofstream &out,
t_struct *tstruct,
string this_name,
string this_get,
bool is_function) {
string name = tstruct->get_name();
string name_u = initial_caps_to_underscores(name);
string name_uc = to_upper_case(name_u);
const vector<t_field *> &fields = tstruct->get_members();
vector <t_field *>::const_iterator f_iter;
int error_ret = 0;
if (is_function) {
error_ret = -1;
indent(out) <<
"gint32" << endl <<
this->nspace_lc << name_u <<
"_write (ThriftStruct *object, ThriftProtocol *protocol, GError **error)" << endl;
}
indent(out) << "{" << endl;
indent_up();
out <<
indent() << "gint32 ret;" << endl <<
indent() << "gint32 xfer = 0;" << endl <<
endl;
indent(out) << this_get << endl;
// satisfy -Wall in the case of an empty struct
if (!this_get.empty()) {
indent(out) << "THRIFT_UNUSED_VAR (this_object);" << endl;
}
out <<
indent() << "if ((ret = thrift_protocol_write_struct_begin (protocol, \"" << name << "\", error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << "xfer += ret;" << endl;
for (f_iter = fields.begin(); f_iter != fields.end(); ++f_iter) {
if ((*f_iter)->get_req() == t_field::T_OPTIONAL) {
indent(out) << "if (this_object->__isset_" << (*f_iter)->get_name() << " == TRUE) {" << endl;
indent_up();
}
out <<
indent() << "if ((ret = thrift_protocol_write_field_begin (protocol, " <<
"\"" << (*f_iter)->get_name() << "\", " <<
type_to_enum ((*f_iter)->get_type()) << ", " <<
(*f_iter)->get_key() << ", error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << "xfer += ret;" << endl;
generate_serialize_field (out, *f_iter, this_name, "", error_ret);
out <<
indent() << "if ((ret = thrift_protocol_write_field_end (protocol, error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << "xfer += ret;" << endl;
if ((*f_iter)->get_req() == t_field::T_OPTIONAL) {
indent_down();
indent(out) << "}" << endl;
}
}
// write the struct map
out <<
indent() << "if ((ret = thrift_protocol_write_field_stop (protocol, error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << "xfer += ret;" << endl <<
indent() << "if ((ret = thrift_protocol_write_struct_end (protocol, error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << "xfer += ret;" << endl <<
endl;
if (is_function) {
indent(out) << "return xfer;" << endl;
}
indent_down();
indent(out) <<
"}" << endl <<
endl;
}
/**
* Generates code to read Thrift structures from a stream.
*/
void t_c_glib_generator::generate_struct_reader(ofstream &out,
t_struct *tstruct,
string this_name,
string this_get,
bool is_function) {
string name = tstruct->get_name();
string name_u = initial_caps_to_underscores(name);
string name_uc = to_upper_case(name_u);
int error_ret = 0;
const vector<t_field *> &fields = tstruct->get_members();
vector <t_field *>::const_iterator f_iter;
if (is_function) {
error_ret = -1;
indent(out) <<
"/* reads a " << name_u << " object */" << endl <<
"gint32" << endl <<
this->nspace_lc << name_u <<
"_read (ThriftStruct *object, ThriftProtocol *protocol, GError **error)" << endl;
}
indent(out) << "{" << endl;
indent_up();
// declare stack temp variables
out <<
indent() << "gint32 ret;" << endl <<
indent() << "gint32 xfer = 0;" << endl <<
indent() << "gchar *name;" << endl <<
indent() << "ThriftType ftype;" << endl <<
indent() << "gint16 fid;" << endl <<
indent() << "guint32 len = 0;" << endl <<
indent() << "gpointer data = NULL;" << endl <<
indent() << this_get << endl;
for (f_iter = fields.begin(); f_iter != fields.end(); ++f_iter) {
if ((*f_iter)->get_req() == t_field::T_REQUIRED) {
indent(out) << "gboolean isset_" << (*f_iter)->get_name() << " = FALSE;" << endl;
}
}
out << endl;
// satisfy -Wall in case we don't use some variables
out <<
indent() << "/* satisfy -Wall in case these aren't used */" << endl <<
indent() << "THRIFT_UNUSED_VAR (len);" << endl <<
indent() << "THRIFT_UNUSED_VAR (data);" << endl;
if (!this_get.empty()) {
out << indent() << "THRIFT_UNUSED_VAR (this_object);" << endl;
}
out << endl;
// read the beginning of the structure marker
out <<
indent() << "/* read the struct begin marker */" << endl <<
indent() << "if ((ret = thrift_protocol_read_struct_begin (protocol, &name, error)) < 0)" << endl <<
indent() << "{" << endl <<
indent() << " if (name) g_free (name);" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << "}" << endl <<
indent() << "xfer += ret;" << endl <<
indent() << "if (name) g_free (name);" << endl <<
endl;
// read the struct fields
out <<
indent() << "/* read the struct fields */" << endl <<
indent() << "while (1)" << endl;
scope_up(out);
// read beginning field marker
out <<
indent() << "/* read the beginning of a field */" << endl <<
indent() << "if ((ret = thrift_protocol_read_field_begin (protocol, &name, &ftype, &fid, error)) < 0)" << endl <<
indent() << "{" << endl <<
indent() << " if (name) g_free (name);" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << "}" << endl <<
indent() << "xfer += ret;" << endl <<
indent() << "if (name) g_free (name);" << endl <<
endl;
// check for field STOP marker
out <<
indent() << "/* break if we get a STOP field */" << endl <<
indent() << "if (ftype == T_STOP)" << endl <<
indent() << "{" << endl <<
indent() << " break;" << endl <<
indent() << "}" << endl <<
endl;
// switch depending on the field type
indent(out) <<
"switch (fid)" << endl;
// start switch
scope_up(out);
// generate deserialization code for known types
for (f_iter = fields.begin(); f_iter != fields.end(); ++f_iter) {
indent(out) <<
"case " << (*f_iter)->get_key() << ":" << endl;
indent_up();
indent(out) <<
"if (ftype == " << type_to_enum ((*f_iter)->get_type()) << ")" << endl;
indent(out) <<
"{" << endl;
indent_up();
// generate deserialize field
generate_deserialize_field (out, *f_iter, this_name, "", error_ret);
indent_down();
out <<
indent() << "} else {" << endl <<
indent() << " if ((ret = thrift_protocol_skip (protocol, ftype, error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << " xfer += ret;" << endl <<
indent() << "}" << endl <<
indent() << "break;" << endl;
indent_down();
}
// create the default case
out <<
indent() << "default:" << endl <<
indent() << " if ((ret = thrift_protocol_skip (protocol, ftype, error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << " xfer += ret;" << endl <<
indent() << " break;" << endl;
// end switch
scope_down(out);
// read field end marker
out <<
indent() << "if ((ret = thrift_protocol_read_field_end (protocol, error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << "xfer += ret;" << endl;
// end while loop
scope_down(out);
out << endl;
// read the end of the structure
out <<
indent() << "if ((ret = thrift_protocol_read_struct_end (protocol, error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << "xfer += ret;" << endl <<
endl;
// if a required field is missing, throw an error
for (f_iter = fields.begin(); f_iter != fields.end(); ++f_iter) {
if ((*f_iter)->get_req() == t_field::T_REQUIRED) {
out <<
indent() << "if (!isset_" << (*f_iter)->get_name() << ")" << endl <<
indent() << "{" << endl <<
indent() << " g_set_error (error, THRIFT_PROTOCOL_ERROR," << endl <<
indent() << " THRIFT_PROTOCOL_ERROR_INVALID_DATA," << endl <<
indent() << " \"missing field\");" << endl <<
indent() << " return -1;" << endl <<
indent() << "}" << endl <<
endl;
}
}
if (is_function) {
indent(out) <<
"return xfer;" << endl;
}
// end the function/structure
indent_down();
indent(out) <<
"}" << endl <<
endl;
}
void t_c_glib_generator::generate_serialize_field(ofstream &out,
t_field *tfield,
string prefix,
string suffix,
int error_ret) {
t_type *type = get_true_type (tfield->get_type());
string name = prefix + tfield->get_name() + suffix;
if (type->is_void()) {
throw "CANNOT GENERATE SERIALIZE CODE FOR void TYPE: " + name;
}
if (type->is_struct() || type->is_xception()) {
generate_serialize_struct (out, (t_struct *) type, name, error_ret);
} else if (type->is_container()) {
generate_serialize_container (out, type, name, error_ret);
} else if (type->is_base_type() || type->is_enum()) {
indent(out) <<
"if ((ret = thrift_protocol_write_";
if (type->is_base_type()) {
t_base_type::t_base tbase = ((t_base_type *) type)->get_base();
switch (tbase) {
case t_base_type::TYPE_VOID:
throw "compiler error: cannot serialize void field in a struct: "
+ name;
break;
case t_base_type::TYPE_BOOL:
out << "bool (protocol, " << name;
break;
case t_base_type::TYPE_BYTE:
out << "byte (protocol, " << name;
break;
case t_base_type::TYPE_I16:
out << "i16 (protocol, " << name;
break;
case t_base_type::TYPE_I32:
out << "i32 (protocol, " << name;
break;
case t_base_type::TYPE_I64:
out << "i64 (protocol, " << name;
break;
case t_base_type::TYPE_DOUBLE:
out << "double (protocol, " << name;
break;
case t_base_type::TYPE_STRING:
if (((t_base_type *) type)->is_binary()) {
out << "binary (protocol, ((GByteArray *) " << name <<
")->data, ((GByteArray *) " << name <<
")->len";
} else {
out << "string (protocol, " << name;
}
break;
default:
throw "compiler error: no C writer for base type "
+ t_base_type::t_base_name (tbase) + name;
}
} else if (type->is_enum()) {
out << "i32 (protocol, (gint32) " << name;
}
out << ", error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl;
} else {
printf ("DO NOT KNOW HOW TO SERIALIZE FIELD '%s' TYPE '%s'\n",
name.c_str(), type_name (type).c_str());
}
}
void t_c_glib_generator::generate_serialize_struct(ofstream &out,
t_struct *tstruct,
string prefix,
int error_ret) {
(void) tstruct;
out <<
indent() << "if ((ret = thrift_struct_write (THRIFT_STRUCT (" << prefix << "), protocol, error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << "xfer += ret;" << endl <<
endl;
}
void t_c_glib_generator::generate_serialize_container(ofstream &out,
t_type *ttype,
string prefix,
int error_ret) {
scope_up(out);
if (ttype->is_map()) {
string length = "g_hash_table_size ((GHashTable *) " + prefix + ")";
t_type *tkey = ((t_map *) ttype)->get_key_type();
t_type *tval = ((t_map *) ttype)->get_val_type();
string tkey_name = type_name (tkey);
string tval_name = type_name (tval);
string tkey_ptr = tkey->is_string() || !tkey->is_base_type() ? "" : "*";
string tval_ptr = tval->is_string() || !tval->is_base_type() ? "" : "*";
/*
* Some ugliness here. To maximize backwards compatibility, we
* avoid using GHashTableIter and instead get a GList of all keys,
* then copy it into a array on the stack, and free it.
* This is because we may exit early before we get a chance to free the
* GList.
*/
out <<
indent() << "if ((ret = thrift_protocol_write_map_begin (protocol, " <<
type_to_enum (tkey) << ", " << type_to_enum (tval) <<
", (gint32) " << length << ", error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << "xfer += ret;" << endl <<
endl <<
indent() << "GList *key_list = NULL, *iter = NULL;" << endl <<
indent() << tkey_name << tkey_ptr << " key;" << endl <<
indent() << tval_name << tval_ptr << " value;" << endl <<
indent() << "g_hash_table_foreach ((GHashTable *) " << prefix <<
", thrift_hash_table_get_keys, &key_list);" << endl <<
indent() << tkey_name << tkey_ptr <<
" keys[g_list_length (key_list)];" << endl <<
indent() << "int i=0, key_count = g_list_length (key_list);" << endl <<
indent() <<
"for (iter = g_list_first (key_list); iter; iter = iter->next)" <<
endl <<
indent() << "{" << endl <<
indent() << " keys[i++] = (" << tkey_name << tkey_ptr <<
") iter->data;" << endl <<
indent() << "}" << endl <<
indent() << "g_list_free (key_list);" << endl <<
endl <<
indent() << "for (i = 0; i < key_count; ++i)" << endl;
scope_up(out);
out <<
indent() << "key = keys[i];" << endl <<
indent() << "value = (" << tval_name << tval_ptr <<
") g_hash_table_lookup (((GHashTable *) " << prefix <<
"), (gpointer) key);" << endl <<
endl;
generate_serialize_map_element (out, (t_map *) ttype, tkey_ptr + " key",
tval_ptr + " value", error_ret);
scope_down(out);
out <<
indent() << "if ((ret = thrift_protocol_write_map_end (protocol, error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << "xfer += ret;" << endl;
} else if (ttype->is_set()) {
string length = "g_hash_table_size ((GHashTable *) " + prefix + ")";
t_type *telem = ((t_set *) ttype)->get_elem_type();
string telem_name = type_name (telem);
string telem_ptr = telem->is_string() || !telem->is_base_type() ? "" : "*";
out <<
indent() << "if ((ret = thrift_protocol_write_set_begin (protocol, " <<
type_to_enum (telem) << ", (gint32) " << length <<
", error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << "xfer += ret;" << endl <<
indent() << "GList *key_list = NULL, *iter = NULL;" << endl <<
indent() << telem_name << telem_ptr << " elem;" << endl <<
indent() << "gpointer value;" << endl <<
indent() << "g_hash_table_foreach ((GHashTable *) " << prefix <<
", thrift_hash_table_get_keys, &key_list);" << endl <<
indent() << telem_name << telem_ptr << "keys[g_list_length (key_list)];" << endl <<
indent() << "int i=0, key_count = g_list_length (key_list);" << endl <<
indent() << "for (iter = g_list_first (key_list); iter; iter = iter->next)" << endl <<
indent() << "{" << endl <<
indent() << " keys[i++] = (" << telem_name << telem_ptr << ") iter->data;" << endl <<
indent() << "}" << endl <<
indent() << "g_list_free (key_list);" << endl <<
endl <<
indent() << "for (i=0; i<key_count; ++i)" << endl;
scope_up(out);
out <<
indent() << "elem = keys[i];" << endl <<
indent() << "value = (gpointer) g_hash_table_lookup (((GHashTable *) " <<
prefix << "), (gpointer) elem);" << endl <<
endl;
generate_serialize_set_element (out, (t_set *) ttype, telem_ptr + "elem",
error_ret);
scope_down(out);
out <<
indent() << "if ((ret = thrift_protocol_write_set_end (protocol, error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << "xfer += ret;" << endl;
} else if (ttype->is_list()) {
string length = prefix + "->len";
out <<
indent() << "if ((ret = thrift_protocol_write_list_begin (protocol, " <<
type_to_enum (((t_list *) ttype)->get_elem_type()) <<
", (gint32) " << length << ", error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << "xfer += ret;" << endl <<
indent() << "guint i;" << endl <<
indent() << "for (i=0; i<" << length << "; i++)" << endl;
scope_up(out);
generate_serialize_list_element (out, (t_list *) ttype, prefix, "i", error_ret);
scope_down(out);
out <<
indent() << "if ((ret = thrift_protocol_write_list_end (protocol, error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << "xfer += ret;" << endl;
}
scope_down(out);
}
void t_c_glib_generator::generate_serialize_map_element(ofstream &out,
t_map *tmap,
string key,
string value,
int error_ret) {
t_field kfield (tmap->get_key_type(), key);
generate_serialize_field (out, &kfield, "", "", error_ret);
t_field vfield (tmap->get_val_type(), value);
generate_serialize_field (out, &vfield, "", "", error_ret);
}
void t_c_glib_generator::generate_serialize_set_element(ofstream &out,
t_set *tset,
string element,
int error_ret) {
t_field efield (tset->get_elem_type(), element);
generate_serialize_field (out, &efield, "", "", error_ret);
}
void t_c_glib_generator::generate_serialize_list_element(ofstream &out,
t_list *tlist,
string list,
string index,
int error_ret) {
t_type *ttype = tlist->get_elem_type();
// cast to non-const
string name = "g_ptr_array_index ((GPtrArray *) " + list + ", "
+ index + ")";
if (ttype->is_base_type()) {
t_base_type::t_base tbase = ((t_base_type *) ttype)->get_base();
switch (tbase) {
case t_base_type::TYPE_VOID:
throw "compiler error: cannot determine array type";
break;
case t_base_type::TYPE_BOOL:
name = "g_array_index (" + list + ", gboolean, " + index + ")";
break;
case t_base_type::TYPE_BYTE:
name = "g_array_index (" + list + ", gint8, " + index + ")";
break;
case t_base_type::TYPE_I16:
name = "g_array_index (" + list + ", gint16, " + index + ")";
break;
case t_base_type::TYPE_I32:
name = "g_array_index (" + list + ", gint32, " + index + ")";
break;
case t_base_type::TYPE_I64:
name = "g_array_index (" + list + ", gint64, " + index + ")";
break;
case t_base_type::TYPE_DOUBLE:
name = "g_array_index (" + list + ", gdouble, " + index + ")";
break;
case t_base_type::TYPE_STRING:
break;
default:
throw "compiler error: no array info for type";
}
}
t_field efield (ttype, name);
generate_serialize_field (out, &efield, "", "", error_ret);
}
/* deserializes a field of any type. */
void t_c_glib_generator::generate_deserialize_field(ofstream &out,
t_field *tfield,
string prefix,
string suffix,
int error_ret) {
t_type *type = get_true_type (tfield->get_type());
if (type->is_void()) {
throw "CANNOT GENERATE DESERIALIZE CODE FOR void TYPE: " +
prefix + tfield->get_name();
}
string name = prefix + tfield->get_name() + suffix;
if (type->is_struct() || type->is_xception()) {
generate_deserialize_struct (out, (t_struct *) type, name, error_ret);
} else if (type->is_container()) {
generate_deserialize_container (out, type, name, error_ret);
} else if (type->is_base_type()) {
t_base_type::t_base tbase = ((t_base_type *) type)->get_base();
indent(out) << "if ((ret = thrift_protocol_read_";
switch (tbase) {
case t_base_type::TYPE_VOID:
throw "compiler error: cannot serialize void field in a struct: " + name;
break;
case t_base_type::TYPE_STRING:
if (((t_base_type *) type)->is_binary()) {
out << "binary (protocol, &data, &len";
} else {
out << "string (protocol, &" << name;
}
break;
case t_base_type::TYPE_BOOL:
out << "bool (protocol, &" << name;
break;
case t_base_type::TYPE_BYTE:
out << "byte (protocol, &" << name;
break;
case t_base_type::TYPE_I16:
out << "i16 (protocol, &" << name;
break;
case t_base_type::TYPE_I32:
out << "i32 (protocol, &" << name;
break;
case t_base_type::TYPE_I64:
out << "i64 (protocol, &" << name;
break;
case t_base_type::TYPE_DOUBLE:
out << "double (protocol, &" << name;
break;
default:
throw "compiler error: no C reader for base type "
+ t_base_type::t_base_name (tbase) + name;
}
out << ", error)) < 0)" << endl;
out << indent() << " return " << error_ret << ";" << endl <<
indent() << "xfer += ret;" << endl;
// load the byte array with the data
if (tbase == t_base_type::TYPE_STRING
&& ((t_base_type *) type)->is_binary()) {
indent(out) << name << " = g_byte_array_new();" << endl;
indent(out) << "g_byte_array_append (" << name << ", (guint8 *) data, (guint) len);" << endl;
indent(out) << "g_free (data);" << endl;
}
} else if (type->is_enum()) {
string t = tmp ("ecast");
out <<
indent() << "gint32 " << t << ";" << endl <<
indent() << "if ((ret = thrift_protocol_read_i32 (protocol, &" << t << ", error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << "xfer += ret;" << endl <<
indent() << name << " = (" << type_name (type) << ")" << t << ";" << endl;
} else {
printf ("DO NOT KNOW HOW TO DESERIALIZE FIELD '%s' TYPE '%s'\n",
tfield->get_name().c_str(), type_name (type).c_str());
}
// if the type is not required and this is a thrift struct (no prefix),
// set the isset variable. if the type is required, then set the
// local variable indicating the value was set, so that we can do // validation later.
if (tfield->get_req() != t_field::T_REQUIRED && prefix != "") {
indent(out) << prefix << "__isset_" << tfield->get_name() << suffix << " = TRUE;" << endl;
} else if (tfield->get_req() == t_field::T_REQUIRED && prefix != "") {
indent(out) << "isset_" << tfield->get_name() << " = TRUE;" << endl;
}
}
void t_c_glib_generator::generate_deserialize_struct(ofstream &out,
t_struct *tstruct,
string prefix,
int error_ret) {
string name_uc = to_upper_case(initial_caps_to_underscores(tstruct->get_name()));
out <<
indent() << prefix << " = g_object_new (" << this->nspace_uc << "TYPE_" << name_uc << ", NULL);" << endl <<
indent() << "if ((ret = thrift_struct_read (THRIFT_STRUCT (" << prefix << "), protocol, error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << "xfer += ret;" << endl;
}
void t_c_glib_generator::generate_deserialize_container (ofstream &out, t_type *ttype,
string prefix, int error_ret) {
scope_up(out);
if (ttype->is_map()) {
out <<
indent() << "guint32 size;" << endl <<
indent() << "ThriftType key_type;" << endl <<
indent() << "ThriftType value_type;" << endl <<
endl <<
indent() << "/* read the map begin marker */" << endl <<
indent() << "if ((ret = thrift_protocol_read_map_begin (protocol, &key_type, &value_type, &size, error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << "xfer += ret;" << endl <<
endl;
// iterate over map elements
out <<
indent() << "/* iterate through each of the map's fields */" << endl <<
indent() << "guint32 i;" << endl <<
indent() << "for (i = 0; i < size; i++)" << endl;
scope_up(out);
generate_deserialize_map_element (out, (t_map *) ttype, prefix, error_ret);
scope_down(out);
out << endl;
// read map end
out <<
indent() << "/* read the map end marker */" << endl <<
indent() << "if ((ret = thrift_protocol_read_map_end (protocol, error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << "xfer += ret;" << endl;
} else if (ttype->is_set()) {
out <<
indent() << "guint32 size;" << endl <<
indent() << "ThriftType element_type;" << endl <<
indent() << "if ((ret = thrift_protocol_read_set_begin (protocol, &element_type, &size, error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << "xfer += ret;" << endl <<
endl;
// iterate over the elements
out <<
indent() << "/* iterate through the set elements */" << endl <<
indent() << "guint32 i;" << endl <<
indent() << "for (i = 0; i < size; ++i)" << endl;
scope_up(out);
generate_deserialize_set_element (out, (t_set *) ttype, prefix, error_ret);
scope_down(out);
// read set end
out <<
indent() << "if ((ret = thrift_protocol_read_set_end (protocol, error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << "xfer += ret;" << endl <<
endl;
} else if (ttype->is_list()) {
out <<
indent() << "guint32 size;" << endl <<
indent() << "ThriftType element_type;" << endl <<
indent() << "if ((ret = thrift_protocol_read_list_begin (protocol, &element_type, &size, error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << "xfer += ret;" << endl <<
endl;
out <<
indent() << "/* iterate through list elements */" << endl <<
indent() << "guint32 i;" << endl <<
indent() << "for (i = 0; i < size; i++)" << endl;
scope_up(out);
generate_deserialize_list_element (out, (t_list *) ttype, prefix, "i",
error_ret);
scope_down(out);
out <<
indent() << "if ((ret = thrift_protocol_read_list_end (protocol, error)) < 0)" << endl <<
indent() << " return " << error_ret << ";" << endl <<
indent() << "xfer += ret;" << endl <<
endl;
}
scope_down(out);
}
void t_c_glib_generator::generate_deserialize_map_element(ofstream &out,
t_map *tmap,
string prefix,
int error_ret) {
t_type *tkey = tmap->get_key_type();
t_type *tval = tmap->get_val_type();
string tkey_name = type_name (tkey);
string tval_name = type_name (tval);
string tkey_ptr = tkey->is_string() || !tkey->is_base_type() ? "" : "*";
string tval_ptr = tval->is_string() || !tval->is_base_type() ? "" : "*";