开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 数据库系统 > 查看源码
char.c
资源名称：postgresql-6.5.2.tar.gz　[点击查看]
上传用户：blenddy
上传日期：2007-01-07
资源大小：6495k
文件大小：3k
源码类别：

数据库系统

开发平台：

Unix_Linux

char.c：源码内容
  1. /*-------------------------------------------------------------------------
  2.  *
  3.  * char.c
  4.  *   Functions for the built-in type "char".
  5.  *   Functions for the built-in type "cid".
  6.  *
  7.  * Copyright (c) 1994, Regents of the University of California
  8.  *
  9.  *
  10.  * IDENTIFICATION
  11.  *   $Header: /usr/local/cvsroot/pgsql/src/backend/utils/adt/char.c,v 1.22.2.1 1999/08/02 05:24:50 scrappy Exp $
  12.  *
  13.  *-------------------------------------------------------------------------
  14.  */
  15. #include "postgres.h"
  16. #include "utils/builtins.h"
  18. /*****************************************************************************
  19.  *  USER I/O ROUTINES  *
  20.  *****************************************************************************/
  22. /*
  23.  * charin - converts "x" to 'x'
  24.  */
  25. int32
  26. charin(char *ch)
  27. {
  28. if (ch == NULL)
  29. return (int32) '';
  30. return (int32) *ch;
  31. }
  33. /*
  34.  * charout - converts 'x' to "x"
  35.  */
  36. char *
  37. charout(int32 ch)
  38. {
  39. char    *result = (char *) palloc(2);
  41. result[0] = (char) ch;
  42. result[1] = '';
  43. return result;
  44. }
  46. /*
  47.  * cidin - converts "..." to internal representation.
  48.  *
  49.  * NOTE: we must not use 'charin' because cid might be a non
  50.  * printable character...
  51.  */
  52. int32
  53. cidin(char *s)
  54. {
  55. CommandId c;
  57. if (s == NULL)
  58. c = 0;
  59. else
  60. c = atoi(s);
  62. return (int32) c;
  63. }
  65. /*
  66.  * cidout - converts a cid to "..."
  67.  *
  68.  * NOTE: we must no use 'charout' because cid might be a non
  69.  * printable character...
  70.  */
  71. char *
  72. cidout(int32 c)
  73. {
  74. char    *result;
  75. CommandId c2;
  77. result = palloc(12);
  78. c2 = (CommandId) c;
  79. sprintf(result, "%u", (unsigned) (c2));
  80. return result;
  81. }
  84. /*****************************************************************************
  85.  *  PUBLIC ROUTINES  *
  86.  *****************************************************************************/
  88. bool
  89. chareq(int8 arg1, int8 arg2)
  90. {
  91. return arg1 == arg2;
  92. }
  94. bool
  95. charne(int8 arg1, int8 arg2)
  96. {
  97. return arg1 != arg2;
  98. }
  100. bool
  101. charlt(int8 arg1, int8 arg2)
  102. {
  103. return (uint8) arg1 < (uint8) arg2;
  104. }
  106. bool
  107. charle(int8 arg1, int8 arg2)
  108. {
  109. return (uint8) arg1 <= (uint8) arg2;
  110. }
  112. bool
  113. chargt(int8 arg1, int8 arg2)
  114. {
  115. return (uint8) arg1 > (uint8) arg2;
  116. }
  118. bool
  119. charge(int8 arg1, int8 arg2)
  120. {
  121. return (uint8) arg1 >= (uint8) arg2;
  122. }
  124. int8
  125. charpl(int8 arg1, int8 arg2)
  126. {
  127. return arg1 + arg2;
  128. }
  130. int8
  131. charmi(int8 arg1, int8 arg2)
  132. {
  133. return arg1 - arg2;
  134. }
  136. int8
  137. charmul(int8 arg1, int8 arg2)
  138. {
  139. return arg1 * arg2;
  140. }
  142. int8
  143. chardiv(int8 arg1, int8 arg2)
  144. {
  145. return arg1 / arg2;
  146. }
  148. bool
  149. cideq(int8 arg1, int8 arg2)
  150. {
  151. return arg1 == arg2;
  152. }
  154. int8
  155. text_char(text *arg1)
  156. {
  157. return ((int8) *(VARDATA(arg1)));
  158. }
  160. text *
  161. char_text(int8 arg1)
  162. {
  163. text    *result;
  165. result = palloc(VARHDRSZ + 1);
  166. VARSIZE(result) = VARHDRSZ + 1;
  167. *(VARDATA(result)) = arg1;
  169. return result;
  170. }