libDtSearch: NO_TIMESTAMP is always on for CDE
authorPeter Howkins <flibble@users.sf.net>
Thu, 28 Jun 2018 23:47:03 +0000 (00:47 +0100)
committerPeter Howkins <flibble@users.sf.net>
Thu, 28 Jun 2018 23:47:03 +0000 (00:47 +0100)
55 files changed:
cde/lib/DtSearch/raima/cmstat.c
cde/lib/DtSearch/raima/connect.c
cde/lib/DtSearch/raima/costat.c
cde/lib/DtSearch/raima/crstat.c
cde/lib/DtSearch/raima/crwrite.c
cde/lib/DtSearch/raima/csmwrite.c
cde/lib/DtSearch/raima/csowrite.c
cde/lib/DtSearch/raima/csstat.c
cde/lib/DtSearch/raima/ctscm.c
cde/lib/DtSearch/raima/ctsco.c
cde/lib/DtSearch/raima/ctscr.c
cde/lib/DtSearch/raima/dblfcns.c
cde/lib/DtSearch/raima/dbtype.h
cde/lib/DtSearch/raima/dbxtrn.h
cde/lib/DtSearch/raima/delete.c
cde/lib/DtSearch/raima/dio.c
cde/lib/DtSearch/raima/discon.c
cde/lib/DtSearch/raima/dproto.h
cde/lib/DtSearch/raima/dtcover.h
cde/lib/DtSearch/raima/fillnew.c
cde/lib/DtSearch/raima/findco.c
cde/lib/DtSearch/raima/findfm.c
cde/lib/DtSearch/raima/findlm.c
cde/lib/DtSearch/raima/findnm.c
cde/lib/DtSearch/raima/findpm.c
cde/lib/DtSearch/raima/gtscm.c
cde/lib/DtSearch/raima/gtsco.c
cde/lib/DtSearch/raima/gtscr.c
cde/lib/DtSearch/raima/gtscs.c
cde/lib/DtSearch/raima/inittab.c
cde/lib/DtSearch/raima/keyfind.c
cde/lib/DtSearch/raima/keyfrst.c
cde/lib/DtSearch/raima/keylast.c
cde/lib/DtSearch/raima/keynext.c
cde/lib/DtSearch/raima/keyprev.c
cde/lib/DtSearch/raima/makenew.c
cde/lib/DtSearch/raima/proto.h
cde/lib/DtSearch/raima/recfcns.c
cde/lib/DtSearch/raima/recstat.c
cde/lib/DtSearch/raima/recwrite.c
cde/lib/DtSearch/raima/rwcurr.c
cde/lib/DtSearch/raima/setom.c
cde/lib/DtSearch/raima/setoo.c
cde/lib/DtSearch/raima/setor.c
cde/lib/DtSearch/raima/setrm.c
cde/lib/DtSearch/raima/setro.c
cde/lib/DtSearch/raima/stscm.c
cde/lib/DtSearch/raima/stsco.c
cde/lib/DtSearch/raima/stscr.c
cde/lib/DtSearch/raima/stscs.c
cde/lib/DtSearch/raima/task.h
cde/lib/DtSearch/raima/utscm.c
cde/lib/DtSearch/raima/utsco.c
cde/lib/DtSearch/raima/utscr.c
cde/lib/DtSearch/raima/utscs.c

index 069194071f1b07b04376be7c693012ce726972af..54632c8b1d49188a828f4c15856ea9e44a09066a 100644 (file)
 #include "dbtype.h"
 
 
-#ifndef         NO_TIMESTAMP
-/* Test timestamp status of current member
-*/
-d_cmstat(set TASK_PARM DBN_PARM)
-int set;
-TASK_DECL
-DBN_DECL
-{
-   ULONG cts, uts;
-   ULONG cmts;
-
-   DB_ENTER(DB_ID TASK_ID LOCK_SET(SET_IO));
-   if ( d_ctscm(set, &cts TASK_PARM DBN_PARM) == S_OKAY ) {
-      if ( cts ) {
-        cmts = cm_time[NUM2INT(set - SETMARK, st_offset)];
-        if ( cts > cmts )
-           db_status = S_DELETED;
-        else {
-           d_utscm(set, &uts TASK_PARM DBN_PARM);
-           if ( uts > cmts )
-              db_status = S_UPDATED;
-        }
-      }
-      else
-        dberr(S_TIMESTAMP);
-   }
-   RETURN( db_status );
-}
-#endif
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin cmstat.c */
index d710fbbc58c44f22ff75512afadf65fdf772230c..e3feb3f70a46a1cdb9eebb9bb676cc8f3484e59a 100644 (file)
@@ -58,9 +58,6 @@ typedef struct {
    LONG    total;     /* total number of members in set */
    DB_ADDR first;     /* database address of first member in set */
    DB_ADDR last;      /* database address of last member in set */
-#ifndef         NO_TIMESTAMP
-   ULONG   timestamp; /* set update timestamp - if used */
-#endif
 } SET_PTR;
 
 /* member pointer structure definition */
@@ -91,9 +88,6 @@ DBN_DECL /* Database number */
    DB_ADDR ndba;          /* db address of next member record */
    INT ordering;          /* set order control variable */
    int stat, compare;     /* status code & sort comparison result */
-#ifndef         NO_TIMESTAMP
-   FILE_NO file;
-#endif
    SET_ENTRY *set_ptr;
    DB_ADDR *co_ptr;
    DB_ADDR *cm_ptr;
@@ -251,13 +245,6 @@ DBN_DECL /* Database number */
 inserted:
    /* increment total members in set */
    ++cosp.total;
