PostgreSQL Source Code  git master
queryjumblefuncs.c File Reference
#include "postgres.h"
#include "common/hashfn.h"
#include "miscadmin.h"
#include "nodes/queryjumble.h"
#include "parser/scansup.h"
#include "queryjumblefuncs.funcs.c"
#include "queryjumblefuncs.switch.c"
Include dependency graph for queryjumblefuncs.c:

Go to the source code of this file.

Macros

#define JUMBLE_SIZE   1024 /* query serialization buffer size */
 
#define JUMBLE_NODE(item)    _jumbleNode(jstate, (Node *) expr->item)
 
#define JUMBLE_LOCATION(location)    RecordConstLocation(jstate, expr->location)
 
#define JUMBLE_FIELD(item)    AppendJumble(jstate, (const unsigned char *) &(expr->item), sizeof(expr->item))
 
#define JUMBLE_FIELD_SINGLE(item)    AppendJumble(jstate, (const unsigned char *) &(item), sizeof(item))
 
#define JUMBLE_STRING(str)
 

Functions

static void AppendJumble (JumbleState *jstate, const unsigned char *item, Size size)
 
static void RecordConstLocation (JumbleState *jstate, int location)
 
static void _jumbleNode (JumbleState *jstate, Node *node)
 
static void _jumbleA_Const (JumbleState *jstate, Node *node)
 
static void _jumbleList (JumbleState *jstate, Node *node)
 
static void _jumbleRangeTblEntry (JumbleState *jstate, Node *node)
 
const char * CleanQuerytext (const char *query, int *location, int *len)
 
JumbleStateJumbleQuery (Query *query)
 
void EnableQueryId (void)
 

Variables

int compute_query_id = COMPUTE_QUERY_ID_AUTO
 
bool query_id_enabled = false
 

Macro Definition Documentation

◆ JUMBLE_FIELD

#define JUMBLE_FIELD (   item)     AppendJumble(jstate, (const unsigned char *) &(expr->item), sizeof(expr->item))

Definition at line 224 of file queryjumblefuncs.c.

◆ JUMBLE_FIELD_SINGLE

#define JUMBLE_FIELD_SINGLE (   item)     AppendJumble(jstate, (const unsigned char *) &(item), sizeof(item))

Definition at line 226 of file queryjumblefuncs.c.

◆ JUMBLE_LOCATION

#define JUMBLE_LOCATION (   location)     RecordConstLocation(jstate, expr->location)

Definition at line 222 of file queryjumblefuncs.c.

◆ JUMBLE_NODE

#define JUMBLE_NODE (   item)     _jumbleNode(jstate, (Node *) expr->item)

Definition at line 220 of file queryjumblefuncs.c.

◆ JUMBLE_SIZE

#define JUMBLE_SIZE   1024 /* query serialization buffer size */

Definition at line 40 of file queryjumblefuncs.c.

◆ JUMBLE_STRING

#define JUMBLE_STRING (   str)
Value:
do { \
if (expr->str) \
AppendJumble(jstate, (const unsigned char *) (expr->str), strlen(expr->str) + 1); \
} while(0)

Definition at line 228 of file queryjumblefuncs.c.

Function Documentation

◆ _jumbleA_Const()

static void _jumbleA_Const ( JumbleState jstate,
Node node 
)
static

Definition at line 324 of file queryjumblefuncs.c.

325 {
326  A_Const *expr = (A_Const *) node;
327 
328  JUMBLE_FIELD(isnull);
329  if (!expr->isnull)
330  {
331  JUMBLE_FIELD(val.node.type);
332  switch (nodeTag(&expr->val))
333  {
334  case T_Integer:
335  JUMBLE_FIELD(val.ival.ival);
336  break;
337  case T_Float:
338  JUMBLE_STRING(val.fval.fval);
339  break;
340  case T_Boolean:
341  JUMBLE_FIELD(val.boolval.boolval);
342  break;
343  case T_String:
344  JUMBLE_STRING(val.sval.sval);
345  break;
346  case T_BitString:
347  JUMBLE_STRING(val.bsval.bsval);
348  break;
349  default:
350  elog(ERROR, "unrecognized node type: %d",
351  (int) nodeTag(&expr->val));
352  break;
353  }
354  }
355 }
#define ERROR
Definition: elog.h:39
#define elog(elevel,...)
Definition: elog.h:224
long val
Definition: informix.c:670
#define nodeTag(nodeptr)
Definition: nodes.h:133
#define JUMBLE_STRING(str)
#define JUMBLE_FIELD(item)
bool isnull
Definition: parsenodes.h:363
union ValUnion val
Definition: parsenodes.h:362

