new nt tools

Rev: NT/tools/grep:1.1
Rev: NT/tools/mv:1.1
Rev: NT/tools/nm:1.1

NT/tools/grep

+#!/usr/local/bin/pike
+
+inherit "lib.pike";
+
+int main(int argc, string *argv)
+{
+  if(argc>2 && sscanf(argv[-1],"/usr/%s"))
+    exit(1);
+
+  exece(find_next_in_path(argv[0],"grep"),argv[1..]);
+}

NT/tools/mv

+#!/usr/local/bin/pike
+
+inherit "lib.pike";
+
+int main(int argc, string *argv)
+{
+  if(sscanf(argv[-1],"%*[a-zA-Z]:%*s")==2)
+  {
+    argv[0]="rename";
+    if(argv[1]=="-c") argv=argv[..0]+argv[2..];
+    exit(do_cmd( Array.map(argv,fixpath)));
+  }else{
+    argv[0]=find_next_in_path(argv[0],"mv");
+    if(file_stat(argv[1]+".exe"))
+    {
+       string *cmd=({argv[0],argv[1]+".exe",argv[-1]});
+       mixed s=file_stat(cmd[-1]);
+       if(!s || s[1]!=-2) cmd[-1]+=".exe";
+
+       int ret=Process.create_process(cmd)->wait();
+       if(ret) exit(ret);
+    }
+    exece(argv[0],argv[1..]);
+    exit(69);
+  }
+}

NT/tools/nm

+#!/usr/local/bin/pike
+
+inherit "lib.pike";
+
+int main(int argc, string *argv)
+{
+  string ext=reverse(argv[-1]);
+  sscanf(ext,"%s.",ext);
+  ext=reverse(ext);
+  switch(ext)
+  {
+    case "a":
+    case "lib":
+    case "dll":
+      argv[0]="wlib";
+      exit(do_cmd( Array.map(argv,fixpath)));
+
+    default:
+      exece(find_next_in_path(argv[0],"nm"),argv[1..]);
+      exit(69);
+  }
+}