int main(int argc, char *argv[], char *envp[])
{
int i;
struct line_list args;
Init_line_list(&args);
/* set signal handlers */
(void) plp_signal (SIGHUP, cleanup_HUP);
(void) plp_signal (SIGINT, cleanup_INT);
(void) plp_signal (SIGQUIT, cleanup_QUIT);
(void) plp_signal (SIGTERM, cleanup_TERM);
(void) signal (SIGCHLD, SIG_DFL);
(void) signal (SIGPIPE, SIG_IGN);
/*
* set up the user state
*/
#ifndef NODEBUG
Debug = 0;
#endif
Initialize(argc, argv, envp, 'D' );
Setup_configuration();
Get_parms(argc, argv); /* scan input args */
if( Auth && !getenv( "AUTH" ) ){
FPRINTF(STDERR,
_("authentication requested (-A option) and AUTH environment variable not set") );
usage();
}
/* now force the printer list */
if( All_printers || (Printer_DYN && safestrcasecmp(Printer_DYN,ALL) == 0 ) ){
All_printers = 1;
Get_all_printcap_entries();
if(DEBUGL1)Dump_line_list("lprm - final All_line_list", &All_line_list);
}
DEBUG1("lprm: Printer_DYN '%s', All_printers %d, All_line_list.count %d",
Printer_DYN, All_printers, All_line_list.count );
if( Username_JOB && OriginalRUID ){
struct line_list user_list;
char *str, *t;
struct passwd *pw;
int found;
uid_t uid;
DEBUG2("lprm: checking '%s' for -U perms",
Allow_user_setting_DYN );
Init_line_list(&user_list);
Split( &user_list, Allow_user_setting_DYN,File_sep,0,0,0,0,0,0);
found = 0;
for( i = 0; !found && i < user_list.count; ++i ){
str = user_list.list[i];
DEBUG2("lprm: checking '%s'", str );
uid = strtol( str, &t, 10 );
if( str == t || *t ){
/* try getpasswd */
pw = getpwnam( str );
if( pw ){
uid = pw->pw_uid;
}
}
DEBUG2( "lprm: uid '%d'", uid );
found = ( uid == OriginalRUID );
DEBUG2( "lprm: found '%d'", found );
}
if( !found ){
DEBUG1( "-U (username) can only be used by ROOT or authorized users" );
Username_JOB = 0;
}
}
if( Username_JOB ){
Set_DYN( &Logname_DYN, Username_JOB );
}
Add_line_list(&args,Logname_DYN,0,0,0);
for( i = Optind; argv[i]; ++i ){
Add_line_list(&args,argv[i],0,0,0);
}
Check_max(&args,2);
args.list[args.count] = 0;
if( All_printers ){
if( All_line_list.count == 0 ){
FPRINTF(STDERR,"no printers\n");
cleanup(0);
}
for( i = 0; i < All_line_list.count; ++i ){
Set_DYN(&Printer_DYN,All_line_list.list[i] );
Do_removal(args.list);
}
} else {
Get_printer();
Do_removal(args.list);
}
Free_line_list(&args);
DEBUG1("lprm: done");
Remove_tempfiles();
DEBUG1("lprm: tempfiles removed");
Errorcode = 0;
DEBUG1("lprm: cleaning up");
cleanup(0);
return(0);
}
/*************************************************************************
* Receive_secure() - receive a secure transfer
*************************************************************************/
int Receive_secure( int *sock, char *input )
{
char *printername;
char error[SMALLBUFFER]; /* error message */
char *authtype;
char *cf, *s;
char *jobsize = 0;
char *user = 0;
int tempfd = -1;
int ack, status, from_server;
struct line_list args, header_info, info;
struct stat statb;
char *tempfile = 0;
const struct security *security = 0;
Name = "RCVSEC";
memset( error, 0, sizeof(error));
ack = 0;
status = 0;
DEBUGF(DRECV1)("Receive_secure: input line '%s'", input );
Init_line_list( &args );
Init_line_list( &header_info );
Init_line_list( &info );
Split(&args,input+1,Whitespace,0,0,0,0,0,0);
DEBUGFC(DRECV1)Dump_line_list("Receive_secure - input", &args);
if( args.count != 5 && args.count != 4 ){
plp_snprintf( error+1, sizeof(error)-1,
_("bad command line '%s'"), input );
ack = ACK_FAIL; /* no retry, don't send again */
status = JFAIL;
goto error;
}
Check_max(&args,1);
args.list[args.count] = 0;
/*
* \REQ_SECUREprintername C/F user authtype jobsize\n - receive a job
* 0 1 2 3 4
*/
printername = args.list[0];
cf = args.list[1];
user = args.list[2]; /* user is escape encoded */
Unescape(user);
authtype = args.list[3];
Unescape(authtype);
jobsize = args.list[4];
setproctitle( "lpd %s '%s'", Name, printername );
Perm_check.authtype = authtype;
from_server = 0;
if( *cf == 'F' ){
from_server = 1;
}
/* set up the authentication support information */
if( Is_clean_name( printername ) ){
plp_snprintf( error+1, sizeof(error)-1,
_("bad printer name '%s'"), input );
ack = ACK_FAIL; /* no retry, don't send again */
status = JFAIL;
goto error;
}
Set_DYN(&Printer_DYN,printername);
if( Setup_printer( printername, error+1, sizeof(error)-1, 0 ) ){
if( jobsize ){
plp_snprintf( error+1, sizeof(error)-1,
_("bad printer '%s'"), printername );
ack = ACK_FAIL; /* no retry, don't send again */
status = JFAIL;
goto error;
}
} else {
int db, dbf;
db = Debug;
dbf = DbgFlag;
s = Find_str_value(&Spool_control,DEBUG);
if(!s) s = New_debug_DYN;
Parse_debug( s, 0 );
if( !(DRECVMASK & DbgFlag) ){
Debug = db;
DbgFlag = dbf;
} else {
int tdb, tdbf;
tdb = Debug;
tdbf = DbgFlag;
Debug = db;
DbgFlag = dbf;
if( Log_file_DYN ){
tempfd = Checkwrite( Log_file_DYN, &statb,0,0,0);
if( tempfd > 0 && tempfd != 2 ){
dup2(tempfd,2);
close(tempfd);
}
tempfd = -1;
}
Debug = tdb;
DbgFlag = tdbf;
LOGDEBUG("Receive_secure: socket fd %d", *sock);
Dump_line_list("Receive_secure - input", &args);
}
DEBUGF(DRECV1)("Receive_secure: debug '%s', Debug %d, DbgFlag 0x%x",
s, Debug, DbgFlag );
}
if( !(security = Fix_receive_auth(authtype, &info)) ){
plp_snprintf( error+1, sizeof(error)-1,
_("unsupported authentication '%s'"), authtype );
ack = ACK_FAIL; /* no retry, don't send again */
status = JFAIL;
goto error;
}
if( !security->server_receive ){
plp_snprintf( error+1, sizeof(error)-1,
_("no receive method supported for '%s'"), authtype );
ack = ACK_FAIL; /* no retry, don't send again */
status = JFAIL;
goto error;
}
if( jobsize ){
double read_len;
read_len = strtod(jobsize,0);
DEBUGF(DRECV2)("Receive_secure: spooling_disabled %d",
Sp_disabled(&Spool_control) );
if( Sp_disabled(&Spool_control) ){
plp_snprintf( error+1, sizeof(error)-1,
_("%s: spooling disabled"), Printer_DYN );
ack = ACK_RETRY; /* retry */
status = JFAIL;
goto error;
}
if( Max_job_size_DYN > 0 && (read_len+1023)/1024 > Max_job_size_DYN ){
plp_snprintf( error+1, sizeof(error)-1,
_("%s: job size %0.0f is larger than %d K"),
Printer_DYN, read_len, Max_job_size_DYN );
ack = ACK_RETRY;
status = JFAIL;
goto error;
} else if( !Check_space( read_len, Minfree_DYN, Spool_dir_DYN ) ){
plp_snprintf( error+1, sizeof(error)-1,
_("%s: insufficient file space"), Printer_DYN );
ack = ACK_RETRY;
status = JFAIL;
goto error;
}
}
tempfd = Make_temp_fd(&tempfile);
close(tempfd); tempfd = -1;
DEBUGF(DRECV1)("Receive_secure: sock %d, user '%s', jobsize '%s'",
*sock, user, jobsize );
status = security->server_receive( sock, Send_job_rw_timeout_DYN,
user, jobsize, from_server, authtype,
&info,
error+1, sizeof(error)-1,
&header_info,
security, tempfile, Do_secure_work);
error:
DEBUGF(DRECV1)("Receive_secure: status %d, ack %d, error '%s'",
status, ack, error+1 );
if( status ){
if( ack == 0 ) ack = ACK_FAIL;
error[0] = ack;
DEBUGF(DRECV1)("Receive_secure: sending '%s'", error );
(void)Link_send( ShortRemote_FQDN, sock,
Send_query_rw_timeout_DYN, error, safestrlen(error), 0 );
Errorcode = JFAIL;
}
Free_line_list( &args );
Free_line_list( &header_info );
Free_line_list( &info );
close( *sock ); *sock = -1;
Remove_tempfiles();
if( status == 0 && jobsize ){
/* start a new server */
DEBUGF(DRECV1)("Receive_secure: starting server");
if( Server_queue_name_DYN ){
Do_queue_jobs( Server_queue_name_DYN, 0 );
} else {
Do_queue_jobs( Printer_DYN, 0 );
}
}
cleanup(0);
}
int main(int argc, char *argv[], char *envp[])
{
int i;
struct line_list l, options, request_list;
char msg[SMALLBUFFER], *s;
Init_line_list(&l);
Init_line_list(&options);
Init_line_list(&request_list);
/* set signal handlers */
(void) plp_signal (SIGHUP, cleanup_HUP);
(void) plp_signal (SIGINT, cleanup_INT);
(void) plp_signal (SIGQUIT, cleanup_QUIT);
(void) plp_signal (SIGTERM, cleanup_TERM);
(void) signal(SIGCHLD, SIG_DFL);
(void) signal(SIGPIPE, SIG_IGN);
/*
* set up the user state
*/
Status_line_count = 1;
#ifndef NODEBUG
Debug = 0;
#endif
Displayformat = REQ_DLONG;
Initialize(argc, argv, envp, 'T' );
Setup_configuration();
Get_parms(argc, argv ); /* scan input args */
if( A_flag && !getenv( "AUTH" ) ){
FPRINTF(STDERR,"lpstat: requested authenticated transfer (-A) and AUTH environment variable not set");
usage();
}
/* set up configuration */
Get_printer();
Fix_Rm_Rp_info(0,0);
Get_all_printcap_entries();
/* check on printing scheduler is running */
if( t_flag ){
All_printers = 1;
r_flag = d_flag = p_flag = o_flag = 1;
s_flag = 0;
}
if( s_flag ){
/* a_flag = 1; */
r_flag = 1;
d_flag = 1;
v_flag = 1;
All_printers = 1;
}
if( All_printers ){
Merge_line_list( &request_list, &All_line_list,0,0,0);
}
Merge_line_list( &request_list, &Printer_list,0,0,0);
Check_max(&options,2);
if( options.count ){
for( i = options.count; i > 0 ; --i ){
options.list[i] = options.list[i-1];
}
options.list[0] = safestrdup(Logname_DYN,__FILE__,__LINE__);
++options.count;
}
options.list[options.count] = 0;
if( Found_flag == 0 ){
if( request_list.count == 0 ){
Split(&request_list,Printer_DYN,", ",1,0,1,1,0,0);
}
o_flag = 1;
flag_count = 1;
}
#ifdef ORIGINAL_DEBUG//JY@1020
if(DEBUGL1)Dump_line_list("lpstat - printer request list", &request_list);
if(DEBUGL1)Dump_line_list("lpstat - options", &options);
#endif
if( r_flag ){
Write_fd_str(1,"scheduler is running\n");
}
if( d_flag ){
if( Printer_DYN == 0 ){
Write_fd_str(1,"no system default destination\n");
} else {
SNPRINTF(msg,sizeof(msg))
"system default destination: %s\n", Printer_DYN);
Write_fd_str(1,msg);
}
}
if( v_flag ){
for( i = 0; i < request_list.count; ++i ){
Set_DYN(&Printer_DYN,request_list.list[i] );
Fix_Rm_Rp_info(0,0);
SNPRINTF(msg,sizeof(msg)) "system for %s: %s\n", Printer_DYN, RemoteHost_DYN);
Write_fd_str(1,msg);
}
}
/* see if additional status required */
Free_line_list( &Printer_list );
for( i = 0; i < request_list.count; ++i ){
s = request_list.list[i];
Set_DYN(&Printer_DYN,s );
Show_status(options.list, 0);
}
Free_line_list( &Printer_list );
if( flag_count ){
for( i = 0; i < request_list.count; ++i ){
s = request_list.list[i];
Set_DYN(&Printer_DYN,s );
Show_status(options.list, 1);
}
}
DEBUG1("lpstat: done");
Remove_tempfiles();
DEBUG1("lpstat: tempfiles removed");
Errorcode = 0;
DEBUG1("lpstat: cleaning up");
return(0);
}