1 /*
2  * Copyright (C) 2006 - 2013 Vivien Malerba <malerba@gnome-db.org>
3  * Copyright (C) 2007 Armin Burgmeier <armin@openismus.com>
4  * Copyright (C) 2007 Murray Cumming <murrayc@murrayc.com>
5  * Copyright (C) 2009 Bas Driessen <bas.driessen@xobas.com>
6  * Copyright (C) 2010 David King <davidk@openismus.com>
7  * Copyright (C) 2010 Jonh Wendell <jwendell@gnome.org>
8  *
9  * This library is free software; you can redistribute it and/or
10  * modify it under the terms of the GNU Lesser General Public
11  * License as published by the Free Software Foundation; either
12  * version 2 of the License, or (at your option) any later version.
13  *
14  * This library is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
17  * Lesser General Public License for more details.
18  *
19  * You should have received a copy of the GNU Lesser General Public
20  * License along with this library; if not, write to the
21  * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
22  * Boston, MA  02110-1301, USA.
23  */
24 
25 #include "gda-handler-string.h"
26 #include <string.h>
27 #include <glib/gi18n-lib.h>
28 #include <libgda/gda-util.h>
29 #include <libgda/gda-server-provider.h>
30 
31 static void gda_handler_string_class_init (GdaHandlerStringClass * class);
32 static void gda_handler_string_init (GdaHandlerString * wid);
33 static void gda_handler_string_dispose (GObject   * object);
34 
35 
36 /* GdaDataHandler interface */
37 static void         gda_handler_string_data_handler_init      (GdaDataHandlerIface *iface);
38 static gchar       *gda_handler_string_get_sql_from_value     (GdaDataHandler *dh, const GValue *value);
39 static gchar       *gda_handler_string_get_str_from_value     (GdaDataHandler *dh, const GValue *value);
40 static GValue      *gda_handler_string_get_value_from_sql     (GdaDataHandler *dh, const gchar *sql,
41 							       GType type);
42 static GValue      *gda_handler_string_get_value_from_str     (GdaDataHandler *dh, const gchar *sql,
43 							       GType type);
44 static GValue      *gda_handler_string_get_sane_init_value    (GdaDataHandler * dh, GType type);
45 
46 static gboolean     gda_handler_string_accepts_g_type       (GdaDataHandler * dh, GType type);
47 
48 static const gchar *gda_handler_string_get_descr              (GdaDataHandler *dh);
49 
50 struct  _GdaHandlerStringPriv {
51 	GdaServerProvider *prov;
52 	GdaConnection     *cnc;
53 };
54 
55 /* get a pointer to the parents to be able to call their destructor */
56 static GObjectClass *parent_class = NULL;
57 
58 GType
gda_handler_string_get_type(void)59 gda_handler_string_get_type (void)
60 {
61 	static GType type = 0;
62 
63 	if (G_UNLIKELY (type == 0)) {
64 		static GMutex registering;
65 		static const GTypeInfo info = {
66 			sizeof (GdaHandlerStringClass),
67 			(GBaseInitFunc) NULL,
68 			(GBaseFinalizeFunc) NULL,
69 			(GClassInitFunc) gda_handler_string_class_init,
70 			NULL,
71 			NULL,
72 			sizeof (GdaHandlerString),
73 			0,
74 			(GInstanceInitFunc) gda_handler_string_init,
75 			NULL
76 		};
77 
78 		static const GInterfaceInfo data_entry_info = {
79 			(GInterfaceInitFunc) gda_handler_string_data_handler_init,
80 			NULL,
81 			NULL
82 		};
83 
84 		g_mutex_lock (&registering);
85 		if (type == 0) {
86 			type = g_type_register_static (G_TYPE_OBJECT, "GdaHandlerString", &info, 0);
87 			g_type_add_interface_static (type, GDA_TYPE_DATA_HANDLER, &data_entry_info);
88 		}
89 		g_mutex_unlock (&registering);
90 	}
91 	return type;
92 }
93 
94 static void
gda_handler_string_data_handler_init(GdaDataHandlerIface * iface)95 gda_handler_string_data_handler_init (GdaDataHandlerIface *iface)
96 {
97 	iface->get_sql_from_value = gda_handler_string_get_sql_from_value;
98 	iface->get_str_from_value = gda_handler_string_get_str_from_value;
99 	iface->get_value_from_sql = gda_handler_string_get_value_from_sql;
100 	iface->get_value_from_str = gda_handler_string_get_value_from_str;
101 	iface->get_sane_init_value = gda_handler_string_get_sane_init_value;
102 	iface->accepts_g_type = gda_handler_string_accepts_g_type;
103 	iface->get_descr = gda_handler_string_get_descr;
104 }
105 
106 
107 static void
gda_handler_string_class_init(GdaHandlerStringClass * class)108 gda_handler_string_class_init (GdaHandlerStringClass * class)
109 {
110 	GObjectClass   *object_class = G_OBJECT_CLASS (class);
111 
112 	parent_class = g_type_class_peek_parent (class);
113 
114 	object_class->dispose = gda_handler_string_dispose;
115 }
116 
117 static void
gda_handler_string_init(GdaHandlerString * hdl)118 gda_handler_string_init (GdaHandlerString * hdl)
119 {
120 	/* Private structure */
121 	hdl->priv = g_new0 (GdaHandlerStringPriv, 1);
122 	g_object_set_data (G_OBJECT (hdl), "name", _("InternalString"));
123 	g_object_set_data (G_OBJECT (hdl), "descr", _("Strings representation"));
124 }
125 
126 static void
gda_handler_string_dispose(GObject * object)127 gda_handler_string_dispose (GObject   * object)
128 {
129 	GdaHandlerString *hdl;
130 
131 	g_return_if_fail (object != NULL);
132 	g_return_if_fail (GDA_IS_HANDLER_STRING (object));
133 
134 	hdl = GDA_HANDLER_STRING (object);
135 
136 	if (hdl->priv) {
137 		if (hdl->priv->prov)
138 			g_object_remove_weak_pointer (G_OBJECT (hdl->priv->prov), (gpointer) &(hdl->priv->prov));
139 		if (hdl->priv->cnc)
140 			g_object_remove_weak_pointer (G_OBJECT (hdl->priv->cnc), (gpointer) &(hdl->priv->cnc));
141 
142 		g_free (hdl->priv);
143 		hdl->priv = NULL;
144 	}
145 
146 	/* for the parent class */
147 	parent_class->dispose (object);
148 }
149 
150 /**
151  * gda_handler_string_new:
152  *
153  * Creates a data handler for strings
154  *
155  * Returns: (transfer full): the new object
156  */
157 GdaDataHandler *
gda_handler_string_new(void)158 gda_handler_string_new (void)
159 {
160 	GObject *obj;
161 
162 	obj = g_object_new (GDA_TYPE_HANDLER_STRING, NULL);
163 
164 	return (GdaDataHandler *) obj;
165 }
166 
167 /**
168  * gda_handler_string_new_with_provider:
169  * @prov: a #GdaServerProvider object
170  * @cnc: (allow-none): a #GdaConnection object, or %NULL
171  *
172  * Creates a data handler for strings, which will use some specific methods implemented
173  * by the @prov object (possibly also @cnc).
174  *
175  * Returns: (transfer full): the new object
176  */
177 GdaDataHandler *
gda_handler_string_new_with_provider(GdaServerProvider * prov,GdaConnection * cnc)178 gda_handler_string_new_with_provider (GdaServerProvider *prov, GdaConnection *cnc)
179 {
180 	GObject *obj;
181 	GdaHandlerString *dh;
182 
183 	g_return_val_if_fail (GDA_IS_SERVER_PROVIDER (prov), NULL);
184 	g_return_val_if_fail (!cnc || GDA_IS_CONNECTION (cnc), NULL);
185 
186 	obj = g_object_new (GDA_TYPE_HANDLER_STRING, NULL);
187 	dh = (GdaHandlerString*) obj;
188 
189 	dh->priv->prov = prov;
190 	if (cnc)
191 		dh->priv->cnc = cnc;
192 
193 	g_object_add_weak_pointer (G_OBJECT (prov), (gpointer) &(dh->priv->prov));
194 	if (cnc)
195 		g_object_add_weak_pointer (G_OBJECT (cnc), (gpointer) &(dh->priv->cnc));
196 
197 	return (GdaDataHandler *) obj;
198 }
199 
200 static gchar *
gda_handler_string_get_sql_from_value(GdaDataHandler * iface,const GValue * value)201 gda_handler_string_get_sql_from_value (GdaDataHandler *iface, const GValue *value)
202 {
203 	g_assert (value);
204 
205 	gchar *str, *retval;
206 	GdaHandlerString *hdl;
207 
208 	g_return_val_if_fail (GDA_IS_HANDLER_STRING (iface), NULL);
209 	hdl = (GdaHandlerString*) (iface);
210 
211 	str = gda_value_stringify ((GValue *) value);
212 	if (str) {
213 		gchar *str2;
214 		if (hdl->priv->prov)
215 			str2 = gda_server_provider_escape_string (hdl->priv->prov, hdl->priv->cnc, str);
216 		else
217 			str2 = gda_default_escape_string (str);
218 		retval = g_strdup_printf ("'%s'", str2);
219 		g_free (str2);
220 		g_free (str);
221 	}
222 	else
223 		retval = g_strdup ("NULL");
224 
225 	return retval;
226 }
227 
228 static gchar *
gda_handler_string_get_str_from_value(G_GNUC_UNUSED GdaDataHandler * iface,const GValue * value)229 gda_handler_string_get_str_from_value (G_GNUC_UNUSED GdaDataHandler *iface, const GValue *value)
230 {
231 	g_assert (value);
232 	return gda_value_stringify ((GValue *) value);
233 }
234 
235 static GValue *
gda_handler_string_get_value_from_sql(GdaDataHandler * iface,const gchar * sql,G_GNUC_UNUSED GType type)236 gda_handler_string_get_value_from_sql (GdaDataHandler *iface, const gchar *sql, G_GNUC_UNUSED GType type)
237 {
238 	g_assert (sql);
239 
240 	GdaHandlerString *hdl;
241 	GValue *value = NULL;
242 
243 	g_return_val_if_fail (GDA_IS_HANDLER_STRING (iface), NULL);
244 	hdl = (GdaHandlerString*) (iface);
245 
246 	if (*sql) {
247 		gint i = strlen (sql);
248 		if ((i>=2) && (*sql=='\'') && (sql[i-1]=='\'')) {
249 			gchar *str = g_strdup (sql);
250 			gchar *unstr;
251 
252 			str[i-1] = 0;
253 			if (hdl->priv->prov)
254 				unstr = gda_server_provider_unescape_string (hdl->priv->prov, hdl->priv->cnc, str+1);
255 			else
256 				unstr = gda_default_unescape_string (str+1);
257 			if (unstr) {
258 				value = g_value_init (g_new0 (GValue, 1), G_TYPE_STRING);
259 				g_value_take_string (value, unstr);
260 			}
261 			g_free (str);
262 		}
263 	}
264 	else
265 		value = gda_value_new_null ();
266 
267 	return value;
268 }
269 
270 static GValue *
gda_handler_string_get_value_from_str(G_GNUC_UNUSED GdaDataHandler * iface,const gchar * str,G_GNUC_UNUSED GType type)271 gda_handler_string_get_value_from_str (G_GNUC_UNUSED GdaDataHandler *iface, const gchar *str, G_GNUC_UNUSED GType type)
272 {
273 	g_assert (str);
274 
275 	GValue *value;
276 	value = g_value_init (g_new0 (GValue, 1), G_TYPE_STRING);
277 	g_value_set_string (value, str);
278 	return value;
279 }
280 
281 static GValue *
gda_handler_string_get_sane_init_value(G_GNUC_UNUSED GdaDataHandler * iface,G_GNUC_UNUSED GType type)282 gda_handler_string_get_sane_init_value (G_GNUC_UNUSED GdaDataHandler *iface, G_GNUC_UNUSED GType type)
283 {
284 	GValue *value;
285 
286 	value = g_value_init (g_new0 (GValue, 1), G_TYPE_STRING);
287 	g_value_set_string (value, "");
288 	return value;
289 }
290 
291 static gboolean
gda_handler_string_accepts_g_type(GdaDataHandler * iface,GType type)292 gda_handler_string_accepts_g_type (GdaDataHandler *iface, GType type)
293 {
294 	g_assert (iface);
295 	return type == G_TYPE_STRING ? TRUE : FALSE;
296 }
297 
298 static const gchar *
gda_handler_string_get_descr(GdaDataHandler * iface)299 gda_handler_string_get_descr (GdaDataHandler *iface)
300 {
301 	g_return_val_if_fail (GDA_IS_HANDLER_STRING (iface), NULL);
302 	return g_object_get_data (G_OBJECT (iface), "descr");
303 }
304