-#ifndef         NO_TIMESTAMP
-   /* check for timestamp */
-   if ( set_ptr->st_flags & TIMESTAMPED ) {
-      file = NUM2INT((FILE_NO)((*co_ptr >> FILESHIFT) & FILEMASK), ft_offset);
-      cosp.timestamp = dio_pzgetts(file);
-   }
-#endif
    if ( mrec ) { 
       /* put member pointer back into member record and mark member
         record as modified
@@ -285,13 +272,6 @@ inserted:
 
    /* set current member to current record */
    *cm_ptr = curr_rec;
-#ifndef         NO_TIMESTAMP
-   /* check and fetch timestamps */
-   if ( db_tsrecs )
-      d_utscr(&cm_time[set] TASK_PARM);
-   if ( db_tssets )
-      cs_time[set] = cosp.timestamp;
-#endif
    RETURN( db_status );
 
 /* error return */
index b1a1b789eecc2a9c1f52bd589899800e1d1fb756..f0dc417815615a5e7bb6f610fb7b927b09870676 100644 (file)
 #include "dbtype.h"
 
 
-#ifndef         NO_TIMESTAMP
-/* Test timestamp status of current owner
-*/
-d_costat(set TASK_PARM DBN_PARM)
-int set;
-TASK_DECL
-DBN_DECL
-{
-   ULONG cts, uts;
-   ULONG cots;
-
-   DB_ENTER(DB_ID TASK_ID LOCK_SET(SET_IO));
-
-   if ( d_ctsco(set, &cts TASK_PARM DBN_PARM) == S_OKAY ) {
-      if ( cts ) {
-        cots = co_time[NUM2INT(set - SETMARK, st_offset)];
-        if ( cts > cots )
-           db_status = S_DELETED;
-        else {
-           d_utsco(set, &uts TASK_PARM DBN_PARM);
-           if ( uts > cots )
-              db_status = S_UPDATED;
-        }
-      }
-      else
-        dberr(S_TIMESTAMP);
-   }
-   RETURN( db_status );
-}
-#endif
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin costat.c */
index bd36071e419e6cb812f6d5bf091183a4f9cfed90..1d92c60510cb59bb51930adc6a9e3cc6025480d5 100644 (file)
 #include "dbtype.h"
 
 
-#ifndef         NO_TIMESTAMP
-/* Test timestamp status of current record
-*/
-d_crstat(TASK_ONLY)
-TASK_DECL
-{
-   ULONG cts, uts;
-
-   DB_ENTER(NO_DB_ID TASK_ID LOCK_SET(RECORD_IO));
-
-   if ( d_ctscr(&cts TASK_PARM) == S_OKAY ) {
-      if ( cts ) {
-        d_utscr(&uts TASK_PARM);
-        if ( cts > cr_time )
-           db_status = S_DELETED;
-        else if ( uts > cr_time )
-           db_status = S_UPDATED;
-      }
-      else
-        dberr(S_TIMESTAMP);
-   }
-   RETURN( db_status );
-}
-#endif
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin crstat.c */
index 7b5fd3f355363ec67fea687744d2fbb84078c1d1..4329c70e6bef5acafad774ed5c1024c9620c39df 100644 (file)
@@ -57,9 +57,6 @@ char *data; /* data area to contain field contents */
 TASK_DECL
 DBN_DECL    /* database number */
 {
-#ifndef         NO_TIMESTAMP
-   ULONG timestamp;
-#endif
    int stat, fld, rec;
    RECORD_ENTRY *rec_ptr;
    FIELD_ENTRY *fld_ptr;
@@ -93,18 +90,7 @@ DBN_DECL    /* database number */
    /* put data into record and return */
    if ( r_pfld(fld, fld_ptr, crloc, data, &curr_rec) != S_OKAY )
       RETURN( db_status );
-#ifndef         NO_TIMESTAMP
-   /* check for timestamp */
-   if ( rec_ptr->rt_flags & TIMESTAMPED ) {
-      timestamp = dio_pzgetts(rec_ptr->rt_file);
-      bytecpy( crloc + RECUPTIME, &timestamp, sizeof(LONG));
-   }
-#endif
    dio_write(curr_rec, NULL, PGFREE);
-#ifndef         NO_TIMESTAMP
-   if (( db_status == S_OKAY ) && ( rec_ptr->rt_flags & TIMESTAMPED ))
-      cr_time = timestamp;
-#endif
    RETURN( db_status );
 }
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin crwrite.c */
index 4c8b2c239ff558895add9067a1b1b683a033dee4..b3ac6ce7c18713c43ad1119b1e0a93e825f7ce0c 100644 (file)
@@ -58,9 +58,6 @@ const char *data; /* Data area to contain field contents */
 TASK_DECL
 DBN_DECL    /* database number */
 {
-#ifndef         NO_TIMESTAMP
-   ULONG timestamp;
-#endif
    int stat, fld, rec;
    char *recp;
    SET_ENTRY *set_ptr;
@@ -98,18 +95,7 @@ DBN_DECL    /* database number */
    /* Put data into record */
    if ( r_pfld(fld, fld_ptr, recp, data, cm_ptr) != S_OKAY )
       RETURN( db_status );
-#ifndef         NO_TIMESTAMP
-   /* check for timestamp */
-   if ( rec_ptr->rt_flags & TIMESTAMPED ) {
-      timestamp = dio_pzgetts(rec_ptr->rt_file);
-      bytecpy( recp + RECUPTIME, &timestamp, sizeof(LONG));
-   }
-#endif
    dio_write(*cm_ptr, NULL, PGFREE);
-#ifndef         NO_TIMESTAMP
-   if (( db_status == S_OKAY ) && ( rec_ptr->rt_flags & TIMESTAMPED ))
-      cm_time[set] = timestamp;
-#endif
    RETURN( db_status );
 }
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin csmwrite.c */
index b0f1fb58a73569462b84c74033f069baefdf9c0d..8d28f0fc68e421b4fafd76c17634a00b94a7d7ff 100644 (file)
@@ -58,9 +58,6 @@ const char *data; /* Data area to contain field contents */
 TASK_DECL
 DBN_DECL    /* database number */
 {
-#ifndef         NO_TIMESTAMP
-   ULONG timestamp;
-#endif
    int stat, fld, rec;
    char *recp;
    SET_ENTRY *set_ptr;
@@ -98,18 +95,7 @@ DBN_DECL    /* database number */
    /* Put data into record */
    if ( r_pfld(fld, fld_ptr, recp, data, co_ptr) != S_OKAY )
       RETURN( db_status );
-#ifndef         NO_TIMESTAMP
-   /* check for timestamp */
-   if ( rec_ptr->rt_flags & TIMESTAMPED ) {
-      timestamp = dio_pzgetts(rec_ptr->rt_file);
-      bytecpy( recp + RECUPTIME, &timestamp, sizeof(LONG));
-   }
-#endif
    dio_write(*co_ptr, (char *)NULL, PGFREE);
-#ifndef         NO_TIMESTAMP
-   if (( db_status == S_OKAY ) && ( rec_ptr->rt_flags & TIMESTAMPED ))
-      co_time[set] = timestamp;
-#endif
    RETURN( db_status );
 }
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin csowrite.c */
index 4e6ffaa5f09a8791eae5ebe91db6801973cfc688..fafd5dd4abc1d10b70203543d408769104ff400f 100644 (file)
 #include "dbtype.h"
 
 
-#ifndef         NO_TIMESTAMP
-/* Test timestamp status of current set
-*/
-d_csstat(set TASK_PARM DBN_PARM)
-int set;
-TASK_DECL
-DBN_DECL
-{
-   ULONG uts;
-
-   DB_ENTER(DB_ID TASK_ID LOCK_SET(SET_IO));
-
-   if ( d_utscs(set, &uts TASK_PARM DBN_PARM) == S_OKAY ) {
-      if ( uts ) {
-        if ( uts > cs_time[NUM2INT(set - SETMARK, st_offset)] )
-           db_status = S_UPDATED;
-      }
-      else
-        dberr(S_TIMESTAMP);
-   }
-   RETURN( db_status );
-}
-#endif
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin csstat.c */
index 2736396570c2824a4fca0597f60a599b1a7de821..8652499e1892ad5cb92a7e2663a03b41802e76f7 100644 (file)
 #include "dbtype.h"
 
 
-#ifndef         NO_TIMESTAMP
-/* Get creation timestamp of current member
-*/
-d_ctscm(set, timestamp TASK_PARM DBN_PARM)
-int set;
-ULONG *timestamp;
-TASK_DECL
-DBN_DECL
-{
-   INT rec;
-   char *rptr;
-   SET_ENTRY *set_ptr;
-
-   DB_ENTER(DB_ID TASK_ID LOCK_SET(SET_IO));
-
-   if (nset_check(set, &set, (SET_ENTRY * *)&set_ptr) != S_OKAY)
-      RETURN( db_status );
-
-   /* make sure we have a current member */
-   if ( ! curr_mem[set] )
-      RETURN( dberr(S_NOCM) );
-
-   /* read current member */
-   if ( dio_read( curr_mem[set], (char * *)&rptr , NOPGHOLD) != S_OKAY )
-      RETURN( db_status );
-
-   /* get record id */
-   bytecpy(&rec, rptr, sizeof(INT));
-   if ( rec >= 0 ) {
-      rec &= ~RLBMASK; /* mask off rlb */
-      if (record_table[NUM2INT(rec, rt_offset)].rt_flags & TIMESTAMPED)
-        bytecpy(timestamp, rptr + RECCRTIME, sizeof(ULONG));
-      else
-        *timestamp = 0L;
-   }
-   else
-      db_status = S_DELETED;
-
-   RETURN( db_status );
-}
-#endif
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin ctscm.c */
index 53d7c79913722ad0ccc41067cb10c6603857473c..4f45d87068d5c9502415ad371c726627c45bdb8f 100644 (file)
 #include "dbtype.h"
 
 
-#ifndef         NO_TIMESTAMP
-/* Get creation timestamp of current owner
-*/
-d_ctsco(set, timestamp TASK_PARM DBN_PARM)
-int set;
-ULONG *timestamp;
-TASK_DECL
-DBN_DECL
-{
-   INT rec;
-   char *rptr;
-   SET_ENTRY *set_ptr;
-
-   DB_ENTER(DB_ID TASK_ID LOCK_SET(SET_IO));
-
-   if (nset_check(set, &set, (SET_ENTRY * *)&set_ptr) != S_OKAY)
-      RETURN( db_status );
-
-   /* make sure we have a current owner */
-   if ( ! curr_own[set] )
-      RETURN( dberr(S_NOCO) );
-
-   /* read current owner */
-   if ( dio_read( curr_own[set], (char * *)&rptr , NOPGHOLD) != S_OKAY )
-      RETURN( db_status );
-
-   /* get record id */
-   bytecpy(&rec, rptr, sizeof(INT));
-   if ( rec >= 0 ) {
-      rec &= ~RLBMASK; /* mask off rlb */
-      if (record_table[NUM2INT(rec, rt_offset)].rt_flags & TIMESTAMPED)
-        bytecpy(timestamp, rptr + RECCRTIME, sizeof(ULONG));
-      else
-        *timestamp = 0L;
-   } 
-   else 
-      db_status = S_DELETED;
-
-   RETURN( db_status );
-}
-#endif
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin ctsco.c */
index b50033276c6d4ab7914faf36a6bf1b9c1be65170..f3ba1b484ed3a025a1da83b03eebb04ee2c4ee39 100644 (file)
 #include "dbtype.h"
 
 
-#ifndef         NO_TIMESTAMP
-/* Get creation timestamp of current record
-*/
-d_ctscr(timestamp TASK_PARM)
-ULONG *timestamp;
-TASK_DECL
-{
-   INT rec;
-
-   DB_ENTER(NO_DB_ID TASK_ID LOCK_SET(RECORD_IO));
-
-   /* make sure we have a current record */
-   if ( ! curr_rec )
-      RETURN( dberr(S_NOCR) );
-
-   /* read current record */
-   if ( dio_read( curr_rec, (char * *)&crloc , NOPGHOLD) != S_OKAY )
-      RETURN( db_status );
-
-   /* get record id */
-   bytecpy(&rec, crloc, sizeof(INT));
-   if ( rec >= 0 ) {
-      rec &= ~RLBMASK; /* mask off rlb */
-      if (record_table[NUM2INT(rec, rt_offset)].rt_flags & TIMESTAMPED)
-        bytecpy(timestamp, crloc + RECCRTIME, sizeof(ULONG));
-      else
-        *timestamp = 0L;
-   }
-   else
-      db_status = S_DELETED;
-
-   RETURN( db_status );
-}
-#endif
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin ctscr.c */
index c04b8f953cca30d3474ce9c84b02a32d3e73e085..1de487ec437bceefa4a27c27327ad42c4e97d9d0 100644 (file)
@@ -408,9 +408,6 @@ TASK_DECL
       dio_free(); */
    }
    if ( dbopen ) {
-#ifndef NO_TIMESTAMP
-      cr_time = 0;
-#endif
       setdb_on = FALSE;
       curr_db = 0;
       no_of_dbs = 1;
@@ -448,20 +445,6 @@ void termfree()
       MEM_UNLOCK(&db_global.Curr_own);
       FREE(&db_global.Curr_own);
    }
