opensourcemirror
/
postgresql
mirror of git://git.postgresql.org/git/postgresql.git
1
0
Fork 0
Code Issues Releases Wiki Activity

Oracle like currval behaviour.

This commit is contained in:
Vadim B. Mikheev 1997-06-02 11:22:52 +00:00
parent 465047d604
commit 5b5c83f9e7
1 changed files with 7 additions and 21 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
src/backend/commands/sequence.c
View File

@ -204,6 +204,7 @@ nextval (struct varlena * seqin)
/* open and WIntentLock sequence */
elm = init_sequence ("nextval", seqname);
pfree (seqname);
if ( elm->last != elm->cached ) /* some numbers were cached */
{
@ -237,7 +238,7 @@ nextval (struct varlena * seqin)
break; /* stop caching */
if ( seq->is_cycled != 't' )
elog (WARN, "%s.nextval: got MAXVALUE (%d)",
seqname, maxv);
elm->name, maxv);
next = minv;
}
else
@ -252,7 +253,7 @@ nextval (struct varlena * seqin)
break; /* stop caching */
if ( seq->is_cycled != 't' )
elog (WARN, "%s.nextval: got MINVALUE (%d)",
seqname, minv);
elm->name, minv);
next = maxv;
}
else
@ -287,34 +288,19 @@ currval (struct varlena * seqin)
{
char *seqname = textout(seqin);
SeqTable elm;
Buffer buf;
SequenceTupleForm seq;
ItemPointerData iptr;
int4 result;
/* open and WIntentLock sequence */
elm = init_sequence ("currval", seqname);
pfree (seqname);
if ( elm->last != elm->cached ) /* some numbers were cached */
if ( elm->increment == 0 ) /* nextval/read_info were not called */
{
return (elm->last); /* return last returned by nextval */
elog (WARN, "%s.currval is not yet defined in this session", elm->name);
}
seq = read_info ("currval", elm, &buf);
if ( seq->is_called != 't' )
{
elog (WARN, "%s.currval: yet undefined (%s.nextval never called)",
seqname, seqname);
}
result = seq->last_value;
result = elm->last;
if ( ReleaseBuffer (buf) == STATUS_ERROR )
elog (WARN, "%s.currval: ReleaseBuffer failed", seqname);
ItemPointerSet(&iptr, 0, FirstOffsetNumber);
RelationUnsetSingleWLockPage (elm->rel, &iptr);
return (result);
}