Rx3/libshmem
1
1
Fork 0
Code Issues Pull Requests Packages Projects Releases 1 Wiki Activity

- Add hexa number support in smadmin,

Browse Source 
- Code cleanup in smadmin.
This commit is contained in:
Arnaud G. GIBERT 2024-04-15 19:35:12 +02:00
parent 04660e4607
commit ef3ca27707
1 changed files with 491 additions and 331 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

474
util/smadmin.c
View File

@ -1,3 +1,31 @@
/*---------------------------------------------------------------------------------*/
/* smadmin.c */
/*---------------------------------------------------------------------------------*/
/*---------------------------------------------------------------------------------*/
/* This file is part of LibShMem */
/* */
/* LibShMem is free software; you can redistribute it and/or modify */
/* it under the terms of the GNU Lesser General Public Licence as published by */
/* the Free Software Foundation; either version 2.1 of the License, or */
/* (at your option) any later version. */
/* */
/* LibShMem is distributed in the hope that it will be useful, */
/* but WITHOUT ANY WARRANTY; without even the implied warranty of */
/* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */
/* GNU Lesser General Public License for more details. */
/* */
/* You should have received a copy of the GNU Lesser General Public License */
/* along with LibShMem; if not, write to the Free Software */
/* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */
/*---------------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
/* Includes */
/*----------------------------------------------------------------------------*/
#include <stdio.h> #include <stdio.h>
#include <stdlib.h> #include <stdlib.h>
#include <string.h> #include <string.h>
@ -10,6 +38,13 @@
#include <shmem.h> #include <shmem.h>
/*----------------------------------------------------------------------------*/
/* Definitions */
/*----------------------------------------------------------------------------*/
//VER_INFO_EXPORT (smadmin, "$Revision: 2.3 $", "$Name: $", __FILE__, "$Author: agibert $") //VER_INFO_EXPORT (smadmin, "$Revision: 2.3 $", "$Name: $", __FILE__, "$Author: agibert $")
#define USAGE "Usage : %s [ --help | --version [-v] | --create | --destroy ]\n" #define USAGE "Usage : %s [ --help | --version [-v] | --create | --destroy ]\n"
@ -40,12 +75,160 @@
#define TMP_LEN 100 #define TMP_LEN 100
#define TMP_SIZE ( TMP_LEN + 1) #define TMP_SIZE ( TMP_LEN + 1)
#define TYPE_NUMBER 1
#define TYPE_STRING 2
char menu[ 1000]; char menu[ 1000];
char tmp[ TMP_SIZE]; char tmp[ TMP_SIZE];
void init_menu (void);
int print_menu (void);
#define MENU_ENTRY_ADD( string, id, label) sprintf( tmp, (string), (id), (label)); strcat( menu, tmp);
/*----------------------------------------------------------------------------*/
/* Prototypes */
/*----------------------------------------------------------------------------*/
/*----------------------------------------------------------------------------*/
/* Init_Menu */
/*----------------------------------------------------------------------------*/
void Init_Menu( void);
/*----------------------------------------------------------------------------*/
/* Print_Menu */
/*----------------------------------------------------------------------------*/
int Print_Menu( void);
/*----------------------------------------------------------------------------*/
/* Entry_Promp */
/*----------------------------------------------------------------------------*/
void Entry_Prompt( void *, char *, short);
/*----------------------------------------------------------------------------*/
/* Init_Menu */
/*----------------------------------------------------------------------------*/
void Init_Menu( void)
{
sprintf( menu, "Menu :\n");
MENU_ENTRY_ADD( " - %2d) %-18s\n", QUIT, "Quit");
MENU_ENTRY_ADD( " - %2d) %-18s", BASE_INIT, "Init library");
MENU_ENTRY_ADD( " - %2d) %-18s", BASE_OPEN, "Open library");
MENU_ENTRY_ADD( " - %2d) %-18s\n", BASE_INFO, "Info library");
MENU_ENTRY_ADD( " - %2d) %-18s", BASE_CLOSE, "Close library");
MENU_ENTRY_ADD( " - %2d) %-18s", BASE_END, "End library");
MENU_ENTRY_ADD( " - %2d) %-18s\n", MHH_INIT, "Init heap");
MENU_ENTRY_ADD( " - %2d) %-18s", MHH_OPEN, "Open heap");
MENU_ENTRY_ADD( " - %2d) %-18s", MHH_CHECK, "Check/recover heap");
MENU_ENTRY_ADD( " - %2d) %-18s\n", MHH_COMPRESS, "Compress heap");
MENU_ENTRY_ADD( " - %2d) %-18s", MHH_CLOSE, "Close heap");
MENU_ENTRY_ADD( " - %2d) %-18s", MHH_END, "End heap");
MENU_ENTRY_ADD( " - %2d) %-18s\n", ALLOC_CHUNK, "Allocate chunk");
MENU_ENTRY_ADD( " - %2d) %-18s", WRITE_CHUNK, "Write chunk");
MENU_ENTRY_ADD( " - %2d) %-18s", READ_CHUNK, "Read chunk");
MENU_ENTRY_ADD( " - %2d) %-18s\n", FREE_CHUNK, "Free chunk");
MENU_ENTRY_ADD( " - %2d) %-18s", DSR_DUMP, "Dump DSR");
MENU_ENTRY_ADD( " - %2d) %-18s", ACR_DUMP, "Dump ACR");
MENU_ENTRY_ADD( " - %2d) %-18s\n", FCR_DUMP, "Dump FCR");
}
/*----------------------------------------------------------------------------*/
/* Print_Menu */
/*----------------------------------------------------------------------------*/
int Print_Menu( void)
{
fprintf (stdout, "------------------------------------------------------\n%s", menu);
tmp[0] = '\0';
while( tmp[0] == '\0')
{
printf ("\nChoice ? ");
fgets( tmp, TMP_SIZE, stdin);
tmp[ strlen( tmp) - 1] = '\0';
}
return atoi( tmp);
}
/*----------------------------------------------------------------------------*/
/* Entry_Promp */
/*----------------------------------------------------------------------------*/
void Entry_Prompt( void *Out_Ptr, char *Prompt_Ptr, short Type)
{
static char tmp[ TMP_SIZE];
fprintf( stdout, "\n%s", Prompt_Ptr);
fgets( tmp, TMP_SIZE, stdin);
tmp[ strlen( tmp) - 1] = '\0';
switch( Type)
{
case TYPE_NUMBER:
{
if( sscanf( tmp, "0x%lx", Out_Ptr) != 1)
{
if( sscanf( tmp, "%ld", Out_Ptr) != 1)
{
fprintf( stdout, "\nInvalid number\n");
break;
}
}
break;
}
case TYPE_STRING:
{
strcpy( ( char *)Out_Ptr, tmp);
break;
}
}
}
/*----------------------------------------------------------------------------*/
/* main */
/*----------------------------------------------------------------------------*/
int main( int argc, char **argv) int main( int argc, char **argv)
{ {
@ -58,6 +241,7 @@ int main (int argc, char ** argv)
int Nb_Detected, Nb_Corrected; int Nb_Detected, Nb_Corrected;
size_t size; size_t size;
/* Lancement de commande d'administration */ /* Lancement de commande d'administration */
if( argc >= 2) if( argc >= 2)
@ -65,46 +249,50 @@ int main (int argc, char ** argv)
if( !strcmp( argv[ 1], "--help")) if( !strcmp( argv[ 1], "--help"))
{ {
fprintf( stderr, USAGE, argv[ 0]); fprintf( stderr, USAGE, argv[ 0]);
return -1; return( -1);
} }
/* else if( !strcmp( argv[1], "--version")) /* else if( !strcmp( argv[1], "--version"))
{ {
if( argc >= 3 && !strcmp( argv[2], "-v")) if( argc >= 3 && !strcmp( argv[2], "-v"))
return VER_Object_Print( stdout, VERD_VERBOSE); return VER_Object_Print( stdout, VERD_VERBOSE);
else else
return VER_Object_Print( stdout, VERD_MINIMAL); return VER_Object_Print( stdout, VERD_MINIMAL);
} */ }
*/
else if( !strcmp( argv[1], "--create")) else if( !strcmp( argv[1], "--create"))
{ {
if( SM_Library_Open( 0, NULL, SMD_CREATE | SMD_DEBUG_ALL) != SMS_OK) if( SM_Library_Open( 0, NULL, SMD_CREATE | SMD_DEBUG_ALL) != SMS_OK)
{ {
fprintf( stderr, "=> Impossible de créer l'instance de la librairie LIBSHMEM\n"); fprintf( stderr, "=> Impossible de créer l'instance de la librairie LIBSHMEM\n");
return -1; return( -1);
} }
return 0; return( 0);
} }
else if( !strcmp( argv[1], "--destroy")) else if( !strcmp( argv[1], "--destroy"))
{ {
if( SM_Library_Open( 0, NULL, SMD_OPEN | SMD_DEBUG_ALL) != SMS_OK || SM_Library_Close( SMD_DESTROY) != SMS_OK) if( SM_Library_Open( 0, NULL, SMD_OPEN | SMD_DEBUG_ALL) != SMS_OK || SM_Library_Close( SMD_DESTROY) != SMS_OK)
{ {
fprintf( stderr, "=> Impossible de détruire l'instance de la librairie LIBSHMEM\n"); fprintf( stderr, "=> Impossible de détruire l'instance de la librairie LIBSHMEM\n");
return -1; return( -1);
} }
return 0; return( 0);
} }
else else
{ {
fprintf( stderr, USAGE, argv[ 0]); fprintf( stderr, USAGE, argv[ 0]);
return -1; return( -1);
} }
} }
/* Lancement du menu intercatif */ /* Lancement du menu intercatif */
init_menu (); Init_Menu();
choice = print_menu (); choice = Print_Menu();
while( choice != QUIT) while( choice != QUIT)
{ {
@ -113,55 +301,64 @@ int main (int argc, char ** argv)
switch( choice) switch( choice)
{ {
case BASE_INIT: case BASE_INIT:
fprintf (stdout, "\nReturn code = %s\n", \ {
SM_Library_Open (0, NULL, SMD_CREATE | SMD_DEBUG_ALL) == SMS_OK ? "OK" : "NOK" ); fprintf( stdout, "\nReturn code = %s\n", SM_Library_Open( 0, NULL, SMD_CREATE | SMD_DEBUG_ALL) == SMS_OK ? "OK" : "NOK" );
break; break;
}
case BASE_OPEN: case BASE_OPEN:
fprintf (stdout, "\nReturn code = %s\n", \ {
SM_Library_Open (0, NULL, SMD_OPEN | SMD_DEBUG_ALL) == SMS_OK ? "OK" : "NOK" ); fprintf( stdout, "\nReturn code = %s\n", SM_Library_Open( 0, NULL, SMD_OPEN | SMD_DEBUG_ALL) == SMS_OK ? "OK" : "NOK" );
break; break;
}
case BASE_END: case BASE_END:
fprintf (stdout, "\nReturn code = %s\n", \ {
SM_Library_Close (SMD_DESTROY) == SMS_OK ? "OK" : "NOK" ); fprintf( stdout, "\nReturn code = %s\n", SM_Library_Close( SMD_DESTROY) == SMS_OK ? "OK" : "NOK" );
break; break;
}
case BASE_CLOSE: case BASE_CLOSE:
fprintf (stdout, "\nReturn code = %s\n", \ {
SM_Library_Close (SMD_CLOSE) == SMS_OK ? "OK" : "NOK" ); fprintf( stdout, "\nReturn code = %s\n", SM_Library_Close( SMD_CLOSE) == SMS_OK ? "OK" : "NOK" );
break; break;
}
case BASE_INFO: case BASE_INFO:
{
SM_Library_Dump( stderr); SM_Library_Dump( stderr);
break; break;
}
case MHH_INIT: case MHH_INIT:
fprintf (stdout, "\nNew heap name ? "); {
fgets( name, NAME_SIZE, stdin); Entry_Prompt( name, "Heap name ? ", TYPE_STRING);
name[ strlen( name) - 1] = '\0'; Entry_Prompt( &size, "Allocation size ? ", TYPE_NUMBER);
fprintf (stdout, "\nHeap segment size ? "); fprintf( stdout, "\nReturn code = %s\n", SM_Heap_Open( name, &Heap, size, SMD_CREATE, &Locked) == SMS_OK ? "OK" : "NOK" );
fgets( tmp, NAME_SIZE, stdin);
tmp[ strlen( tmp) - 1] = '\0';
size = atol (tmp);
fprintf (stdout, "\nReturn code = %s\n", \
SM_Heap_Open (name, &Heap, size, \
SMD_CREATE, &Locked) == SMS_OK ? "OK" : "NOK" );
break; break;
}
case MHH_OPEN: case MHH_OPEN:
fprintf (stdout, "\nHeap name to open ? "); {
fgets( name, NAME_SIZE, stdin); Entry_Prompt( name, "Heap name ? ", TYPE_STRING);
name[ strlen( name) - 1] = '\0'; Entry_Prompt( &size, "Opening mode( read=1 write=2) ? ", TYPE_NUMBER);
fprintf (stdout, "\nOpening mode (read=1 write=2) ? "); if( size == '1')
fgets( tmp, TMP_SIZE, stdin); {
tmp[ strlen( tmp) - 1] = '\0'; Mode = SMD_READ;
}
else
{
Mode = SMD_WRITE;
}
if (tmp[0] == '1') Mode = SMD_READ;
else Mode = SMD_WRITE;
if( !strcmp( name, HEAP_SYSTEM)) if( !strcmp( name, HEAP_SYSTEM))
{ {
fprintf( stdout, \ fprintf( stdout, \
@ -169,15 +366,14 @@ int main (int argc, char ** argv)
break; break;
} }
fprintf (stdout, "\nReturn code = %s\n", SM_Heap_Open (name, \ fprintf( stdout, "\nReturn code = %s\n", SM_Heap_Open( name, &Heap, 0, SMD_OPEN | Mode, &Locked) == SMS_OK ? "OK" : "NOK" );
&Heap, 0, SMD_OPEN | Mode, &Locked) == SMS_OK ? "OK" : "NOK" );
break; break;
}
case MHH_COMPRESS: case MHH_COMPRESS:
fprintf (stdout, "\nHeap name à compresser ? "); {
fgets( name, NAME_SIZE, stdin); Entry_Prompt( name, "Heap name ? ", TYPE_STRING);
name[ strlen( name) - 1] = '\0';
if( SM_Heap_Open( name, &Heap, 0, SMD_OPEN | SMD_WRITE, &Locked) == SMS_OK) if( SM_Heap_Open( name, &Heap, 0, SMD_OPEN | SMD_WRITE, &Locked) == SMS_OK)
{ {
@ -186,48 +382,13 @@ int main (int argc, char ** argv)
fprintf( stdout, "\nCompression size = %d byte(s)\n", (int)Compress); fprintf( stdout, "\nCompression size = %d byte(s)\n", (int)Compress);
if( Locked == TRUE) SM_Heap_Unlock( Heap); if( Locked == TRUE) SM_Heap_Unlock( Heap);
} }
break;
case MHH_END:
fprintf (stdout, "\nHeap name to remove ? ");
fgets( name, NAME_SIZE, stdin);
name[ strlen( name) - 1] = '\0';
if (!strcmp (name, HEAP_SYSTEM))
{
fprintf (stdout, \
"\n*** Warning : you can not make this operation on the system heap ***\n");
break; break;
} }
fprintf (stdout, "\nReturn code = %s\n", \
SM_Heap_End (name) == SMS_OK ? "OK" : "NOK" );
break;
case MHH_CLOSE:
fprintf (stdout, "\nHeap name to close ? ");
fgets( name, NAME_SIZE, stdin);
name[ strlen( name) - 1] = '\0';
if (!strcmp (name, HEAP_SYSTEM))
{
fprintf (stdout, \
"\n*** Warning : you can not make this operation on the system heap ***\n");
break;
}
if (SM_Heap_IsOpen (name, &Heap) == SMS_OK)
fprintf (stdout, "\nReturn code = %s\n", \
SM_Heap_Close (Heap) == SMS_OK ? "OK" : "NOK" );
else
fprintf (stdout, "\nHeap %s is not opened\n", name);
break;
case MHH_CHECK: case MHH_CHECK:
fprintf (stdout, "\nHeap name to check/recover ? "); {
fgets( name, NAME_SIZE, stdin); Entry_Prompt( name, "Heap name ? ", TYPE_STRING);
name[ strlen( name) - 1] = '\0';
if( SM_Heap_Open( name, &Heap, 0, SMD_OPEN | SMD_WRITE, &Locked) == SMS_OK) if( SM_Heap_Open( name, &Heap, 0, SMD_OPEN | SMD_WRITE, &Locked) == SMS_OK)
{ {
@ -235,59 +396,88 @@ int main (int argc, char ** argv)
SM_Heap_Check( Heap, &Nb_Detected, &Nb_Corrected, stderr); SM_Heap_Check( Heap, &Nb_Detected, &Nb_Corrected, stderr);
if( Locked == TRUE) SM_Heap_Unlock( Heap); if( Locked == TRUE) SM_Heap_Unlock( Heap);
} }
break; break;
}
case MHH_CLOSE:
{
Entry_Prompt( name, "Heap name ? ", TYPE_STRING);
if( !strcmp( name, HEAP_SYSTEM))
{
fprintf( stdout, \
"\n*** Warning : you can not make this operation on the system heap ***\n");
break;
}
if( SM_Heap_IsOpen( name, &Heap) == SMS_OK)
{
fprintf( stdout, "\nReturn code = %s\n", SM_Heap_Close( Heap) == SMS_OK ? "OK" : "NOK" );
}
else
{
fprintf( stdout, "\nHeap %s is not opened\n", name);
}
break;
}
case MHH_END:
{
Entry_Prompt( name, "Heap name ? ", TYPE_STRING);
if( !strcmp( name, HEAP_SYSTEM))
{
fprintf( stdout, \
"\n*** Warning : you can not make this operation on the system heap ***\n");
break;
}
fprintf( stdout, "\nReturn code = %s\n", SM_Heap_End( name) == SMS_OK ? "OK" : "NOK" );
break;
}
case ALLOC_CHUNK: case ALLOC_CHUNK:
fprintf (stdout, "\nHeap name ? "); {
fgets( name, NAME_SIZE, stdin); Entry_Prompt( name, "Heap name ? ", TYPE_STRING);
name[ strlen( name) - 1] = '\0'; Entry_Prompt( &size, "Allocation size ? ", TYPE_NUMBER);
fprintf (stdout, "\nAllocation size ? ");
fgets( tmp, TMP_SIZE, stdin);
tmp[ strlen( tmp) - 1] = '\0';
size = atol (tmp);
if( SM_Heap_Open( name, &Heap, 0, SMD_OPEN | SMD_WRITE, &Locked) == SMS_OK) if( SM_Heap_Open( name, &Heap, 0, SMD_OPEN | SMD_WRITE, &Locked) == SMS_OK)
{ {
SM_Chunk_Alloc( Heap, size, &ptr); SM_Chunk_Alloc( Heap, size, &ptr);
if( Locked == TRUE) SM_Heap_Unlock( Heap); if( Locked == TRUE) SM_Heap_Unlock( Heap);
} }
fprintf( stdout, "\nAddress = 0x%p( %lu)\n", ptr, ptr); fprintf( stdout, "\nAddress = 0x%p( %lu)\n", ptr, ptr);
break; break;
}
case WRITE_CHUNK: case WRITE_CHUNK:
fprintf (stdout, "\nAddress ? "); {
fgets( tmp, TMP_SIZE, stdin); Entry_Prompt( &ptr, "Address ? ", TYPE_NUMBER);
tmp[ strlen( tmp) - 1] = '\0'; Entry_Prompt( ptr, "String to put in ? ", TYPE_STRING);
ptr = (void *)atol (tmp);
fprintf (stdout, "\nString to put in ? ");
fgets( tmp, TMP_SIZE, stdin);
tmp[ strlen( tmp) - 1] = '\0';
strcpy ( (char *)ptr, tmp);
fprintf( stdout, "\nOK\n"); fprintf( stdout, "\nOK\n");
break; break;
}
case READ_CHUNK: case READ_CHUNK:
fprintf (stdout, "\nAddress ? "); {
fgets( tmp, TMP_SIZE, stdin); Entry_Prompt( &ptr, "Address ? ", TYPE_NUMBER);
tmp[ strlen( tmp) - 1] = '\0';
ptr = (void *)atol (tmp);
fprintf( stdout, "\nValeur du pointeur = %s\n",( char *)ptr); fprintf( stdout, "\nValeur du pointeur = %s\n",( char *)ptr);
break; break;
}
case FREE_CHUNK: case FREE_CHUNK:
fprintf (stdout, "\nHeap name ? "); {
fgets( name, NAME_SIZE, stdin); Entry_Prompt( name, "Heap name ? ", TYPE_STRING);
name[ strlen( name) - 1] = '\0'; Entry_Prompt( &ptr, "Address ? ", TYPE_NUMBER);
fprintf (stdout, "\nAddress ? ");
fgets( tmp, TMP_SIZE, stdin);
tmp[ strlen( tmp) - 1] = '\0';
ptr = (void *)atol (tmp);
if( SM_Heap_Open( name, &Heap, 0, SMD_OPEN | SMD_WRITE, &Locked) == SMS_OK) if( SM_Heap_Open( name, &Heap, 0, SMD_OPEN | SMD_WRITE, &Locked) == SMS_OK)
{ {
fprintf( stdout, "\nReturn code = %s\n", \ fprintf( stdout, "\nReturn code = %s\n", \
@ -296,11 +486,11 @@ int main (int argc, char ** argv)
} }
break; break;
}
case DSR_DUMP: case DSR_DUMP:
fprintf (stdout, "\nHeap name ? "); {
fgets( name, NAME_SIZE, stdin); Entry_Prompt( name, "Heap name ? ", TYPE_STRING);
name[ strlen( name) - 1] = '\0';
if( SM_Heap_Open( name, &Heap, 0, SMD_OPEN | SMD_READ, &Locked) == SMS_OK) if( SM_Heap_Open( name, &Heap, 0, SMD_OPEN | SMD_READ, &Locked) == SMS_OK)
{ {
@ -308,12 +498,13 @@ int main (int argc, char ** argv)
ND_DataStruct_Value_Print( stdout, Heap->MHH->DSR, NDD_RECURSIVE_MODE_PARENT_CHILD, 0, 0); ND_DataStruct_Value_Print( stdout, Heap->MHH->DSR, NDD_RECURSIVE_MODE_PARENT_CHILD, 0, 0);
if( Locked == TRUE) SM_Heap_Unlock( Heap); if( Locked == TRUE) SM_Heap_Unlock( Heap);
} }
break; break;
}
case ACR_DUMP: case ACR_DUMP:
fprintf (stdout, "\nHeap name ? "); {
fgets( name, NAME_SIZE, stdin); Entry_Prompt( name, "Heap name ? ", TYPE_STRING);
name[ strlen( name) - 1] = '\0';
if( SM_Heap_Open( name, &Heap, 0, SMD_OPEN | SMD_READ, &Locked) == SMS_OK) if( SM_Heap_Open( name, &Heap, 0, SMD_OPEN | SMD_READ, &Locked) == SMS_OK)
{ {
@ -321,12 +512,13 @@ int main (int argc, char ** argv)
ND_DataStruct_Value_Print( stdout, Heap->MHH->ACR, NDD_RECURSIVE_MODE_PARENT_CHILD, 0, 0); ND_DataStruct_Value_Print( stdout, Heap->MHH->ACR, NDD_RECURSIVE_MODE_PARENT_CHILD, 0, 0);
if( Locked == TRUE) SM_Heap_Unlock( Heap); if( Locked == TRUE) SM_Heap_Unlock( Heap);
} }
break; break;
}
case FCR_DUMP: case FCR_DUMP:
fprintf (stdout, "\nHeap name ? "); {
fgets( name, NAME_SIZE, stdin); Entry_Prompt( name, "Heap name ? ", TYPE_STRING);
name[ strlen( name) - 1] = '\0';
if( SM_Heap_Open( name, &Heap, 0, SMD_OPEN | SMD_READ, &Locked) == SMS_OK) if( SM_Heap_Open( name, &Heap, 0, SMD_OPEN | SMD_READ, &Locked) == SMS_OK)
{ {
@ -334,57 +526,25 @@ int main (int argc, char ** argv)
ND_DataStruct_Value_Print( stdout, Heap->MHH->FCR, NDD_RECURSIVE_MODE_PARENT_CHILD, 0, 0); ND_DataStruct_Value_Print( stdout, Heap->MHH->FCR, NDD_RECURSIVE_MODE_PARENT_CHILD, 0, 0);
if( Locked == TRUE) SM_Heap_Unlock( Heap); if( Locked == TRUE) SM_Heap_Unlock( Heap);
} }
break; break;
}
case QUIT: case QUIT:
{
fprintf( stdout, "\nExiting program ...\n"); fprintf( stdout, "\nExiting program ...\n");
break; break;
}
default: default:
{
fprintf( stdout, "\nUndefined choice %d\n", choice); fprintf( stdout, "\nUndefined choice %d\n", choice);
} }
choice = print_menu ();
}
return 0;
} }
void init_menu (void) choice = Print_Menu();
{
sprintf (menu, "Menu :\n");
sprintf (tmp, " - %2d) %-18s\n", QUIT, "Quit"); strcat (menu, tmp);
sprintf (tmp, " - %2d) %-18s", BASE_INIT, "Init library"); strcat (menu, tmp);
sprintf (tmp, " - %2d) %-18s", BASE_OPEN, "Open library"); strcat (menu, tmp);
sprintf (tmp, " - %2d) %-18s\n", BASE_INFO, "Info library"); strcat (menu, tmp);
sprintf (tmp, " - %2d) %-18s", BASE_CLOSE, "Close library"); strcat (menu, tmp);
sprintf (tmp, " - %2d) %-18s", BASE_END, "End library"); strcat (menu, tmp);
sprintf (tmp, " - %2d) %-18s\n", MHH_INIT, "Init heap"); strcat (menu, tmp);
sprintf (tmp, " - %2d) %-18s", MHH_OPEN, "Open heap"); strcat (menu, tmp);
sprintf (tmp, " - %2d) %-18s", MHH_CHECK, "Check/recover heap"); strcat (menu, tmp);
sprintf (tmp, " - %2d) %-18s\n", MHH_COMPRESS, "Compress heap"); strcat (menu, tmp);
sprintf (tmp, " - %2d) %-18s", MHH_CLOSE, "Close heap"); strcat (menu, tmp);
sprintf (tmp, " - %2d) %-18s", MHH_END, "End heap"); strcat (menu, tmp);
sprintf (tmp, " - %2d) %-18s\n", ALLOC_CHUNK, "Allocate chunk"); strcat (menu, tmp);
sprintf (tmp, " - %2d) %-18s", WRITE_CHUNK, "Write chunk"); strcat (menu, tmp);
sprintf (tmp, " - %2d) %-18s", READ_CHUNK, "Read chunk"); strcat (menu, tmp);
sprintf (tmp, " - %2d) %-18s\n", FREE_CHUNK, "Free chunk"); strcat (menu, tmp);
sprintf (tmp, " - %2d) %-18s", DSR_DUMP, "Dump DSR"); strcat (menu, tmp);
sprintf (tmp, " - %2d) %-18s", ACR_DUMP, "Dump ACR"); strcat (menu, tmp);
sprintf (tmp, " - %2d) %-18s\n", FCR_DUMP, "Dump FCR"); strcat (menu, tmp);
} }
int print_menu (void) return( 0);
{
fprintf (stdout, "------------------------------------------------------\n%s", menu);
tmp[0] = '\0';
while (tmp[0] == '\0')
{
printf ("\nChoice ? ");
fgets( tmp, TMP_SIZE, stdin);
tmp[ strlen( tmp) - 1] = '\0';
} }
return atoi (tmp);
}