-#ifndef         NO_TIMESTAMP
-   if ( co_time ) {
-      MEM_UNLOCK(&db_global.Co_time);
-      FREE(&db_global.Co_time);
-   }
-   if ( cm_time ) {
-      MEM_UNLOCK(&db_global.Cm_time);
-      FREE(&db_global.Cm_time);
-   }
-   if ( cs_time ) {
-      MEM_UNLOCK(&db_global.Cs_time);
-      FREE(&db_global.Cs_time);
-   }
-#endif
    if ( sort_table ) {
       MEM_UNLOCK(&db_global.Sort_table);
       FREE(&db_global.Sort_table);
index 2faae033f00a98774140f7a0a52750c09e23f8ab..fa70887fd0caa287cf4fa954ef0510e102d9823a 100644 (file)
@@ -107,7 +107,6 @@ Failure to do so will produce compilation errors.
    HHS     = Harris H-series
 */
 
-#define NO_TIMESTAMP
 
 #define PGHOLD 1
 #define NOPGHOLD 0
@@ -188,10 +187,6 @@ Failure to do so will produce compilation errors.
 #define SP_FIRST   4  
 /* Offset to last member ptr in set ptr = 2+DB_ADDR_SIZE */
 #define SP_LAST    8  
-#ifndef         NO_TIMESTAMP
-/* Offset to timestamp in set ptr */
-#define SP_UTIME   12
-#endif
 /* Size of member pointer = 3*DB_ADDR_SIZE */
 #define MEMPSIZE   12 
 /* Offset to owner ptr in member ptr */
index 667046e87ff9a20c611388662ff8e070861260bd..f6b1ea43688761b2307a4f30742780cd03ab5ec6 100644 (file)
@@ -100,14 +100,6 @@ typedef struct TASK_S {
    DB_ADDR Curr_rec;          /* current record address */
    DB_ADDR_P Curr_own;        /* current set owners array */
    DB_ADDR_P Curr_mem;        /* current set members array */
-#ifndef         NO_TIMESTAMP
-   ULONG   Cr_time;
-   ULONG_P Co_time;          /* co_time = NULL */
-   ULONG_P Cm_time;          /* cm_time = NULL */
-   ULONG_P Cs_time;          /* cs_time = NULL */
-   BOOLEAN Db_tsrecs;
-   BOOLEAN Db_tssets;
-#endif
    FILE_NO Ov_file;
    BOOLEAN Setdb_on;
    INT No_of_dbs;
@@ -163,11 +155,6 @@ typedef struct TASK_S {
 #define key_table db_global.Key_table.ptr
 #define pgzero db_global.Pgzero.ptr
 #define root_ix db_global.Root_ix.ptr
-#ifndef NO_TIMESTAMP
-#define co_time db_global.Co_time.ptr
-#define cm_time db_global.Cm_time.ptr
-#define cs_time db_global.Cs_time.ptr
-#endif
 /* Used in DIO.C and OVFCNS.C */
 #define ixpg_table Ixpg_table.ptr
 #define dbpgbuff Dbpgbuff.ptr
@@ -201,11 +188,6 @@ typedef struct TASK_S {
 #define curr_db db_global.Curr_db
 #define curr_db_table db_global.Curr_db_table
 #define curr_rec db_global.Curr_rec
-#ifndef        NO_TIMESTAMP
-#define cr_time db_global.Cr_time
-#define db_tsrecs db_global.Db_tsrecs
-#define db_tssets db_global.Db_tssets
-#endif
 #define ov_file db_global.Ov_file
 #define setdb_on db_global.Setdb_on
 #define no_of_dbs db_global.No_of_dbs
index b8e42365b054c41928501f00b3fc3754f58c548c..091dd98ce15a00a8781080b870e9b56d22d9361b 100644 (file)
@@ -63,9 +63,6 @@ DBN_DECL
    SET_ENTRY *set_ptr;
    MEMBER_ENTRY *mem_ptr;
    DB_ADDR *co_ptr, *cm_ptr;
-#ifndef         NO_TIMESTAMP
-   ULONG *cots_ptr, *cmts_ptr, *sts_ptr;
-#endif
 
    DB_ENTER(DB_ID TASK_ID LOCK_SET(SET_IO));
 
@@ -103,34 +100,17 @@ DBN_DECL
    /* delete record */
    if ( r_delrec( rt, curr_rec ) == S_OKAY ) {
       /* nullify any currency containing deleted record */
-#ifndef         NO_TIMESTAMP
-      for (i = 0, co_ptr = curr_own, cm_ptr = curr_mem, cots_ptr = co_time,
-                                      cmts_ptr = cm_time, sts_ptr = cs_time;
-          i < size_st;
-          ++i, ++co_ptr, ++cm_ptr, ++cots_ptr, ++cmts_ptr, ++sts_ptr) {
-#else
       for (i = 0, co_ptr = curr_own, cm_ptr = curr_mem;
           i < size_st;
           ++i, ++co_ptr, ++cm_ptr) {
-#endif
         if ( ADDRcmp(&curr_rec, co_ptr) == 0 ) {
            *co_ptr = NULL_DBA;
-#ifndef         NO_TIMESTAMP
-           if ( db_tsrecs ) *cots_ptr = 0L;
-           if ( db_tssets ) *sts_ptr = 0L;
-#endif
         }
         if ( ADDRcmp(&curr_rec, cm_ptr) == 0 ) {
            *cm_ptr = NULL_DBA;
-#ifndef         NO_TIMESTAMP
-           if ( db_tsrecs ) *cmts_ptr = 0L;
-#endif
         }
       }
       curr_rec = NULL_DBA;
-#ifndef         NO_TIMESTAMP
-      cr_time  = 0L;
-#endif
    }
    RETURN( db_status );
 }
index af80b10b2473e98811d82ee4a4de673a587a72cb..3a3617d3747285eaec14ae85e17486d70f95073d 100644 (file)
@@ -1055,39 +1055,6 @@ LOOKUP_ENTRY *lu_ptr; /* corresponding to pg_ptr */
    Page zero handling functions for data and key files
 ***********************************************************************/
 
-#ifndef         NO_TIMESTAMP
-/* Increment and return file timestamp
-*/
-ULONG dio_pzsetts(fno )
-FILE_NO fno;
-{
-   ULONG ts;
-   PGZERO *pgzero_ptr;
-
-   if ( db_tsrecs || db_tssets ) {
-      pgzero_ptr = &pgzero[fno];
-      pgzero_ptr->pz_modified = TRUE;
-      ts = ++pgzero_ptr->pz_timestamp;
-   }
-   else
-      ts = 0;
-
-   return( ts );
-}
-
-
-/* Return file timestamp
-*/
-ULONG dio_pzgetts(fno)
-FILE_NO fno;
-{
-   if ( pgzero[fno].pz_next == 0L )
-      dio_pzread(fno);
-   o_fileinit(fno);
-   return ( pgzero[fno].pz_timestamp );
-}
-
-#endif
 
 /* Initialize page zero table
 */
index c0061b49387597c5a9b32a80ae2dbb7c68d52df5..bda69e63784d1fc64b0cc915c32d34efec401ba7 100644 (file)
@@ -52,9 +52,6 @@ typedef struct {
    LONG    total;     /* total number of members in set */
    DB_ADDR first;     /* database address of first member in set */
    DB_ADDR last;      /* database address of last member in set */
-#ifndef         NO_TIMESTAMP
-   ULONG   timestamp; /* set update timestamp - if used */
-#endif
 } SET_PTR;
 
 /* member pointer structure definition */
@@ -83,9 +80,6 @@ DBN_DECL  /* database number */
    DB_ADDR npdba;         /* db address of next or previous member */
    int set;               /* set_table entry */
    int stat;              /* status code variable */
-#ifndef         NO_TIMESTAMP
-   FILE_NO file;          /* file containing owner record */
-#endif
    SET_ENTRY *set_ptr;
    DB_ADDR *co_ptr, *cm_ptr;
 
@@ -150,13 +144,6 @@ DBN_DECL  /* database number */
          (dio_write(npdba, NULL, NOPGFREE) != S_OKAY))
         goto quit_a;
    }
-#ifndef         NO_TIMESTAMP
-   /* check for timestamp */
-   if ( set_ptr->st_flags & TIMESTAMPED ) {
-      file = NUM2INT((FILE_NO)((*co_ptr >> FILESHIFT) & FILEMASK), ft_offset);
-      cosp.timestamp = dio_pzgetts(file);
-   }
-#endif
    /* update membership count */
    --cosp.total;
 
@@ -176,17 +163,6 @@ DBN_DECL  /* database number */
    if ((r_pmem(set, mrec, (char *)&cmmp) != S_OKAY) ||
        (dio_write(mdba, NULL, PGFREE) != S_OKAY))
       RETURN( db_status );
-#ifndef         NO_TIMESTAMP
-   /* note timestamps */
-   if ( db_tsrecs )
-      d_utscr( &cr_time TASK_PARM );
-   if ( db_tsrecs && *cm_ptr )
-      d_utscm(nset, &cm_time[set] TASK_PARM DBN_PARM);
-
-   /* check for timestamp */
-   if ( set_ptr->st_flags & TIMESTAMPED )
-      cs_time[set] = cosp.timestamp;
-#endif
    RETURN( db_status = *cm_ptr ? S_OKAY : S_EOS );
 
 quit_a:
index 6e4333f73ae500b4a1254fe9f27441e9f105301e..7e5d34cc7ea332896cf16d37fcd52a625545e038 100644 (file)
@@ -187,16 +187,10 @@ int d_close(P0);                                  /* dblfcns.c */
 int d_cmstat(P1(int) DBN_Dn);                  /* cmstat.c */
 int d_cmtype(P1(int) Pi(int *) DBN_Dn);        /* cmtype.c */
 int d_connect(P1(int) DBN_Dn);                 /* connect.c */
-#ifndef NO_TIMESTAMP                      /* NO_TIMESTAMP */
-int d_costat(P1(int) DBN_Dn);                  /* costat.c */
-#endif                                    /* NO_TIMESTAMP */
 int d_cotype(P1(int) Pi(int *) DBN_Dn);        /* cotype.c */
 int d_crget(P1(DB_ADDR *) DBN_Dn);             /* crget.c */
 int d_crread(P1(long) Pi(char *) DBN_Dn);      /* crread.c */
 int d_crset(P1(DB_ADDR *) DBN_Dn);             /* crset.c */
-#ifndef NO_TIMESTAMP                      /* NO_TIMESTAMP */
-int d_crstat(P0);                              /* crstat.c */
-#endif                                    /* NO_TIMESTAMP */
 int d_crtype(P1(int *) DBN_Dn);                /* crtype.c */
 int d_crwrite(P1(long) Pi(char *) DBN_Dn);     /* crwrite.c */
 int d_csmget(P1(int) Pi(DB_ADDR *) DBN_Dn);    /* csmget.c */
@@ -211,12 +205,6 @@ int d_csoread(P1(int) Pi(long) Pi(char *) DBN_Dn);
 int d_csoset(P1(int) Pi(DB_ADDR *) DBN_Dn);    /* csoset.c */
 int d_csowrite(P1(int) Pi(long) Pi(const char *) DBN_Dn); 
                                                                /* csowrite.c */
-#ifndef NO_TIMESTAMP                      /* NO_TIMESTAMP */
-int d_csstat(P1(int) DBN_Dn);                  /* csstat.c */
-int d_ctscm(P1(int) Pi(ULONG *) DBN_Dn);       /* ctscm.c */
-int d_ctsco(P1(int) Pi(ULONG *) DBN_Dn);       /* ctsco.c */
-int d_ctscr(P1(ULONG *));                      /* ctscr.c */
-#endif                                    /* NO_TIMESTAMP */
 #ifndef NO_COUNTRY
 int d_ctbpath(P1(const char *));               /* pathfcns.c */
 #endif                                    /* NO_COUNTRY */
@@ -238,12 +226,6 @@ int d_findlm(P1(int) DBN_Dn);                      /* findlm.c */
 int d_findnm(P1(int) DBN_Dn);                  /* findnm.c */
 int d_findpm(P1(int) DBN_Dn);                  /* findpm.c */
 int d_freeall(P0);                             /* dblfcns.c */
-#ifndef NO_TIMESTAMP                      /* NO_TIMESTAMP */
-int d_gtscm(P1(int) Pi(ULONG *) DBN_Dn);       /* gtscm.c */
-int d_gtsco(P1(int) Pi(ULONG *) DBN_Dn);       /* gtsco.c */
-int d_gtscr(P1(ULONG *));                      /* gtscr.c */
-int d_gtscs(P1(int) Pi(ULONG *) DBN_Dn);       /* gtscs.c */
-#endif                                    /* NO_TIMESTAMP */
 int d_initialize(DBN_D1);                              /* initial.c */
 int d_initfile(P1(FILE_NO) DBN_Dn);            /* initial.c */
 int d_ismember(P1(int) DBN_Dn);                        /* ismember.c */
@@ -281,9 +263,6 @@ int d_reclstat(P1(int) Pi(char *) DBN_Dn);  /* dblfcns.c */
 int d_recover(P1(const char *));               /* recover.c */
 int d_recread(P1(char *) DBN_Dn);              /* recread.c */
 int d_recset(P1(int) DBN_Dn);                          /* recset.c */
-#ifndef NO_TIMESTAMP                      /* NO_TIMESTAMP */
-int d_recstat(P1(DB_ADDR) Pi(ULONG));          /* recstat.c */
-#endif                                    /* NO_TIMESTAMP */
 int d_recwrite(P1(const char *) DBN_Dn);       /* recwrite.c */
 int d_renfile(P1(const char *) Pi(FILE_NO) 
                                Pi(const char *));              /* renfile.c */
@@ -305,22 +284,10 @@ int d_setoo(P1(int) Pi(int) DBN_Dn);              /* setoo.c */
 int d_setor(P1(int) DBN_Dn);                   /* setor.c */
 int d_setrm(P1(int) DBN_Dn);                   /* setrm.c */
 int d_setro(P1(int) DBN_Dn);                   /* setro.c */
-#ifndef NO_TIMESTAMP                      /* NO_TIMESTAMP */
-int d_stscm(P1(int) Pi(ULONG) DBN_Dn);                 /* stscm.c */
-int d_stsco(P1(int) Pi(ULONG) DBN_Dn);                 /* stsco.c */
-int d_stscr(P1(ULONG));                                /* stscr.c */
-int d_stscs(P1(int) Pi(ULONG) DBN_Dn);                 /* stscs.c */
-#endif                                    /* NO_TIMESTAMP */
 int d_timeout(P1(int));                                /* dblfcns.c */
 int d_trabort(P0);                             /* dblfcns.c */
 int d_trbegin(P1(const char *));               /* dblfcns.c */
 int d_trend(P0);                                       /* dblfcns.c */
-#ifndef NO_TIMESTAMP                      /* NO_TIMESTAMP */
-int d_utscm(P1(int) Pi(ULONG *) DBN_Dn);       /* utscm.c */
-int d_utsco(P1(int) Pi(ULONG *) DBN_Dn);       /* utsco.c */
-int d_utscr(P1(ULONG *));                      /* utscr.c */
-int d_utscs(P1(int) Pi(ULONG *) DBN_Dn);       /* utscs.c */
-#endif                                    /* NO_TIMESTAMP */
 
 int dberr(P1(int));                            /* dberr.c */
 
index 09314786f0b4119911b6e29f54db9ed82a962797..15f05ada4311137c45464a4731b2700ba6f710be 100644 (file)
 #define d_cmstat               dt_cmstat
 #define d_cmtype               dt_cmtype
 #define d_connect              dt_connect
-#ifndef NO_TIMESTAMP
-#define d_costat               dt_costat
-#endif
 #define d_cotype               dt_cotype
 #define d_crget                        dt_crget
 #define d_crread               dt_crread
 #define d_crset                        dt_crset
-#ifndef NO_TIMESTAMP
-#define d_crstat               dt_crstat
-#endif
 #define d_crtype               dt_crtype
 #define d_crwrite              dt_crwrite
 #define d_csmget               dt_csmget
 #define d_csoread              dt_csoread
 #define d_csoset               dt_csoset
 #define d_csowrite             dt_csowrite
-#ifndef NO_TIMESTAMP
-#define d_csstat               dt_csstat
-#define d_ctscm                        dt_ctscm
-#define d_ctsco                        dt_ctsco
-#define d_ctscr                        dt_ctscr
-#endif
 #ifndef NO_COUNTRY
 #define d_ctbpath              dt_ctbpath
 #endif
 #define d_findnm               dt_findnm
 #define d_findpm               dt_findpm
 #define d_freeall              dt_freeall
-#ifndef NO_TIMESTAMP
-#define d_gtscm                        dt_gtscm
-#define d_gtsco                        dt_gtsco
-#define d_gtscr                        dt_gtscr
-#define d_gtscs                        dt_gtscs
-#endif
 #define d_initialize           dt_initialize
 #define d_initfile             dt_initfile
 #define d_ismember             dt_ismember
 #define d_recover              dt_recover
 #define d_recread              dt_recread
 #define d_recset               dt_recset
-#ifndef NO_TIMESTAMP
-#define d_recstat              dt_recstat
-#endif
 #define d_recwrite             dt_recwrite
 #define d_renfile              dt_renfile
 #define d_retries              dt_retries
 #define d_setor                        dt_setor
 #define d_setrm                        dt_setrm
 #define d_setro                        dt_setro
-#ifndef NO_TIMESTAMP
-#define d_stscm                        dt_stscm
-#define d_stsco                        dt_stsco
-#define d_stscr                        dt_stscr
-#define d_stscs                        dt_stscs
-#endif
 #define d_timeout              dt_timeout
 #define d_trabort              dt_trabort
 #define d_trbegin              dt_trbegin
 #define d_trend                        dt_trend
-#ifndef NO_TIMESTAMP
-#define d_utscm                        dt_utscm
-#define d_utsco                        dt_utsco
-#define d_utscr                        dt_utscr
-#define d_utscs                        dt_utscs
-#endif
 #define d_wrcurr               dt_wrcurr
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC dtcover.h */
index 3d7ba833e894206549c81f3aa46ca613e006db2e..3605a63ea5bf07c76040a5d539882545d05ee4d5 100644 (file)
@@ -61,9 +61,6 @@ const char *recval; /* record value */
 TASK_DECL
 DBN_DECL      /* database number */
 {
-#ifndef         NO_TIMESTAMP
-   ULONG timestamp;
-#endif
    DB_ADDR db_addr;
    INT recnum, stat;
    FILE_NO file;
@@ -118,15 +115,6 @@ DBN_DECL      /* database number */
    /* place the record number and db_addr at the start of the record */
    bytecpy( ptr, &recnum, sizeof(INT) );
    bytecpy( ptr+sizeof(INT), &db_addr, DB_ADDR_SIZE );
-#ifndef         NO_TIMESTAMP
-   /* check for timestamp */
-   if ( rec_ptr->rt_flags & TIMESTAMPED ) {
-      timestamp = dio_pzgetts(file);
-      bytecpy( ptr + RECCRTIME, &timestamp, sizeof(LONG));
-      bytecpy( ptr + RECUPTIME, &timestamp, sizeof(LONG));
-   }
-   else timestamp = 0;
-#endif
    /* copy the record value into place */
    bytecpy( ptr+rec_ptr->rt_data, recval, rec_ptr->rt_len-rec_ptr->rt_data );
 
@@ -151,9 +139,6 @@ DBN_DECL      /* database number */
    if ( dio_write(db_addr, NULL, PGFREE) == S_OKAY ) {
       curr_rec = db_addr;
 
-#ifndef         NO_TIMESTAMP
-      if ( db_tsrecs ) cr_time = timestamp;
-#endif
    }
    RETURN( db_status );
 }
index d97201f5281c224060b488b4bfae3d578fce549c..76325ad29b21d53a7fe614ebb24f2e39ae3463ba 100644 (file)
@@ -86,16 +86,6 @@ DBN_DECL
    curr_own[set] = own;
    curr_mem[set] = curr_rec;
    curr_rec      = own;
-#ifndef         NO_TIMESTAMP
-   /* set any timestamps */
-   if ( db_tsrecs ) {
-      d_utscr( &cr_time TASK_PARM );
-      d_utscm(nset, &cm_time[set] TASK_PARM DBN_PARM);
-      co_time[set] = cr_time;
-   }
-   if ( db_tssets )
-      d_utscs(nset, &cs_time[set] TASK_PARM DBN_PARM);
-#endif
    RETURN( db_status = S_OKAY );
 }
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin findco.c */
index e4cd3ea21c4fa8de2f16646ef197bd830f2e2a6e..584875d2efa6e062e8c66ef8005f13c471fc4807 100644 (file)
@@ -88,16 +88,6 @@ DBN_DECL
       RETURN( db_status = S_EOS );
 
    curr_rec  = mem;
-#ifndef         NO_TIMESTAMP
-   /* set timestamps */
-   if ( db_tsrecs ) {
-      d_utscr( &cr_time TASK_PARM );
-      cm_time[set] = cr_time;
-   }
-   if ( db_tssets )
-      /* only needed for system record support */
-      d_utscs(nset, &cs_time[set] TASK_PARM DBN_PARM);
-#endif
    RETURN( db_status = S_OKAY );
 }
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin findfm.c */
index 5048cdfa3ac8135e32470e683ae4405f6859b5dc..5715099fa5d10a6f3445186bd2ce4f6f5786a8dc 100644 (file)
@@ -88,16 +88,6 @@ DBN_DECL
       RETURN( db_status = S_EOS );
 
    curr_rec  = mem;