References elog, ERROR, A_Const::isnull, JUMBLE_FIELD, JUMBLE_STRING, nodeTag, A_Const::val, and val.

◆ _jumbleList()

static void _jumbleList ( JumbleState jstate,
Node node 
)
static

Definition at line 293 of file queryjumblefuncs.c.

294 {
295  List *expr = (List *) node;
296  ListCell *l;
297 
298  switch (expr->type)
299  {
300  case T_List:
301  foreach(l, expr)
302  _jumbleNode(jstate, lfirst(l));
303  break;
304  case T_IntList:
305  foreach(l, expr)
307  break;
308  case T_OidList:
309  foreach(l, expr)
311  break;
312  case T_XidList:
313  foreach(l, expr)
315  break;
316  default:
317  elog(ERROR, "unrecognized list node type: %d",
318  (int) expr->type);
319  return;
320  }
321 }
#define lfirst(lc)
Definition: pg_list.h:172
#define lfirst_int(lc)
Definition: pg_list.h:173
#define lfirst_oid(lc)
Definition: pg_list.h:174
#define lfirst_xid(lc)
Definition: pg_list.h:175
static void _jumbleNode(JumbleState *jstate, Node *node)
#define JUMBLE_FIELD_SINGLE(item)
Definition: pg_list.h:54
NodeTag type
Definition: pg_list.h:55

References _jumbleNode(), elog, ERROR, JUMBLE_FIELD_SINGLE, lfirst, lfirst_int, lfirst_oid, lfirst_xid, and List::type.

Referenced by _jumbleNode().

◆ _jumbleNode()

static void _jumbleNode ( JumbleState jstate,
Node node 
)
static

Definition at line 237 of file queryjumblefuncs.c.

238 {
239  Node *expr = node;
240 
241  if (expr == NULL)
242  return;
243 
244  /* Guard against stack overflow due to overly complex expressions */
246 
247  /*
248  * We always emit the node's NodeTag, then any additional fields that are
249  * considered significant, and then we recurse to any child nodes.
250  */
252 
253  switch (nodeTag(expr))
254  {
255 #include "queryjumblefuncs.switch.c"
256 
257  case T_List:
258  case T_IntList:
259  case T_OidList:
260  case T_XidList:
261  _jumbleList(jstate, expr);
262  break;
263 
264  default:
265  /* Only a warning, since we can stumble along anyway */
266  elog(WARNING, "unrecognized node type: %d",
267  (int) nodeTag(expr));
268  break;
269  }
270 
271  /* Special cases to handle outside the automated code */
272  switch (nodeTag(expr))
273  {
274  case T_Param:
275  {
276  Param *p = (Param *) node;
277 
278  /*
279  * Update the highest Param id seen, in order to start
280  * normalization correctly.
281  */
282  if (p->paramkind == PARAM_EXTERN &&
283  p->paramid > jstate->highest_extern_param_id)
284  jstate->highest_extern_param_id = p->paramid;
285  }
286  break;
287  default:
288  break;
289  }
290 }
#define WARNING
Definition: elog.h:36
void check_stack_depth(void)
Definition: postgres.c:3531
@ PARAM_EXTERN
Definition: primnodes.h:367
static void _jumbleList(JumbleState *jstate, Node *node)
int highest_extern_param_id
Definition: queryjumble.h:50
Definition: nodes.h:129
int paramid
Definition: primnodes.h:377
ParamKind paramkind
Definition: primnodes.h:376
const char * type

