fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2014-10-03 16:03 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)

Browse Source 
* src/rdd/wafunc.c
    % use dynamic symbol pointer to find field index

  * src/rdd/workarea.c
    * set default maximum field size to HB_SYMBOL_NAME_LEN characters
      (by default in Harbour builds HB_SYMBOL_NAME_LEN is 63)
      Some RDDs may set longer names but it will be respected only by
      FieldName() function and in all other cases only HB_SYMBOL_NAME_LEN
      characters is significant for Harbour so such decision should be
      well thought by RDD authors because it may confuse users.
      Warning: all 3-rd party RDDs which need to force shorter names
               should update uiMaxFieldNameLength in their NEW() method
               just after SUPER_NEW() call, i.e. like in core DBF RDD.
    ! respect uiMaxFieldNameLength when new fields are added

  * src/rdd/dbf1.c
    * set maximum field size to 10 characters

  * contrib/rddsql/sqlbase.c
    - removed code used to set uiMaxFieldNameLength to HB_SYMBOL_NAME_LEN.
      Now it's default field length value for each RDD unless it does not
      change it.

  * contrib/rddads/ads1.c
    * minor modification in adsFieldName()

  * contrib/hbwin/wapi_winbase.c
    + added support for FORMAT_MESSAGE_ALLOCATE_BUFFER and 6-th <nSize>
      parameter to wapi_FormatMessage() function. The 6-th <nSize> parameter
      has higher priority then size of string passed in the 5-th parameter.
    ! fixed potential memory leak
This commit is contained in:
Przemysław Czerpak
2014-10-03 16:03:55 +02:00
parent 22d694e0a9
commit 62478c5657
7 changed files with 97 additions and 51 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
contrib/rddsql/sqlbase.c
View File

@@ -781,19 +781,6 @@ static HB_ERRCODE sqlbaseInfo( SQLBASEAREAP pArea, HB_USHORT uiIndex, PHB_ITEM p
}
static HB_ERRCODE sqlbaseNewArea( SQLBASEAREAP pArea )
{
HB_ERRCODE errCode;
HB_TRACE( HB_TR_DEBUG, ( "sqlbaseNewArea(%p)", pArea ) );
errCode = SUPER_NEW( ( AREAP ) pArea );
pArea->area.uiMaxFieldNameLength = HB_SYMBOL_NAME_LEN;
return errCode;
}
static HB_ERRCODE sqlbaseOpen( SQLBASEAREAP pArea, LPDBOPENINFO pOpenInfo )
{
HB_ERRCODE errCode;
@@ -1146,7 +1133,7 @@ static RDDFUNCS sqlbaseTable =
( DBENTRYP_V ) sqlbaseClose,
( DBENTRYP_VO ) sqlbaseCreate,
( DBENTRYP_SI ) sqlbaseInfo,
( DBENTRYP_V ) sqlbaseNewArea,
( DBENTRYP_V ) NULL, /* sqlbaseNewArea */
( DBENTRYP_VO ) sqlbaseOpen,
( DBENTRYP_V ) NULL, /* sqlbaseRelease */
( DBENTRYP_SP ) sqlbaseStructSize,