source code used to check if a specified command exists (if the command checking...

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/simgrid/simgrid/trunk@5535 48e7efb5-ca39-0410-a469-dd3cf9ba447f

diff --git a/tools/tesh2/include/explode.h b/tools/tesh2/include/explode.h
new file mode 100644 (file)
index 0000000..84c571a
--- /dev/null
+++ b/tools/tesh2/include/explode.h
@@ -0,0 +1,19 @@
+#ifndef __EXPLODE_H\r
+#define __EXPLODE_H\r
+\r
+#include <com.h>\r
+\r
+#ifdef __cplusplus\r
+extern "C" {\r
+#endif\r
+\r
+char** \r
+explode(char separator, const char *string);\r
+\r
+\r
+#ifdef __cplusplus\r
+}\r
+#endif\r
+\r
+#endif /* !__EXPLODE_H */\r
+\r

diff --git a/tools/tesh2/include/is_cmd.h b/tools/tesh2/include/is_cmd.h
new file mode 100644 (file)
index 0000000..4c6d743
--- /dev/null
+++ b/tools/tesh2/include/is_cmd.h
@@ -0,0 +1,18 @@
+#ifndef __IS_CMD_H\r
+#define __IS_CMD_H\r
+\r
+#include <com.h>\r
+\r
+#ifdef __cplusplus\r
+extern "C" {\r
+#endif\r
+\r
+int\r
+is_cmd(char** path, char** builtin, const char* p);\r
+\r
+#ifdef __cplusplus\r
+}\r
+#endif\r
+\r
+#endif /* !__IS_CMD_H */\r
+\r

diff --git a/tools/tesh2/src/explode.c b/tools/tesh2/src/explode.c
new file mode 100644 (file)
index 0000000..fd4a49e
--- /dev/null
+++ b/tools/tesh2/src/explode.c
@@ -0,0 +1,45 @@
+#include <explode.h>\r
+\r
+char** \r
+explode(char separator, const char *string)\r
+{\r
+    int pos = 0;\r
+    int i, len = 1;\r
+    int number = 2;\r
+    char **table;\r
+    const char* p = string;\r
+    \r
+    for (i = 0; p[i] != '\0'; i++)\r
+        if (p[i] == separator)\r
+            number++;\r
+    \r
+ \r
+    table = (char**)calloc(number, sizeof(char*));\r
+    \r
+    i = 0;\r
+    \r
+    while (*p++ != '\0')\r
+    {\r
+        if(*p == separator)\r
+        {\r
+            table[i] = (char*)calloc(len + 1, sizeof(char));\r
+            strncpy(table[i], string + pos , len);\r
+            pos += len + 1;\r
+            len = 0;\r
+            i++;\r
+        }\r
+        else\r
+               len++;\r
+    }\r
+    \r
+    if(len > 1)\r
+       {\r
+       table[i] = (char*)calloc(len + 1, sizeof(char));\r
+       strncpy(table[i], string + pos , len);\r
+    }\r
+    \r
+   \r
+    table[++i] = NULL;\r
+    \r
+    return table;\r
+}\r

diff --git a/tools/tesh2/src/is_cmd.c b/tools/tesh2/src/is_cmd.c
new file mode 100644 (file)
index 0000000..fd46515
--- /dev/null
+++ b/tools/tesh2/src/is_cmd.c
@@ -0,0 +1,94 @@
+#include <is_cmd.h>
+
+#include <explode.h>
+
+#ifdef WIN32
+static int is_w32_binary(const char* cmd)
+{
+       DWORD binary_type;
+
+       GetBinaryType(cmd, &binary_type);
+
+       if(SCS_32BIT_BINARY == binary_type || SCS_64BIT_BINARY == binary_type || SCS_64BIT_BINARY == binary_type)
+               return 1;
+
+       return 0;
+}
+#endif
+
+int
+is_cmd(char** path, char** builtin, const char* p)
+{
+       size_t i = 0;
+       size_t j = 0;
+       int yes = 0;
+
+       struct stat stat_buff = {0};
+       char command[PATH_MAX + 1] = {0};
+       char buff[PATH_MAX + 1] = {0};
+       
+       size_t len = strlen(p);
+       
+       if(!p)
+               return EINVAL;
+       
+       while(i < len)
+       {
+               if(p[i] != ' ' && p[i] != '\t' && p[i] != '>')
+                       command[j++] = p[i];
+               else
+                       break;
+                       
+               i++;
+       }
+       
+       /* check first if it's a shell buitin */
+       
+       if(builtin)
+       {
+               for(i = 0; builtin[i] != NULL; i++)
+               {
+                       if(!strcmp(builtin[i], command))
+                               return 0;
+               }
+       }
+       
+       if(stat(command, &stat_buff) || !S_ISREG(stat_buff.st_mode))
+       {
+               if(path)
+               {
+                       for (i = 0; path[i] != NULL; i++)
+                       {
+                               sprintf(buff,"%s/%s",path[i], command);
+                               
+                               if(!stat(buff, &stat_buff) && S_ISREG(stat_buff.st_mode))
+                               {
+                                       #ifdef WIN32
+                                       if(is_w32_binary(buff))
+                                               yes = 1;
+                                               break;
+                                       #else
+                                       if(!access(buff, X_OK))
+                                       {
+                                               yes = 1;
+                                               break;
+                                       }
+                                       #endif
+                               }
+                       }
+               }
+       }
+       else
+       {
+               #ifdef WIN32
+               if(is_w32_binary(command))
+                       yes = 1;                        
+               #else
+               if(!access(command, X_OK))
+                       yes = 1;
+               #endif
+       }
+               
+       return yes ? 0 : ECMDNOTFOUND;  
+}
+