# HG changeset patch
# User Sergey Mironov <grrwlf@gmail.com>
# Date 1379081355 14400
# Node ID 9fc086e3c95a10cb7d7e010fca85a4eca041d591
# Parent  5144e03ef603b1bf5d5b776df674b611c4f01d6f
Add hex SQL syntax for blobs, such as X'0ABC12343'. Works with sqlite.

diff -r 5144e03ef603 -r 9fc086e3c95a src/c/urweb.c
--- a/src/c/urweb.c	Mon Aug 19 12:38:43 2013 -0400
+++ b/src/c/urweb.c	Fri Sep 13 10:09:15 2013 -0400
@@ -2509,7 +2509,7 @@
 
 char *uw_sqlsuffixBlob = "::bytea";
 
-uw_Basis_string uw_Basis_sqlifyBlob(uw_context ctx, uw_Basis_blob b) {
+uw_Basis_string uw_Basis_sqlifyBlob_old(uw_context ctx, uw_Basis_blob b) {
   char *r, *s2;
   size_t i;
 
@@ -2556,6 +2556,29 @@
   return r;
 }
 
+int uw_Xstrings = 1;
+
+uw_Basis_string uw_Basis_sqlifyBlob(uw_context ctx, uw_Basis_blob b) {
+  char *r, *s2;
+  size_t i;
+
+  uw_check_heap(ctx, b.size * 2 + 3 + uw_Xstrings);
+
+  r = s2 = ctx->heap.front;
+  *s2++ = 'X';
+  *s2++ = '\'';
+
+  for (i = 0; i < b.size; ++i) {
+    char c = b.data[i];
+    sprintf(s2, "%02X", c);
+    s2 += 2;
+  }
+
+  *s2++ = '\'';
+  ctx->heap.front = s2 + 1;
+  return r;
+}
+
 char *uw_Basis_sqlifyChannel(uw_context ctx, uw_Basis_channel chn) {
   int len;
   char *r;