//builtin.c - builtin commands

//

// © Portions Copyright (c) Symbian Software Ltd 2007 - 2008. All rights reserved.

//

/*

 * This file is part of zsh, the Z shell.

 *

 * Copyright (c) 1992-1997 Paul Falstad

 * All rights reserved.

 *

 * Permission is hereby granted, without written agreement and without

 * license or royalty fees, to use, copy, modify, and distribute this

 * software and to distribute modified versions of this software for any

 * purpose, provided that the above copyright notice and the following

 * two paragraphs appear in all copies of this software.

 *

 * In no event shall Paul Falstad or the Zsh Development Group be liable

 * to any party for direct, indirect, special, incidental, or consequential

 * damages arising out of the use of this software and its documentation,

 * even if Paul Falstad and the Zsh Development Group have been advised of

 * the possibility of such damage.

 *

 * Paul Falstad and the Zsh Development Group specifically disclaim any

 * warranties, including, but not limited to, the implied warranties of

 * merchantability and fitness for a particular purpose.  The software

 * provided hereunder is on an "as is" basis, and Paul Falstad and the

 * Zsh Development Group have no obligation to provide maintenance,

 * support, updates, enhancements, or modifications.

 *

 */

#ifdef __SYMBIAN32__

#ifdef __WINSCW__

#pragma warn_unusedarg off

#pragma warn_possunwant off

#endif//__WINSCW__

#endif//__SYMBIAN32__

/* this is defined so we get the prototype for open_memstream */

#define _GNU_SOURCE 1

#include "zsh.mdh"

#include "builtin.pro"

#ifdef __SYMBIAN32__

#include "dummy.h"

#endif//__SYMBIAN32__

/* Builtins in the main executable */

static struct builtin builtins[] =

{

    BIN_PREFIX("-", BINF_DASH),

    BIN_PREFIX("builtin", BINF_BUILTIN),

    BIN_PREFIX("command", BINF_COMMAND),

    BIN_PREFIX("exec", BINF_EXEC),

    BIN_PREFIX("noglob", BINF_NOGLOB),

    BUILTIN("[", 0, bin_test, 0, -1, BIN_BRACKET, NULL, NULL),

    BUILTIN(".", BINF_PSPECIAL, bin_dot, 1, -1, 0, NULL, NULL),

    BUILTIN(":", BINF_PSPECIAL, bin_true, 0, -1, 0, NULL, NULL),

    BUILTIN("alias", BINF_MAGICEQUALS | BINF_PLUSOPTS, bin_alias, 0, -1, 0, "Lgmrs", NULL),

    BUILTIN("autoload", BINF_PLUSOPTS, bin_functions, 0, -1, 0, "tUXkz", "u"),

#ifndef __SYMBIAN32__    

    BUILTIN("bg", 0, bin_fg, 0, -1, BIN_BG, NULL, NULL),

#endif    

    BUILTIN("break", BINF_PSPECIAL, bin_break, 0, 1, BIN_BREAK, NULL, NULL),

    BUILTIN("bye", 0, bin_break, 0, 1, BIN_EXIT, NULL, NULL),

    BUILTIN("cd", BINF_SKIPINVALID | BINF_SKIPDASH | BINF_DASHDASHVALID, bin_cd, 0, 2, BIN_CD, "sPL", NULL),

    BUILTIN("chdir", BINF_SKIPINVALID | BINF_SKIPDASH | BINF_DASHDASHVALID, bin_cd, 0, 2, BIN_CD, "sPL", NULL),

    BUILTIN("continue", BINF_PSPECIAL, bin_break, 0, 1, BIN_CONTINUE, NULL, NULL),

    BUILTIN("declare", BINF_PLUSOPTS | BINF_MAGICEQUALS | BINF_PSPECIAL, bin_typeset, 0, -1, 0, "AE:%F:%HL:%R:%TUZ:%afghi:%klmprtuxz", NULL),

    BUILTIN("dirs", 0, bin_dirs, 0, -1, 0, "clpv", NULL),

#ifndef __SYMBIAN32__    

    BUILTIN("disable", 0, bin_enable, 0, -1, BIN_DISABLE, "afmrs", NULL),

    BUILTIN("disown", 0, bin_fg, 0, -1, BIN_DISOWN, NULL, NULL),

#endif    

    BUILTIN("echo", BINF_PRINTOPTS | BINF_SKIPINVALID, bin_print, 0, -1, BIN_ECHO, "neE", "-"),

    BUILTIN("emulate", 0, bin_emulate, 1, 1, 0, "LR", NULL),

#ifndef __SYMBIAN32__        

