-
-
Notifications
You must be signed in to change notification settings - Fork 232
/
Copy pathFirebird.pas
17016 lines (15006 loc) · 619 KB
/
Firebird.pas
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
{ This file was autogenerated by cloop - Cross Language Object Oriented Programming }
{$IFDEF FPC}
{$MODE DELPHI}
{$OBJECTCHECKS OFF}
{$ENDIF}
unit Firebird;
interface
uses Classes, SysUtils;
type
{$IFNDEF FPC}
QWord = UInt64;
{$ENDIF}
IVersioned = class;
IReferenceCounted = class;
IDisposable = class;
IStatus = class;
IMaster = class;
IPluginBase = class;
IPluginSet = class;
IConfigEntry = class;
IConfig = class;
IFirebirdConf = class;
IPluginConfig = class;
IPluginFactory = class;
IPluginModule = class;
IPluginManager = class;
ICryptKey = class;
IConfigManager = class;
IEventCallback = class;
IBlob = class;
ITransaction = class;
IMessageMetadata = class;
IMetadataBuilder = class;
IResultSet = class;
IStatement = class;
IBatch = class;
IBatchCompletionState = class;
IReplicator = class;
IRequest = class;
IEvents = class;
IAttachment = class;
IService = class;
IProvider = class;
IDtcStart = class;
IDtc = class;
IAuth = class;
IWriter = class;
IServerBlock = class;
IClientBlock = class;
IServer = class;
IClient = class;
IUserField = class;
ICharUserField = class;
IIntUserField = class;
IUser = class;
IListUsers = class;
ILogonInfo = class;
IManagement = class;
IAuthBlock = class;
IWireCryptPlugin = class;
ICryptKeyCallback = class;
IKeyHolderPlugin = class;
IDbCryptInfo = class;
IDbCryptPlugin = class;
IExternalContext = class;
IExternalResultSet = class;
IExternalFunction = class;
IExternalProcedure = class;
IExternalTrigger = class;
IRoutineMetadata = class;
IExternalEngine = class;
ITimer = class;
ITimerControl = class;
IVersionCallback = class;
IUtil = class;
IOffsetsCallback = class;
IXpbBuilder = class;
ITraceConnection = class;
ITraceDatabaseConnection = class;
ITraceTransaction = class;
ITraceParams = class;
ITraceStatement = class;
ITraceSQLStatement = class;
ITraceBLRStatement = class;
ITraceDYNRequest = class;
ITraceContextVariable = class;
ITraceProcedure = class;
ITraceFunction = class;
ITraceTrigger = class;
ITraceServiceConnection = class;
ITraceStatusVector = class;
ITraceSweepInfo = class;
ITraceLogWriter = class;
ITraceInitInfo = class;
ITracePlugin = class;
ITraceFactory = class;
IUdrFunctionFactory = class;
IUdrProcedureFactory = class;
IUdrTriggerFactory = class;
IUdrPlugin = class;
IDecFloat16 = class;
IDecFloat34 = class;
IInt128 = class;
IReplicatedField = class;
IReplicatedRecord = class;
IReplicatedTransaction = class;
IReplicatedSession = class;
IProfilerPlugin = class;
IProfilerSession = class;
IProfilerStats = class;
FbException = class(Exception)
public
constructor create(status: IStatus); virtual;
destructor Destroy(); override;
function getStatus: IStatus;
class procedure checkException(status: IStatus);
class procedure catchException(status: IStatus; e: Exception);
class procedure setVersionError(status: IStatus; interfaceName: string;
currentVersion, expectedVersion: NativeInt);
private
status: IStatus;
end;
ISC_DATE = Integer;
ISC_TIME = Integer;
ISC_QUAD = array [1..2] of Integer;
FB_DEC16 = array [1..1] of Int64;
FB_DEC34 = array [1..2] of Int64;
FB_I128 = array [1..2] of Int64;
isc_tr_handle = ^Integer;
isc_stmt_handle = ^Integer;
ISC_USHORT = word; { 16 bit unsigned }
ISC_SHORT = smallint; { 16 bit signed }
ISC_TIME_TZ = record
utc_time: ISC_TIME;
time_zone: ISC_USHORT;
end;
ISC_TIME_TZ_EX = record
utc_time: ISC_TIME;
time_zone: ISC_USHORT;
ext_offset: ISC_SHORT;
end;
ISC_TIMESTAMP = record
timestamp_date: ISC_DATE;
timestamp_time: ISC_TIME;
end;
ISC_TIMESTAMP_TZ = record
utc_timestamp: ISC_TIMESTAMP;
time_zone: ISC_USHORT;
end;
ISC_TIMESTAMP_TZ_EX = record
utc_timestamp: ISC_TIMESTAMP;
time_zone: ISC_USHORT;
ext_offset: ISC_SHORT;
end;
ntrace_relation_t = Integer;
TraceCounts = Record
trc_relation_id : ntrace_relation_t;
trc_relation_name : PAnsiChar;
trc_counters : ^Int64;
end;
TraceCountsPtr = ^TraceCounts;
PerformanceInfo = Record
pin_time : Int64;
pin_counters : ^Int64;
pin_count : NativeUInt;
pin_tables : TraceCountsPtr;
pin_records_fetched : Int64;
end;
Dsc = Record
dsc_dtype, dsc_scale: Byte;
dsc_length, dsc_sub_type, dsc_flags: Int16;
dsc_address: ^Byte;
end;
BooleanPtr = ^Boolean;
BytePtr = ^Byte;
CardinalPtr = ^Cardinal;
FB_DEC16Ptr = ^FB_DEC16;
FB_DEC34Ptr = ^FB_DEC34;
FB_I128Ptr = ^FB_I128;
IKeyHolderPluginPtr = ^IKeyHolderPlugin;
ISC_QUADPtr = ^ISC_QUAD;
ISC_TIMESTAMP_TZPtr = ^ISC_TIMESTAMP_TZ;
ISC_TIMESTAMP_TZ_EXPtr = ^ISC_TIMESTAMP_TZ_EX;
ISC_TIME_TZPtr = ^ISC_TIME_TZ;
ISC_TIME_TZ_EXPtr = ^ISC_TIME_TZ_EX;
Int64Ptr = ^Int64;
IntegerPtr = ^Integer;
NativeIntPtr = ^NativeInt;
PerformanceInfoPtr = ^PerformanceInfo;
dscPtr = ^dsc;
IReferenceCounted_addRefPtr = procedure(this: IReferenceCounted); cdecl;
IReferenceCounted_releasePtr = function(this: IReferenceCounted): Integer; cdecl;
IDisposable_disposePtr = procedure(this: IDisposable); cdecl;
IStatus_initPtr = procedure(this: IStatus); cdecl;
IStatus_getStatePtr = function(this: IStatus): Cardinal; cdecl;
IStatus_setErrors2Ptr = procedure(this: IStatus; length: Cardinal; value: NativeIntPtr); cdecl;
IStatus_setWarnings2Ptr = procedure(this: IStatus; length: Cardinal; value: NativeIntPtr); cdecl;
IStatus_setErrorsPtr = procedure(this: IStatus; value: NativeIntPtr); cdecl;
IStatus_setWarningsPtr = procedure(this: IStatus; value: NativeIntPtr); cdecl;
IStatus_getErrorsPtr = function(this: IStatus): NativeIntPtr; cdecl;
IStatus_getWarningsPtr = function(this: IStatus): NativeIntPtr; cdecl;
IStatus_clonePtr = function(this: IStatus): IStatus; cdecl;
IMaster_getStatusPtr = function(this: IMaster): IStatus; cdecl;
IMaster_getDispatcherPtr = function(this: IMaster): IProvider; cdecl;
IMaster_getPluginManagerPtr = function(this: IMaster): IPluginManager; cdecl;
IMaster_getTimerControlPtr = function(this: IMaster): ITimerControl; cdecl;
IMaster_getDtcPtr = function(this: IMaster): IDtc; cdecl;
IMaster_registerAttachmentPtr = function(this: IMaster; provider: IProvider; attachment: IAttachment): IAttachment; cdecl;
IMaster_registerTransactionPtr = function(this: IMaster; attachment: IAttachment; transaction: ITransaction): ITransaction; cdecl;
IMaster_getMetadataBuilderPtr = function(this: IMaster; status: IStatus; fieldCount: Cardinal): IMetadataBuilder; cdecl;
IMaster_serverModePtr = function(this: IMaster; mode: Integer): Integer; cdecl;
IMaster_getUtilInterfacePtr = function(this: IMaster): IUtil; cdecl;
IMaster_getConfigManagerPtr = function(this: IMaster): IConfigManager; cdecl;
IMaster_getProcessExitingPtr = function(this: IMaster): Boolean; cdecl;
IPluginBase_setOwnerPtr = procedure(this: IPluginBase; r: IReferenceCounted); cdecl;
IPluginBase_getOwnerPtr = function(this: IPluginBase): IReferenceCounted; cdecl;
IPluginSet_getNamePtr = function(this: IPluginSet): PAnsiChar; cdecl;
IPluginSet_getModuleNamePtr = function(this: IPluginSet): PAnsiChar; cdecl;
IPluginSet_getPluginPtr = function(this: IPluginSet; status: IStatus): IPluginBase; cdecl;
IPluginSet_nextPtr = procedure(this: IPluginSet; status: IStatus); cdecl;
IPluginSet_set_Ptr = procedure(this: IPluginSet; status: IStatus; s: PAnsiChar); cdecl;
IConfigEntry_getNamePtr = function(this: IConfigEntry): PAnsiChar; cdecl;
IConfigEntry_getValuePtr = function(this: IConfigEntry): PAnsiChar; cdecl;
IConfigEntry_getIntValuePtr = function(this: IConfigEntry): Int64; cdecl;
IConfigEntry_getBoolValuePtr = function(this: IConfigEntry): Boolean; cdecl;
IConfigEntry_getSubConfigPtr = function(this: IConfigEntry; status: IStatus): IConfig; cdecl;
IConfig_findPtr = function(this: IConfig; status: IStatus; name: PAnsiChar): IConfigEntry; cdecl;
IConfig_findValuePtr = function(this: IConfig; status: IStatus; name: PAnsiChar; value: PAnsiChar): IConfigEntry; cdecl;
IConfig_findPosPtr = function(this: IConfig; status: IStatus; name: PAnsiChar; pos: Cardinal): IConfigEntry; cdecl;
IFirebirdConf_getKeyPtr = function(this: IFirebirdConf; name: PAnsiChar): Cardinal; cdecl;
IFirebirdConf_asIntegerPtr = function(this: IFirebirdConf; key: Cardinal): Int64; cdecl;
IFirebirdConf_asStringPtr = function(this: IFirebirdConf; key: Cardinal): PAnsiChar; cdecl;
IFirebirdConf_asBooleanPtr = function(this: IFirebirdConf; key: Cardinal): Boolean; cdecl;
IFirebirdConf_getVersionPtr = function(this: IFirebirdConf; status: IStatus): Cardinal; cdecl;
IPluginConfig_getConfigFileNamePtr = function(this: IPluginConfig): PAnsiChar; cdecl;
IPluginConfig_getDefaultConfigPtr = function(this: IPluginConfig; status: IStatus): IConfig; cdecl;
IPluginConfig_getFirebirdConfPtr = function(this: IPluginConfig; status: IStatus): IFirebirdConf; cdecl;
IPluginConfig_setReleaseDelayPtr = procedure(this: IPluginConfig; status: IStatus; microSeconds: QWord); cdecl;
IPluginFactory_createPluginPtr = function(this: IPluginFactory; status: IStatus; factoryParameter: IPluginConfig): IPluginBase; cdecl;
IPluginModule_doCleanPtr = procedure(this: IPluginModule); cdecl;
IPluginModule_threadDetachPtr = procedure(this: IPluginModule); cdecl;
IPluginManager_registerPluginFactoryPtr = procedure(this: IPluginManager; pluginType: Cardinal; defaultName: PAnsiChar; factory: IPluginFactory); cdecl;
IPluginManager_registerModulePtr = procedure(this: IPluginManager; cleanup: IPluginModule); cdecl;
IPluginManager_unregisterModulePtr = procedure(this: IPluginManager; cleanup: IPluginModule); cdecl;
IPluginManager_getPluginsPtr = function(this: IPluginManager; status: IStatus; pluginType: Cardinal; namesList: PAnsiChar; firebirdConf: IFirebirdConf): IPluginSet; cdecl;
IPluginManager_getConfigPtr = function(this: IPluginManager; status: IStatus; filename: PAnsiChar): IConfig; cdecl;
IPluginManager_releasePluginPtr = procedure(this: IPluginManager; plugin: IPluginBase); cdecl;
ICryptKey_setSymmetricPtr = procedure(this: ICryptKey; status: IStatus; type_: PAnsiChar; keyLength: Cardinal; key: Pointer); cdecl;
ICryptKey_setAsymmetricPtr = procedure(this: ICryptKey; status: IStatus; type_: PAnsiChar; encryptKeyLength: Cardinal; encryptKey: Pointer; decryptKeyLength: Cardinal; decryptKey: Pointer); cdecl;
ICryptKey_getEncryptKeyPtr = function(this: ICryptKey; length: CardinalPtr): Pointer; cdecl;
ICryptKey_getDecryptKeyPtr = function(this: ICryptKey; length: CardinalPtr): Pointer; cdecl;
IConfigManager_getDirectoryPtr = function(this: IConfigManager; code: Cardinal): PAnsiChar; cdecl;
IConfigManager_getFirebirdConfPtr = function(this: IConfigManager): IFirebirdConf; cdecl;
IConfigManager_getDatabaseConfPtr = function(this: IConfigManager; dbName: PAnsiChar): IFirebirdConf; cdecl;
IConfigManager_getPluginConfigPtr = function(this: IConfigManager; configuredPlugin: PAnsiChar): IConfig; cdecl;
IConfigManager_getInstallDirectoryPtr = function(this: IConfigManager): PAnsiChar; cdecl;
IConfigManager_getRootDirectoryPtr = function(this: IConfigManager): PAnsiChar; cdecl;
IConfigManager_getDefaultSecurityDbPtr = function(this: IConfigManager): PAnsiChar; cdecl;
IEventCallback_eventCallbackFunctionPtr = procedure(this: IEventCallback; length: Cardinal; events: BytePtr); cdecl;
IBlob_getInfoPtr = procedure(this: IBlob; status: IStatus; itemsLength: Cardinal; items: BytePtr; bufferLength: Cardinal; buffer: BytePtr); cdecl;
IBlob_getSegmentPtr = function(this: IBlob; status: IStatus; bufferLength: Cardinal; buffer: Pointer; segmentLength: CardinalPtr): Integer; cdecl;
IBlob_putSegmentPtr = procedure(this: IBlob; status: IStatus; length: Cardinal; buffer: Pointer); cdecl;
IBlob_deprecatedCancelPtr = procedure(this: IBlob; status: IStatus); cdecl;
IBlob_deprecatedClosePtr = procedure(this: IBlob; status: IStatus); cdecl;
IBlob_seekPtr = function(this: IBlob; status: IStatus; mode: Integer; offset: Integer): Integer; cdecl;
IBlob_cancelPtr = procedure(this: IBlob; status: IStatus); cdecl;
IBlob_closePtr = procedure(this: IBlob; status: IStatus); cdecl;
ITransaction_getInfoPtr = procedure(this: ITransaction; status: IStatus; itemsLength: Cardinal; items: BytePtr; bufferLength: Cardinal; buffer: BytePtr); cdecl;
ITransaction_preparePtr = procedure(this: ITransaction; status: IStatus; msgLength: Cardinal; message: BytePtr); cdecl;
ITransaction_deprecatedCommitPtr = procedure(this: ITransaction; status: IStatus); cdecl;
ITransaction_commitRetainingPtr = procedure(this: ITransaction; status: IStatus); cdecl;
ITransaction_deprecatedRollbackPtr = procedure(this: ITransaction; status: IStatus); cdecl;
ITransaction_rollbackRetainingPtr = procedure(this: ITransaction; status: IStatus); cdecl;
ITransaction_deprecatedDisconnectPtr = procedure(this: ITransaction; status: IStatus); cdecl;
ITransaction_joinPtr = function(this: ITransaction; status: IStatus; transaction: ITransaction): ITransaction; cdecl;
ITransaction_validatePtr = function(this: ITransaction; status: IStatus; attachment: IAttachment): ITransaction; cdecl;
ITransaction_enterDtcPtr = function(this: ITransaction; status: IStatus): ITransaction; cdecl;
ITransaction_commitPtr = procedure(this: ITransaction; status: IStatus); cdecl;
ITransaction_rollbackPtr = procedure(this: ITransaction; status: IStatus); cdecl;
ITransaction_disconnectPtr = procedure(this: ITransaction; status: IStatus); cdecl;
IMessageMetadata_getCountPtr = function(this: IMessageMetadata; status: IStatus): Cardinal; cdecl;
IMessageMetadata_getFieldPtr = function(this: IMessageMetadata; status: IStatus; index: Cardinal): PAnsiChar; cdecl;
IMessageMetadata_getRelationPtr = function(this: IMessageMetadata; status: IStatus; index: Cardinal): PAnsiChar; cdecl;
IMessageMetadata_getOwnerPtr = function(this: IMessageMetadata; status: IStatus; index: Cardinal): PAnsiChar; cdecl;
IMessageMetadata_getAliasPtr = function(this: IMessageMetadata; status: IStatus; index: Cardinal): PAnsiChar; cdecl;
IMessageMetadata_getTypePtr = function(this: IMessageMetadata; status: IStatus; index: Cardinal): Cardinal; cdecl;
IMessageMetadata_isNullablePtr = function(this: IMessageMetadata; status: IStatus; index: Cardinal): Boolean; cdecl;
IMessageMetadata_getSubTypePtr = function(this: IMessageMetadata; status: IStatus; index: Cardinal): Integer; cdecl;
IMessageMetadata_getLengthPtr = function(this: IMessageMetadata; status: IStatus; index: Cardinal): Cardinal; cdecl;
IMessageMetadata_getScalePtr = function(this: IMessageMetadata; status: IStatus; index: Cardinal): Integer; cdecl;
IMessageMetadata_getCharSetPtr = function(this: IMessageMetadata; status: IStatus; index: Cardinal): Cardinal; cdecl;
IMessageMetadata_getOffsetPtr = function(this: IMessageMetadata; status: IStatus; index: Cardinal): Cardinal; cdecl;
IMessageMetadata_getNullOffsetPtr = function(this: IMessageMetadata; status: IStatus; index: Cardinal): Cardinal; cdecl;
IMessageMetadata_getBuilderPtr = function(this: IMessageMetadata; status: IStatus): IMetadataBuilder; cdecl;
IMessageMetadata_getMessageLengthPtr = function(this: IMessageMetadata; status: IStatus): Cardinal; cdecl;
IMessageMetadata_getAlignmentPtr = function(this: IMessageMetadata; status: IStatus): Cardinal; cdecl;
IMessageMetadata_getAlignedLengthPtr = function(this: IMessageMetadata; status: IStatus): Cardinal; cdecl;
IMetadataBuilder_setTypePtr = procedure(this: IMetadataBuilder; status: IStatus; index: Cardinal; type_: Cardinal); cdecl;
IMetadataBuilder_setSubTypePtr = procedure(this: IMetadataBuilder; status: IStatus; index: Cardinal; subType: Integer); cdecl;
IMetadataBuilder_setLengthPtr = procedure(this: IMetadataBuilder; status: IStatus; index: Cardinal; length: Cardinal); cdecl;
IMetadataBuilder_setCharSetPtr = procedure(this: IMetadataBuilder; status: IStatus; index: Cardinal; charSet: Cardinal); cdecl;
IMetadataBuilder_setScalePtr = procedure(this: IMetadataBuilder; status: IStatus; index: Cardinal; scale: Integer); cdecl;
IMetadataBuilder_truncatePtr = procedure(this: IMetadataBuilder; status: IStatus; count: Cardinal); cdecl;
IMetadataBuilder_moveNameToIndexPtr = procedure(this: IMetadataBuilder; status: IStatus; name: PAnsiChar; index: Cardinal); cdecl;
IMetadataBuilder_removePtr = procedure(this: IMetadataBuilder; status: IStatus; index: Cardinal); cdecl;
IMetadataBuilder_addFieldPtr = function(this: IMetadataBuilder; status: IStatus): Cardinal; cdecl;
IMetadataBuilder_getMetadataPtr = function(this: IMetadataBuilder; status: IStatus): IMessageMetadata; cdecl;
IMetadataBuilder_setFieldPtr = procedure(this: IMetadataBuilder; status: IStatus; index: Cardinal; field: PAnsiChar); cdecl;
IMetadataBuilder_setRelationPtr = procedure(this: IMetadataBuilder; status: IStatus; index: Cardinal; relation: PAnsiChar); cdecl;
IMetadataBuilder_setOwnerPtr = procedure(this: IMetadataBuilder; status: IStatus; index: Cardinal; owner: PAnsiChar); cdecl;
IMetadataBuilder_setAliasPtr = procedure(this: IMetadataBuilder; status: IStatus; index: Cardinal; alias: PAnsiChar); cdecl;
IResultSet_fetchNextPtr = function(this: IResultSet; status: IStatus; message: Pointer): Integer; cdecl;
IResultSet_fetchPriorPtr = function(this: IResultSet; status: IStatus; message: Pointer): Integer; cdecl;
IResultSet_fetchFirstPtr = function(this: IResultSet; status: IStatus; message: Pointer): Integer; cdecl;
IResultSet_fetchLastPtr = function(this: IResultSet; status: IStatus; message: Pointer): Integer; cdecl;
IResultSet_fetchAbsolutePtr = function(this: IResultSet; status: IStatus; position: Integer; message: Pointer): Integer; cdecl;
IResultSet_fetchRelativePtr = function(this: IResultSet; status: IStatus; offset: Integer; message: Pointer): Integer; cdecl;
IResultSet_isEofPtr = function(this: IResultSet; status: IStatus): Boolean; cdecl;
IResultSet_isBofPtr = function(this: IResultSet; status: IStatus): Boolean; cdecl;
IResultSet_getMetadataPtr = function(this: IResultSet; status: IStatus): IMessageMetadata; cdecl;
IResultSet_deprecatedClosePtr = procedure(this: IResultSet; status: IStatus); cdecl;
IResultSet_setDelayedOutputFormatPtr = procedure(this: IResultSet; status: IStatus; format: IMessageMetadata); cdecl;
IResultSet_closePtr = procedure(this: IResultSet; status: IStatus); cdecl;
IResultSet_getInfoPtr = procedure(this: IResultSet; status: IStatus; itemsLength: Cardinal; items: BytePtr; bufferLength: Cardinal; buffer: BytePtr); cdecl;
IStatement_getInfoPtr = procedure(this: IStatement; status: IStatus; itemsLength: Cardinal; items: BytePtr; bufferLength: Cardinal; buffer: BytePtr); cdecl;
IStatement_getTypePtr = function(this: IStatement; status: IStatus): Cardinal; cdecl;
IStatement_getPlanPtr = function(this: IStatement; status: IStatus; detailed: Boolean): PAnsiChar; cdecl;
IStatement_getAffectedRecordsPtr = function(this: IStatement; status: IStatus): QWord; cdecl;
IStatement_getInputMetadataPtr = function(this: IStatement; status: IStatus): IMessageMetadata; cdecl;
IStatement_getOutputMetadataPtr = function(this: IStatement; status: IStatus): IMessageMetadata; cdecl;
IStatement_executePtr = function(this: IStatement; status: IStatus; transaction: ITransaction; inMetadata: IMessageMetadata; inBuffer: Pointer; outMetadata: IMessageMetadata; outBuffer: Pointer): ITransaction; cdecl;
IStatement_openCursorPtr = function(this: IStatement; status: IStatus; transaction: ITransaction; inMetadata: IMessageMetadata; inBuffer: Pointer; outMetadata: IMessageMetadata; flags: Cardinal): IResultSet; cdecl;
IStatement_setCursorNamePtr = procedure(this: IStatement; status: IStatus; name: PAnsiChar); cdecl;
IStatement_deprecatedFreePtr = procedure(this: IStatement; status: IStatus); cdecl;
IStatement_getFlagsPtr = function(this: IStatement; status: IStatus): Cardinal; cdecl;
IStatement_getTimeoutPtr = function(this: IStatement; status: IStatus): Cardinal; cdecl;
IStatement_setTimeoutPtr = procedure(this: IStatement; status: IStatus; timeOut: Cardinal); cdecl;
IStatement_createBatchPtr = function(this: IStatement; status: IStatus; inMetadata: IMessageMetadata; parLength: Cardinal; par: BytePtr): IBatch; cdecl;
IStatement_freePtr = procedure(this: IStatement; status: IStatus); cdecl;
IBatch_addPtr = procedure(this: IBatch; status: IStatus; count: Cardinal; inBuffer: Pointer); cdecl;
IBatch_addBlobPtr = procedure(this: IBatch; status: IStatus; length: Cardinal; inBuffer: Pointer; blobId: ISC_QUADPtr; parLength: Cardinal; par: BytePtr); cdecl;
IBatch_appendBlobDataPtr = procedure(this: IBatch; status: IStatus; length: Cardinal; inBuffer: Pointer); cdecl;
IBatch_addBlobStreamPtr = procedure(this: IBatch; status: IStatus; length: Cardinal; inBuffer: Pointer); cdecl;
IBatch_registerBlobPtr = procedure(this: IBatch; status: IStatus; existingBlob: ISC_QUADPtr; blobId: ISC_QUADPtr); cdecl;
IBatch_executePtr = function(this: IBatch; status: IStatus; transaction: ITransaction): IBatchCompletionState; cdecl;
IBatch_cancelPtr = procedure(this: IBatch; status: IStatus); cdecl;
IBatch_getBlobAlignmentPtr = function(this: IBatch; status: IStatus): Cardinal; cdecl;
IBatch_getMetadataPtr = function(this: IBatch; status: IStatus): IMessageMetadata; cdecl;
IBatch_setDefaultBpbPtr = procedure(this: IBatch; status: IStatus; parLength: Cardinal; par: BytePtr); cdecl;
IBatch_deprecatedClosePtr = procedure(this: IBatch; status: IStatus); cdecl;
IBatch_closePtr = procedure(this: IBatch; status: IStatus); cdecl;
IBatch_getInfoPtr = procedure(this: IBatch; status: IStatus; itemsLength: Cardinal; items: BytePtr; bufferLength: Cardinal; buffer: BytePtr); cdecl;
IBatchCompletionState_getSizePtr = function(this: IBatchCompletionState; status: IStatus): Cardinal; cdecl;
IBatchCompletionState_getStatePtr = function(this: IBatchCompletionState; status: IStatus; pos: Cardinal): Integer; cdecl;
IBatchCompletionState_findErrorPtr = function(this: IBatchCompletionState; status: IStatus; pos: Cardinal): Cardinal; cdecl;
IBatchCompletionState_getStatusPtr = procedure(this: IBatchCompletionState; status: IStatus; to_: IStatus; pos: Cardinal); cdecl;
IReplicator_processPtr = procedure(this: IReplicator; status: IStatus; length: Cardinal; data: BytePtr); cdecl;
IReplicator_deprecatedClosePtr = procedure(this: IReplicator; status: IStatus); cdecl;
IReplicator_closePtr = procedure(this: IReplicator; status: IStatus); cdecl;
IRequest_receivePtr = procedure(this: IRequest; status: IStatus; level: Integer; msgType: Cardinal; length: Cardinal; message: Pointer); cdecl;
IRequest_sendPtr = procedure(this: IRequest; status: IStatus; level: Integer; msgType: Cardinal; length: Cardinal; message: Pointer); cdecl;
IRequest_getInfoPtr = procedure(this: IRequest; status: IStatus; level: Integer; itemsLength: Cardinal; items: BytePtr; bufferLength: Cardinal; buffer: BytePtr); cdecl;
IRequest_startPtr = procedure(this: IRequest; status: IStatus; tra: ITransaction; level: Integer); cdecl;
IRequest_startAndSendPtr = procedure(this: IRequest; status: IStatus; tra: ITransaction; level: Integer; msgType: Cardinal; length: Cardinal; message: Pointer); cdecl;
IRequest_unwindPtr = procedure(this: IRequest; status: IStatus; level: Integer); cdecl;
IRequest_deprecatedFreePtr = procedure(this: IRequest; status: IStatus); cdecl;
IRequest_freePtr = procedure(this: IRequest; status: IStatus); cdecl;
IEvents_deprecatedCancelPtr = procedure(this: IEvents; status: IStatus); cdecl;
IEvents_cancelPtr = procedure(this: IEvents; status: IStatus); cdecl;
IAttachment_getInfoPtr = procedure(this: IAttachment; status: IStatus; itemsLength: Cardinal; items: BytePtr; bufferLength: Cardinal; buffer: BytePtr); cdecl;
IAttachment_startTransactionPtr = function(this: IAttachment; status: IStatus; tpbLength: Cardinal; tpb: BytePtr): ITransaction; cdecl;
IAttachment_reconnectTransactionPtr = function(this: IAttachment; status: IStatus; length: Cardinal; id: BytePtr): ITransaction; cdecl;
IAttachment_compileRequestPtr = function(this: IAttachment; status: IStatus; blrLength: Cardinal; blr: BytePtr): IRequest; cdecl;
IAttachment_transactRequestPtr = procedure(this: IAttachment; status: IStatus; transaction: ITransaction; blrLength: Cardinal; blr: BytePtr; inMsgLength: Cardinal; inMsg: BytePtr; outMsgLength: Cardinal; outMsg: BytePtr); cdecl;
IAttachment_createBlobPtr = function(this: IAttachment; status: IStatus; transaction: ITransaction; id: ISC_QUADPtr; bpbLength: Cardinal; bpb: BytePtr): IBlob; cdecl;
IAttachment_openBlobPtr = function(this: IAttachment; status: IStatus; transaction: ITransaction; id: ISC_QUADPtr; bpbLength: Cardinal; bpb: BytePtr): IBlob; cdecl;
IAttachment_getSlicePtr = function(this: IAttachment; status: IStatus; transaction: ITransaction; id: ISC_QUADPtr; sdlLength: Cardinal; sdl: BytePtr; paramLength: Cardinal; param: BytePtr; sliceLength: Integer; slice: BytePtr): Integer; cdecl;
IAttachment_putSlicePtr = procedure(this: IAttachment; status: IStatus; transaction: ITransaction; id: ISC_QUADPtr; sdlLength: Cardinal; sdl: BytePtr; paramLength: Cardinal; param: BytePtr; sliceLength: Integer; slice: BytePtr); cdecl;
IAttachment_executeDynPtr = procedure(this: IAttachment; status: IStatus; transaction: ITransaction; length: Cardinal; dyn: BytePtr); cdecl;
IAttachment_preparePtr = function(this: IAttachment; status: IStatus; tra: ITransaction; stmtLength: Cardinal; sqlStmt: PAnsiChar; dialect: Cardinal; flags: Cardinal): IStatement; cdecl;
IAttachment_executePtr = function(this: IAttachment; status: IStatus; transaction: ITransaction; stmtLength: Cardinal; sqlStmt: PAnsiChar; dialect: Cardinal; inMetadata: IMessageMetadata; inBuffer: Pointer; outMetadata: IMessageMetadata; outBuffer: Pointer): ITransaction; cdecl;
IAttachment_openCursorPtr = function(this: IAttachment; status: IStatus; transaction: ITransaction; stmtLength: Cardinal; sqlStmt: PAnsiChar; dialect: Cardinal; inMetadata: IMessageMetadata; inBuffer: Pointer; outMetadata: IMessageMetadata; cursorName: PAnsiChar; cursorFlags: Cardinal): IResultSet; cdecl;
IAttachment_queEventsPtr = function(this: IAttachment; status: IStatus; callback: IEventCallback; length: Cardinal; events: BytePtr): IEvents; cdecl;
IAttachment_cancelOperationPtr = procedure(this: IAttachment; status: IStatus; option: Integer); cdecl;
IAttachment_pingPtr = procedure(this: IAttachment; status: IStatus); cdecl;
IAttachment_deprecatedDetachPtr = procedure(this: IAttachment; status: IStatus); cdecl;
IAttachment_deprecatedDropDatabasePtr = procedure(this: IAttachment; status: IStatus); cdecl;
IAttachment_getIdleTimeoutPtr = function(this: IAttachment; status: IStatus): Cardinal; cdecl;
IAttachment_setIdleTimeoutPtr = procedure(this: IAttachment; status: IStatus; timeOut: Cardinal); cdecl;
IAttachment_getStatementTimeoutPtr = function(this: IAttachment; status: IStatus): Cardinal; cdecl;
IAttachment_setStatementTimeoutPtr = procedure(this: IAttachment; status: IStatus; timeOut: Cardinal); cdecl;
IAttachment_createBatchPtr = function(this: IAttachment; status: IStatus; transaction: ITransaction; stmtLength: Cardinal; sqlStmt: PAnsiChar; dialect: Cardinal; inMetadata: IMessageMetadata; parLength: Cardinal; par: BytePtr): IBatch; cdecl;
IAttachment_createReplicatorPtr = function(this: IAttachment; status: IStatus): IReplicator; cdecl;
IAttachment_detachPtr = procedure(this: IAttachment; status: IStatus); cdecl;
IAttachment_dropDatabasePtr = procedure(this: IAttachment; status: IStatus); cdecl;
IService_deprecatedDetachPtr = procedure(this: IService; status: IStatus); cdecl;
IService_queryPtr = procedure(this: IService; status: IStatus; sendLength: Cardinal; sendItems: BytePtr; receiveLength: Cardinal; receiveItems: BytePtr; bufferLength: Cardinal; buffer: BytePtr); cdecl;
IService_startPtr = procedure(this: IService; status: IStatus; spbLength: Cardinal; spb: BytePtr); cdecl;
IService_detachPtr = procedure(this: IService; status: IStatus); cdecl;
IService_cancelPtr = procedure(this: IService; status: IStatus); cdecl;
IProvider_attachDatabasePtr = function(this: IProvider; status: IStatus; fileName: PAnsiChar; dpbLength: Cardinal; dpb: BytePtr): IAttachment; cdecl;
IProvider_createDatabasePtr = function(this: IProvider; status: IStatus; fileName: PAnsiChar; dpbLength: Cardinal; dpb: BytePtr): IAttachment; cdecl;
IProvider_attachServiceManagerPtr = function(this: IProvider; status: IStatus; service: PAnsiChar; spbLength: Cardinal; spb: BytePtr): IService; cdecl;
IProvider_shutdownPtr = procedure(this: IProvider; status: IStatus; timeout: Cardinal; reason: Integer); cdecl;
IProvider_setDbCryptCallbackPtr = procedure(this: IProvider; status: IStatus; cryptCallback: ICryptKeyCallback); cdecl;
IDtcStart_addAttachmentPtr = procedure(this: IDtcStart; status: IStatus; att: IAttachment); cdecl;
IDtcStart_addWithTpbPtr = procedure(this: IDtcStart; status: IStatus; att: IAttachment; length: Cardinal; tpb: BytePtr); cdecl;
IDtcStart_startPtr = function(this: IDtcStart; status: IStatus): ITransaction; cdecl;
IDtc_joinPtr = function(this: IDtc; status: IStatus; one: ITransaction; two: ITransaction): ITransaction; cdecl;
IDtc_startBuilderPtr = function(this: IDtc; status: IStatus): IDtcStart; cdecl;
IWriter_resetPtr = procedure(this: IWriter); cdecl;
IWriter_addPtr = procedure(this: IWriter; status: IStatus; name: PAnsiChar); cdecl;
IWriter_setTypePtr = procedure(this: IWriter; status: IStatus; value: PAnsiChar); cdecl;
IWriter_setDbPtr = procedure(this: IWriter; status: IStatus; value: PAnsiChar); cdecl;
IServerBlock_getLoginPtr = function(this: IServerBlock): PAnsiChar; cdecl;
IServerBlock_getDataPtr = function(this: IServerBlock; length: CardinalPtr): BytePtr; cdecl;
IServerBlock_putDataPtr = procedure(this: IServerBlock; status: IStatus; length: Cardinal; data: Pointer); cdecl;
IServerBlock_newKeyPtr = function(this: IServerBlock; status: IStatus): ICryptKey; cdecl;
IClientBlock_getLoginPtr = function(this: IClientBlock): PAnsiChar; cdecl;
IClientBlock_getPasswordPtr = function(this: IClientBlock): PAnsiChar; cdecl;
IClientBlock_getDataPtr = function(this: IClientBlock; length: CardinalPtr): BytePtr; cdecl;
IClientBlock_putDataPtr = procedure(this: IClientBlock; status: IStatus; length: Cardinal; data: Pointer); cdecl;
IClientBlock_newKeyPtr = function(this: IClientBlock; status: IStatus): ICryptKey; cdecl;
IClientBlock_getAuthBlockPtr = function(this: IClientBlock; status: IStatus): IAuthBlock; cdecl;
IServer_authenticatePtr = function(this: IServer; status: IStatus; sBlock: IServerBlock; writerInterface: IWriter): Integer; cdecl;
IServer_setDbCryptCallbackPtr = procedure(this: IServer; status: IStatus; cryptCallback: ICryptKeyCallback); cdecl;
IClient_authenticatePtr = function(this: IClient; status: IStatus; cBlock: IClientBlock): Integer; cdecl;
IUserField_enteredPtr = function(this: IUserField): Integer; cdecl;
IUserField_specifiedPtr = function(this: IUserField): Integer; cdecl;
IUserField_setEnteredPtr = procedure(this: IUserField; status: IStatus; newValue: Integer); cdecl;
ICharUserField_getPtr = function(this: ICharUserField): PAnsiChar; cdecl;
ICharUserField_set_Ptr = procedure(this: ICharUserField; status: IStatus; newValue: PAnsiChar); cdecl;
IIntUserField_getPtr = function(this: IIntUserField): Integer; cdecl;
IIntUserField_set_Ptr = procedure(this: IIntUserField; status: IStatus; newValue: Integer); cdecl;
IUser_operationPtr = function(this: IUser): Cardinal; cdecl;
IUser_userNamePtr = function(this: IUser): ICharUserField; cdecl;
IUser_passwordPtr = function(this: IUser): ICharUserField; cdecl;
IUser_firstNamePtr = function(this: IUser): ICharUserField; cdecl;
IUser_lastNamePtr = function(this: IUser): ICharUserField; cdecl;
IUser_middleNamePtr = function(this: IUser): ICharUserField; cdecl;
IUser_commentPtr = function(this: IUser): ICharUserField; cdecl;
IUser_attributesPtr = function(this: IUser): ICharUserField; cdecl;
IUser_activePtr = function(this: IUser): IIntUserField; cdecl;
IUser_adminPtr = function(this: IUser): IIntUserField; cdecl;
IUser_clearPtr = procedure(this: IUser; status: IStatus); cdecl;
IListUsers_listPtr = procedure(this: IListUsers; status: IStatus; user: IUser); cdecl;
ILogonInfo_namePtr = function(this: ILogonInfo): PAnsiChar; cdecl;
ILogonInfo_rolePtr = function(this: ILogonInfo): PAnsiChar; cdecl;
ILogonInfo_networkProtocolPtr = function(this: ILogonInfo): PAnsiChar; cdecl;
ILogonInfo_remoteAddressPtr = function(this: ILogonInfo): PAnsiChar; cdecl;
ILogonInfo_authBlockPtr = function(this: ILogonInfo; length: CardinalPtr): BytePtr; cdecl;
ILogonInfo_attachmentPtr = function(this: ILogonInfo; status: IStatus): IAttachment; cdecl;
ILogonInfo_transactionPtr = function(this: ILogonInfo; status: IStatus): ITransaction; cdecl;
IManagement_startPtr = procedure(this: IManagement; status: IStatus; logonInfo: ILogonInfo); cdecl;
IManagement_executePtr = function(this: IManagement; status: IStatus; user: IUser; callback: IListUsers): Integer; cdecl;
IManagement_commitPtr = procedure(this: IManagement; status: IStatus); cdecl;
IManagement_rollbackPtr = procedure(this: IManagement; status: IStatus); cdecl;
IAuthBlock_getTypePtr = function(this: IAuthBlock): PAnsiChar; cdecl;
IAuthBlock_getNamePtr = function(this: IAuthBlock): PAnsiChar; cdecl;
IAuthBlock_getPluginPtr = function(this: IAuthBlock): PAnsiChar; cdecl;
IAuthBlock_getSecurityDbPtr = function(this: IAuthBlock): PAnsiChar; cdecl;
IAuthBlock_getOriginalPluginPtr = function(this: IAuthBlock): PAnsiChar; cdecl;
IAuthBlock_nextPtr = function(this: IAuthBlock; status: IStatus): Boolean; cdecl;
IAuthBlock_firstPtr = function(this: IAuthBlock; status: IStatus): Boolean; cdecl;
IWireCryptPlugin_getKnownTypesPtr = function(this: IWireCryptPlugin; status: IStatus): PAnsiChar; cdecl;
IWireCryptPlugin_setKeyPtr = procedure(this: IWireCryptPlugin; status: IStatus; key: ICryptKey); cdecl;
IWireCryptPlugin_encryptPtr = procedure(this: IWireCryptPlugin; status: IStatus; length: Cardinal; from: Pointer; to_: Pointer); cdecl;
IWireCryptPlugin_decryptPtr = procedure(this: IWireCryptPlugin; status: IStatus; length: Cardinal; from: Pointer; to_: Pointer); cdecl;
IWireCryptPlugin_getSpecificDataPtr = function(this: IWireCryptPlugin; status: IStatus; keyType: PAnsiChar; length: CardinalPtr): BytePtr; cdecl;
IWireCryptPlugin_setSpecificDataPtr = procedure(this: IWireCryptPlugin; status: IStatus; keyType: PAnsiChar; length: Cardinal; data: BytePtr); cdecl;
ICryptKeyCallback_callbackPtr = function(this: ICryptKeyCallback; dataLength: Cardinal; data: Pointer; bufferLength: Cardinal; buffer: Pointer): Cardinal; cdecl;
IKeyHolderPlugin_keyCallbackPtr = function(this: IKeyHolderPlugin; status: IStatus; callback: ICryptKeyCallback): Integer; cdecl;
IKeyHolderPlugin_keyHandlePtr = function(this: IKeyHolderPlugin; status: IStatus; keyName: PAnsiChar): ICryptKeyCallback; cdecl;
IKeyHolderPlugin_useOnlyOwnKeysPtr = function(this: IKeyHolderPlugin; status: IStatus): Boolean; cdecl;
IKeyHolderPlugin_chainHandlePtr = function(this: IKeyHolderPlugin; status: IStatus): ICryptKeyCallback; cdecl;
IDbCryptInfo_getDatabaseFullPathPtr = function(this: IDbCryptInfo; status: IStatus): PAnsiChar; cdecl;
IDbCryptPlugin_setKeyPtr = procedure(this: IDbCryptPlugin; status: IStatus; length: Cardinal; sources: IKeyHolderPluginPtr; keyName: PAnsiChar); cdecl;
IDbCryptPlugin_encryptPtr = procedure(this: IDbCryptPlugin; status: IStatus; length: Cardinal; from: Pointer; to_: Pointer); cdecl;
IDbCryptPlugin_decryptPtr = procedure(this: IDbCryptPlugin; status: IStatus; length: Cardinal; from: Pointer; to_: Pointer); cdecl;
IDbCryptPlugin_setInfoPtr = procedure(this: IDbCryptPlugin; status: IStatus; info: IDbCryptInfo); cdecl;
IExternalContext_getMasterPtr = function(this: IExternalContext): IMaster; cdecl;
IExternalContext_getEnginePtr = function(this: IExternalContext; status: IStatus): IExternalEngine; cdecl;
IExternalContext_getAttachmentPtr = function(this: IExternalContext; status: IStatus): IAttachment; cdecl;
IExternalContext_getTransactionPtr = function(this: IExternalContext; status: IStatus): ITransaction; cdecl;
IExternalContext_getUserNamePtr = function(this: IExternalContext): PAnsiChar; cdecl;
IExternalContext_getDatabaseNamePtr = function(this: IExternalContext): PAnsiChar; cdecl;
IExternalContext_getClientCharSetPtr = function(this: IExternalContext): PAnsiChar; cdecl;
IExternalContext_obtainInfoCodePtr = function(this: IExternalContext): Integer; cdecl;
IExternalContext_getInfoPtr = function(this: IExternalContext; code: Integer): Pointer; cdecl;
IExternalContext_setInfoPtr = function(this: IExternalContext; code: Integer; value: Pointer): Pointer; cdecl;
IExternalResultSet_fetchPtr = function(this: IExternalResultSet; status: IStatus): Boolean; cdecl;
IExternalFunction_getCharSetPtr = procedure(this: IExternalFunction; status: IStatus; context: IExternalContext; name: PAnsiChar; nameSize: Cardinal); cdecl;
IExternalFunction_executePtr = procedure(this: IExternalFunction; status: IStatus; context: IExternalContext; inMsg: Pointer; outMsg: Pointer); cdecl;
IExternalProcedure_getCharSetPtr = procedure(this: IExternalProcedure; status: IStatus; context: IExternalContext; name: PAnsiChar; nameSize: Cardinal); cdecl;
IExternalProcedure_openPtr = function(this: IExternalProcedure; status: IStatus; context: IExternalContext; inMsg: Pointer; outMsg: Pointer): IExternalResultSet; cdecl;
IExternalTrigger_getCharSetPtr = procedure(this: IExternalTrigger; status: IStatus; context: IExternalContext; name: PAnsiChar; nameSize: Cardinal); cdecl;
IExternalTrigger_executePtr = procedure(this: IExternalTrigger; status: IStatus; context: IExternalContext; action: Cardinal; oldMsg: Pointer; newMsg: Pointer); cdecl;
IRoutineMetadata_getPackagePtr = function(this: IRoutineMetadata; status: IStatus): PAnsiChar; cdecl;
IRoutineMetadata_getNamePtr = function(this: IRoutineMetadata; status: IStatus): PAnsiChar; cdecl;
IRoutineMetadata_getEntryPointPtr = function(this: IRoutineMetadata; status: IStatus): PAnsiChar; cdecl;
IRoutineMetadata_getBodyPtr = function(this: IRoutineMetadata; status: IStatus): PAnsiChar; cdecl;
IRoutineMetadata_getInputMetadataPtr = function(this: IRoutineMetadata; status: IStatus): IMessageMetadata; cdecl;
IRoutineMetadata_getOutputMetadataPtr = function(this: IRoutineMetadata; status: IStatus): IMessageMetadata; cdecl;
IRoutineMetadata_getTriggerMetadataPtr = function(this: IRoutineMetadata; status: IStatus): IMessageMetadata; cdecl;
IRoutineMetadata_getTriggerTablePtr = function(this: IRoutineMetadata; status: IStatus): PAnsiChar; cdecl;
IRoutineMetadata_getTriggerTypePtr = function(this: IRoutineMetadata; status: IStatus): Cardinal; cdecl;
IExternalEngine_openPtr = procedure(this: IExternalEngine; status: IStatus; context: IExternalContext; charSet: PAnsiChar; charSetSize: Cardinal); cdecl;
IExternalEngine_openAttachmentPtr = procedure(this: IExternalEngine; status: IStatus; context: IExternalContext); cdecl;
IExternalEngine_closeAttachmentPtr = procedure(this: IExternalEngine; status: IStatus; context: IExternalContext); cdecl;
IExternalEngine_makeFunctionPtr = function(this: IExternalEngine; status: IStatus; context: IExternalContext; metadata: IRoutineMetadata; inBuilder: IMetadataBuilder; outBuilder: IMetadataBuilder): IExternalFunction; cdecl;
IExternalEngine_makeProcedurePtr = function(this: IExternalEngine; status: IStatus; context: IExternalContext; metadata: IRoutineMetadata; inBuilder: IMetadataBuilder; outBuilder: IMetadataBuilder): IExternalProcedure; cdecl;
IExternalEngine_makeTriggerPtr = function(this: IExternalEngine; status: IStatus; context: IExternalContext; metadata: IRoutineMetadata; fieldsBuilder: IMetadataBuilder): IExternalTrigger; cdecl;
ITimer_handlerPtr = procedure(this: ITimer); cdecl;
ITimerControl_startPtr = procedure(this: ITimerControl; status: IStatus; timer: ITimer; microSeconds: QWord); cdecl;
ITimerControl_stopPtr = procedure(this: ITimerControl; status: IStatus; timer: ITimer); cdecl;
IVersionCallback_callbackPtr = procedure(this: IVersionCallback; status: IStatus; text: PAnsiChar); cdecl;
IUtil_getFbVersionPtr = procedure(this: IUtil; status: IStatus; att: IAttachment; callback: IVersionCallback); cdecl;
IUtil_loadBlobPtr = procedure(this: IUtil; status: IStatus; blobId: ISC_QUADPtr; att: IAttachment; tra: ITransaction; file_: PAnsiChar; txt: Boolean); cdecl;
IUtil_dumpBlobPtr = procedure(this: IUtil; status: IStatus; blobId: ISC_QUADPtr; att: IAttachment; tra: ITransaction; file_: PAnsiChar; txt: Boolean); cdecl;
IUtil_getPerfCountersPtr = procedure(this: IUtil; status: IStatus; att: IAttachment; countersSet: PAnsiChar; counters: Int64Ptr); cdecl;
IUtil_executeCreateDatabasePtr = function(this: IUtil; status: IStatus; stmtLength: Cardinal; creatDBstatement: PAnsiChar; dialect: Cardinal; stmtIsCreateDb: BooleanPtr): IAttachment; cdecl;
IUtil_decodeDatePtr = procedure(this: IUtil; date: ISC_DATE; year: CardinalPtr; month: CardinalPtr; day: CardinalPtr); cdecl;
IUtil_decodeTimePtr = procedure(this: IUtil; time: ISC_TIME; hours: CardinalPtr; minutes: CardinalPtr; seconds: CardinalPtr; fractions: CardinalPtr); cdecl;
IUtil_encodeDatePtr = function(this: IUtil; year: Cardinal; month: Cardinal; day: Cardinal): ISC_DATE; cdecl;
IUtil_encodeTimePtr = function(this: IUtil; hours: Cardinal; minutes: Cardinal; seconds: Cardinal; fractions: Cardinal): ISC_TIME; cdecl;
IUtil_formatStatusPtr = function(this: IUtil; buffer: PAnsiChar; bufferSize: Cardinal; status: IStatus): Cardinal; cdecl;
IUtil_getClientVersionPtr = function(this: IUtil): Cardinal; cdecl;
IUtil_getXpbBuilderPtr = function(this: IUtil; status: IStatus; kind: Cardinal; buf: BytePtr; len: Cardinal): IXpbBuilder; cdecl;
IUtil_setOffsetsPtr = function(this: IUtil; status: IStatus; metadata: IMessageMetadata; callback: IOffsetsCallback): Cardinal; cdecl;
IUtil_getDecFloat16Ptr = function(this: IUtil; status: IStatus): IDecFloat16; cdecl;
IUtil_getDecFloat34Ptr = function(this: IUtil; status: IStatus): IDecFloat34; cdecl;
IUtil_decodeTimeTzPtr = procedure(this: IUtil; status: IStatus; timeTz: ISC_TIME_TZPtr; hours: CardinalPtr; minutes: CardinalPtr; seconds: CardinalPtr; fractions: CardinalPtr; timeZoneBufferLength: Cardinal; timeZoneBuffer: PAnsiChar); cdecl;
IUtil_decodeTimeStampTzPtr = procedure(this: IUtil; status: IStatus; timeStampTz: ISC_TIMESTAMP_TZPtr; year: CardinalPtr; month: CardinalPtr; day: CardinalPtr; hours: CardinalPtr; minutes: CardinalPtr; seconds: CardinalPtr; fractions: CardinalPtr; timeZoneBufferLength: Cardinal; timeZoneBuffer: PAnsiChar); cdecl;
IUtil_encodeTimeTzPtr = procedure(this: IUtil; status: IStatus; timeTz: ISC_TIME_TZPtr; hours: Cardinal; minutes: Cardinal; seconds: Cardinal; fractions: Cardinal; timeZone: PAnsiChar); cdecl;
IUtil_encodeTimeStampTzPtr = procedure(this: IUtil; status: IStatus; timeStampTz: ISC_TIMESTAMP_TZPtr; year: Cardinal; month: Cardinal; day: Cardinal; hours: Cardinal; minutes: Cardinal; seconds: Cardinal; fractions: Cardinal; timeZone: PAnsiChar); cdecl;
IUtil_getInt128Ptr = function(this: IUtil; status: IStatus): IInt128; cdecl;
IUtil_decodeTimeTzExPtr = procedure(this: IUtil; status: IStatus; timeTz: ISC_TIME_TZ_EXPtr; hours: CardinalPtr; minutes: CardinalPtr; seconds: CardinalPtr; fractions: CardinalPtr; timeZoneBufferLength: Cardinal; timeZoneBuffer: PAnsiChar); cdecl;
IUtil_decodeTimeStampTzExPtr = procedure(this: IUtil; status: IStatus; timeStampTz: ISC_TIMESTAMP_TZ_EXPtr; year: CardinalPtr; month: CardinalPtr; day: CardinalPtr; hours: CardinalPtr; minutes: CardinalPtr; seconds: CardinalPtr; fractions: CardinalPtr; timeZoneBufferLength: Cardinal; timeZoneBuffer: PAnsiChar); cdecl;
IOffsetsCallback_setOffsetPtr = procedure(this: IOffsetsCallback; status: IStatus; index: Cardinal; offset: Cardinal; nullOffset: Cardinal); cdecl;
IXpbBuilder_clearPtr = procedure(this: IXpbBuilder; status: IStatus); cdecl;
IXpbBuilder_removeCurrentPtr = procedure(this: IXpbBuilder; status: IStatus); cdecl;
IXpbBuilder_insertIntPtr = procedure(this: IXpbBuilder; status: IStatus; tag: Byte; value: Integer); cdecl;
IXpbBuilder_insertBigIntPtr = procedure(this: IXpbBuilder; status: IStatus; tag: Byte; value: Int64); cdecl;
IXpbBuilder_insertBytesPtr = procedure(this: IXpbBuilder; status: IStatus; tag: Byte; bytes: Pointer; length: Cardinal); cdecl;
IXpbBuilder_insertStringPtr = procedure(this: IXpbBuilder; status: IStatus; tag: Byte; str: PAnsiChar); cdecl;
IXpbBuilder_insertTagPtr = procedure(this: IXpbBuilder; status: IStatus; tag: Byte); cdecl;
IXpbBuilder_isEofPtr = function(this: IXpbBuilder; status: IStatus): Boolean; cdecl;
IXpbBuilder_moveNextPtr = procedure(this: IXpbBuilder; status: IStatus); cdecl;
IXpbBuilder_rewindPtr = procedure(this: IXpbBuilder; status: IStatus); cdecl;
IXpbBuilder_findFirstPtr = function(this: IXpbBuilder; status: IStatus; tag: Byte): Boolean; cdecl;
IXpbBuilder_findNextPtr = function(this: IXpbBuilder; status: IStatus): Boolean; cdecl;
IXpbBuilder_getTagPtr = function(this: IXpbBuilder; status: IStatus): Byte; cdecl;
IXpbBuilder_getLengthPtr = function(this: IXpbBuilder; status: IStatus): Cardinal; cdecl;
IXpbBuilder_getIntPtr = function(this: IXpbBuilder; status: IStatus): Integer; cdecl;
IXpbBuilder_getBigIntPtr = function(this: IXpbBuilder; status: IStatus): Int64; cdecl;
IXpbBuilder_getStringPtr = function(this: IXpbBuilder; status: IStatus): PAnsiChar; cdecl;
IXpbBuilder_getBytesPtr = function(this: IXpbBuilder; status: IStatus): BytePtr; cdecl;
IXpbBuilder_getBufferLengthPtr = function(this: IXpbBuilder; status: IStatus): Cardinal; cdecl;
IXpbBuilder_getBufferPtr = function(this: IXpbBuilder; status: IStatus): BytePtr; cdecl;
ITraceConnection_getKindPtr = function(this: ITraceConnection): Cardinal; cdecl;
ITraceConnection_getProcessIDPtr = function(this: ITraceConnection): Integer; cdecl;
ITraceConnection_getUserNamePtr = function(this: ITraceConnection): PAnsiChar; cdecl;
ITraceConnection_getRoleNamePtr = function(this: ITraceConnection): PAnsiChar; cdecl;
ITraceConnection_getCharSetPtr = function(this: ITraceConnection): PAnsiChar; cdecl;
ITraceConnection_getRemoteProtocolPtr = function(this: ITraceConnection): PAnsiChar; cdecl;
ITraceConnection_getRemoteAddressPtr = function(this: ITraceConnection): PAnsiChar; cdecl;
ITraceConnection_getRemoteProcessIDPtr = function(this: ITraceConnection): Integer; cdecl;
ITraceConnection_getRemoteProcessNamePtr = function(this: ITraceConnection): PAnsiChar; cdecl;
ITraceDatabaseConnection_getConnectionIDPtr = function(this: ITraceDatabaseConnection): Int64; cdecl;
ITraceDatabaseConnection_getDatabaseNamePtr = function(this: ITraceDatabaseConnection): PAnsiChar; cdecl;
ITraceTransaction_getTransactionIDPtr = function(this: ITraceTransaction): Int64; cdecl;
ITraceTransaction_getReadOnlyPtr = function(this: ITraceTransaction): Boolean; cdecl;
ITraceTransaction_getWaitPtr = function(this: ITraceTransaction): Integer; cdecl;
ITraceTransaction_getIsolationPtr = function(this: ITraceTransaction): Cardinal; cdecl;
ITraceTransaction_getPerfPtr = function(this: ITraceTransaction): PerformanceInfoPtr; cdecl;
ITraceTransaction_getInitialIDPtr = function(this: ITraceTransaction): Int64; cdecl;
ITraceTransaction_getPreviousIDPtr = function(this: ITraceTransaction): Int64; cdecl;
ITraceParams_getCountPtr = function(this: ITraceParams): Cardinal; cdecl;
ITraceParams_getParamPtr = function(this: ITraceParams; idx: Cardinal): dscPtr; cdecl;
ITraceParams_getTextUTF8Ptr = function(this: ITraceParams; status: IStatus; idx: Cardinal): PAnsiChar; cdecl;
ITraceStatement_getStmtIDPtr = function(this: ITraceStatement): Int64; cdecl;
ITraceStatement_getPerfPtr = function(this: ITraceStatement): PerformanceInfoPtr; cdecl;
ITraceSQLStatement_getTextPtr = function(this: ITraceSQLStatement): PAnsiChar; cdecl;
ITraceSQLStatement_getPlanPtr = function(this: ITraceSQLStatement): PAnsiChar; cdecl;
ITraceSQLStatement_getInputsPtr = function(this: ITraceSQLStatement): ITraceParams; cdecl;
ITraceSQLStatement_getTextUTF8Ptr = function(this: ITraceSQLStatement): PAnsiChar; cdecl;
ITraceSQLStatement_getExplainedPlanPtr = function(this: ITraceSQLStatement): PAnsiChar; cdecl;
ITraceBLRStatement_getDataPtr = function(this: ITraceBLRStatement): BytePtr; cdecl;
ITraceBLRStatement_getDataLengthPtr = function(this: ITraceBLRStatement): Cardinal; cdecl;
ITraceBLRStatement_getTextPtr = function(this: ITraceBLRStatement): PAnsiChar; cdecl;
ITraceDYNRequest_getDataPtr = function(this: ITraceDYNRequest): BytePtr; cdecl;
ITraceDYNRequest_getDataLengthPtr = function(this: ITraceDYNRequest): Cardinal; cdecl;
ITraceDYNRequest_getTextPtr = function(this: ITraceDYNRequest): PAnsiChar; cdecl;
ITraceContextVariable_getNameSpacePtr = function(this: ITraceContextVariable): PAnsiChar; cdecl;
ITraceContextVariable_getVarNamePtr = function(this: ITraceContextVariable): PAnsiChar; cdecl;
ITraceContextVariable_getVarValuePtr = function(this: ITraceContextVariable): PAnsiChar; cdecl;
ITraceProcedure_getProcNamePtr = function(this: ITraceProcedure): PAnsiChar; cdecl;
ITraceProcedure_getInputsPtr = function(this: ITraceProcedure): ITraceParams; cdecl;
ITraceProcedure_getPerfPtr = function(this: ITraceProcedure): PerformanceInfoPtr; cdecl;
ITraceFunction_getFuncNamePtr = function(this: ITraceFunction): PAnsiChar; cdecl;
ITraceFunction_getInputsPtr = function(this: ITraceFunction): ITraceParams; cdecl;
ITraceFunction_getResultPtr = function(this: ITraceFunction): ITraceParams; cdecl;
ITraceFunction_getPerfPtr = function(this: ITraceFunction): PerformanceInfoPtr; cdecl;
ITraceTrigger_getTriggerNamePtr = function(this: ITraceTrigger): PAnsiChar; cdecl;
ITraceTrigger_getRelationNamePtr = function(this: ITraceTrigger): PAnsiChar; cdecl;
ITraceTrigger_getActionPtr = function(this: ITraceTrigger): Integer; cdecl;
ITraceTrigger_getWhichPtr = function(this: ITraceTrigger): Integer; cdecl;
ITraceTrigger_getPerfPtr = function(this: ITraceTrigger): PerformanceInfoPtr; cdecl;
ITraceServiceConnection_getServiceIDPtr = function(this: ITraceServiceConnection): Pointer; cdecl;
ITraceServiceConnection_getServiceMgrPtr = function(this: ITraceServiceConnection): PAnsiChar; cdecl;
ITraceServiceConnection_getServiceNamePtr = function(this: ITraceServiceConnection): PAnsiChar; cdecl;
ITraceStatusVector_hasErrorPtr = function(this: ITraceStatusVector): Boolean; cdecl;
ITraceStatusVector_hasWarningPtr = function(this: ITraceStatusVector): Boolean; cdecl;
ITraceStatusVector_getStatusPtr = function(this: ITraceStatusVector): IStatus; cdecl;
ITraceStatusVector_getTextPtr = function(this: ITraceStatusVector): PAnsiChar; cdecl;
ITraceSweepInfo_getOITPtr = function(this: ITraceSweepInfo): Int64; cdecl;
ITraceSweepInfo_getOSTPtr = function(this: ITraceSweepInfo): Int64; cdecl;
ITraceSweepInfo_getOATPtr = function(this: ITraceSweepInfo): Int64; cdecl;
ITraceSweepInfo_getNextPtr = function(this: ITraceSweepInfo): Int64; cdecl;
ITraceSweepInfo_getPerfPtr = function(this: ITraceSweepInfo): PerformanceInfoPtr; cdecl;
ITraceLogWriter_writePtr = function(this: ITraceLogWriter; buf: Pointer; size: Cardinal): Cardinal; cdecl;
ITraceLogWriter_write_sPtr = function(this: ITraceLogWriter; status: IStatus; buf: Pointer; size: Cardinal): Cardinal; cdecl;
ITraceInitInfo_getConfigTextPtr = function(this: ITraceInitInfo): PAnsiChar; cdecl;
ITraceInitInfo_getTraceSessionIDPtr = function(this: ITraceInitInfo): Integer; cdecl;
ITraceInitInfo_getTraceSessionNamePtr = function(this: ITraceInitInfo): PAnsiChar; cdecl;
ITraceInitInfo_getFirebirdRootDirectoryPtr = function(this: ITraceInitInfo): PAnsiChar; cdecl;
ITraceInitInfo_getDatabaseNamePtr = function(this: ITraceInitInfo): PAnsiChar; cdecl;
ITraceInitInfo_getConnectionPtr = function(this: ITraceInitInfo): ITraceDatabaseConnection; cdecl;
ITraceInitInfo_getLogWriterPtr = function(this: ITraceInitInfo): ITraceLogWriter; cdecl;
ITracePlugin_trace_get_errorPtr = function(this: ITracePlugin): PAnsiChar; cdecl;
ITracePlugin_trace_attachPtr = function(this: ITracePlugin; connection: ITraceDatabaseConnection; create_db: Boolean; att_result: Cardinal): Boolean; cdecl;
ITracePlugin_trace_detachPtr = function(this: ITracePlugin; connection: ITraceDatabaseConnection; drop_db: Boolean): Boolean; cdecl;
ITracePlugin_trace_transaction_startPtr = function(this: ITracePlugin; connection: ITraceDatabaseConnection; transaction: ITraceTransaction; tpb_length: Cardinal; tpb: BytePtr; tra_result: Cardinal): Boolean; cdecl;
ITracePlugin_trace_transaction_endPtr = function(this: ITracePlugin; connection: ITraceDatabaseConnection; transaction: ITraceTransaction; commit: Boolean; retain_context: Boolean; tra_result: Cardinal): Boolean; cdecl;
ITracePlugin_trace_proc_executePtr = function(this: ITracePlugin; connection: ITraceDatabaseConnection; transaction: ITraceTransaction; procedure_: ITraceProcedure; started: Boolean; proc_result: Cardinal): Boolean; cdecl;
ITracePlugin_trace_trigger_executePtr = function(this: ITracePlugin; connection: ITraceDatabaseConnection; transaction: ITraceTransaction; trigger: ITraceTrigger; started: Boolean; trig_result: Cardinal): Boolean; cdecl;
ITracePlugin_trace_set_contextPtr = function(this: ITracePlugin; connection: ITraceDatabaseConnection; transaction: ITraceTransaction; variable: ITraceContextVariable): Boolean; cdecl;
ITracePlugin_trace_dsql_preparePtr = function(this: ITracePlugin; connection: ITraceDatabaseConnection; transaction: ITraceTransaction; statement: ITraceSQLStatement; time_millis: Int64; req_result: Cardinal): Boolean; cdecl;
ITracePlugin_trace_dsql_freePtr = function(this: ITracePlugin; connection: ITraceDatabaseConnection; statement: ITraceSQLStatement; option: Cardinal): Boolean; cdecl;
ITracePlugin_trace_dsql_executePtr = function(this: ITracePlugin; connection: ITraceDatabaseConnection; transaction: ITraceTransaction; statement: ITraceSQLStatement; started: Boolean; req_result: Cardinal): Boolean; cdecl;
ITracePlugin_trace_blr_compilePtr = function(this: ITracePlugin; connection: ITraceDatabaseConnection; transaction: ITraceTransaction; statement: ITraceBLRStatement; time_millis: Int64; req_result: Cardinal): Boolean; cdecl;
ITracePlugin_trace_blr_executePtr = function(this: ITracePlugin; connection: ITraceDatabaseConnection; transaction: ITraceTransaction; statement: ITraceBLRStatement; req_result: Cardinal): Boolean; cdecl;
ITracePlugin_trace_dyn_executePtr = function(this: ITracePlugin; connection: ITraceDatabaseConnection; transaction: ITraceTransaction; request: ITraceDYNRequest; time_millis: Int64; req_result: Cardinal): Boolean; cdecl;
ITracePlugin_trace_service_attachPtr = function(this: ITracePlugin; service: ITraceServiceConnection; att_result: Cardinal): Boolean; cdecl;
ITracePlugin_trace_service_startPtr = function(this: ITracePlugin; service: ITraceServiceConnection; switches_length: Cardinal; switches: PAnsiChar; start_result: Cardinal): Boolean; cdecl;
ITracePlugin_trace_service_queryPtr = function(this: ITracePlugin; service: ITraceServiceConnection; send_item_length: Cardinal; send_items: BytePtr; recv_item_length: Cardinal; recv_items: BytePtr; query_result: Cardinal): Boolean; cdecl;
ITracePlugin_trace_service_detachPtr = function(this: ITracePlugin; service: ITraceServiceConnection; detach_result: Cardinal): Boolean; cdecl;
ITracePlugin_trace_event_errorPtr = function(this: ITracePlugin; connection: ITraceConnection; status: ITraceStatusVector; function_: PAnsiChar): Boolean; cdecl;
ITracePlugin_trace_event_sweepPtr = function(this: ITracePlugin; connection: ITraceDatabaseConnection; sweep: ITraceSweepInfo; sweep_state: Cardinal): Boolean; cdecl;
ITracePlugin_trace_func_executePtr = function(this: ITracePlugin; connection: ITraceDatabaseConnection; transaction: ITraceTransaction; function_: ITraceFunction; started: Boolean; func_result: Cardinal): Boolean; cdecl;
ITracePlugin_trace_dsql_restartPtr = function(this: ITracePlugin; connection: ITraceDatabaseConnection; transaction: ITraceTransaction; statement: ITraceSQLStatement; number: Cardinal): Boolean; cdecl;
ITraceFactory_trace_needsPtr = function(this: ITraceFactory): QWord; cdecl;
ITraceFactory_trace_createPtr = function(this: ITraceFactory; status: IStatus; init_info: ITraceInitInfo): ITracePlugin; cdecl;
IUdrFunctionFactory_setupPtr = procedure(this: IUdrFunctionFactory; status: IStatus; context: IExternalContext; metadata: IRoutineMetadata; inBuilder: IMetadataBuilder; outBuilder: IMetadataBuilder); cdecl;
IUdrFunctionFactory_newItemPtr = function(this: IUdrFunctionFactory; status: IStatus; context: IExternalContext; metadata: IRoutineMetadata): IExternalFunction; cdecl;
IUdrProcedureFactory_setupPtr = procedure(this: IUdrProcedureFactory; status: IStatus; context: IExternalContext; metadata: IRoutineMetadata; inBuilder: IMetadataBuilder; outBuilder: IMetadataBuilder); cdecl;
IUdrProcedureFactory_newItemPtr = function(this: IUdrProcedureFactory; status: IStatus; context: IExternalContext; metadata: IRoutineMetadata): IExternalProcedure; cdecl;
IUdrTriggerFactory_setupPtr = procedure(this: IUdrTriggerFactory; status: IStatus; context: IExternalContext; metadata: IRoutineMetadata; fieldsBuilder: IMetadataBuilder); cdecl;
IUdrTriggerFactory_newItemPtr = function(this: IUdrTriggerFactory; status: IStatus; context: IExternalContext; metadata: IRoutineMetadata): IExternalTrigger; cdecl;
IUdrPlugin_getMasterPtr = function(this: IUdrPlugin): IMaster; cdecl;
IUdrPlugin_registerFunctionPtr = procedure(this: IUdrPlugin; status: IStatus; name: PAnsiChar; factory: IUdrFunctionFactory); cdecl;
IUdrPlugin_registerProcedurePtr = procedure(this: IUdrPlugin; status: IStatus; name: PAnsiChar; factory: IUdrProcedureFactory); cdecl;
IUdrPlugin_registerTriggerPtr = procedure(this: IUdrPlugin; status: IStatus; name: PAnsiChar; factory: IUdrTriggerFactory); cdecl;
IDecFloat16_toBcdPtr = procedure(this: IDecFloat16; from: FB_DEC16Ptr; sign: IntegerPtr; bcd: BytePtr; exp: IntegerPtr); cdecl;
IDecFloat16_toStringPtr = procedure(this: IDecFloat16; status: IStatus; from: FB_DEC16Ptr; bufferLength: Cardinal; buffer: PAnsiChar); cdecl;
IDecFloat16_fromBcdPtr = procedure(this: IDecFloat16; sign: Integer; bcd: BytePtr; exp: Integer; to_: FB_DEC16Ptr); cdecl;
IDecFloat16_fromStringPtr = procedure(this: IDecFloat16; status: IStatus; from: PAnsiChar; to_: FB_DEC16Ptr); cdecl;
IDecFloat34_toBcdPtr = procedure(this: IDecFloat34; from: FB_DEC34Ptr; sign: IntegerPtr; bcd: BytePtr; exp: IntegerPtr); cdecl;
IDecFloat34_toStringPtr = procedure(this: IDecFloat34; status: IStatus; from: FB_DEC34Ptr; bufferLength: Cardinal; buffer: PAnsiChar); cdecl;
IDecFloat34_fromBcdPtr = procedure(this: IDecFloat34; sign: Integer; bcd: BytePtr; exp: Integer; to_: FB_DEC34Ptr); cdecl;
IDecFloat34_fromStringPtr = procedure(this: IDecFloat34; status: IStatus; from: PAnsiChar; to_: FB_DEC34Ptr); cdecl;
IInt128_toStringPtr = procedure(this: IInt128; status: IStatus; from: FB_I128Ptr; scale: Integer; bufferLength: Cardinal; buffer: PAnsiChar); cdecl;
IInt128_fromStringPtr = procedure(this: IInt128; status: IStatus; scale: Integer; from: PAnsiChar; to_: FB_I128Ptr); cdecl;
IReplicatedField_getNamePtr = function(this: IReplicatedField): PAnsiChar; cdecl;
IReplicatedField_getTypePtr = function(this: IReplicatedField): Cardinal; cdecl;
IReplicatedField_getSubTypePtr = function(this: IReplicatedField): Integer; cdecl;
IReplicatedField_getScalePtr = function(this: IReplicatedField): Integer; cdecl;
IReplicatedField_getLengthPtr = function(this: IReplicatedField): Cardinal; cdecl;
IReplicatedField_getCharSetPtr = function(this: IReplicatedField): Cardinal; cdecl;
IReplicatedField_getDataPtr = function(this: IReplicatedField): Pointer; cdecl;
IReplicatedRecord_getCountPtr = function(this: IReplicatedRecord): Cardinal; cdecl;
IReplicatedRecord_getFieldPtr = function(this: IReplicatedRecord; index: Cardinal): IReplicatedField; cdecl;
IReplicatedRecord_getRawLengthPtr = function(this: IReplicatedRecord): Cardinal; cdecl;
IReplicatedRecord_getRawDataPtr = function(this: IReplicatedRecord): BytePtr; cdecl;
IReplicatedTransaction_preparePtr = procedure(this: IReplicatedTransaction; status: IStatus); cdecl;
IReplicatedTransaction_commitPtr = procedure(this: IReplicatedTransaction; status: IStatus); cdecl;
IReplicatedTransaction_rollbackPtr = procedure(this: IReplicatedTransaction; status: IStatus); cdecl;
IReplicatedTransaction_startSavepointPtr = procedure(this: IReplicatedTransaction; status: IStatus); cdecl;
IReplicatedTransaction_releaseSavepointPtr = procedure(this: IReplicatedTransaction; status: IStatus); cdecl;
IReplicatedTransaction_rollbackSavepointPtr = procedure(this: IReplicatedTransaction; status: IStatus); cdecl;
IReplicatedTransaction_insertRecordPtr = procedure(this: IReplicatedTransaction; status: IStatus; name: PAnsiChar; record_: IReplicatedRecord); cdecl;
IReplicatedTransaction_updateRecordPtr = procedure(this: IReplicatedTransaction; status: IStatus; name: PAnsiChar; orgRecord: IReplicatedRecord; newRecord: IReplicatedRecord); cdecl;
IReplicatedTransaction_deleteRecordPtr = procedure(this: IReplicatedTransaction; status: IStatus; name: PAnsiChar; record_: IReplicatedRecord); cdecl;
IReplicatedTransaction_executeSqlPtr = procedure(this: IReplicatedTransaction; status: IStatus; sql: PAnsiChar); cdecl;
IReplicatedTransaction_executeSqlIntlPtr = procedure(this: IReplicatedTransaction; status: IStatus; charset: Cardinal; sql: PAnsiChar); cdecl;
IReplicatedSession_initPtr = function(this: IReplicatedSession; status: IStatus; attachment: IAttachment): Boolean; cdecl;
IReplicatedSession_startTransactionPtr = function(this: IReplicatedSession; status: IStatus; transaction: ITransaction; number: Int64): IReplicatedTransaction; cdecl;
IReplicatedSession_cleanupTransactionPtr = procedure(this: IReplicatedSession; status: IStatus; number: Int64); cdecl;
IReplicatedSession_setSequencePtr = procedure(this: IReplicatedSession; status: IStatus; name: PAnsiChar; value: Int64); cdecl;
IProfilerPlugin_initPtr = procedure(this: IProfilerPlugin; status: IStatus; attachment: IAttachment); cdecl;
IProfilerPlugin_startSessionPtr = function(this: IProfilerPlugin; status: IStatus; description: PAnsiChar; options: PAnsiChar; timestamp: ISC_TIMESTAMP_TZ): IProfilerSession; cdecl;
IProfilerPlugin_flushPtr = procedure(this: IProfilerPlugin; status: IStatus); cdecl;
IProfilerSession_getIdPtr = function(this: IProfilerSession): Int64; cdecl;
IProfilerSession_getFlagsPtr = function(this: IProfilerSession): Cardinal; cdecl;
IProfilerSession_cancelPtr = procedure(this: IProfilerSession; status: IStatus); cdecl;
IProfilerSession_finishPtr = procedure(this: IProfilerSession; status: IStatus; timestamp: ISC_TIMESTAMP_TZ); cdecl;
IProfilerSession_defineStatementPtr = procedure(this: IProfilerSession; status: IStatus; statementId: Int64; parentStatementId: Int64; type_: PAnsiChar; packageName: PAnsiChar; routineName: PAnsiChar; sqlText: PAnsiChar); cdecl;
IProfilerSession_defineRecordSourcePtr = procedure(this: IProfilerSession; statementId: Int64; cursorId: Cardinal; recSourceId: Cardinal; accessPath: PAnsiChar; parentRecSourceId: Cardinal); cdecl;
IProfilerSession_onRequestStartPtr = procedure(this: IProfilerSession; status: IStatus; requestId: Int64; statementId: Int64; callerRequestId: Int64; timestamp: ISC_TIMESTAMP_TZ); cdecl;
IProfilerSession_onRequestFinishPtr = procedure(this: IProfilerSession; status: IStatus; requestId: Int64; timestamp: ISC_TIMESTAMP_TZ; stats: IProfilerStats); cdecl;
IProfilerSession_beforePsqlLineColumnPtr = procedure(this: IProfilerSession; requestId: Int64; line: Cardinal; column: Cardinal); cdecl;
IProfilerSession_afterPsqlLineColumnPtr = procedure(this: IProfilerSession; requestId: Int64; line: Cardinal; column: Cardinal; stats: IProfilerStats); cdecl;
IProfilerSession_beforeRecordSourceOpenPtr = procedure(this: IProfilerSession; requestId: Int64; cursorId: Cardinal; recSourceId: Cardinal); cdecl;
IProfilerSession_afterRecordSourceOpenPtr = procedure(this: IProfilerSession; requestId: Int64; cursorId: Cardinal; recSourceId: Cardinal; stats: IProfilerStats); cdecl;
IProfilerSession_beforeRecordSourceGetRecordPtr = procedure(this: IProfilerSession; requestId: Int64; cursorId: Cardinal; recSourceId: Cardinal); cdecl;
IProfilerSession_afterRecordSourceGetRecordPtr = procedure(this: IProfilerSession; requestId: Int64; cursorId: Cardinal; recSourceId: Cardinal; stats: IProfilerStats); cdecl;
IProfilerStats_getElapsedTimePtr = function(this: IProfilerStats): QWord; cdecl;
VersionedVTable = class
version: NativeInt;
end;
IVersioned = class
vTable: VersionedVTable;
const VERSION = 1;
end;
IVersionedImpl = class(IVersioned)
constructor create;
end;
ReferenceCountedVTable = class(VersionedVTable)
addRef: IReferenceCounted_addRefPtr;
release: IReferenceCounted_releasePtr;
end;
IReferenceCounted = class(IVersioned)
const VERSION = 2;
procedure addRef();
function release(): Integer;
end;
IReferenceCountedImpl = class(IReferenceCounted)
constructor create;
procedure addRef(); virtual; abstract;
function release(): Integer; virtual; abstract;
end;
DisposableVTable = class(VersionedVTable)
dispose: IDisposable_disposePtr;
end;
IDisposable = class(IVersioned)
const VERSION = 2;
procedure dispose();
end;
IDisposableImpl = class(IDisposable)
constructor create;
procedure dispose(); virtual; abstract;
end;
StatusVTable = class(DisposableVTable)
init: IStatus_initPtr;
getState: IStatus_getStatePtr;
setErrors2: IStatus_setErrors2Ptr;
setWarnings2: IStatus_setWarnings2Ptr;
setErrors: IStatus_setErrorsPtr;
setWarnings: IStatus_setWarningsPtr;
getErrors: IStatus_getErrorsPtr;
getWarnings: IStatus_getWarningsPtr;
clone: IStatus_clonePtr;
end;
IStatus = class(IDisposable)
const VERSION = 3;
const STATE_WARNINGS = Cardinal($1);
const STATE_ERRORS = Cardinal($2);
const RESULT_ERROR = Integer(-1);
const RESULT_OK = Integer(0);
const RESULT_NO_DATA = Integer(1);
const RESULT_SEGMENT = Integer(2);
procedure init();
function getState(): Cardinal;
procedure setErrors2(length: Cardinal; value: NativeIntPtr);
procedure setWarnings2(length: Cardinal; value: NativeIntPtr);
procedure setErrors(value: NativeIntPtr);
procedure setWarnings(value: NativeIntPtr);
function getErrors(): NativeIntPtr;
function getWarnings(): NativeIntPtr;
function clone(): IStatus;
end;
IStatusImpl = class(IStatus)
constructor create;
procedure dispose(); virtual; abstract;
procedure init(); virtual; abstract;
function getState(): Cardinal; virtual; abstract;
procedure setErrors2(length: Cardinal; value: NativeIntPtr); virtual; abstract;
procedure setWarnings2(length: Cardinal; value: NativeIntPtr); virtual; abstract;
procedure setErrors(value: NativeIntPtr); virtual; abstract;
procedure setWarnings(value: NativeIntPtr); virtual; abstract;
function getErrors(): NativeIntPtr; virtual; abstract;
function getWarnings(): NativeIntPtr; virtual; abstract;
function clone(): IStatus; virtual; abstract;
end;
MasterVTable = class(VersionedVTable)
getStatus: IMaster_getStatusPtr;
getDispatcher: IMaster_getDispatcherPtr;
getPluginManager: IMaster_getPluginManagerPtr;
getTimerControl: IMaster_getTimerControlPtr;
getDtc: IMaster_getDtcPtr;
registerAttachment: IMaster_registerAttachmentPtr;
registerTransaction: IMaster_registerTransactionPtr;
getMetadataBuilder: IMaster_getMetadataBuilderPtr;
serverMode: IMaster_serverModePtr;
getUtilInterface: IMaster_getUtilInterfacePtr;
getConfigManager: IMaster_getConfigManagerPtr;
getProcessExiting: IMaster_getProcessExitingPtr;
end;
IMaster = class(IVersioned)
const VERSION = 2;
function getStatus(): IStatus;
function getDispatcher(): IProvider;
function getPluginManager(): IPluginManager;
function getTimerControl(): ITimerControl;
function getDtc(): IDtc;
function registerAttachment(provider: IProvider; attachment: IAttachment): IAttachment;
function registerTransaction(attachment: IAttachment; transaction: ITransaction): ITransaction;
function getMetadataBuilder(status: IStatus; fieldCount: Cardinal): IMetadataBuilder;
function serverMode(mode: Integer): Integer;
function getUtilInterface(): IUtil;
function getConfigManager(): IConfigManager;
function getProcessExiting(): Boolean;
end;
IMasterImpl = class(IMaster)
constructor create;
function getStatus(): IStatus; virtual; abstract;
function getDispatcher(): IProvider; virtual; abstract;
function getPluginManager(): IPluginManager; virtual; abstract;
function getTimerControl(): ITimerControl; virtual; abstract;
function getDtc(): IDtc; virtual; abstract;
function registerAttachment(provider: IProvider; attachment: IAttachment): IAttachment; virtual; abstract;
function registerTransaction(attachment: IAttachment; transaction: ITransaction): ITransaction; virtual; abstract;
function getMetadataBuilder(status: IStatus; fieldCount: Cardinal): IMetadataBuilder; virtual; abstract;
function serverMode(mode: Integer): Integer; virtual; abstract;
function getUtilInterface(): IUtil; virtual; abstract;
function getConfigManager(): IConfigManager; virtual; abstract;
function getProcessExiting(): Boolean; virtual; abstract;
end;
PluginBaseVTable = class(ReferenceCountedVTable)
setOwner: IPluginBase_setOwnerPtr;
getOwner: IPluginBase_getOwnerPtr;
end;
IPluginBase = class(IReferenceCounted)
const VERSION = 3;
procedure setOwner(r: IReferenceCounted);
function getOwner(): IReferenceCounted;
end;
IPluginBaseImpl = class(IPluginBase)
constructor create;
procedure addRef(); virtual; abstract;
function release(): Integer; virtual; abstract;
procedure setOwner(r: IReferenceCounted); virtual; abstract;
function getOwner(): IReferenceCounted; virtual; abstract;
end;
PluginSetVTable = class(ReferenceCountedVTable)
getName: IPluginSet_getNamePtr;
getModuleName: IPluginSet_getModuleNamePtr;
getPlugin: IPluginSet_getPluginPtr;
next: IPluginSet_nextPtr;
set_: IPluginSet_set_Ptr;
end;
IPluginSet = class(IReferenceCounted)
const VERSION = 3;
function getName(): PAnsiChar;
function getModuleName(): PAnsiChar;
function getPlugin(status: IStatus): IPluginBase;
procedure next(status: IStatus);
procedure set_(status: IStatus; s: PAnsiChar);
end;
IPluginSetImpl = class(IPluginSet)
constructor create;
procedure addRef(); virtual; abstract;
function release(): Integer; virtual; abstract;
function getName(): PAnsiChar; virtual; abstract;
function getModuleName(): PAnsiChar; virtual; abstract;
function getPlugin(status: IStatus): IPluginBase; virtual; abstract;
procedure next(status: IStatus); virtual; abstract;
procedure set_(status: IStatus; s: PAnsiChar); virtual; abstract;
end;
ConfigEntryVTable = class(ReferenceCountedVTable)
getName: IConfigEntry_getNamePtr;
getValue: IConfigEntry_getValuePtr;
getIntValue: IConfigEntry_getIntValuePtr;
getBoolValue: IConfigEntry_getBoolValuePtr;
getSubConfig: IConfigEntry_getSubConfigPtr;
end;
IConfigEntry = class(IReferenceCounted)
const VERSION = 3;
function getName(): PAnsiChar;
function getValue(): PAnsiChar;
function getIntValue(): Int64;
function getBoolValue(): Boolean;
function getSubConfig(status: IStatus): IConfig;
end;
IConfigEntryImpl = class(IConfigEntry)
constructor create;
procedure addRef(); virtual; abstract;
function release(): Integer; virtual; abstract;
function getName(): PAnsiChar; virtual; abstract;
function getValue(): PAnsiChar; virtual; abstract;
function getIntValue(): Int64; virtual; abstract;
function getBoolValue(): Boolean; virtual; abstract;
function getSubConfig(status: IStatus): IConfig; virtual; abstract;
end;
ConfigVTable = class(ReferenceCountedVTable)
find: IConfig_findPtr;
findValue: IConfig_findValuePtr;
findPos: IConfig_findPosPtr;
end;
IConfig = class(IReferenceCounted)
const VERSION = 3;
function find(status: IStatus; name: PAnsiChar): IConfigEntry;
function findValue(status: IStatus; name: PAnsiChar; value: PAnsiChar): IConfigEntry;
function findPos(status: IStatus; name: PAnsiChar; pos: Cardinal): IConfigEntry;
end;
IConfigImpl = class(IConfig)
constructor create;
procedure addRef(); virtual; abstract;
function release(): Integer; virtual; abstract;
function find(status: IStatus; name: PAnsiChar): IConfigEntry; virtual; abstract;
function findValue(status: IStatus; name: PAnsiChar; value: PAnsiChar): IConfigEntry; virtual; abstract;
function findPos(status: IStatus; name: PAnsiChar; pos: Cardinal): IConfigEntry; virtual; abstract;
end;
FirebirdConfVTable = class(ReferenceCountedVTable)
getKey: IFirebirdConf_getKeyPtr;
asInteger: IFirebirdConf_asIntegerPtr;
asString: IFirebirdConf_asStringPtr;
asBoolean: IFirebirdConf_asBooleanPtr;
getVersion: IFirebirdConf_getVersionPtr;
end;
IFirebirdConf = class(IReferenceCounted)