-#ifndef         NO_TIMESTAMP
-   /* set timestamps */
-   if ( db_tsrecs ) {
-      d_utscr( &cr_time TASK_PARM );
-      cm_time[set] = cr_time;
-   }
-   if ( db_tssets )
-      /* only needed for system record support */
-      d_utscs(nset, &cs_time[set] TASK_PARM DBN_PARM);
-#endif
    RETURN( db_status = S_OKAY );
 }
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin findlm.c */
index 10c0f7ce61908c32f30d85ab162bc7987dc5c81b..1c56e8c6081fb840b30d7b863273727a87edc586 100644 (file)
@@ -90,13 +90,6 @@ DBN_DECL
       RETURN( db_status = S_EOS );
 
    curr_rec  = mem;
-#ifndef         NO_TIMESTAMP
-   /* set timestamps */
-   if ( db_tsrecs ) {
-      d_utscr( &cr_time TASK_PARM );
-      cm_time[set] = cr_time;
-   }
-#endif
    RETURN( db_status = S_OKAY );
 }
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin findnm.c */
index 427aa0b00423f0cf3208c8715d0be516eb975e42..cd4a3d66301a1a3276b2bb233422375bec54fe8c 100644 (file)
@@ -90,13 +90,6 @@ DBN_DECL
       RETURN( db_status = S_EOS );
 
    curr_rec = mem;
-#ifndef         NO_TIMESTAMP
-   /* set timestamps */
-   if ( db_tsrecs ) {
-      d_utscr( &cr_time TASK_PARM );
-      cm_time[set] = cr_time;
-   }
-#endif
    RETURN( db_status = S_OKAY );
 }
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin findpm.c */
index 6920ffadad2305c58b465b0fdba80ebe254fab52..26a343c4ce97d685c91ff65f8363e0280bf6f8aa 100644 (file)
 #include "dbtype.h"
 
 
-#ifndef         NO_TIMESTAMP
-/* Get timestamp of current member
-*/
-d_gtscm(set, timestamp TASK_PARM DBN_PARM)
-int set;
-ULONG *timestamp;
-TASK_DECL
-DBN_DECL
-{
-   SET_ENTRY *set_ptr;
-
-   DB_ENTER(DB_ID TASK_ID LOCK_SET(SET_NOIO));
-
-   if (nset_check(set, &set, (SET_ENTRY * *)&set_ptr) != S_OKAY)
-      RETURN( db_status );
-
-   /* make sure we have a current member */
-   if ( curr_mem[set] ) {
-      if ( db_tsrecs )
-        *timestamp = cm_time[set];
-      else
-        dberr(S_TIMESTAMP);
-   }
-   else
-      dberr(S_NOCM);
-
-   RETURN( db_status );
-}
-#endif
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin gtscm.c */
index 575228f5e0d6ee21d42347db25cc4822320a930a..964edcae72ba555532a8025e13fda9a3cbae4ec1 100644 (file)
 #include "dbtype.h"
 
 
-#ifndef         NO_TIMESTAMP
-/* Get timestamp of current owner
-*/
-d_gtsco(set, timestamp TASK_PARM DBN_PARM)
-int set;
-ULONG *timestamp;
-TASK_DECL
-DBN_DECL
-{
-   SET_ENTRY *set_ptr;
-
-   DB_ENTER(DB_ID TASK_ID LOCK_SET(SET_NOIO));
-
-   if (nset_check(set, &set, (SET_ENTRY * *)&set_ptr) != S_OKAY)
-      RETURN( db_status );
-
-   /* make sure we have a current owner */
-   if ( curr_own[set] ) {
-      if ( db_tsrecs )
-        *timestamp = co_time[set];
-      else
-        dberr(S_TIMESTAMP);
-   }
-   else
-      dberr(S_NOCO);
-
-   RETURN( db_status );
-}
-#endif
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin gtsco.c */
index 64999560ca1c00a5cc636cdbdc1c4caa31a92503..2f3bab568250f938eaa83ae63b698d09e31658df 100644 (file)
 #include "dbtype.h"
 
 
-#ifndef         NO_TIMESTAMP
-/* Get timestamp of current record
-*/
-d_gtscr(timestamp TASK_PARM)
-ULONG *timestamp;
-TASK_DECL
-{
-   DB_ENTER(NO_DB_ID TASK_ID LOCK_SET(RECORD_NOIO));
-
-   db_status = S_OKAY;
-
-   /* make sure we have a current record */
-   if ( curr_rec ) {
-      if ( db_tsrecs )
-        *timestamp = cr_time;
-      else
-        dberr(S_TIMESTAMP);
-   }
-   else
-      dberr(S_NOCR);
-
-   RETURN( db_status );
-}
-#endif
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin gtscr.c */
index c0465448652ff8a809bd6b19d321fb3793247ff5..34a98202538b1da111a2e5eccdbe1fe21afd4332 100644 (file)
 #include "dbtype.h"
 
 
