S4Backup [WebWare SDK]

Backup and directory structure.

I'm struggling a bit with recursion here. Trying to build the complete directory structure on local PC which is identical with the backup last run on the robot. I understand that I should use the S4Dir method in recursion but I just can't get it to work. It just falls out when it reaches the first bottom in the filetree (syspar), where it should back up.

Would appreciate some samles on this.

/S 

You say s4dir doesn't support recursion.. hmmmm.. so I can't do things like ....(using c#)? Which doesn't work

private void CopyBackupToPC(string strDir)
  {
//remove device from dir   

strDir = strDir.Substring(5,strDir.Length - 5);
 
   AddDirectory(strDir);
   
  }

  private void AddDirectory(string strDir)
  {
   int intResultID_A = 0;   short shRetval_A;   
   shRetval_A = AxHelper1.S4Dir("/hd0a/",strDir,0,3,ref intResultID_A);
   
   if(shRetval_A == 0)
   {
    //the first two directories is "." and ".." so start at index 2
    for(short i = 2; i < AxHelper1.DirListCount -1; i++)
    {
     string strPath = "/Blaa/Backup/RobOne" + strDir + "/" + AxHelper1.get_DirList(i) + "/";
     shRetval_A  = AxHelper1.S4MkDir("C:", strPath,3,ref intResultID_A);
    
     if(AxHelper1.FileListCount > 0)
     {
      AddFiles(strDir + "/" + AxHelper1.get_DirList(i)+ "/");
     }
     
     AddDirectory(strDir + "/" + AxHelper1.get_DirList(i));
    }
   }
  }

 

I took a simple but inelegant approach to this by using the collection object. Someone could take this pseudocode and simplify it and post it if they would like; I just did enough with this to get it working for what I needed.

What I do first is use S4Dir to get the properties of the root of my target. Once I know how many directories there are, I loop through and add the root folders to the collection (I assume that there are no files in the root):

If dirCount > 0 then

            For i = 0 to dirCount -1

                        Add Helper.DirList(i) to the collection

            Next i

End If

Next, I build the root directory structure on the PC for each item in the collection, and at the same time copy any files I find in these dirs to the PC as well.

If CollectionCount > 0 Then  //if any are found create them on the pc<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />

        For i = 1 To CollectionCount  //collections are 1-based

    MkLocalDir(the current Dir Name) //create the dir

                call S4Dir to get the file count for the current dir

                If intFileCount > 0 Then // there are files present

                        For j = 0 To intFileCount - 1

                                    Copy each file to PC

                        Next j

                End If

         Next i

 End If

Next, I go through and build the sub directories by operating on the topmost item in the collection until there are no more items left (I am adding sub-dirs to the end of the collection and deleting the topmost item at the end of this loop)

While CollectionCount > 0 //as long as there are items left in the collection

         Get the name of the first item in the collection

         call S4Dir on this item to get its dir count

         If intDirCount > 0 Then  //if it has sub-dirs

                 For each sub-dir in the current dir

add the sub-dir to the end of the collection

MkLocalDir(the current sub-dir Name)

                        call S4Dir to get the file count for the current sub-dir

                        If intFileCount > 0 Then //there are files present

                                    For j = 0 To intFileCount - 1

                                                Copy each file to PC

                        Next j

                        End If

                  Next sub-dir

         Remove the first item in the collection

         End If

End While

RussD38392,7000578704