1 files changed, 189 insertions, 188 deletions
diff --git a/misc/pascal/libpoff/pftsymbol.c b/misc/pascal/libpoff/pftsymbol.c
index 32eb375dd..d30de5fb9 100644
--- a/misc/pascal/libpoff/pftsymbol.c
+++ b/misc/pascal/libpoff/pftsymbol.c
@@ -1,188 +1,189 @@
-/**********************************************************************
- * pftsymbol.c
- * Write symbol information to a temporary container
- *
- *   Copyright (C) 2008 Gregory Nutt. All rights reserved.
- *   Author: Gregory Nutt <spudmonkey@racsa.co.cr>
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- * 1. Redistributions of source code must retain the above copyright
- *    notice, this list of conditions and the following disclaimer.
- * 2. Redistributions in binary form must reproduce the above copyright
- *    notice, this list of conditions and the following disclaimer in
- *    the documentation and/or other materials provided with the
- *    distribution.
- * 3. Neither the name NuttX nor the names of its contributors may be
- *    used to endorse or promote products derived from this software
- *    without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
- * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
- * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
- * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
- * COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
- * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
- * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
- * OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
- * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
- * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
- * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- * POSSIBILITY OF SUCH DAMAGE.
- *
- **********************************************************************/
-
-/**********************************************************************
- * Included Files
- **********************************************************************/
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <errno.h>
-
-#include "keywords.h"  /* Standard types */
-#include "pedefs.h"    /* error code definitions */
-
-#include "perr.h"      /* error() */
-#include "pofflib.h"   /* POFF library interface */
-#include "pfprivate.h" /* POFF private definitions */
-
-/**********************************************************************
- * Definitions
- **********************************************************************/
-
-/**********************************************************************
- * Global Variables
- **********************************************************************/
-
-/**********************************************************************
- * Private Variables
- **********************************************************************/
-
-/***********************************************************************
- * Private Function Prototypes
- ***********************************************************************/
-
-/***********************************************************************
- * Private Functions
- ***********************************************************************/
-
-/***********************************************************************
- * Public Functions
- ***********************************************************************/
-
-/***********************************************************************/
-/* Add a symbol to the symbol table section data.  Returns index value
- * associated with the symbol entry in the symbol table section data.
- */
-
-uint32 poffAddTmpSymbol(poffHandle_t handle, poffSymHandle_t symHandle,
-			poffLibSymbol_t *symbol)
-{
-  poffSymInfo_t *poffSymInfo = (poffSymInfo_t*)symHandle;
-  poffSymbol_t *psym;
-  uint32 st_name;
-  uint32 index;
-
-  /* Add the name to the string table. Note: We are probably re-writing
-   * the string table and so the string probably already exists in the
-   * string table.  We are counting of the string table logic's abililty
-   * avoid duplicated strings to keep from adding trash to the string
-   * table.
-   */
-
-  st_name = poffAddString(handle, symbol->name);
-
-  /* Check if we have allocated a symbol table buffer yet */
-
-  if (!poffSymInfo->symbolTable)
-    {
-      /* No, allocate it now */
-
-      poffSymInfo->symbolTable = (ubyte*)malloc(INITIAL_SYMBOL_TABLE_SIZE);
-      if (!poffSymInfo->symbolTable)
-	{
-	  fatal(eNOMEMORY);
-	}
-
-      poffSymInfo->symbolTableSize   = 0;
-      poffSymInfo->symbolTableAlloc  = INITIAL_SYMBOL_TABLE_SIZE;
-    }
-
-  /* Check if there is room for a new symbol */
-
-  if (poffSymInfo->symbolTableSize + sizeof(poffSymbol_t) >
-      poffSymInfo->symbolTableAlloc)
-    {
-      uint32 newAlloc = poffSymInfo->symbolTableAlloc + SYMBOL_TABLE_INCREMENT;
-      ubyte *tmp;
-
-      /* Reallocate the file name buffer */
-
-      tmp = (ubyte*)realloc(poffSymInfo->symbolTable, newAlloc);
-      if (!tmp)
-	{
-	  fatal(eNOMEMORY);
-	}
-
-      /* And set the new size */
-
-      poffSymInfo->symbolTableAlloc = newAlloc;
-      poffSymInfo->symbolTable      = tmp;
-    }
-
-  /* Save the new symbol information in the symbol table data */
-
-  index          = poffSymInfo->symbolTableSize;
-  psym           = (poffSymbol_t*)&poffSymInfo->symbolTable[index];
-
-  psym->st_type  = symbol->type;
-  psym->st_align = symbol->align;
-  psym->st_flags = symbol->flags;
-  psym->st_pad   = 0;
-  psym->st_name  = st_name;
-  psym->st_value = symbol->value;
-  psym->st_size  = symbol->size;
-
-  /* Set the new size of the file name table */
-
-  poffSymInfo->symbolTableSize += sizeof(poffSymbol_t);
-  return index;
-}
-
-/***********************************************************************/
-
-void poffReplaceSymbolTable(poffHandle_t handle, poffSymHandle_t symHandle)
-{
-  poffInfo_t     *poffInfo     = (poffInfo_t*)handle;
-  poffSymInfo_t *poffSymInfo = (poffSymInfo_t*)symHandle;
-
-  /* Discard any existing symbol table */
-
-  if (poffInfo->symbolTable)
-    {
-      free(poffInfo->symbolTable);
-    }
-
-  /* Replace the symram section data with the tmp data */
-
-  poffInfo->symbolTable                   = poffSymInfo->symbolTable;
-  poffInfo->symbolTableSection.sh_size    = poffSymInfo->symbolTableSize;
-  poffInfo->symbolTableSection.sh_entsize = sizeof(poffSymbol_t);
-  poffInfo->symbolTableAlloc              = poffSymInfo->symbolTableAlloc;
-
-  /* Reset the read index */
-
-  poffInfo->symbolIndex                   = 0;
-
-  /* Then nullify the tmp data */
-
-  poffSymInfo->symbolTable                = NULL;
-  poffSymInfo->symbolTableSize            = 0;
-  poffSymInfo->symbolTableAlloc           = 0;
-}
-
-/***********************************************************************/
+/**********************************************************************
+ * pftsymbol.c
+ * Write symbol information to a temporary container
+ *
+ *   Copyright (C) 2008-2009 Gregory Nutt. All rights reserved.
+ *   Author: Gregory Nutt <spudmonkey@racsa.co.cr>
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ *
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in
+ *    the documentation and/or other materials provided with the
+ *    distribution.
+ * 3. Neither the name NuttX nor the names of its contributors may be
+ *    used to endorse or promote products derived from this software
+ *    without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
+ * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
+ * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
+ * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
+ * COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
+ * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
+ * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
+ * OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
+ * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
+ * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+ * POSSIBILITY OF SUCH DAMAGE.
+ *
+ **********************************************************************/
+
+/**********************************************************************
+ * Included Files
+ **********************************************************************/
+
+#include <stdint.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <errno.h>
+
+#include "keywords.h"  /* Standard types */
+#include "pedefs.h"    /* error code definitions */
+
+#include "perr.h"      /* error() */
+#include "pofflib.h"   /* POFF library interface */
+#include "pfprivate.h" /* POFF private definitions */
+
+/**********************************************************************
+ * Definitions
+ **********************************************************************/
+
+/**********************************************************************
+ * Global Variables
+ **********************************************************************/
+
+/**********************************************************************
+ * Private Variables
+ **********************************************************************/
+
+/***********************************************************************
+ * Private Function Prototypes
+ ***********************************************************************/
+
+/***********************************************************************
+ * Private Functions
+ ***********************************************************************/
+
+/***********************************************************************
+ * Public Functions
+ ***********************************************************************/
+
+/***********************************************************************/
+/* Add a symbol to the symbol table section data.  Returns index value
+ * associated with the symbol entry in the symbol table section data.
+ */
+
+uint32_t poffAddTmpSymbol(poffHandle_t handle, poffSymHandle_t symHandle,
+                        poffLibSymbol_t *symbol)
+{
+  poffSymInfo_t *poffSymInfo = (poffSymInfo_t*)symHandle;
+  poffSymbol_t *psym;
+  uint32_t st_name;
+  uint32_t index;
+
+  /* Add the name to the string table. Note: We are probably re-writing
+   * the string table and so the string probably already exists in the
+   * string table.  We are counting of the string table logic's abililty
+   * avoid duplicated strings to keep from adding trash to the string
+   * table.
+   */
+
+  st_name = poffAddString(handle, symbol->name);
+
+  /* Check if we have allocated a symbol table buffer yet */
+
+  if (!poffSymInfo->symbolTable)
+    {
+      /* No, allocate it now */
+
+      poffSymInfo->symbolTable = (uint8_t*)malloc(INITIAL_SYMBOL_TABLE_SIZE);
+      if (!poffSymInfo->symbolTable)
+        {
+          fatal(eNOMEMORY);
+        }
+
+      poffSymInfo->symbolTableSize   = 0;
+      poffSymInfo->symbolTableAlloc  = INITIAL_SYMBOL_TABLE_SIZE;
+    }
+
+  /* Check if there is room for a new symbol */
+
+  if (poffSymInfo->symbolTableSize + sizeof(poffSymbol_t) >
+      poffSymInfo->symbolTableAlloc)
+    {
+      uint32_t newAlloc = poffSymInfo->symbolTableAlloc + SYMBOL_TABLE_INCREMENT;
+      uint8_t *tmp;
+
+      /* Reallocate the file name buffer */
+
+      tmp = (uint8_t*)realloc(poffSymInfo->symbolTable, newAlloc);
+      if (!tmp)
+        {
+          fatal(eNOMEMORY);
+        }
+
+      /* And set the new size */
+
+      poffSymInfo->symbolTableAlloc = newAlloc;
+      poffSymInfo->symbolTable      = tmp;
+    }
+
+  /* Save the new symbol information in the symbol table data */
+
+  index          = poffSymInfo->symbolTableSize;
+  psym           = (poffSymbol_t*)&poffSymInfo->symbolTable[index];
+
+  psym->st_type  = symbol->type;
+  psym->st_align = symbol->align;
+  psym->st_flags = symbol->flags;
+  psym->st_pad   = 0;
+  psym->st_name  = st_name;
+  psym->st_value = symbol->value;
+  psym->st_size  = symbol->size;
+
+  /* Set the new size of the file name table */
+
+  poffSymInfo->symbolTableSize += sizeof(poffSymbol_t);
+  return index;
+}
+
+/***********************************************************************/
+
+void poffReplaceSymbolTable(poffHandle_t handle, poffSymHandle_t symHandle)
+{
+  poffInfo_t     *poffInfo     = (poffInfo_t*)handle;
+  poffSymInfo_t *poffSymInfo = (poffSymInfo_t*)symHandle;
+
+  /* Discard any existing symbol table */
+
+  if (poffInfo->symbolTable)
+    {
+      free(poffInfo->symbolTable);
+    }
+
+  /* Replace the symram section data with the tmp data */
+
+  poffInfo->symbolTable                   = poffSymInfo->symbolTable;
+  poffInfo->symbolTableSection.sh_size    = poffSymInfo->symbolTableSize;
+  poffInfo->symbolTableSection.sh_entsize = sizeof(poffSymbol_t);
+  poffInfo->symbolTableAlloc              = poffSymInfo->symbolTableAlloc;
+
+  /* Reset the read index */
+
+  poffInfo->symbolIndex                   = 0;
+
+  /* Then nullify the tmp data */
+
+  poffSymInfo->symbolTable                = NULL;
+  poffSymInfo->symbolTableSize            = 0;
+  poffSymInfo->symbolTableAlloc           = 0;
+}
+
+/***********************************************************************/