kolibrios/programs/system/shell/modules/module_program_console.c

#include "../program_console.h"


int program_console(int pid)
{

char name[32];
char *buffer;
char *buf1k;
int result;
int i;
char command;
int size;
int is_end;

itoa(pid, name);
strcat(name, "-SHELL");

buffer = NULL;
buf1k = NULL;

for (i = 0; i < 30;  i++)
	{
	result = kol_buffer_open(name, SHM_OPEN | SHM_WRITE, 0, &buffer);
	if (buffer != NULL)
		break;

	kol_sleep(2);
	}

	if (buffer == NULL)
		return 0;
	else
		size = result;

	is_end = 0;
	for (;;)
		{

		command = *(buffer);
	
		switch (command)
			{
			case SC_EXIT:
				*buffer = SC_OK;
				is_end = 1;
				break;
			
			case SC_OK:
				kol_sleep(5);
				break;

			case SC_CLS:
				con_cls();
				*buffer = SC_OK;
				break;
				
			case SC_PUTC:
				printf("%c", *(buffer+1));
				*buffer = SC_OK;
				break;

			case SC_PUTS:
				printf("%s", buffer+1 );
				*buffer = SC_OK;
				break;
                    
			case SC_GETC:
				*(buffer+1) = (char) getch() ;
				*buffer = SC_OK;
				break;	

			case SC_GETS:
				gets(buffer+1, size-2);
				*buffer = SC_OK;
				break;	
        
			case SC_PID:
				buf1k=malloc(1024);
				kol_process_info(-1, buf1k);
				memcpy(buffer+1, buf1k+30, sizeof(unsigned));
				*buffer = SC_OK;
				free(buf1k);
				break;
                
			case SC_PING:
				*buffer = SC_OK;
				break;
                
			default:
				#if LANG_ENG
					printf ("  Error in console application.\n\r");
				#elif LANG_RUS
					printf ("  <20>訡<EFBFBD><E8A8A1> <20> <20><><EFBFBD>᮫쭮<E1AEAB> <20>ਫ<EFBFBD><E0A8AB><EFBFBD><EFBFBD><EFBFBD><EFBFBD>.\n\r");
				#endif
				return 0;
			};
		if (is_end)
			{
			printf("\n\r");
			return 1;
			}
		}

return 9;
}