    BUILTIN("enable", 0, bin_enable, 0, -1, BIN_ENABLE, "afmrs", NULL),

#endif    

    BUILTIN("eval", BINF_PSPECIAL, bin_eval, 0, -1, BIN_EVAL, NULL, NULL),

    BUILTIN("exit", BINF_PSPECIAL, bin_break, 0, 1, BIN_EXIT, NULL, NULL),

    BUILTIN("export", BINF_PLUSOPTS | BINF_MAGICEQUALS | BINF_PSPECIAL, bin_typeset, 0, -1, BIN_EXPORT, "E:%F:%HL:%R:%TUZ:%afhi:%lprtu", "xg"),

    BUILTIN("false", 0, bin_false, 0, -1, 0, NULL, NULL),

    /*

     * We used to behave as if the argument to -e was optional.

     * But that's actually not useful, so it's more consistent to

     * cause an error.

     */

    BUILTIN("fc", 0, bin_fc, 0, -1, BIN_FC, "nlre:IRWAdDfEimpPa", NULL),

#ifndef __SYMBIAN32__    

    BUILTIN("fg", 0, bin_fg, 0, -1, BIN_FG, NULL, NULL),

#endif    

    BUILTIN("float", BINF_PLUSOPTS | BINF_MAGICEQUALS | BINF_PSPECIAL, bin_typeset, 0, -1, 0, "E:%F:%HL:%R:%Z:%ghlprtux", "E"),

    BUILTIN("functions", BINF_PLUSOPTS, bin_functions, 0, -1, 0, "kmtuUz", NULL),

    BUILTIN("getln", 0, bin_read, 0, -1, 0, "ecnAlE", "zr"),

    BUILTIN("getopts", 0, bin_getopts, 2, -1, 0, NULL, NULL),

#ifndef __SYMBIAN32__    

    BUILTIN("hash", BINF_MAGICEQUALS, bin_hash, 0, -1, 0, "Ldfmrv", NULL),

#ifdef ZSH_HASH_DEBUG

    BUILTIN("hashinfo", 0, bin_hashinfo, 0, 0, 0, NULL, NULL),

#endif

#endif //__SYMBIAN32__

    BUILTIN("history", 0, bin_fc, 0, -1, BIN_FC, "nrdDfEimpPa", "l"),

    BUILTIN("integer", BINF_PLUSOPTS | BINF_MAGICEQUALS | BINF_PSPECIAL, bin_typeset, 0, -1, 0, "HL:%R:%Z:%ghi:%lprtux", "i"),

#ifndef __SYMBIAN32__    

    BUILTIN("jobs", 0, bin_fg, 0, -1, BIN_JOBS, "dlpZrs", NULL),

    BUILTIN("kill", 0, bin_kill, 0, -1, 0, NULL, NULL),

#endif        

    BUILTIN("let", 0, bin_let, 1, -1, 0, NULL, NULL),

    BUILTIN("local", BINF_PLUSOPTS | BINF_MAGICEQUALS | BINF_PSPECIAL, bin_typeset, 0, -1, 0, "AE:%F:%HL:%R:%TUZ:%ahi:%lprtux", NULL),

#ifndef __SYMBIAN32__    

    BUILTIN("log", 0, bin_log, 0, 0, 0, NULL, NULL),

#endif        

    BUILTIN("logout", 0, bin_break, 0, 1, BIN_LOGOUT, NULL, NULL),

#if defined(ZSH_MEM) & defined(ZSH_MEM_DEBUG)

    BUILTIN("mem", 0, bin_mem, 0, 0, 0, "v", NULL),

#endif

#if defined(ZSH_PAT_DEBUG)

    BUILTIN("patdebug", 0, bin_patdebug, 1, -1, 0, "p", NULL),

#endif

    BUILTIN("popd", 0, bin_cd, 0, 1, BIN_POPD, NULL, NULL),

    BUILTIN("print", BINF_PRINTOPTS, bin_print, 0, -1, BIN_PRINT, "acC:f:ilmnNoOPrRsu:z-", NULL),

    BUILTIN("printf", 0, bin_print, 1, -1, BIN_PRINTF, NULL, NULL),

    BUILTIN("pushd", BINF_SKIPINVALID | BINF_SKIPDASH | BINF_DASHDASHVALID, bin_cd, 0, 2, BIN_PUSHD, "sPL", NULL),

    BUILTIN("pushln", BINF_PRINTOPTS, bin_print, 0, -1, BIN_PRINT, NULL, "-nz"),

    BUILTIN("pwd", 0, bin_pwd, 0, 0, 0, "rLP", NULL),

