DBFAddNativeFieldType()

int SHPAPI_CALL DBFAddNativeFieldType	(	DBFHandle	hDBF,
		const char *	pszFieldName,
		char	chType,
		int	nWidth,
		int	nDecimals
	)

Definition at line 802 of file dbfopen.c.

{
        char *pszFInfo;
        int i;
        int nOldRecordLength, nOldHeaderLength;
        char *pszRecord;
        char chFieldFill;
        SAOffset nRecordOffset;
 
        /* make sure that everything is written in .dbf */
        if (!DBFFlushRecord(psDBF))
                return -1;
 
        /* -------------------------------------------------------------------- */
        /*      Do some checking to ensure we can add records to this file.     */
        /* -------------------------------------------------------------------- */
        if (nWidth < 1)
                return -1;
 
        if (nWidth > 255)
                nWidth = 255;
 
        nOldRecordLength = psDBF->nRecordLength;
        nOldHeaderLength = psDBF->nHeaderLength;
 
        /* -------------------------------------------------------------------- */
        /*      SfRealloc all the arrays larger to hold the additional field      */
        /*      information.                                                    */
        /* -------------------------------------------------------------------- */
        psDBF->nFields++;
 
        psDBF->panFieldOffset = (int *)SfRealloc(psDBF->panFieldOffset, sizeof(int) * psDBF->nFields);
 
        psDBF->panFieldSize = (int *)SfRealloc(psDBF->panFieldSize, sizeof(int) * psDBF->nFields);
 
        psDBF->panFieldDecimals = (int *)SfRealloc(psDBF->panFieldDecimals, sizeof(int) * psDBF->nFields);
 
        psDBF->pachFieldType = (char *)SfRealloc(psDBF->pachFieldType, sizeof(char) * psDBF->nFields);
 
        /* -------------------------------------------------------------------- */
        /*      Assign the new field information fields.                        */
        /* -------------------------------------------------------------------- */
        psDBF->panFieldOffset[psDBF->nFields - 1] = psDBF->nRecordLength;
        psDBF->nRecordLength += nWidth;
        psDBF->panFieldSize[psDBF->nFields - 1] = nWidth;
        psDBF->panFieldDecimals[psDBF->nFields - 1] = nDecimals;
        psDBF->pachFieldType[psDBF->nFields - 1] = chType;
 
        /* -------------------------------------------------------------------- */
        /*      Extend the required header information.                         */
        /* -------------------------------------------------------------------- */
        psDBF->nHeaderLength += 32;
        psDBF->bUpdated = FALSE;
 
        psDBF->pszHeader = (char *)SfRealloc(psDBF->pszHeader, psDBF->nFields * 32);
 
        pszFInfo = psDBF->pszHeader + 32 * (psDBF->nFields - 1);
 
        for (i = 0; i < 32; i++)
                pszFInfo[i] = '\0';
 
        memcpy(pszFInfo, pszFieldName, 10);
 
        pszFInfo[11] = psDBF->pachFieldType[psDBF->nFields - 1];
 
        if (chType == 'C')
        {
                pszFInfo[16] = (unsigned char)(nWidth % 256);
                pszFInfo[17] = (unsigned char)(nWidth / 256);
        }
        else
        {
                pszFInfo[16] = (unsigned char)nWidth;
                pszFInfo[17] = (unsigned char)nDecimals;
        }
 
        /* -------------------------------------------------------------------- */
        /*      Make the current record buffer appropriately larger.            */
        /* -------------------------------------------------------------------- */
        psDBF->pszCurrentRecord = (char *)SfRealloc(psDBF->pszCurrentRecord, psDBF->nRecordLength);
 
        /* we're done if dealing with new .dbf */
        if (psDBF->bNoHeader)
                return (psDBF->nFields - 1);
 
        /* -------------------------------------------------------------------- */
        /*      For existing .dbf file, shift records                           */
        /* -------------------------------------------------------------------- */
 
        /* alloc record */
        pszRecord = (char *)malloc(sizeof(char) * psDBF->nRecordLength);
 
        chFieldFill = DBFGetNullCharacter(chType);
 
        for (i = psDBF->nRecords - 1; i >= 0; --i)
        {
                nRecordOffset = nOldRecordLength * (SAOffset)i + nOldHeaderLength;
 
                /* load record */
                psDBF->sHooks.FSeek(psDBF->fp, nRecordOffset, 0);
                psDBF->sHooks.FRead(pszRecord, nOldRecordLength, 1, psDBF->fp);
 
                /* set new field's value to NULL */
                memset(pszRecord + nOldRecordLength, chFieldFill, nWidth);
 
                nRecordOffset = psDBF->nRecordLength * (SAOffset)i + psDBF->nHeaderLength;
 
                /* move record to the new place*/
                psDBF->sHooks.FSeek(psDBF->fp, nRecordOffset, 0);
                psDBF->sHooks.FWrite(pszRecord, psDBF->nRecordLength, 1, psDBF->fp);
        }
 
        /* free record */
        free(pszRecord);
 
        /* force update of header with new header, record length and new field */
        psDBF->bNoHeader = TRUE;
        DBFUpdateHeader(psDBF);
 
        psDBF->nCurrentRecord = -1;
        psDBF->bCurrentRecordModified = FALSE;
 
        return (psDBF->nFields - 1);
}

References DBFFlushRecord(), DBFGetNullCharacter(), DBFUpdateHeader(), FALSE, free(), malloc(), SfRealloc(), and TRUE.

Referenced by DBFAddField().

Here is the call graph for this function:

Here is the caller graph for this function: