original files of m241

components/ip_net2-6.9/ipcom/src/ipcom_shellio.c

@@ -0,0 +1,317 @@
+/*
+ ******************************************************************************
+ *                     INTERPEAK SOURCE FILE
+ *
+ *   Document no: @(#) $Name: VXWORKS_ITER40_2019102207 $ $RCSfile: ipcom_shellio.c,v $ $Revision: 1.38.10.1 $
+ *   $Source: /home/interpeak/CVSRoot/ipcom/src/ipcom_shellio.c,v $
+ *   $Author: svc-cmnet $
+ *   $State: Exp $ $Locker:  $
+ *
+ *   INTERPEAK_COPYRIGHT_STRING
+ *   Design and implementation by Lennart Bang <lob@interpeak.se>
+ ******************************************************************************
+ */
+
+
+/*
+ ****************************************************************************
+ * 1                    DESCRIPTION
+ ****************************************************************************
+ */
+
+/*
+ ****************************************************************************
+ * 2                    CONFIGURATION
+ ****************************************************************************
+ */
+
+#include "ipcom_config.h"
+
+
+/*
+ ****************************************************************************
+ * 3                    INCLUDE FILES
+ ****************************************************************************
+ */
+
+#if IPCOM_USE_SHELL == IPCOM_SHELL_IPCOM
+
+#define IPCOM_USE_CLIB_PROTO
+#include "ipcom_type.h"
+#include "ipcom_cstyle.h"
+#include "ipcom_clib.h"
+#include "ipcom_clib2.h"
+#include "ipcom_file.h"
+#include "ipcom_os.h"
+#include "ipcom_sock.h"
+#include "ipcom_err.h"
+#include "ipcom_shell.h"
+#include "ipcom_syslog.h"
+
+
+/*
+ ****************************************************************************
+ * 4                    DEFINES
+ ****************************************************************************
+ */
+
+#define IPCOM_SYSLOG_PRIORITY    IPCOM_SYSLOG_IPCOM_PRIORITY
+#define IPCOM_SYSLOG_FACILITY    IPCOM_LOG_IPCOM_SHELL
+
+
+/*
+ ****************************************************************************
+ * 5                    TYPES
+ ****************************************************************************
+ */
+
+/*
+ ****************************************************************************
+ * 6                    EXTERN PROTOTYPES
+ ****************************************************************************
+ */
+
+/*
+ ****************************************************************************
+ * 7                    LOCAL PROTOTYPES
+ ****************************************************************************
+ */
+
+/*
+ ****************************************************************************
+ * 8                    DATA
+ ****************************************************************************
+ */
+
+/*
+ ****************************************************************************
+ * 9                    LOCAL FUNCTIONS
+ ****************************************************************************
+ */
+
+/*
+ ****************************************************************************
+ * 10                    PUBLIC FUNCTIONS
+ ****************************************************************************
+ */
+
+
+/*
+ *===========================================================================
+ *                    ipcom_shell_write
+ *===========================================================================
+ * Description:
+ * Parameters:
+ * Returns:
+ *
+ */
+IP_PUBLIC Ip_ssize_t
+ipcom_shell_write(Ip_fd fd, IP_CONST void *buf, Ip_size_t count)
+{
+    Ipcom_proc  *proc;
+    Ip_ssize_t   ret;
+
+    (void) fd;
+    ip_assert((IP_FILE *)(Ip_ptrdiff_t)fd == IP_FILE_STDOUT
+              || (IP_FILE *) (Ip_ptrdiff_t)fd == IP_FILE_STDERR);
+
+    if (count == 0)
+        return 0;
+
+    proc = ipcom_proc_self();
+    if (proc && proc->shell_fd != IP_INVALID_SOCKET)
+        ret = ipcom_socketwrite(proc->shell_fd, buf, count);
+    else
+    {
+#if defined(IP_PORT_INTEGRITY) || defined (IP_PORT_VXWORKS)
+        /*!!FIXME--Don't assume null-termination */
+        ipcom_debug_printf("%s", buf);
+        return count;
+#else
+        ipcom_errno = IP_ERRNO_EBADF;
+        ret = -1;
+#endif
+    }
+    return ret;
+}
+
+
+/*
+ *===========================================================================
+ *                    ipcom_shell_fwrite
+ *===========================================================================
+ * Description:
+ * Parameters:
+ * Returns:
+ *
+ */
+IP_PUBLIC Ip_size_t
+ipcom_shell_fwrite(IP_CONST void *ptr, Ip_size_t size,
+                   Ip_size_t nitems, IP_FILE *stream)
+{
+    Ipcom_proc *proc;
+    Ip_ssize_t  ret = 0;
+
+#if defined(IP_PORT_INTEGRITY) || defined (IP_PORT_VXWORKS) || defined (IP_PORT_UNIX)
+    /* FIXME--route all boot printouts to debug_printf */
+    if (stream != IP_NULL && (stream == ip_stdout || stream == ip_stderr))
+    {
+        proc = ipcom_proc_self();
+        if (proc != IP_NULL && proc->shell_fd != IP_INVALID_SOCKET)
+        {
+            goto ok;
+        }
+    }
+
+#ifdef IP_PORT_UNIX
+    return (Ip_size_t)ipcom_shell_write(IP_FD_STDOUT, ptr, size * nitems);
+#else
+    /* FIXME--Don't assume null-termination */
+    ipcom_debug_printf("%s", ptr);
+    return nitems;
+#endif
+
+  ok:
+#endif
+    if (stream == IP_NULL)
+    {
+        ipcom_debug_printf("%s", ptr);
+        return nitems;
+    }
+
+    ip_assert(stream != IP_NULL);
+    ip_assert(stream == ip_stdout || stream == ip_stderr);
+
+    if (nitems == 0)
+        return 0;
+
+    proc = ipcom_proc_self();
+    if (proc != IP_NULL && proc->shell_fd != IP_INVALID_SOCKET)
+    {
+        ret = ipcom_socketwrite(proc->shell_fd, ptr, size * nitems);
+        ret = (ret < 0) ? 0 : ret / (Ip_ssize_t)size;
+    }
+    else
+    {
+        ipcom_errno = IP_ERRNO_EBADF;
+    }
+    return (Ip_size_t)ret;
+}
+
+
+/*
+ *===========================================================================
+ *                    ipcom_shell_fread
+ *===========================================================================
+ * Description:
+ * Parameters:
+ * Returns:
+ *
+ */
+IP_PUBLIC Ip_size_t
+ipcom_shell_fread(void *ptr, Ip_size_t size, Ip_size_t nitems, IP_FILE *stream)
+{
+    Ipcom_proc  *proc;
+    Ip_ssize_t   ret = 0;
+
+    (void)stream;
+    ip_assert(stream);
+    ip_assert(stream == ip_stdin);
+
+    proc = ipcom_proc_self();
+    if (proc && proc->shell_fd != IP_INVALID_SOCKET)
+    {
+        ret = ipcom_socketread(proc->shell_fd, ptr, size * nitems);
+        ret = (ret < 0) ? 0 : ret / (Ip_ssize_t)size;
+    }
+    else
+        ipcom_errno = IP_ERRNO_EBADF;
+
+    return (Ip_size_t)ret;
+}
+
+
+/*
+ *===========================================================================
+ *                    ipcom_shell_exit
+ *===========================================================================
+ * Description:
+ * Parameters:
+ * Returns:
+ *
+ */
+IP_PUBLIC void
+ipcom_shell_exit(int status)
+{
+    Ipcom_proc  *proc;
+    char procname[40];
+    Ip_u32  *einfo;
+    Ipcom_ipc  ipc;
+    Ip_err retval;
+    Ip_bool ipc_opened = IP_FALSE;
+
+    proc = ipcom_proc_self();
+    if (proc == IP_NULL)
+    {
+        IP_PANIC();
+        goto fail;
+    }
+
+    /* Non-SHELL process calls ipcom_exit(). */
+    if (proc->shell_ppid == 0)
+        goto leave;
+
+    /* Prevent socket to telnet client from being closed by ipcom_proc_exit(). */
+    proc->shell_fd = IP_INVALID_SOCKET;
+
+    /* Open IPC with ipcom_shell. */
+    ipcom_sprintf(procname, "ipcom_shell_%lx_%d",
+                  (long)(proc->shell_ppid & 0xffffffff),
+                  (int)proc->shell_seqno);
+    retval = ipcom_ipc_open(&ipc, procname, -1);
+    if (retval != IPCOM_SUCCESS)
+    {
+        IP_PANIC();
+        goto fail;
+    }
+    ipc_opened = IP_TRUE;
+
+    /* Send a message to ipcom_shell. */
+    einfo = ipcom_ipc_malloc(8);
+    if (einfo == IP_NULL)
+    {
+        IP_PANIC();
+        goto fail;
+    }
+
+    /* Send the IPC info. */
+    einfo[0] = 1;
+    einfo[1] = (Ip_u32)status; /*lint !e571 */
+    retval = ipcom_ipc_send(&ipc, einfo);
+    if (retval != IPCOM_SUCCESS)
+    {
+        ipcom_ipc_free(einfo);
+        IP_PANIC();
+    }
+
+ fail:
+    IPCOM_LOG1(DEBUG2, "ipcom_shell_cmd :: terminating(%x)", proc->pid);
+    if (ipc_opened)
+        (void)ipcom_ipc_close(&ipc);
+ leave:
+    /* note: ports must now accept an ipc_uninstall call without asserts. */
+    (void)ipcom_ipc_uninstall();
+    ipcom_proc_exit();
+}
+
+#else
+int ipcom_shellio_empty_file;
+#endif   /* #if IPCOM_USE_SHELL == IPCOM_SHELL_IPCOM */
+
+
+/*
+ ****************************************************************************
+ *                      END OF FILE
+ ****************************************************************************
+ */
+