References _jumbleList(), check_stack_depth(), elog, JumbleState::highest_extern_param_id, JUMBLE_FIELD, nodeTag, PARAM_EXTERN, Param::paramid, Param::paramkind, type, and WARNING.

Referenced by _jumbleList(), and JumbleQuery().

◆ _jumbleRangeTblEntry()

static void _jumbleRangeTblEntry ( JumbleState jstate,
Node node 
)
static

◆ AppendJumble()

static void AppendJumble ( JumbleState jstate,
const unsigned char *  item,
Size  size 
)
static

Definition at line 162 of file queryjumblefuncs.c.

163 {
164  unsigned char *jumble = jstate->jumble;
165  Size jumble_len = jstate->jumble_len;
166 
167  /*
168  * Whenever the jumble buffer is full, we hash the current contents and
169  * reset the buffer to contain just that hash value, thus relying on the
170  * hash to summarize everything so far.
171  */
172  while (size > 0)
173  {
174  Size part_size;
175 
176  if (jumble_len >= JUMBLE_SIZE)
177  {
178  uint64 start_hash;
179 
180  start_hash = DatumGetUInt64(hash_any_extended(jumble,
181  JUMBLE_SIZE, 0));
182  memcpy(jumble, &start_hash, sizeof(start_hash));
183  jumble_len = sizeof(start_hash);
184  }
185  part_size = Min(size, JUMBLE_SIZE - jumble_len);
186  memcpy(jumble + jumble_len, item, part_size);
187  jumble_len += part_size;
188  item += part_size;
189  size -= part_size;
190  }
191  jstate->jumble_len = jumble_len;
192 }
#define Min(x, y)
Definition: c.h:1004
size_t Size
Definition: c.h:605
static Datum hash_any_extended(const unsigned char *k, int keylen, uint64 seed)
Definition: hashfn.h:37
static uint64 DatumGetUInt64(Datum X)
Definition: postgres.h:419
#define JUMBLE_SIZE
static pg_noinline void Size size
Definition: slab.c:607
unsigned char * jumble
Definition: queryjumble.h:35
Size jumble_len
Definition: queryjumble.h:38

References DatumGetUInt64(), hash_any_extended(), JumbleState::jumble, JumbleState::jumble_len, JUMBLE_SIZE, Min, and size.

◆ CleanQuerytext()

const char* CleanQuerytext ( const char *  query,
int *  location,
int *  len 
)

Definition at line 67 of file queryjumblefuncs.c.

68 {
69  int query_location = *location;
70  int query_len = *len;
71 
72  /* First apply starting offset, unless it's -1 (unknown). */
73  if (query_location >= 0)
74  {
75  Assert(query_location <= strlen(query));
76  query += query_location;
77  /* Length of 0 (or -1) means "rest of string" */
78  if (query_len <= 0)
79  query_len = strlen(query);
80  else
81  Assert(query_len <= strlen(query));
82  }
83  else
84  {
85  /* If query location is unknown, distrust query_len as well */
86  query_location = 0;
87  query_len = strlen(query);
88  }
89 
90  /*
91  * Discard leading and trailing whitespace, too. Use scanner_isspace()
92  * not libc's isspace(), because we want to match the lexer's behavior.
93  */
94  while (query_len > 0 && scanner_isspace(query[0]))
95  query++, query_location++, query_len--;
96  while (query_len > 0 && scanner_isspace(query[query_len - 1]))
97  query_len--;
98 
99  *location = query_location;
100  *len = query_len;
101 
102  return query;
103 }
#define Assert(condition)
Definition: c.h:858
const void size_t len
bool scanner_isspace(char ch)
Definition: scansup.c:117

References Assert, len, and scanner_isspace().

Referenced by pgss_store().

◆ EnableQueryId()

void EnableQueryId ( void  )

Definition at line 151 of file queryjumblefuncs.c.

152 {
154  query_id_enabled = true;
155 }
@ COMPUTE_QUERY_ID_OFF
Definition: queryjumble.h:56
bool query_id_enabled
int compute_query_id