-#ifndef         NO_TIMESTAMP
-/* Get timestamp of set
-*/
-d_gtscs(set, timestamp TASK_PARM DBN_PARM)
-int set;
-ULONG *timestamp;
-TASK_DECL
-DBN_DECL
-{
-   SET_ENTRY *set_ptr;
-
-   DB_ENTER(DB_ID TASK_ID LOCK_SET(SET_NOIO));
-
-   if (nset_check(set, &set, (SET_ENTRY * *)&set_ptr) != S_OKAY)
-      RETURN( db_status );
-
-   /* make sure we have a current owner */
-   if ( curr_own[set] ) {
-      if ( db_tssets )
-        *timestamp = cs_time[set];
-      else
-        dberr(S_TIMESTAMP);
-   }
-   else
-      dberr(S_NOCO);
-
-   RETURN( db_status );
-}
-#endif
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin gtscs.c */
index 2bc9c979ca50e83a332609f9b8800fe6358fe202..4059cd4594f2b665bccc7de9f47f571d7619cac2 100644 (file)
@@ -106,11 +106,7 @@ inittab()
    FILE_ENTRY *file_ptr;
    FIELD_ENTRY *fld_ptr;
 #define         DB_ENABLE   1
-#ifndef         NO_TIMESTAMP
-#define         TS_ENABLE   1
-#else
 #define         TS_ENABLE   0
-#endif
 #if   DB_ENABLE | TS_ENABLE
    RECORD_ENTRY *rec_ptr;
    SET_ENTRY *set_ptr;
@@ -119,9 +115,6 @@ inittab()
    SORT_ENTRY *srt_ptr;
    KEY_ENTRY *key_ptr;
 
-#ifndef         NO_TIMESTAMP
-   db_tsrecs = db_tssets = FALSE;
-#endif
    size_ft = size_rt = size_st = size_mt = size_srt = size_fd = size_kt = 0;
 
    /* compute individual dictionary sizes and offsets */
@@ -469,11 +462,6 @@ goodver:
           ++i, ++rec_ptr) {
         rec_ptr->rt_file += curr_db_table->ft_offset;
         rec_ptr->rt_fields += curr_db_table->fd_offset;
-#ifndef         NO_TIMESTAMP
-        if ( rec_ptr->rt_flags & TIMESTAMPED ) {
-           db_tsrecs = TRUE;
-        }
-#endif
       }
 #endif
       /* adjust field table entries */
@@ -499,11 +487,6 @@ goodver:
           ++i, ++set_ptr) {
         set_ptr->st_own_rt += curr_db_table->rt_offset;
         set_ptr->st_members += curr_db_table->mt_offset;
-#ifndef         NO_TIMESTAMP
-        if ( set_ptr->st_flags & TIMESTAMPED ) {
-           db_tssets = TRUE;
-        }
-#endif
       }
 #endif
 
@@ -669,26 +652,6 @@ static int initcurr()
                                                                != S_OKAY ) {
         return( db_status );
       }
-#ifndef         NO_TIMESTAMP
-      new_size = size_st * sizeof(ULONG);
-      old_size = old_size_st * sizeof(ULONG);
-      if ( db_tsrecs ) {
-        if ( ALLOC_TABLE(&db_global.Co_time, new_size, old_size, "co_time")
-                                                               != S_OKAY ) {
-           return( db_status );
-        }
-        if ( ALLOC_TABLE(&db_global.Cm_time, new_size, old_size, "cm_time")
-                                                               != S_OKAY ) {
-           return( db_status );
-        }
-      }
-      if ( db_tssets ) {
-        if ( ALLOC_TABLE(&db_global.Cs_time, new_size, old_size, "cs_time")
-                                                               != S_OKAY ) {
-           return( db_status );
-        }
-      }
-#endif
       /* for each db make system record as curr_own of its sets */
       for (dbt_lc = no_of_dbs, curr_db_table = &db_table[old_no_of_dbs]; 
           --dbt_lc >= 0; ++curr_db_table) {
index 390909891e375b1783d07d45ce9be59cdd514c19..6369a84ea8e21d618606199406b5c9609cdcd0bb 100644 (file)
@@ -91,11 +91,6 @@ DBN_DECL      /* database number */
       /* set current record to found db addr */
       curr_rec = dba;
    }
-#ifndef         NO_TIMESTAMP
-   /* set timestamp */
-   if ( curr_rec && db_tsrecs )
-      d_utscr( &cr_time TASK_PARM );
-#endif
    RETURN( db_status = S_OKAY );
 }
 
index efff50c90bdb979c5d4b24d30a94b4c183673cac..3e062059c3fa3389cf1c567575fc0ad1fe138499 100644 (file)
@@ -70,11 +70,6 @@ DBN_DECL      /* database number */
 
    if ( key_boundary(KEYFRST, &dba) == S_OKAY ) {
       curr_rec = dba;
-#ifndef         NO_TIMESTAMP
-      /* set timestamp */
-      if ( db_tsrecs )
-        d_utscr( &cr_time TASK_PARM );
-#endif
    }
    RETURN( db_status );
 }
index 94e6b9ada151aef6ccba5b9f36c5fa6320f77426..973c36bd4c5f8cd580b69273940564e708272396 100644 (file)
@@ -70,11 +70,6 @@ DBN_DECL     /* database number */
 
    if ( key_boundary(KEYLAST, &dba) == S_OKAY ) {
       curr_rec = dba;
-#ifndef         NO_TIMESTAMP
-      /* set timestamp */
-      if ( db_tsrecs )
-        d_utscr( &cr_time TASK_PARM );
-#endif
    }
    RETURN( db_status );
 }
index ebd5abdce8e137db84e060856d48e8f004aa3364..b1b9beabc0c92ee04630161e77fc321461b1e65b 100644 (file)
@@ -71,11 +71,6 @@ DBN_DECL     /* database number */
 
    if ( key_scan(KEYNEXT, &dba) == S_OKAY ) {
       curr_rec = dba;
-#ifndef         NO_TIMESTAMP
-      /* set timestamp */
-      if ( db_tsrecs )
-        d_utscr( &cr_time TASK_PARM );
-#endif
    }
    RETURN( db_status );
 }
index bafc10a4728c45c10b95ef4a90255265296116f5..9e9f14ffa4c2794f36ac86db6a3c19229fcc47ac 100644 (file)
@@ -71,11 +71,6 @@ DBN_DECL     /* database number */
 
    if ( key_scan(KEYPREV, &dba) == S_OKAY ) {
       curr_rec = dba;
-#ifndef         NO_TIMESTAMP
-      /* set timestamp */
-      if ( db_tsrecs )
-        d_utscr( &cr_time TASK_PARM );
-#endif
    }
    RETURN( db_status );
 }
index 43817b474f0aca9e74c11883f09b288896d33f9f..8fd8edc7ab6cd590ac567da3fa8acd551868ae18 100644 (file)
@@ -141,9 +141,6 @@ int nrec;
 TASK_DECL
 DBN_DECL
 {
-#ifndef         NO_TIMESTAMP
-   ULONG timestamp;
-#endif
    DB_ADDR db_addr;
    INT recnum, fld, stat;
    FILE_NO file;
@@ -207,15 +204,6 @@ DBN_DECL
    /* place the record number and db_addr at the start of the record */
    bytecpy( ptr, &recnum, sizeof(INT) );
    bytecpy( ptr+sizeof(INT), &db_addr, DB_ADDR_SIZE);
-#ifndef         NO_TIMESTAMP
-   /* check for timestamp */
-   if ( rec_ptr->rt_flags & TIMESTAMPED ) {
-      timestamp = dio_pzgetts(file);
-      bytecpy( ptr + RECCRTIME, &timestamp, sizeof(LONG));
-      bytecpy( ptr + RECUPTIME, &timestamp, sizeof(LONG));
-   }
-   else timestamp = 0L;
-#endif
    /* for each keyed field, enter the key value into the key file */
    for (fld = rec_ptr->rt_fields, fldtot = fld + rec_ptr->rt_fdtot,
                                                   fld_ptr = &field_table[fld];
@@ -253,10 +241,6 @@ DBN_DECL
    }
    if ( dio_write(db_addr, NULL, PGFREE) == S_OKAY ) {
       curr_rec = db_addr;
-#ifndef         NO_TIMESTAMP
-      if ( db_tsrecs )
-        cr_time = timestamp;
-#endif
    }
    RETURN( db_status );
 }
index 3eb829aa3bff49a30c5a9f42a73dc3bf7eac7d77..c633efbfa437bc4f347615aaa790c4ada1af95b5 100644 (file)
@@ -171,10 +171,6 @@ int dio_findpg(P1(FILE_NO) Pi(F_ADDR) Pi(PAGE_ENTRY *)
                              Pi(PAGE_ENTRY * *) 
                              Pi(LOOKUP_ENTRY * *));
 int dio_out(P1(PAGE_ENTRY *) Pi(LOOKUP_ENTRY *));
-#ifndef  NO_TIMESTAMP
-ULONG dio_pzsetts(P1(FILE_NO));
-ULONG dio_pzgetts(P1(FILE_NO));
-#endif
 int dio_pzread(P1(FILE_NO));
 int dio_pzalloc(P1(FILE_NO) Pi(F_ADDR *));
 int dio_pzdel(P1(FILE_NO) Pi(F_ADDR));
index 0827042c919229cd91811e860e301217efa81422..82d503e639f0e6fe2b10acf104054739990875d9 100644 (file)
@@ -147,9 +147,6 @@ DB_ADDR db_addr;
    char *rec;       /* ptr to record slot */
    char *fptr;      /* field data ptr */
    char ckey[256];  /* compound key data */
-#ifndef         NO_TIMESTAMP
-   ULONG timestamp;
-#endif
    FILE_NO fno;
    F_ADDR rno;
    int fld;
@@ -180,14 +177,6 @@ DB_ADDR db_addr;
    }
    fno = NUM2INT((FILE_NO)((db_addr >> FILESHIFT) & FILEMASK), ft_offset);
    rno = ADDRMASK & db_addr;
-#ifndef         NO_TIMESTAMP
-   /* update timestamp, if necessary */
-   if ( rec_ptr->rt_flags & TIMESTAMPED ) {
-      timestamp = dio_pzgetts(fno);
-      bytecpy( rec + RECCRTIME, &timestamp, sizeof(ULONG));
-      bytecpy( rec + RECUPTIME, &timestamp, sizeof(ULONG));
-   }
-#endif
    dio_write(db_addr, NULL, PGFREE);
 
    /* place this record onto the delete chain */
