home *** CD-ROM | disk | FTP | other *** search
/ NeXTSTEP 3.3 (Developer) / NeXT_Developer-3.3.iso / NextDeveloper / Examples / DatabaseKit / Binder / BinderHandler.m < prev    next >
Encoding:
Text File  |  1993-07-14  |  6.1 KB  |  244 lines
  1. /* BinderHanlder.m:
  2.  * You may freely copy, distribute, and reuse the code in this example.
  3.  * NeXT disclaims any warranty of any kind, expressed or  implied, as to its
  4.  * fitness for any particular use.
  5.  *
  6.  * Written by: Mai Nguyen, NeXT Developer Support
  7.  *
  8.  *
  9.  */
  10.  
  11. #import "BinderHandler.h"
  12. #import <appkit/appkit.h>
  13. #import <dbkit/dbkit.h>
  14. #import <libc.h>
  15.  
  16.     /* Define localized strings */
  17. #define FAILURE NXLocalizedString("Failure:", NULL, "Message given to user when an operation has failed.")
  18. #define CANNOT_CONNECT NXLocalizedString("Couldn't connect to database", NULL, "Message given to user to explain what fails. ")
  19. #define OK NXLocalizedString("OK", NULL, "Okay to continue ")
  20. #define NO_BINDER_OBJECT NXLocalizedString("Binder object not properly allocated", NULL, "Message given to user about a system problem.")
  21.  
  22.     /* Global to be used by Author object */
  23. static id myHandler;
  24. @implementation BinderHandler
  25.  
  26. - appDidInit:sender
  27. {
  28.     /* Connect to the Sybase Adaptor */
  29.     if ( myDatabase == nil ) {
  30.         myDatabase = [[DBDatabase alloc]init];
  31.         [myDatabase connectUsingAdaptor:"SybaseAdaptor"
  32.                                  andString:"sa@SYBASE/pubs"];
  33.         }
  34.     
  35.         /* TESTING */
  36.     if (![myDatabase isConnected]) {
  37.         NXRunAlertPanel(FAILURE, CANNOT_CONNECT,OK, NULL, NULL);
  38.         return self;
  39.         }
  40.     [myDatabase setDelegate:self];
  41.     authorEntity = [myDatabase entityNamed:"authors"];
  42.  
  43.     myHandler = self;
  44.  
  45.       return self;
  46. }
  47.  
  48. /* Stuff the binder with attributes from the authors table
  49.  */
  50. - initBinder
  51. {
  52.     
  53.     authorPrototype = [[Author alloc]init];
  54.     propertyList = [[List alloc] init];
  55.     containerList = [[List alloc] init];
  56.     myBinder = [[DBBinder alloc] init];
  57.     
  58.     [myBinder setDatabase:myDatabase];
  59.     [myBinder setProperties:propertyList];
  60.     [myBinder setRecordPrototype:authorPrototype];
  61.  
  62.     [myBinder associateRecordIvar:"first"
  63.         withProperty: [[DBExpression alloc] initForEntity:authorEntity
  64.                                             fromDescription:"au_fname"]];
  65.       [myBinder associateRecordIvar:"last" 
  66.         withProperty: [[DBExpression alloc] initForEntity:authorEntity
  67.                                             fromDescription:"au_lname"]];
  68.     [myBinder associateRecordIvar:"address"
  69.         withProperty:[[DBExpression alloc] initForEntity:authorEntity
  70.                                             fromDescription:"address"]];
  71.     [myBinder associateRecordIvar:"state"
  72.         withProperty:[[DBExpression alloc] initForEntity:authorEntity
  73.                                             fromDescription:"state"]];
  74.     [myBinder associateRecordIvar:"zip"
  75.         withProperty:[[DBExpression alloc] initForEntity:authorEntity
  76.                                             fromDescription:"zip"]];
  77.     [myBinder associateRecordIvar:"phone"
  78.         withProperty:[[DBExpression alloc] initForEntity:authorEntity
  79.                                             fromDescription:"phone"]];
  80.      
  81.     return self;
  82. }
  83.  
  84.  
  85. - free
  86. {    
  87.     if (authorPrototype)
  88.         [authorPrototype free];
  89.     if (propertyList)
  90.         [propertyList free];
  91.     if (containerList)
  92.         [containerList free];
  93.     if (myBinder)
  94.         [myBinder free];
  95.  
  96.     return [super free];
  97. }
  98.         
  99. - showAllRecords:sender
  100. {
  101.     [self initBinder];
  102.     [self findAllRecords];
  103.  
  104.     return self;
  105. }
  106.  
  107.  
  108. - findAllRecords
  109. {
  110.     int  recordCount;
  111.     
  112.     if ( myBinder == nil )    {
  113.         NXRunAlertPanel(FAILURE, NO_BINDER_OBJECT,
  114.             "Binder object not properly allocated",
  115.                 "OK", NULL, NULL);
  116.         return self;
  117.     }
  118.         
  119.     [myBinder setContainer:containerList];        
  120.     [myBinder select];
  121.     
  122.      recordCount = [containerList count];
  123.     sprintf(buf, "\n------------------------\n");
  124.     [self appendToText:buf];
  125.     sprintf(buf, "%s\t%d\n", "Total Number of Records:", recordCount);
  126.     [self appendToText:buf];
  127.       [containerList makeObjectsPerform:@selector(printSelf)];
  128.         /* Make the input field first responder */
  129.     [lastNameField selectText:0];
  130.     return self;
  131. }
  132.  
  133.  
  134. /* Build a simple SQL query with DBQualifier and retrieve the data via the
  135.  * binder object.
  136.  */
  137. - findByName:sender
  138. {
  139.     const char * name;
  140.     id             aProp;
  141.     id             theQualifier;
  142.     
  143.     name = [lastNameField stringValue];
  144.     
  145.     aProp = [[DBExpression alloc] initForEntity:authorEntity
  146.                                             fromDescription:"au_lname"];
  147.     theQualifier = [[DBQualifier allocFromZone:[self zone] ] 
  148.         initForEntity:authorEntity
  149.         fromDescription:"%@ LIKE %s", aProp, name];
  150.  
  151.         /* Must allocate a new binder object */    
  152.     [self initBinder];
  153.     [myBinder setQualifier:theQualifier];
  154.     [self findAllRecords];
  155.     [aProp free];
  156.     [theQualifier free];
  157.     return self;
  158. }
  159.  
  160.  
  161. - findByState:sender
  162. {
  163.     const char * state;
  164.     id             aProp;
  165.     id             theQualifier;
  166.         
  167.     
  168.     state = [stateField stringValue];
  169.     
  170.     aProp = [[DBExpression alloc] initForEntity:authorEntity
  171.                                             fromDescription:"state"];
  172.     theQualifier = [[DBQualifier allocFromZone:[self zone] ] 
  173.         initForEntity:authorEntity
  174.         fromDescription:"%@ LIKE %s", aProp, state];
  175.         
  176.         /* Must allocate a new binder object with a different qualifier */
  177.     [self initBinder];
  178.     [myBinder setQualifier:theQualifier];
  179.     [self findAllRecords];
  180.     [aProp free];
  181.     [theQualifier free];
  182.     return self;
  183. }
  184.  
  185.  
  186. /* Appends the string passed to the doc view of the text view
  187.  */
  188. - appendToText:(const char *)newText
  189. {
  190.     int currentLength = [theTextView textLength];
  191.     [theTextView setSel:currentLength :currentLength];
  192.     [theTextView replaceSel:newText];
  193.     [theTextView scrollSelToVisible];
  194.     return self;
  195. }
  196.  
  197.  
  198. /* DBDatabase delegate methods to log error messages and SQL queries */
  199.  
  200. - (BOOL)db:aDb willEvaluateString:(const unsigned char*)aString usingBinder:aBinder
  201. {
  202.     [self appendToText:"\n << SQL Query:\n"];
  203.     [self appendToText:aString];
  204.     [self appendToText:" >> \n"];
  205.     return YES;
  206. }
  207.  
  208. @end
  209.  
  210. @implementation Author
  211.  
  212. /* copyFromZone: is VERY important...this is how the prototype
  213.  *  object is turned into records!
  214.  */
  215.  
  216. - copyFromZone:(NXZone*)z
  217. {
  218.   Author *theCopy = [[Author allocFromZone:z] init];
  219.   theCopy->first = NXCopyStringBufferFromZone(first, z);
  220.   theCopy->last = NXCopyStringBufferFromZone(last, z);
  221.   theCopy->address = NXCopyStringBufferFromZone(address, z);
  222.   theCopy->state = NXCopyStringBufferFromZone(state, z);
  223.   theCopy->zip = NXCopyStringBufferFromZone(zip, z);
  224.   theCopy->phone = NXCopyStringBufferFromZone(phone, z);
  225.   return theCopy;
  226. }
  227.  
  228.  
  229. /* Print data stored in the author object
  230.  */ 
  231. - printSelf
  232. {
  233.  char buf[200];
  234.  
  235.  sprintf(buf, "%s %s\n%s \t%s %s\n%s\n", first, last, address, state, zip,
  236.                                                                       phone);
  237.  if (myHandler != nil)
  238.      [myHandler appendToText: buf];
  239.   return self;
  240. }
  241.  
  242.  
  243. @end
  244.