References compute_query_id, COMPUTE_QUERY_ID_OFF, and query_id_enabled.

Referenced by _PG_init().

◆ JumbleQuery()

JumbleState* JumbleQuery ( Query query)

Definition at line 106 of file queryjumblefuncs.c.

107 {
108  JumbleState *jstate = NULL;
109 
111 
112  jstate = (JumbleState *) palloc(sizeof(JumbleState));
113 
114  /* Set up workspace for query jumbling */
115  jstate->jumble = (unsigned char *) palloc(JUMBLE_SIZE);
116  jstate->jumble_len = 0;
117  jstate->clocations_buf_size = 32;
118  jstate->clocations = (LocationLen *)
119  palloc(jstate->clocations_buf_size * sizeof(LocationLen));
120  jstate->clocations_count = 0;
121  jstate->highest_extern_param_id = 0;
122 
123  /* Compute query ID and mark the Query node with it */
124  _jumbleNode(jstate, (Node *) query);
125  query->queryId = DatumGetUInt64(hash_any_extended(jstate->jumble,
126  jstate->jumble_len,
127  0));
128 
129  /*
130  * If we are unlucky enough to get a hash of zero, use 1 instead for
131  * normal statements and 2 for utility queries.
132  */
133  if (query->queryId == UINT64CONST(0))
134  {
135  if (query->utilityStmt)
136  query->queryId = UINT64CONST(2);
137  else
138  query->queryId = UINT64CONST(1);
139  }
140 
141  return jstate;
142 }
void * palloc(Size size)
Definition: mcxt.c:1316
static bool IsQueryIdEnabled(void)
Definition: queryjumble.h:77
int clocations_buf_size
Definition: queryjumble.h:44
LocationLen * clocations
Definition: queryjumble.h:41
int clocations_count
Definition: queryjumble.h:47
Node * utilityStmt
Definition: parsenodes.h:136

References _jumbleNode(), Assert, JumbleState::clocations, JumbleState::clocations_buf_size, JumbleState::clocations_count, DatumGetUInt64(), hash_any_extended(), JumbleState::highest_extern_param_id, IsQueryIdEnabled(), JumbleState::jumble, JumbleState::jumble_len, JUMBLE_SIZE, palloc(), and Query::utilityStmt.

Referenced by ExplainQuery(), parse_analyze_fixedparams(), parse_analyze_varparams(), and parse_analyze_withcb().

◆ RecordConstLocation()

static void RecordConstLocation ( JumbleState jstate,
int  location 
)
static

Definition at line 199 of file queryjumblefuncs.c.

200 {
201  /* -1 indicates unknown or undefined location */
202  if (location >= 0)
203  {
204  /* enlarge array if needed */
205  if (jstate->clocations_count >= jstate->clocations_buf_size)
206  {
207  jstate->clocations_buf_size *= 2;
208  jstate->clocations = (LocationLen *)
209  repalloc(jstate->clocations,
210  jstate->clocations_buf_size *
211  sizeof(LocationLen));
212  }
213  jstate->clocations[jstate->clocations_count].location = location;
214  /* initialize lengths to -1 to simplify third-party module usage */
215  jstate->clocations[jstate->clocations_count].length = -1;
216  jstate->clocations_count++;
217  }
218 }
void * repalloc(void *pointer, Size size)
Definition: mcxt.c:1540

References JumbleState::clocations, JumbleState::clocations_buf_size, JumbleState::clocations_count, LocationLen::length, LocationLen::location, and repalloc().

Variable Documentation

◆ compute_query_id

int compute_query_id = COMPUTE_QUERY_ID_AUTO

Definition at line 43 of file queryjumblefuncs.c.

Referenced by EnableQueryId(), ExplainPrintPlan(), and IsQueryIdEnabled().

◆ query_id_enabled

bool query_id_enabled = false

Definition at line 52 of file queryjumblefuncs.c.

Referenced by EnableQueryId(), and IsQueryIdEnabled().