@@ -287,11 +276,6 @@ char *setptr; /* pointer to set pointer */
    set_ptr = &set_table[set];
    bytecpy(&rt, rec, sizeof(INT));
    if (NUM2EXT(set_ptr->st_own_rt, rt_offset) == (rt & ~RLBMASK)) {
-#ifndef NO_TIMESTAMP
-      if ( set_ptr->st_flags & TIMESTAMPED )
-        len = SETPSIZE;
-      else
-#endif
         len = SETPSIZE - sizeof(ULONG);
       bytecpy(setptr, rec + set_ptr->st_own_ptr, len);
       return( db_status = S_OKAY );
@@ -471,11 +455,6 @@ char *setptr;  /* pointer to set pointer */
    set_ptr = &set_table[set];
    bytecpy(&rt, rec, sizeof(INT));
    if (NUM2EXT(set_ptr->st_own_rt, rt_offset) == (rt & ~RLBMASK)) {
-#ifndef NO_TIMESTAMP
-      if ( set_ptr->st_flags & TIMESTAMPED )
-        len = SETPSIZE;
-      else
-#endif
         len = SETPSIZE - sizeof(ULONG);
       bytecpy(rec + set_ptr->st_own_ptr, setptr, len);
       return( db_status = S_OKAY );
@@ -493,9 +472,6 @@ r_smem( db_addr, set )
 DB_ADDR *db_addr;
 INT set;
 {
-#ifndef         NO_TIMESTAMP
-   int nset;
-#endif
    char mem[MEMPSIZE], *ptr;
    DB_ADDR dba;
 
@@ -512,16 +488,6 @@ INT set;
 
    /* ownership okay, set the member */
    curr_mem[set] = dba;
-#ifndef         NO_TIMESTAMP
-   nset = NUM2EXT(set + SETMARK, st_offset);
-   /* set timestamps */
-   if ( db_tsrecs ) {
-      d_utsco( nset, &co_time[set] CURRTASK_PARM CURR_DB_PARM );
-      d_utscm( nset, &cm_time[set] CURRTASK_PARM CURR_DB_PARM );
-   }
-   if ( db_tssets )
-      d_utscs( nset, &cs_time[set] CURRTASK_PARM CURR_DB_PARM );
-#endif
    return( db_status = S_OKAY );
 }
 
index 00c456540b3337e9099248666c06b895b07fc2bb..f728d25f03e05ac08b636bd87e60c2d77740e821 100644 (file)
 #include "dbtype.h"
 
 
-#ifndef         NO_TIMESTAMP
-/* Test timestamp status of record
-*/
-d_recstat(dba, rts TASK_PARM)
-DB_ADDR dba;
-ULONG   rts;
-TASK_DECL
-{
-   INT rec;
-   char *ptr;
-   ULONG cts, uts;
-
-   DB_ENTER(NO_DB_ID TASK_ID LOCK_SET(RECORD_IO));
-
-   if ((check_dba(dba) != S_OKAY) || (dio_read(dba, (char * *)&ptr, NOPGHOLD) != S_OKAY))
-      RETURN( db_status );
-
-   /* get record id */
-   bytecpy(&rec, ptr, sizeof(INT));
-   if ( rec >= 0 ) {
-      rec &= ~RLBMASK; /* mask off rlb */
-      rec += curr_db_table->rt_offset;
-      if ( record_table[rec].rt_flags & TIMESTAMPED ) {
-        bytecpy(&cts, ptr + RECCRTIME, sizeof(ULONG));
-        if ( cts > rts )
-           db_status = S_DELETED;
-        else {
-           bytecpy(&uts, ptr + RECUPTIME, sizeof(ULONG));
-           if ( uts > rts )
-              db_status = S_UPDATED;
-        }
-      }
-      else
-        dberr(S_TIMESTAMP);
-   }
-   else
-      db_status = S_DELETED;
-
-   RETURN( db_status );
-}
-#endif
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin recstat.c */
index c024ff7c5cc67f52e21f32e613be41ef9f170502..f4933eb52ec5f6ee5572e08baae6e002ef196ce5 100644 (file)
@@ -57,9 +57,6 @@ const char *rec; /* ptr to record area */
 TASK_DECL
 DBN_DECL
 {
-#ifndef         NO_TIMESTAMP
-   ULONG timestamp;
-#endif
    INT  rt;        /* record type */
    char *fptr;     /* field data pointer */
    char ckey[256]; /* current compound key data */
@@ -145,21 +142,8 @@ DBN_DECL
         }
       }
    }
-#ifndef         NO_TIMESTAMP
-   /* check for timestamp */
-   if ( rec_ptr->rt_flags & TIMESTAMPED ) {
-      timestamp = dio_pzgetts(rec_ptr->rt_file);
-      bytecpy( crloc + RECUPTIME, &timestamp, sizeof(LONG));
-   }
-   else
-      timestamp = 0L;
-#endif
    /* write current record to page */
    dio_write(curr_rec, NULL, PGFREE);
-#ifndef         NO_TIMESTAMP
-   if (( db_status == S_OKAY ) && db_tsrecs )
-      cr_time = timestamp;
-#endif
    RETURN( db_status );
 }
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin recwrite.c */
index 5c43cefe5a957b75732849b44f3c1cccd115e347..4bd1c65c75f9939b46135ebd81b4a48b328bf0ba 100644 (file)
@@ -65,10 +65,6 @@ TASK_DECL
    DB_ENTER(NO_DB_ID TASK_ID LOCK_SET(SET_NOIO));
 
    cs = 2*size_st + 1;
-#ifndef         NO_TIMESTAMP
-   if ( db_tsrecs ) cs *= 2;
-   if ( db_tssets ) cs += size_st;
-#endif
    *currbuff = (DB_ADDR *)ALLOC(NULL, cs*sizeof(DB_ADDR), "currbuff");
    if ( *currbuff == NULL ) RETURN( dberr(S_NOMEMORY) );
    *currsize = cs * sizeof(DB_ADDR);
@@ -86,16 +82,6 @@ TASK_DECL
    *(cb_ptr = *currbuff) = curr_rec;
    bytecpy(++cb_ptr, curr_own, size_st*sizeof(*cb_ptr));
    bytecpy(cb_ptr += size_st, curr_mem, size_st*sizeof(*cb_ptr));
-#ifndef         NO_TIMESTAMP
-   if ( db_tsrecs ) {
-      *(cb_ptr += size_st) = cr_time;
-      bytecpy(++cb_ptr, co_time, size_st*sizeof(*cb_ptr));
-      bytecpy(cb_ptr += size_st, cm_time, size_st*sizeof(*cb_ptr));
-   }
-   if ( db_tssets ) {
-      bytecpy(cb_ptr + size_st, cs_time, size_st*sizeof(*cb_ptr));
-   }
-#endif
    MEM_UNLOCK(currbuff);
    RETURN( db_status = S_OKAY );
 }
@@ -117,16 +103,6 @@ TASK_DECL
       curr_rec = *cb_ptr;
       bytecpy(curr_own, ++cb_ptr, size_st*sizeof(*cb_ptr));
       bytecpy(curr_mem, cb_ptr += size_st, size_st*sizeof(*cb_ptr));
-#ifndef         NO_TIMESTAMP
-      if ( db_tsrecs ) {
-        cr_time = *(cb_ptr += size_st);
-        bytecpy(co_time, ++cb_ptr, size_st*sizeof(*cb_ptr));
-        bytecpy(cm_time, cb_ptr += size_st, size_st*sizeof(*cb_ptr));
-      }
-      if ( db_tssets ) {
-        bytecpy(cs_time, cb_ptr + size_st, size_st*sizeof(*cb_ptr));
-      }
-#endif
    }
    free(currbuff);
    RETURN( db_status = S_OKAY );
index 5c2a09cd7a7753a9a42311e386758624c43d0e3f..6143647ca5c24826bba363a6a56a79ac60094512 100644 (file)
@@ -74,16 +74,6 @@ DBN_DECL    /* database number */
       
    curr_own[seto] = curr_mem[setm];
    curr_mem[seto] = NULL_DBA;
-#ifndef         NO_TIMESTAMP
-   /* set timestamps */
-   if ( db_tsrecs ) {
-      co_time[seto] = cm_time[setm];
-      cm_time[seto] = 0L;
-   }
-   if ( db_tssets ) {
-      d_utscs( nseto, &cs_time[seto] TASK_PARM DBN_PARM );
-   }
-#endif
    RETURN( db_status );
 }
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin setom.c */
index bc89b1a0fef7a3d2c91b68356295b4f41ece8ca1..c9b7cc7d6ed9fc1c92f87af0a819a82baed30e74 100644 (file)
@@ -74,16 +74,6 @@ DBN_DECL    /* database number */
 
    curr_own[sett] = curr_own[sets];
    curr_mem[sett] = NULL_DBA;
-#ifndef         NO_TIMESTAMP
-   /* set timestamps */
-   if ( db_tsrecs ) {
-      co_time[sett] = co_time[sets];
-      cm_time[sett] = 0L;
-   }
-   if ( db_tssets ) {
-      d_utscs( nsett, &cs_time[sett] TASK_PARM DBN_PARM );
-   }
-#endif
    RETURN( db_status = S_OKAY );
 }
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin setoo.c */
index ec2cc7d22442ad4f5de28bd17370ca15688dd930..cac310551e3e5f652ab4491b3e7ee881f97f146b 100644 (file)
@@ -72,16 +72,6 @@ DBN_DECL   /* database number */
       
    curr_own[set] = curr_rec;
    curr_mem[set] = NULL_DBA;
-#ifndef         NO_TIMESTAMP
-   /* set timestamps */
-   if ( db_tsrecs ) {
-      co_time[set] = cr_time;
-      cm_time[set] = 0L;
-   }
-   if ( db_tssets ) {
-      d_utscs( nset, &cs_time[set] TASK_PARM DBN_PARM );
-   }
-#endif
    RETURN( db_status );
 }
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin setor.c */
index c133e7f7b10f1d6a14ec725cd102c1b8acafa286..ff01448b3c2bd8a85d5a14fc5aba57fe8eaf45cf 100644 (file)
@@ -66,11 +66,6 @@ DBN_DECL   /* database number */
       RETURN( dberr( S_NOCM ) );
 
    curr_rec = curr_mem[set];
-#ifndef         NO_TIMESTAMP
-   /* set timestamp */
-   if ( db_tsrecs )
-      cr_time = cm_time[set];
-#endif
    RETURN( db_status = S_OKAY );
 }
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin setrm.c */
index 899c28b34863a3dcb8ddb51f6e8226fabcc5ef33..a32e23e4b2fee40723eb244ffe96021851d4cf17 100644 (file)
@@ -66,11 +66,6 @@ DBN_DECL   /* database number */
       RETURN( dberr( S_NOCO ) );
 
    curr_rec = curr_own[set];
-#ifndef         NO_TIMESTAMP
-   /* set timestamp */
-   if ( db_tsrecs )
-      cr_time = co_time[set];
-#endif
    RETURN( db_status = S_OKAY );
 }
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin setro.c */
index 69c182a0f60c91d3dc9b9df6c6609345474646ba..69939426f2f7f01fc096de733e40e330696e01a2 100644 (file)
 #include "dbtype.h"
 
 
-#ifndef         NO_TIMESTAMP
-/* Set timestamp of current member
-*/
-d_stscm(set, timestamp TASK_PARM DBN_PARM)
-int set;
-ULONG timestamp;
-TASK_DECL
-DBN_DECL
-{
-   SET_ENTRY *set_ptr;
-
-   DB_ENTER(DB_ID TASK_ID LOCK_SET(SET_NOIO));
-
-   if (nset_check(set, &set, (SET_ENTRY * *)&set_ptr) != S_OKAY)
-      RETURN( db_status );
-
-   /* make sure we have a current member */
-   if ( curr_mem[set] ) {
-      if ( db_tsrecs )
-        cm_time[set] = timestamp;
-      else
-        dberr(S_TIMESTAMP);
-   }
-   else
-      dberr(S_NOCM);
-
-   RETURN( db_status );
-}
-#endif
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin stscm.c */
index 077ba6c4358593e458d35a8606d948658ed163e2..36837a8bc21cec39d097aea786263cc0ca7bfd3b 100644 (file)
 #include "dbtype.h"
 
 