    BUILTIN("r", 0, bin_fc, 0, -1, BIN_R, "nrl", NULL),

    BUILTIN("read", 0, bin_read, 0, -1, 0, "cd:ek:%lnpqrst:%zu:AE", NULL),

    BUILTIN("readonly", BINF_PLUSOPTS | BINF_MAGICEQUALS | BINF_PSPECIAL, bin_typeset, 0, -1, 0, "AE:%F:%HL:%R:%TUZ:%afghi:%lptux", "r"),

#ifndef __SYMBIAN32__    

    BUILTIN("rehash", 0, bin_hash, 0, 0, 0, "df", "r"),

#endif    

    BUILTIN("return", BINF_PSPECIAL, bin_break, 0, 1, BIN_RETURN, NULL, NULL),

    BUILTIN("set", BINF_PSPECIAL, bin_set, 0, -1, 0, NULL, NULL),

    BUILTIN("setopt", 0, bin_setopt, 0, -1, BIN_SETOPT, NULL, NULL),

    BUILTIN("shift", BINF_PSPECIAL, bin_shift, 0, -1, 0, NULL, NULL),

    BUILTIN("source", BINF_PSPECIAL, bin_dot, 1, -1, 0, NULL, NULL),

#ifndef __SYMBIAN32__         

    BUILTIN("suspend", 0, bin_suspend, 0, 0, 0, "f", NULL),

#endif

    BUILTIN("test", 0, bin_test, 0, -1, BIN_TEST, NULL, NULL),    

#ifndef __SYMBIAN32__    

    BUILTIN("ttyctl", 0, bin_ttyctl, 0, 0, 0, "fu", NULL),    

    BUILTIN("times", BINF_PSPECIAL, bin_times, 0, 0, 0, NULL, NULL), 

    BUILTIN("trap", BINF_PSPECIAL, bin_trap, 0, -1, 0, NULL, NULL),

#endif       

    BUILTIN("true", 0, bin_true, 0, -1, 0, NULL, NULL),

    BUILTIN("type", 0, bin_whence, 0, -1, 0, "ampfsw", "v"),

    BUILTIN("typeset", BINF_PLUSOPTS | BINF_MAGICEQUALS | BINF_PSPECIAL, bin_typeset, 0, -1, 0, "AE:%F:%HL:%R:%TUZ:%afghi:%klprtuxmz", NULL),

#ifndef __SYMBIAN32__    

    BUILTIN("umask", 0, bin_umask, 0, 1, 0, "S", NULL),

#endif    

    BUILTIN("unalias", 0, bin_unhash, 1, -1, 0, "ms", "a"),

    BUILTIN("unfunction", 0, bin_unhash, 1, -1, 0, "m", "f"),

    BUILTIN("unhash", 0, bin_unhash, 1, -1, 0, "adfms", NULL),

    BUILTIN("unset", BINF_PSPECIAL, bin_unset, 1, -1, 0, "fmv", NULL),

    BUILTIN("unsetopt", 0, bin_setopt, 0, -1, BIN_UNSETOPT, NULL, NULL),

#ifndef __SYMBIAN32__    

    BUILTIN("wait", 0, bin_fg, 0, -1, BIN_WAIT, NULL, NULL),

#endif    

    BUILTIN("whence", 0, bin_whence, 0, -1, 0, "acmpvfsw", NULL),

    BUILTIN("where", 0, bin_whence, 0, -1, 0, "pmsw", "ca"),

    BUILTIN("which", 0, bin_whence, 0, -1, 0, "ampsw", "c"),

#ifndef __SYMBIAN32__        

    BUILTIN("zmodload", 0, bin_zmodload, 0, -1, 0, "ARILabcfdipue", NULL),    

    BUILTIN("zcompile", 0, bin_zcompile, 0, -1, 0, "tUMRcmzka", NULL),

#endif    

    BUILTIN("mkdir", 0, bin_mkdir, 1, -1, 0,         "p",   NULL),

    BUILTIN("mv",    0, bin_ln,    2, -1, BIN_MV,    "fi",    NULL),

    BUILTIN("rm",    0, bin_rm,    1, -1, 0,         "dfir", NULL),

    BUILTIN("rmdir", 0, bin_rmdir, 1, -1, 0,         NULL,    NULL),

	BUILTIN("ls", 0, bin_ls, 0, -1, 0,         "1ACFRSWacdfklmpqrstux",    NULL),

	BUILTIN("touch", 0, bin_touch, 1, -1, 0,         "acfmrt",    NULL),

	BUILTIN("cp", 0, bin_cp, 2, -1, 0,         "Rfipr",    NULL),

