2: /* 3: Shows any outstanding Globus file requests 5: You can run PETSc programs with -globus_access_token XXXX where XXX is the access token to access Globus 7: */ 9: #include <petscsys.h> 11: int main(int argc, char **argv) 12: { 13: char buff[4096]; 15: PetscFunctionBeginUser; 16: PetscCall(PetscInitialize(&argc, &argv, NULL, NULL)); 17: PetscCall(PetscGlobusGetTransfers(PETSC_COMM_WORLD, NULL, buff, sizeof(buff))); 18: PetscCall(PetscPrintf(PETSC_COMM_WORLD, "Transfers are %s\n", buff)); 19: PetscCall(PetscFinalize()); 20: return 0; 21: } 23: /*TEST 25: build: 26: requires: ssl 28: test: 29: TODO: determine how to run this test without going through the browser 31: TEST*/