-#ifndef         NO_TIMESTAMP
-/* Set timestamp of current owner
-*/
-d_stsco(set, timestamp TASK_PARM DBN_PARM)
-int set;
-ULONG timestamp;
-TASK_DECL
-DBN_DECL
-{
-   SET_ENTRY *set_ptr;
-
-   DB_ENTER(DB_ID TASK_ID LOCK_SET(SET_NOIO));
-
-   if (nset_check(set, &set, (SET_ENTRY * *)&set_ptr) != S_OKAY)
-      RETURN( db_status );
-
-   /* make sure we have a current owner */
-   if ( curr_own[set] ) {
-      if ( db_tsrecs )
-        co_time[set] = timestamp;
-      else
-        dberr(S_TIMESTAMP);
-   }
-   else
-      dberr(S_NOCO);
-
-   RETURN( db_status );
-}
-#endif
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin stsco.c */
index 3c8dd8a56ddeae8e85fe39a167e142ebaea7333e..669841c4d9c7198010fc5769cb9415cdf74c5fc7 100644 (file)
 #include "dbtype.h"
 
 
-#ifndef         NO_TIMESTAMP
-/* Set timestamp of current record
-*/
-d_stscr(timestamp TASK_PARM)
-ULONG timestamp;
-TASK_DECL
-{
-   DB_ENTER(NO_DB_ID TASK_ID LOCK_SET(RECORD_NOIO));
-
-   db_status = S_OKAY;
-
-   /* make sure we have a current record */
-   if ( curr_rec ) {
-      if ( db_tsrecs )
-        cr_time = timestamp;
-      else
-        dberr(S_TIMESTAMP);
-   }
-   else
-      dberr(S_NOCR);
-
-   RETURN( db_status );
-}
-#endif
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin stscr.c */
index 57176f7d61a6a3223928ea34a29a9a1a4b075b1f..a1b59f56e4d13af91ac58bc2fb8704d4ec7e59d5 100644 (file)
 #include "dbtype.h"
 
 
-#ifndef         NO_TIMESTAMP
-/* Set timestamp of set
-*/
-d_stscs(set, timestamp TASK_PARM DBN_PARM)
-int set;
-ULONG timestamp;
-TASK_DECL
-DBN_DECL
-{
-   SET_ENTRY *set_ptr;
-
-   DB_ENTER(DB_ID TASK_ID LOCK_SET(SET_NOIO));
-
-   if (nset_check(set, &set, (SET_ENTRY * *)&set_ptr) != S_OKAY)
-      RETURN( db_status );
-
-   /* make sure we have a current owner */
-   if ( curr_own[set] ) {
-      if ( db_tssets )
-        cs_time[set] = timestamp;
-      else
-        dberr(S_TIMESTAMP);
-   }
-   else
-      dberr(S_NOCO);
-
-   RETURN( db_status );
-}
-#endif
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin stscs.c */
index 9d7e3b707043c6815f0d7cbf8f3c0f5bd370bda6..de5990963d08330a154df38bf3c29ca3580ed324 100644 (file)
@@ -263,18 +263,12 @@ int EXTERNAL_DBN   dt_cmstat(P1(int) TASK_Di DBN_Dn);             /* cmstat.c */
 int EXTERNAL_DBN   dt_cmtype(P1(int) Pi(int *) TASK_Di DBN_Dn); 
                                                                /* cmtype.c */
 int EXTERNAL_DBN   dt_connect(P1(int) TASK_Di DBN_Dn);         /* connect.c */
-#ifndef NO_TIMESTAMP
-int EXTERNAL_DBN   dt_costat(P1(int) TASK_Di DBN_Dn);          /* costat.c */
-#endif
 int EXTERNAL_DBN   dt_cotype(P1(int) Pi(int *) TASK_Di DBN_Dn); 
                                                                /* cotype.c */
 int EXTERNAL_DBN   dt_crget(P1(DB_ADDR *) TASK_Di DBN_Dn);     /* crget.c */
 int EXTERNAL_DBN   dt_crread(P1(long) Pi(char *) TASK_Di DBN_Dn);
                                                                /* crread.c */
 int EXTERNAL_DBN   dt_crset(P1(DB_ADDR *) TASK_Di DBN_Dn);     /* crset.c */
-#ifndef NO_TIMESTAMP
-int EXTERNAL_FIXED dt_crstat(TASK_D1);                         /* crstat.c */
-#endif
 int EXTERNAL_DBN   dt_crtype(P1(int *) TASK_Di DBN_Dn);        /* crtype.c */
 int EXTERNAL_DBN   dt_crwrite(P1(long) Pi(char *) TASK_Di DBN_Dn); 
                                                                /* crwrite.c */
@@ -294,14 +288,6 @@ int EXTERNAL_DBN   dt_csoset(P1(int) Pi(DB_ADDR *) TASK_Di DBN_Dn);
                                                                /* csoset.c */
 int EXTERNAL_DBN   dt_csowrite(P1(int) Pi(long) Pi(const char *) TASK_Di 
                                  DBN_Dn);                      /* csowrite.c */
-#ifndef NO_TIMESTAMP
-int EXTERNAL_DBN   dt_csstat(P1(int) TASK_Di DBN_Dn);          /* csstat.c */
-int EXTERNAL_DBN   dt_ctscm(P1(int) Pi(ULONG *) TASK_Di DBN_Dn); 
-                                                               /* ctscm.c */
-int EXTERNAL_DBN   dt_ctsco(P1(int) Pi(ULONG *) TASK_Di DBN_Dn); 
-                                                               /* ctsco.c */
-int EXTERNAL_FIXED dt_ctscr(P1(ULONG *) TASK_Di );             /* ctscr.c */
-#endif
 #ifndef NO_COUNTRY
 int EXTERNAL_FIXED dt_ctbpath(P1(const char *) TASK_Di);       /* pathfcns.c */
 #endif
@@ -323,15 +309,6 @@ int EXTERNAL_DBN   dt_findlm(P1(int) TASK_Di DBN_Dn);              /* findlm.c */
 int EXTERNAL_DBN   dt_findnm(P1(int) TASK_Di DBN_Dn);          /* findnm.c */
 int EXTERNAL_DBN   dt_findpm(P1(int) TASK_Di DBN_Dn);          /* findpm.c */
 int EXTERNAL_FIXED dt_freeall(TASK_D1);                                /* dblfcns.c */
-#ifndef NO_TIMESTAMP
-int EXTERNAL_DBN   dt_gtscm(P1(int) Pi(ULONG *) TASK_Di DBN_Dn); 
-                                                               /* gtscm.c */
-int EXTERNAL_DBN   dt_gtsco(P1(int) Pi(ULONG *) TASK_Di DBN_Dn); 
-                                                               /* gtsco.c */
-int EXTERNAL_FIXED dt_gtscr(P1(ULONG *) TASK_Di );             /* gtscr.c */
-int EXTERNAL_DBN   dt_gtscs(P1(int) Pi(ULONG *) TASK_Di DBN_Dn); 
-                                                               /* gtscs.c */
-#endif
 int EXTERNAL_DBN   dt_initialize(TASK_D1 DBN_Dn);              /* initial.c */
 int EXTERNAL_DBN   dt_initfile(P1(FILE_NO) TASK_Di DBN_Dn);    /* initial.c */
 int EXTERNAL_DBN   dt_ismember(P1(int) TASK_Di DBN_Dn);                /* ismember.c */
@@ -377,9 +354,6 @@ int EXTERNAL_DBN   dt_reclstat(P1(int) Pi(char *) TASK_Di DBN_Dn);
 int EXTERNAL_FIXED dt_recover(P1(const char *) TASK_Di );      /* recover.c */
 int EXTERNAL_DBN   dt_recread(P1(char *) TASK_Di DBN_Dn);      /* recread.c */
 int EXTERNAL_DBN   dt_recset(P1(int) TASK_Di DBN_Dn);          /* recset.c */