	BUILTIN("cat", 0, bin_cat, 0, -1, 0,         "benstu",    NULL),    

	BUILTIN("more", 0, bin_more, 0, -1, 0,         NULL,    NULL),  	

};

/****************************************/

/* Builtin Command Hash Table Functions */

/****************************************/

/* hash table containing builtin commands */

/**/

mod_export HashTable builtintab;

#ifdef __SYMBIAN32__

extern int pipeUsed;

#endif 

/**/

void

createbuiltintable(void)

{

    builtintab = newhashtable(85, "builtintab", NULL);

    builtintab->hash        = hasher;

    builtintab->emptytable  = NULL;

    builtintab->filltable   = NULL;

    builtintab->cmpnodes    = strcmp;

    builtintab->addnode     = addhashnode;

    builtintab->getnode     = gethashnode;

    builtintab->getnode2    = gethashnode2;

    builtintab->removenode  = removehashnode;

    builtintab->disablenode = disablehashnode;

    builtintab->enablenode  = enablehashnode;

    builtintab->freenode    = freebuiltinnode;

    builtintab->printnode   = printbuiltinnode;

    addbuiltins("zsh", builtins, sizeof(builtins)/sizeof(*builtins));

}

/* Print a builtin */

/**/

static void

printbuiltinnode(HashNode hn, int printflags)

{

    Builtin bn = (Builtin) hn;

    if (printflags & PRINT_WHENCE_WORD) {

	printf("%s: builtin command\n", bn->nam);

	return;

    }

    if (printflags & PRINT_WHENCE_CSH) {

	printf("%s: shell built-in command\n", bn->nam);

	return;

    }

    if (printflags & PRINT_WHENCE_VERBOSE) {

	printf("%s is a shell builtin\n", bn->nam);

	return;

    }

    /* default is name only */

    printf("%s\n", bn->nam);

}

/**/

static void

freebuiltinnode(HashNode hn)

{

    Builtin bn = (Builtin) hn;

    if(!(bn->flags & BINF_ADDED)) {

	zsfree(bn->nam);

	zsfree(bn->optstr);

	zfree(bn, sizeof(struct builtin));

    }

}

/* Make sure we have space for a new option and increment. */

#define OPT_ALLOC_CHUNK 16

/**/

static int

new_optarg(Options ops)

{

    /* Argument index must be a non-zero 6-bit number. */

    if (ops->argscount == 63)

	return 1;

    if (ops->argsalloc == ops->argscount) {

	char **newptr = 

	    (char **)zhalloc((ops->argsalloc + OPT_ALLOC_CHUNK) *

			     sizeof(char *));

	if (ops->argsalloc)

	    memcpy(newptr, ops->args, ops->argsalloc * sizeof(char *));

	ops->args = newptr;

	ops->argsalloc += OPT_ALLOC_CHUNK;

    }

    ops->argscount++;

    return 0;

}

#ifdef __SYMBIAN32__

#define MAX_CMD_LEN 50

#define SCREEN_SIZE 20

size_t fd_total=0; //holds the current index in the table

//need to be filled in the order of command execution...

typedef struct fd_tab

{

	char command[MAX_CMD_LEN]; //command name

	int index; //index of this command in the array...

	pid_t pid; //pid of this command...

	int fds[3]; //stdin, stdout, stderr of this command...

	int hasTerminated;

}FD_PERSIST;

//interfaces to access this table entry..

FD_PERSIST *fds_root=NULL;

FD_PERSIST* getPrev(FD_PERSIST* curr)

{

	if(curr==NULL || curr->index<=0)

		return NULL;

	else

		{

		return &fds_root[curr->index-1];	

		}

}

FD_PERSIST* getNext(FD_PERSIST* curr)

{

	if(curr==NULL || curr->index>=fd_total-1)

		return NULL;

	else

		{

		return &fds_root[curr->index+1];		

		}

}

FD_PERSIST* getFirst()

{

	return fds_root;

}

FD_PERSIST* GetNextInLoop(FD_PERSIST* curr)

 {

 	if(curr==NULL || curr->index>=fd_total-1)

 		return fds_root;

 	else

 		{

 		return &fds_root[curr->index+1];		

 		}

 }

FD_PERSIST* getLast()

{

	if(fds_root==NULL || fd_total<=0)

		return fds_root;

	else

		{

		return  &fds_root[fd_total-1];	

		}

}

//generate the command arguments to be passed to popen3...

char* getCommand(char* name, char** argv, struct options ops, int funcid)

