Add missing files from Karel, tip from Jan.

diff --git a/src/backend/utils/adt/ascii.c b/src/backend/utils/adt/ascii.c
new file mode 100644 (file)
index 0000000..785099f
--- /dev/null
+++ b/src/backend/utils/adt/ascii.c
@@ -0,0 +1,159 @@
+
+/* -----------------------------------------------------------------------
+ * ascii.c
+ *
+ * $Header: /cvsroot/pgsql/src/backend/utils/adt/ascii.c,v 1.1 2000/08/04 20:22:51 momjian Exp $
+ *
+ *  Portions Copyright (c) 1999-2000, PostgreSQL, Inc
+ *
+ *
+ *  TO_ASCII()
+ *
+ *  The PostgreSQL routine for string to ascii conversion.
+ *
+ * -----------------------------------------------------------------------
+ */
+
+#include "postgres.h"
+#include "utils/builtins.h"
+#include "mb/pg_wchar.h"
+#include "utils/ascii.h"
+
+static text *encode_to_ascii(text *data, int enc);
+
+/* ----------
+ * to_ascii 
+ * ----------
+ */
+char *
+pg_to_ascii(unsigned char *src, unsigned char *src_end, unsigned char *desc, int enc)
+{
+   unsigned char   *x  = NULL;
+   unsigned char   *ascii  = NULL ;
+   int     range   = 0;
+   
+   /* 
+    * relevant start for an encoding 
+    */ 
+   #define RANGE_128   128 
+   #define RANGE_160   160
+   
+   
+   if (enc == LATIN1)
+   {
+       /* ----------
+        * ISO-8859-1 
+        * ----------
+        */
+       ascii = "  cL Y  \"Ca  -R     'u .,      ?AAAAAAACEEEEIIII NOOOOOxOUUUUYTBaaaaaaaceeeeiiii nooooo/ouuuuyty";
+       range = RANGE_160;
+   }
+   else if (enc == LATIN2)
+   {
+       /* ----------
+        * ISO-8859-2 
+        * ----------
+        */
+       ascii = " A L LS \"SSTZ-ZZ a,l'ls ,sstz\"zzRAAAALCCCEEEEIIDDNNOOOOxRUUUUYTBraaaalccceeeeiiddnnoooo/ruuuuyt.";
+       range = RANGE_160;
+   }
+   else if (enc == WIN1250)
+   {
+       /* ----------
+        * Window CP1250 
+        * ----------
+        */
+       ascii = "  ' \"    %Sstzz   L A  \"CS  -RZ  ,l'u .,as L\"lzRAAAALCCCEEEEIIDDNNOOOOxRUUUUYTBraaaalccceeeeiiddnnoooo/ruuuuyt ";
+       range = RANGE_128;
+   }
+   else
+   {
+       elog(ERROR, "pg_to_ascii(): unsupported encoding from %s", 
+                       pg_encoding_to_char(enc));
+   }
+   
+   /* ----------
+    * Encode
+    * ----------
+    */
+   for (x = src; x <= src_end; x++)
+   {
+       if (*x < 128)           
+           *desc++ = *x;
+       else if (*x < range)
+           *desc++ = ' ';      /* bogus 128 to 'range' */
+       else
+           *desc++ = ascii[*x - range];    
+   }       
+   
+   return desc;
+}
+
+/* ----------
+ * encode text
+ * ----------
+ */
+static text *
+encode_to_ascii(text *data, int enc)
+{
+   pg_to_ascii(
+       (unsigned char *) VARDATA(data),        /* src */
+       VARDATA(data) + VARSIZE(data),          /* src end */
+       (unsigned char *) VARDATA(data),        /* desc */  
+       enc);                       /* encoding */
+   
+   return data;
+}
+
+/* ----------
+ * convert to ASCII - enc is set as 'name' arg.
+ * ----------
+ */
+Datum
+to_ascii_encname(PG_FUNCTION_ARGS)
+{
+   PG_RETURN_TEXT_P
+   ( 
+       encode_to_ascii
+       ( 
+           PG_GETARG_TEXT_P_COPY(0), 
+           pg_char_to_encoding( NameStr(*PG_GETARG_NAME(1)) ) 
+       )
+   );  
+}
+
+/* ----------
+ * convert to ASCII - enc is set as int4
+ * ----------
+ */
+Datum 
+to_ascii_enc(PG_FUNCTION_ARGS)
+{
+   PG_RETURN_TEXT_P
+   ( 
+       encode_to_ascii
+       ( 
+           PG_GETARG_TEXT_P_COPY(0), 
+           PG_GETARG_INT32(1) 
+       )
+   );  
+}
+
+/* ----------
+ * convert to ASCII - current enc is DatabaseEncoding
+ * ----------
+ */
+Datum
+to_ascii_default(PG_FUNCTION_ARGS)
+{
+   PG_RETURN_TEXT_P 
+   ( 
+       encode_to_ascii
+       ( 
+           PG_GETARG_TEXT_P_COPY(0), 
+           GetDatabaseEncoding()
+       )
+   );
+}
+
+       
\ No newline at end of file

diff --git a/src/include/utils/ascii.h b/src/include/utils/ascii.h
new file mode 100644 (file)
index 0000000..16b59a8
--- /dev/null
+++ b/src/include/utils/ascii.h
@@ -0,0 +1,24 @@
+
+/* -----------------------------------------------------------------------
+ * ascii.h
+ *
+ * $Id: ascii.h,v 1.1 2000/08/04 20:22:52 momjian Exp $
+ *
+ *  Portions Copyright (c) 1999-2000, PostgreSQL, Inc
+ *
+ * -----------------------------------------------------------------------
+ */
+
+#ifndef _ASCII_H_
+#define _ASCII_H_
+
+#include "fmgr.h"
+
+extern Datum to_ascii_encname(PG_FUNCTION_ARGS);
+extern Datum to_ascii_enc(PG_FUNCTION_ARGS);
+extern Datum to_ascii_default(PG_FUNCTION_ARGS);
+
+extern char *pg_to_ascii(unsigned char *src, unsigned char *src_end, 
+                   unsigned char *desc, int enc);
+
+#endif