-#ifndef NO_TIMESTAMP
-int EXTERNAL_FIXED dt_recstat(P1(DB_ADDR) Pi(ULONG) TASK_Di ); /* recstat.c */
-#endif
 int EXTERNAL_DBN   dt_recwrite(P1(const char *) TASK_Di DBN_Dn); 
                                                                /* recwrite.c */
 int EXTERNAL_FIXED dt_renfile(P1(const char *) Pi(FILE_NO) 
@@ -405,25 +379,10 @@ int EXTERNAL_DBN   dt_setoo(P1(int) Pi(int) TASK_Di DBN_Dn);      /* setoo.c */
 int EXTERNAL_DBN   dt_setor(P1(int) TASK_Di DBN_Dn);           /* setor.c */
 int EXTERNAL_DBN   dt_setrm(P1(int) TASK_Di DBN_Dn);           /* setrm.c */
 int EXTERNAL_DBN   dt_setro(P1(int) TASK_Di DBN_Dn);           /* setro.c */
-#ifndef NO_TIMESTAMP
-int EXTERNAL_DBN   dt_stscm(P1(int) Pi(ULONG) TASK_Di DBN_Dn);         /* stscm.c */
-int EXTERNAL_DBN   dt_stsco(P1(int) Pi(ULONG) TASK_Di DBN_Dn);         /* stsco.c */
-int EXTERNAL_FIXED dt_stscr(P1(ULONG) TASK_Di );               /* stscr.c */
-int EXTERNAL_DBN   dt_stscs(P1(int) Pi(ULONG) TASK_Di DBN_Dn);         /* stscs.c */
-#endif
 int EXTERNAL_FIXED dt_timeout(P1(int) TASK_Di );               /* dblfcns.c */
 int EXTERNAL_FIXED dt_trabort(TASK_D1);                                /* dblfcns.c */
 int EXTERNAL_FIXED dt_trbegin(P1(const char *) TASK_Di);       /* dblfcns.c */
 int EXTERNAL_FIXED dt_trend(TASK_D1);                          /* dblfcns.c */
-#ifndef NO_TIMESTAMP
-int EXTERNAL_DBN   dt_utscm(P1(int) Pi(ULONG *) TASK_Di DBN_Dn); 
-                                                               /* utscm.c */
-int EXTERNAL_DBN   dt_utsco(P1(int) Pi(ULONG *) TASK_Di DBN_Dn); 
-                                                               /* utsco.c */
-int EXTERNAL_FIXED dt_utscr(P1(ULONG *) TASK_Di );             /* utscr.c */
-int EXTERNAL_DBN   dt_utscs(P1(int) Pi(ULONG *) TASK_Di DBN_Dn); 
-                                                               /* utscs.c */
-#endif
 
 #ifndef NO_DT_COVER
 
@@ -449,22 +408,10 @@ int EXTERNAL_DBN   dt_utscs(P1(int) Pi(ULONG *) TASK_Di DBN_Dn);
 #define d_trbegin(a)                 dt_trbegin(a CURRTASK_PARM)
 #define d_trend()                    dt_trend(CURRTASK_ONLY)
 #define d_wrcurr(a)                  dt_wrcurr(a CURRTASK_PARM)
-#ifndef NO_TIMESTAMP
-#define d_crstat()                   dt_crstat(CURRTASK_ONLY)
-#define d_gtscr(a)                   dt_gtscr(a CURRTASK_PARM)
-#define d_recstat(a, b)              dt_recstat(a, b CURRTASK_PARM)
-#define d_rlbclr()                   dt_rlbclr(CURRTASK_ONLY)
-#define d_rlbset()                   dt_rlbset(CURRTASK_ONLY)
-#define d_rlbtst()                   dt_rlbtst(CURRTASK_ONLY)
-#define d_utscr(a)                   dt_utscr(a CURRTASK_PARM)
-#endif
 
 #define d_cmstat(a DBN_PARM)         dt_cmstat(a CURRTASK_PARM DBN_PARM)
 #define d_cmtype(a, b DBN_PARM)      dt_cmtype(a, b CURRTASK_PARM DBN_PARM)
 #define d_connect(a DBN_PARM)        dt_connect(a CURRTASK_PARM DBN_PARM)
-#ifndef NO_TIMESTAMP
-#define d_costat(a DBN_PARM)         dt_costat(a CURRTASK_PARM DBN_PARM)
-#endif
 #define d_cotype(a, b DBN_PARM)      dt_cotype(a, b CURRTASK_PARM DBN_PARM)
 #define d_crget(a DBN_PARM)          dt_crget(a CURRTASK_PARM DBN_PARM)
 #define d_crread(a, b DBN_PARM)      dt_crread(a, b CURRTASK_PARM DBN_PARM)
@@ -479,12 +426,6 @@ int EXTERNAL_DBN   dt_utscs(P1(int) Pi(ULONG *) TASK_Di DBN_Dn);
 #define d_csoread(a, b, c DBN_PARM)  dt_csoread(a, b, c CURRTASK_PARM DBN_PARM)
 #define d_csoset(a, b DBN_PARM)      dt_csoset(a, b CURRTASK_PARM DBN_PARM)
 #define d_csowrite(a, b, c DBN_PARM) dt_csowrite(a, b, c CURRTASK_PARM DBN_PARM)
-#ifndef NO_TIMESTAMP
-#define d_csstat(a DBN_PARM)         dt_csstat(a CURRTASK_PARM DBN_PARM)
-#define d_ctscm(a, b DBN_PARM)       dt_ctscm(a, b CURRTASK_PARM DBN_PARM)
-#define d_ctsco(a, b DBN_PARM)       dt_ctsco(a, b CURRTASK_PARM DBN_PARM)
-#define d_ctscr(a DBN_PARM)          dt_ctscr(a CURRTASK_PARM)
-#endif
 #define d_delete(DBN_PARM)           dt_delete(CURRTASK_ONLY DBN_PARM)
 #define d_disdel(DBN_PARM)           dt_disdel(CURRTASK_ONLY DBN_PARM)
 #define d_recnext(DBN_PARM)          dt_recnext(CURRTASK_ONLY DBN_PARM)
@@ -496,11 +437,6 @@ int EXTERNAL_DBN   dt_utscs(P1(int) Pi(ULONG *) TASK_Di DBN_Dn);
 #define d_findlm(a DBN_PARM)         dt_findlm(a CURRTASK_PARM DBN_PARM)
 #define d_findnm(a DBN_PARM)         dt_findnm(a CURRTASK_PARM DBN_PARM)
 #define d_findpm(a DBN_PARM)         dt_findpm(a CURRTASK_PARM DBN_PARM)
-#ifndef NO_TIMESTAMP
-#define d_gtscm(a, b DBN_PARM)       dt_gtscm(a, b CURRTASK_PARM DBN_PARM)
-#define d_gtsco(a, b DBN_PARM)       dt_gtsco(a, b CURRTASK_PARM DBN_PARM)
-#define d_gtscs(a, b DBN_PARM)       dt_gtscs(a, b CURRTASK_PARM DBN_PARM)
-#endif
 #define d_initialize(DBN_PARM)       dt_initialize(CURRTASK_ONLY DBN_PARM)
 #define d_initfile(a DBN_PARM)       dt_initfile(a CURRTASK_PARM DBN_PARM)
 #define d_ismember(a DBN_PARM)       dt_ismember(a CURRTASK_PARM DBN_PARM)
@@ -540,17 +476,6 @@ int EXTERNAL_DBN   dt_utscs(P1(int) Pi(ULONG *) TASK_Di DBN_Dn);
 #define d_setor(a DBN_PARM)          dt_setor(a CURRTASK_PARM DBN_PARM)
 #define d_setrm(a DBN_PARM)          dt_setrm(a CURRTASK_PARM DBN_PARM)
 #define d_setro(a DBN_PARM)          dt_setro(a CURRTASK_PARM DBN_PARM)
-#ifndef NO_TIMESTAMP
-#define d_stscm(a, b DBN_PARM)       dt_stscm(a, b CURRTASK_PARM DBN_PARM)
-#define d_stsco(a, b DBN_PARM)       dt_stsco(a, b CURRTASK_PARM DBN_PARM)
-#define d_stscr(a DBN_PARM)          dt_stscr(a CURRTASK_PARM DBN_PARM)
-#define d_stscs(a, b DBN_PARM)       dt_stscs(a, b CURRTASK_PARM DBN_PARM)
-#endif
-#ifndef NO_TIMESTAMP
-#define d_utscm(a, b DBN_PARM)       dt_utscm(a, b CURRTASK_PARM DBN_PARM)
-#define d_utsco(a, b DBN_PARM)       dt_utsco(a, b CURRTASK_PARM DBN_PARM)
-#define d_utscs(a, b DBN_PARM)       dt_utscs(a, b CURRTASK_PARM DBN_PARM)
-#endif
 
 #endif /* NO_DT_COVER */
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC task.h */
index 8c49b401d6781babac5cf5f824d357c25b981340..b0228405019f57b4536dd64770d7ff8cb5528c8d 100644 (file)
 #include "dbtype.h"
 
 
-#ifndef         NO_TIMESTAMP
-/* Get update timestamp of current member
-*/
-d_utscm(set, timestamp TASK_PARM DBN_PARM)
-int set;
-ULONG *timestamp;
-TASK_DECL
-DBN_DECL
-{
-   INT rec;
-   char *rptr;
-   SET_ENTRY *set_ptr;
-
-   DB_ENTER(DB_ID TASK_ID LOCK_SET(SET_IO));
-
-   if (nset_check(set, &set, (SET_ENTRY * *)&set_ptr) != S_OKAY)
-      RETURN( db_status );
-
-   /* make sure we have a current member */
-   if ( ! curr_mem[set] )
-      RETURN( dberr(S_NOCM) );
-
-   /* read current member */
-   if ( dio_read( curr_mem[set], (char * *)&rptr , NOPGHOLD) != S_OKAY )
-      RETURN( db_status );
-
-   /* get record id */
-   bytecpy(&rec, rptr, sizeof(INT));
-   if ( rec >= 0 ) {
-      rec &= ~RLBMASK; /* mask off rlb */
-      rec += curr_db_table->rt_offset;
-      if ( record_table[rec].rt_flags & TIMESTAMPED )
-        bytecpy(timestamp, rptr + RECUPTIME, sizeof(ULONG));
-      else
-        *timestamp = 0L;
-      db_status = S_OKAY;
-   }
-   else
-      db_status = S_DELETED;
-
-   RETURN( db_status = S_OKAY );
-}
-#endif
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin utscm.c */
index 977e4b584c8119d023ed880c8c206cbefcfb71f1..576e0e0f9ae8a5289bb2df1cd3937474e5c90503 100644 (file)
 #include "dbtype.h"
 
 
-#ifndef         NO_TIMESTAMP
-/* Get update timestamp of current owner
-*/
-d_utsco(set, timestamp TASK_PARM DBN_PARM)
-int set;
-ULONG *timestamp;
-TASK_DECL
-DBN_DECL
-{
-   INT rec;
-   char *rptr;
-   SET_ENTRY *set_ptr;
-
-   DB_ENTER(DB_ID TASK_ID LOCK_SET(SET_IO));
-
-   if (nset_check(set, &set, (SET_ENTRY * *)&set_ptr) != S_OKAY)
-      RETURN( db_status );
-
-   /* make sure we have a current owner */
-   if ( ! curr_own[set] )
-      RETURN( dberr(S_NOCO) );
-
-   /* read current owner */
-   if ( dio_read( curr_own[set], (char * *)&rptr , NOPGHOLD) != S_OKAY )
-      RETURN( db_status );
-
-   /* get record id */
-   bytecpy(&rec, rptr, sizeof(INT));
-   if ( rec >= 0 ) {
-      rec &= ~RLBMASK; /* mask off rlb */
-      rec += curr_db_table->rt_offset;
-      if ( record_table[rec].rt_flags & TIMESTAMPED )
-        bytecpy(timestamp, rptr + RECUPTIME, sizeof(ULONG));
-      else
-        *timestamp = 0L;
-      db_status = S_OKAY;
-   }
-   else
-      db_status = S_DELETED;
-
-   RETURN( db_status );
-}
-#endif
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin utsco.c */
index 3b84f7ce495520f740cf923f889a1b16cad526d1..df0a515d32234cece72166f527d27fc0cdea93a0 100644 (file)
 #include "dbtype.h"
 
 
-#ifndef         NO_TIMESTAMP
-/* Get update timestamp of current record
-*/
-d_utscr(timestamp TASK_PARM)
-ULONG *timestamp;
-TASK_DECL
-{
-   INT rec;
-   int dbopen_sv;
-
-   DB_ENTER(NO_DB_ID TASK_ID LOCK_SET(RECORD_IO));
-
-   /* make sure we have a current record */
-   if ( ! curr_rec )
-      RETURN( dberr(S_NOCR) );
-
-   /* set up to allow unlocked read access */
-   dbopen_sv = dbopen;
-   dbopen = 2;
-   /* read current record */
-   if ( dio_read( curr_rec, (char * *)&crloc , NOPGHOLD) != S_OKAY )
-      RETURN( db_status );
-   dbopen = dbopen_sv;
-
-   /* get record id */
-   bytecpy(&rec, crloc, sizeof(INT));
-   if ( rec >= 0 ) {
-      rec &= ~RLBMASK; /* mask off rlb */
-      rec += curr_db_table->rt_offset;
-      if ( record_table[rec].rt_flags & TIMESTAMPED )
-        bytecpy(timestamp, crloc + RECUPTIME, sizeof(ULONG));
-      else
-        *timestamp = 0L;
-      db_status = S_OKAY;
-   }
-   else
-      db_status = S_DELETED;
-
-   RETURN( db_status );
-}
-#endif
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin utscr.c */
index 7c0d7931c38eb612799e5a300baa255392ffab32..6542c30e42bbcc85cd0b9d299975556918a82a9f 100644 (file)
 #include "dbtype.h"
 
 
-#ifndef         NO_TIMESTAMP
-/* Get update timestamp of set
-*/
-d_utscs(set, timestamp TASK_PARM DBN_PARM)
-int set;
-ULONG *timestamp;
-TASK_DECL
-DBN_DECL
-{
-   INT rec;
-   char *rptr;
-   SET_ENTRY *set_ptr;
-
-   DB_ENTER(DB_ID TASK_ID LOCK_SET(SET_IO));
-
-   if (nset_check(set, &set, (SET_ENTRY * *)&set_ptr) != S_OKAY)
-      RETURN( db_status );
-
-   /* make sure we have a current owner */
-   if ( ! curr_own[set] )
-      RETURN( dberr(S_NOCO) );
-
-   /* read current owner */
-   if ( dio_read( curr_own[set], (char * *)&rptr , NOPGHOLD) != S_OKAY )
-      RETURN( db_status );
-
-   /* get record id to ensure record not deleted */
-   bytecpy(&rec, rptr, sizeof(INT));
-   if ( rec >= 0 ) {
-      if (set_ptr->st_flags & TIMESTAMPED) {
-        bytecpy(timestamp, rptr + set_ptr->st_own_ptr + SP_UTIME, sizeof(ULONG));
-      }
-      else
-        *timestamp = 0L;
-
-      db_status = S_OKAY;
-   }
-   else
-      db_status = S_DELETED;
-
-   RETURN( db_status );
-}
-#endif
 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin utscs.c */