{

    char *pcmd=NULL;

	size_t tot_allocated=0, curwrite=0;

	char* ret=NULL;

	//update the command..

	tot_allocated=strlen(name)+2; //for space and \0

	pcmd=(char*)calloc(tot_allocated, sizeof(char));

	if(pcmd==NULL)

		{

		free(pcmd);

		return ret;

		}

	sprintf(pcmd, "%s ", name);	

	curwrite=tot_allocated-1;	

	//update the arguments for the command...

	if(argv && *argv)

		{

		int back_cur=curwrite;

		int arg_cnt=0;

		char temp[2];

		//hold the count of args...

		pcmd=(char*)realloc(pcmd, tot_allocated+=2); 

		if(pcmd==NULL)

			{

			free(pcmd);

			return ret;

			}

		sprintf(pcmd+curwrite, "%d ", 0);	

		curwrite+=2;

		//start updating args...

		while(argv && *argv)

			{

			tot_allocated=strlen(*argv)+tot_allocated+1;

			pcmd=(char*)realloc(pcmd, tot_allocated);

			if(pcmd==NULL)

				{

				free(pcmd);

				return ret;

				}

			sprintf(pcmd+curwrite, "%s ", *argv);

			curwrite=curwrite+strlen(*argv)+1;

			arg_cnt++;

			++argv;

			}

		sprintf(temp,"%d", arg_cnt);

		pcmd[back_cur]=temp[0];

		}

		else

		{

		//update with zero if no args...

		pcmd=(char*)realloc(pcmd, tot_allocated+=2);	

		if(pcmd==NULL)

			{

			free(pcmd);

			return ret;

			}

		sprintf(pcmd+curwrite, "%d ", 0);	

		curwrite+=2;		

		}	

	   //START: start updating the options 	

	   //update ops.ind

	    {

	    int idx=0;

		pcmd=(char*)realloc(pcmd, tot_allocated+=2);

		if(pcmd==NULL)

			{

			free(pcmd);

			return ret;

			}

		sprintf(pcmd+curwrite, "%d ", 1);				

		curwrite+=2;

		tot_allocated=tot_allocated+MAX_OPS+2;

	   	pcmd=(char*)realloc(pcmd, tot_allocated);	

		if(pcmd==NULL)

			{

			free(pcmd);

			return ret;	

			 }

		while(idx<MAX_OPS)	 

			{

			sprintf(pcmd+curwrite, "%d", ops.ind[idx]);

			idx++;

			curwrite++;				

			}

		sprintf(pcmd+curwrite, " ");    

		curwrite=curwrite+1;		    	

	    }		

		//update ops.args

	if(ops.args && *ops.args)

		{

		int back_cur=curwrite;

		int arg_cnt=0;

		char temp[2];

		//hold the count of args...

		pcmd=(char*)realloc(pcmd, tot_allocated+=2); 

		if(pcmd==NULL)

			{

			free(pcmd);

			return ret;

			}

		sprintf(pcmd+curwrite, "%d ", 0);					

		curwrite+=2;

		while(ops.args && *ops.args)

			{	

			tot_allocated=strlen(*ops.args)+tot_allocated+1;					

			pcmd=(char*)realloc(pcmd, tot_allocated);

			if(pcmd==NULL)

				{

				free(pcmd);

				return ret;

				}

			sprintf(pcmd+curwrite, "%s ", *ops.args);

			curwrite=curwrite+strlen(*ops.args)+1;			

			ops.args++;

			arg_cnt++;

			}

		sprintf(temp,"%d", arg_cnt);

		pcmd[back_cur]=temp[0];

		}

	else

		{

		//update with zero if no args...

		pcmd=(char*)realloc(pcmd, tot_allocated+=2);	

		if(pcmd==NULL)

			{

			free(pcmd);

			return ret;

			}

		sprintf(pcmd+curwrite, "%d ", 0);	

		curwrite+=2;				

		}

	//update the ops.argscount

	pcmd=(char*)realloc(pcmd, tot_allocated+=2);

	if(pcmd==NULL)

		{

		free(pcmd);

		return ret;

		}

	sprintf(pcmd+curwrite, "%d ", ops.argscount);

	curwrite+=2;

	//update the ops.argsalloc

	pcmd=(char*)realloc(pcmd, tot_allocated+=2);

	if(pcmd==NULL)

		{

		free(pcmd);

		return ret;

		}

	sprintf(pcmd+curwrite, "%d ", ops.argsalloc);

	curwrite+=2;			

	//End: end of options update... 

	//update the function id ...

	pcmd=(char*)realloc(pcmd, tot_allocated+=1);

	if(pcmd==NULL)

		{

		free(pcmd);