- send_quit();
- conn = sever_connection(conn);
- exit(code);
-}
-
-usage()
-{
- fprintf(stderr, "Usage: test host [commands...]\n");
- fprintf(stderr, " Commands are:\n");
- fprintf(stderr, "\t-s srcfile dstfile\tsends file\n");
- fprintf(stderr, "\t-i srcfile\t\tsends instructions\n");
- fprintf(stderr, "\t-I srcfile dstfile\tsends instructions\n");
- fprintf(stderr, "\t-x\t\texecutes last instructions\n");
- fprintf(stderr, "\t-X file\t\texecutes file\n");
- exit(1);
-}
-
-static
-send_auth(host_name)
-char *host_name;
-{
- KTEXT_ST ticket_st;
- KTEXT ticket = &ticket_st;
- STRING data;
- register int code;
- int response;
-
- code = get_mr_update_ticket(host_name, ticket);
- if (code) {
- return(code);
- }
- STRING_DATA(data) = "AUTH_001";
- MAX_STRING_SIZE(data) = 9;
- code = send_object(conn, (char *)&data, STRING_T);
- if (code) {
- return(connection_errno(conn));
- }
- code = receive_object(conn, (char *)&response, INTEGER_T);
- if (code) {
- return(connection_errno(conn));
- }
- if (response) {
- return(response);
- }
- STRING_DATA(data) = (char *)ticket->dat;
- MAX_STRING_SIZE(data) = ticket->length;
- code = send_object(conn, (char *)&data, STRING_T);
- if (code) {
- return(connection_errno(conn));
- }
- code = receive_object(conn, (char *)&response, INTEGER_T);
- if (code) {
- return(connection_errno(conn));
- }
- if (response) {
- com_err(whoami, response, "Permission to connect denied");
- return(response);
- }
- return(MR_SUCCESS);
-}
-
-static
-execute(path)
- char *path;
-{
- int response;
- STRING data;
- register int code;
-
- string_alloc(&data, BUFSIZ);
- sprintf(STRING_DATA(data), "EXEC_002 %s", path);
- code = send_object(conn, (char *)&data, STRING_T);
- if (code)
- return(connection_errno(conn));
- code = receive_object(conn, (char *)&response, INTEGER_T);
- if (code)
- return(connection_errno(conn));
- if (response)
- return(response);
- return(MR_SUCCESS);