home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c004 / 1.ddi / CTTEST.C < prev    next >
Encoding:
C/C++ Source or Header  |  1989-04-18  |  7.0 KB  |  303 lines
  1. /*
  2.  *    c-tree(R) setup test program
  3.  *
  4.  *    This program is the CONFIDENTIAL and PROPRIETARY property 
  5.  *    of FairCom(R) Corporation. Any unauthorized use, reproduction or
  6.  *    transfer of this program is strictly prohibited.
  7.  *
  8.  *      Copyright (c) 1986, 1987, 1988, 1989 FairCom Corporation
  9.  *    (Subject to limited distribution and
  10.  *     restricted disclosure only.)
  11.  *    *** ALL RIGHTS RESERVED ***
  12.  *
  13.  *    4006 West Broadway
  14.  *    Columbia, MO 65203
  15.  *
  16.  *
  17.  *    c-tree(R)    Version 4.3
  18.  *            Release C
  19.  *            February 7, 1989 17:30
  20.  *
  21.  */
  22.  
  23. #include "ctstdr.h"
  24. #include "ctoptn.h"
  25.  
  26. #define CTF    " 1 3 "
  27. #define S377    "'\\377'"
  28.  
  29. typedef struct {
  30.     TEXT    mb1;
  31.     } MB;
  32.  
  33. TEXT getbuf[128];
  34. TEXT *align[5] = {
  35.     "strange: call FairCom (314) 445-6833",
  36.     "byte",
  37.     "word (2 bytes)",
  38.     "strange: call FairCom (314) 445-6833",
  39.     "double word (4 bytes)"
  40.     };
  41.  
  42. main ()
  43. {
  44.     TEXT   buffer[8];
  45.     TEXT   t255,*tp;
  46.     COUNT  i,done,d[4],afactor;
  47.     UCOUNT tu;
  48.  
  49.     TEXT *th,*tl;
  50.     MB    mb[2];
  51.     struct {
  52.         POINTER    pa1;
  53.         TEXT    pa2;
  54.         POINTER    pp;
  55.         POINTER    pa3;
  56.         POINTER    pa4;
  57.     } p;
  58.     struct {
  59.         POINTER ca1;
  60.         TEXT    ca2;
  61.         COUNT    cc;
  62.     } c;
  63.     struct {
  64.         POINTER aa1;
  65.         TEXT    aa2;
  66.         TEXT    aa[3];
  67.     } a;
  68.     struct {
  69.         POINTER sa1;
  70.         TEXT    sa2;
  71.         struct {
  72.             POINTER    sa3;
  73.             TEXT    sa4;
  74.         } ss;
  75.     } s;
  76.     struct {
  77.         POINTER ta1;
  78.         TEXT    ta2;
  79.         TEXT    tt;
  80.     } t;
  81.  
  82.  
  83.     if (sizeof(COUNT) != 2 || sizeof(UCOUNT) != 2 || sizeof(POINTER) !=4) {
  84.         printf(
  85. "\n\nBefore continuing with CTTEST be sure that the following types are");
  86.         printf(
  87.   "\ncorrectly sized. Make the necessary changes in CTPORT.H.\n\n");
  88.         printf("              COUNT     UCOUNT    POINTER\n");
  89.         printf("              -------   -------   -------\n");
  90.         printf("  Should be:  2 bytes   2 bytes   4 bytes\n");
  91.         printf("Actual size:  %d         %d         %d\n\n",
  92.             sizeof(COUNT),sizeof(UCOUNT),sizeof(POINTER));
  93.         exit(0);
  94.     } else {
  95.         printf("\n\nCOUNT, UCOUNT & POINTER are properly sized.");
  96.         tu = 40000;
  97.         if (!(tu > 0)) {
  98.             printf(
  99. "\n\nBefore continuing with CTTEST, be sure that UCOUNT and VRLEN are");
  100.             printf("\nunsigned short integers. See CTPORT.H\n\n");
  101.             exit(0);
  102.         }
  103.     }
  104.     if (sizeof(VRLEN) > sizeof(int)) {
  105.         printf("\n\nVRLEN cannot be larger than an integer.");
  106.         printf("\nDefine VRLEN the same way as UCOUNT.\n");
  107.         exit(0);
  108.     }
  109.  
  110.     t255 = '\377';
  111.     printf("\n\nC255 Test for CTCMPL.H:");
  112.     printf("\n\tUse the following setup in CTCMPL.H - \t#define C255\t");
  113.     if (t255 == -1)
  114.         printf("%d",t255);
  115.     else
  116.         printf(S377);
  117.     printf("\n\t\t\t    Current setting - \t#define C255\t");
  118.     if (C255 == 0x00ff)
  119.         printf(S377);
  120.     if (C255 == -1)
  121.         printf("%d",C255);
  122.  
  123.     i  = 0x0201;
  124.     tp = (TEXT *) &i;
  125.     printf("\n\nLOW HIGH Test for CTOPTN.H:");
  126.     printf("\n\tUse the following setup in CTOPTN.H - \t#define ");
  127.     if ((*tp & 0x00ff) > (*(tp + 1) & 0x00ff))
  128.         printf("HIGH_LOW");
  129.     else
  130.         printf("LOW_HIGH");
  131.     printf("\n\t\t\t    Current setting - \t#define ");
  132. #ifdef LOW_HIGH
  133.     printf("LOW_HIGH");
  134. #endif
  135. #ifdef HIGH_LOW
  136.     printf("HIGH_LOW");
  137. #endif
  138.  
  139.     /* NULL size test */
  140.     printf("\nNULL Size Test: ");
  141.     if (sizeof(NULL) == sizeof(tp))
  142.         printf("ok (%d bytes)",sizeof(NULL));
  143.     else
  144.         printf("inconsistent (NULL is %d bytes & ptr's are %d bytes)",
  145.             sizeof(NULL),sizeof(tp));
  146.  
  147.  
  148.     /* test of compar function for byte-wise comparisons */
  149.     for (i = 0; i < 4; i++) {
  150.         buffer[i]   = 'A';
  151.         buffer[i+4] = '\377';
  152.     }
  153.     tp   = buffer;
  154. #ifdef DS
  155.     done = ((COUNT) *tp & 0x00ff) - ((COUNT) *(tp + 4) & 0x00ff);
  156. #else
  157.     done = (*tp & 0x00ff) - (*(tp + 4) & 0x00ff);
  158. #endif
  159.     if (done >= 0) {
  160.         printf(
  161. "\n\n\nBefore continuing with CTTEST, call FairCom (314) 445-6833 concerning");
  162.         printf(
  163. "\nthe critical compar function in CTCOMP.C. Please report the following");
  164.         printf(
  165. "\nthree numbers to FairCom: %d %d %d\n",(*tp & 0x00ff),(*(tp + 4) & 0x00ff),
  166.             done);
  167.         exit(0);
  168.     } else
  169.         printf("\n\ncompar function (CTCOMP.C) test is successful.");
  170.  
  171.     /* PAUSE IN OUTPUT */
  172.     printf("\n\nHit RETURN (or ENTER) to continue...");
  173.     gets(getbuf);
  174.  
  175.  
  176.     printf("\n\nAlignment test for help in computing key segment offsets.");
  177.  
  178.     th = (TEXT *) &p.pa4;
  179.     tl = (TEXT *) &p.pa3;
  180.     i  = th - tl;
  181.     if (i == 1) {
  182.         printf(
  183. "\n\n*** This machine addresses 32 bit words (not bytes). Call        ***");
  184.         printf(
  185.   "\n*** FairCom at (314) 445-6833. STATUS & HDRSIZ must be changed.  ***");
  186.         afactor = 4;
  187.     } else if (i == 2) {
  188.         printf(
  189. "\n\n*** This machine addresses words (not bytes). Add 2 to STATUS in ***");
  190.         printf(
  191.   "\n*** CTOPTN.H and add 4 to HDRSIZ in CTOPTN.H. Also each member   ***");
  192.         printf(
  193.   "\n*** of a structure will be at least word aligned. In particular,");
  194.         afactor = 2;
  195.     } else
  196.         afactor = 1;
  197.  
  198.     printf("  Members of\nstructures will be aligned as follows:\n\n");
  199.     printf("\tMember Type      Alignment\n");
  200.     printf("\t-----------      -----------------\n"); 
  201.  
  202.     th = (TEXT *) &p.pp;
  203.     tl =          &p.pa2;
  204.     i  = (th - tl) * afactor;
  205.     if (i > 4) i = 0;
  206.     printf("\t4 byte int       %s\n",align[i]);
  207.  
  208.     th = (TEXT *) &c.cc;
  209.     tl =          &c.ca2;
  210.     i  = (th - tl) * afactor;
  211.     if (i > 4) i = 0;
  212.     printf("\t2 byte int       %s\n",align[i]);
  213.  
  214.     th = (TEXT *) &s.ss;
  215.     tl =          &s.sa2;
  216.     i  = (th - tl) * afactor;
  217.     if (i > 4) i = 0;
  218.     printf("\tstructure        %s\n",align[i]);
  219.  
  220.     th = (TEXT *)  a.aa;
  221.     tl =          &a.aa2;
  222.     i  = (th - tl) * afactor;
  223.     if (i > 4) i = 0;
  224.     printf("\tchar array       %s\n",align[i]);
  225.  
  226.     th = &t.tt;
  227.     tl = &t.ta2;
  228.     i  = (th - tl) * afactor;
  229.     if (i > 4) i = 0;
  230.     printf("\tchar             %s\n",align[i]);
  231.  
  232.     printf("\n\nStructure 'sizeof' Test: ");
  233.     i = sizeof(MB);
  234.     th = &mb[1].mb1;
  235.     tl = &mb[0].mb1;
  236.     if (i == (th - tl))
  237.         printf(" OK");
  238.     else
  239.         printf(
  240. "\nCall FairCom at (314) 445-6833 to report these two numbers: %d %d\n",
  241.             i, (th - tl));
  242.  
  243.     printf("\n\nShort Integer Input Test for CTOPTN.H:");
  244.  
  245.     done = NO;
  246.     d[1] = d[3] = 5;
  247.     if (sscanf(CTF,"%h %h",d,d+2) == 2 &&
  248.         d[0] == 1 && d[2] == 3 && d[1] == 5 && d[3] == 5) {
  249.         printf(
  250. "\n\tUse the PERC_H option in CTOPTN.H.\n");
  251.         done = YES;
  252.     }
  253.     if (!done) {
  254.         d[1] = d[3] = 5;
  255.         if (sscanf(CTF,"%d %d",d,d+2) == 2 &&
  256.             d[0] == 1 && d[2] == 3 && d[1] == 5 && d[3] == 5) {
  257.             printf(
  258. "\n\tUse the PERC_D option in CTOPTN.H.\n");
  259.             done = YES;
  260.         }
  261.     }
  262.     if (!done) {
  263.         d[1] = d[3] = 5;
  264.         if (sscanf(CTF,"%hd %hd",d,d+2) == 2 &&
  265.             d[0] == 1 && d[2] == 3 && d[1] == 5 && d[3] == 5) {
  266.             printf(
  267. "\n\tUse the PERC_HD option in CTOPTN.H.\n");
  268.             done = YES;
  269.         }
  270.     }
  271.     if (!done)
  272.         printf(
  273. "\n\n*** COMPILER DOES NOT CONFORM TO KNOWN CONVENTIONS ***\n");
  274.  
  275.     printf("\tCurrent setting - ");
  276. #ifdef PERC_H
  277.     printf("PERC_H");
  278. #endif
  279. #ifdef PERC_D
  280.     printf("PERC_D");
  281. #endif
  282. #ifdef PERC_HD
  283.     printf("PERC_HD");
  284. #endif
  285.  
  286. #ifdef RTREE
  287.     printf("\n\nr-tree SUPPORT IS ENABLED.");
  288. #else
  289.     printf("\n\nr-tree SUPPORT IS DISABLED.");
  290. #endif
  291.  
  292.  
  293. #ifdef CTSERVER
  294.     printf("\n\nc-tree BACKGROUND SERVER IS ENABLED.");
  295. #else
  296.     printf("\nc-tree BACKGROUND SERVER IS DISABLED.");
  297. #endif
  298.  
  299.     printf("\nEnd Of CTTEST\n");
  300.     exit(0);
  301. }
  302.  
  303.