File:
[LON-CAPA] /
capa /
capa51 /
GUITools /
webpage.funct.c
Revision
1.4:
download - view:
text,
annotated -
select for diffs
Mon Aug 7 20:47:29 2000 UTC (24 years, 3 months ago) by
albertel
Branches:
MAIN
CVS tags:
version_2_9_X,
version_2_9_99_0,
version_2_9_1,
version_2_9_0,
version_2_8_X,
version_2_8_99_1,
version_2_8_99_0,
version_2_8_2,
version_2_8_1,
version_2_8_0,
version_2_7_X,
version_2_7_99_1,
version_2_7_99_0,
version_2_7_1,
version_2_7_0,
version_2_6_X,
version_2_6_99_1,
version_2_6_99_0,
version_2_6_3,
version_2_6_2,
version_2_6_1,
version_2_6_0,
version_2_5_X,
version_2_5_99_1,
version_2_5_99_0,
version_2_5_2,
version_2_5_1,
version_2_5_0,
version_2_4_X,
version_2_4_99_0,
version_2_4_2,
version_2_4_1,
version_2_4_0,
version_2_3_X,
version_2_3_99_0,
version_2_3_2,
version_2_3_1,
version_2_3_0,
version_2_2_X,
version_2_2_99_1,
version_2_2_99_0,
version_2_2_2,
version_2_2_1,
version_2_2_0,
version_2_1_X,
version_2_1_99_3,
version_2_1_99_2,
version_2_1_99_1,
version_2_1_99_0,
version_2_1_3,
version_2_1_2,
version_2_1_1,
version_2_1_0,
version_2_12_X,
version_2_11_X,
version_2_11_5_msu,
version_2_11_5,
version_2_11_4_uiuc,
version_2_11_4_msu,
version_2_11_4,
version_2_11_3_uiuc,
version_2_11_3_msu,
version_2_11_3,
version_2_11_2_uiuc,
version_2_11_2_msu,
version_2_11_2_educog,
version_2_11_2,
version_2_11_1,
version_2_11_0_RC3,
version_2_11_0_RC2,
version_2_11_0_RC1,
version_2_11_0,
version_2_10_X,
version_2_10_1,
version_2_10_0_RC2,
version_2_10_0_RC1,
version_2_10_0,
version_2_0_X,
version_2_0_99_1,
version_2_0_2,
version_2_0_1,
version_2_0_0,
version_1_99_3,
version_1_99_2,
version_1_99_1_tmcc,
version_1_99_1,
version_1_99_0_tmcc,
version_1_99_0,
version_1_3_X,
version_1_3_3,
version_1_3_2,
version_1_3_1,
version_1_3_0,
version_1_2_X,
version_1_2_99_1,
version_1_2_99_0,
version_1_2_1,
version_1_2_0,
version_1_1_X,
version_1_1_99_5,
version_1_1_99_4,
version_1_1_99_3,
version_1_1_99_2,
version_1_1_99_1,
version_1_1_99_0,
version_1_1_3,
version_1_1_2,
version_1_1_1,
version_1_1_0,
version_1_0_99_3,
version_1_0_99_2,
version_1_0_99_1,
version_1_0_99,
version_1_0_3,
version_1_0_2,
version_1_0_1,
version_1_0_0,
version_0_99_5,
version_0_99_4,
version_0_99_3,
version_0_99_2,
version_0_99_1,
version_0_99_0,
version_0_6_2,
version_0_6,
version_0_5_1,
version_0_5,
version_0_4,
stable_2002_spring,
stable_2002_july,
stable_2002_april,
stable_2001_fall,
release_5-1-3,
loncapaMITrelate_1,
language_hyphenation_merge,
language_hyphenation,
conference_2003,
bz6209-base,
bz6209,
STABLE,
HEAD,
GCI_3,
GCI_2,
GCI_1,
CAPA_5-1-6,
CAPA_5-1-5,
CAPA_5-1-4_RC1,
BZ4492-merge,
BZ4492-feature_horizontal_radioresponse,
BZ4492-feature_Support_horizontal_radioresponse,
BZ4492-Support_horizontal_radioresponse
- fixed license notices the reference the GNU GPL rather than the GNU LGPL
/* webpage c interfaces
Copyright (C) 1992-2000 Michigan State University
The CAPA system is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License as
published by the Free Software Foundation; either version 2 of the
License, or (at your option) any later version.
The CAPA system is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
General Public License for more details.
You should have received a copy of the GNU General Public
License along with the CAPA system; see the file COPYING. If not,
write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
Boston, MA 02111-1307, USA.
As a special exception, you have permission to link this program
with the TtH/TtM library and distribute executables, as long as you
follow the requirements of the GNU GPL in regard to all of the
software in the executable aside from TtH/TtM.
*/
/*
* webpage.funct.c
* Guy Albertelli II 1999
*/
#include <stdio.h>
#include <tcl.h>
#include <pProj/capaCommon.h>
#include <webpage.h>
int emailcapaid(int argc, char** argv)
{
char studentNum[MAX_STUDENT_NUMBER+1];
int i,setId,pin;
T_student student_data;
time_t curtime;
if (argc != 4) {
printf("USAGE: webpage -emailcapaid stunum setId\n",argv[0]);
return 0;
}
strncpy(studentNum,argv[2],MAX_STUDENT_NUMBER);
setId=atoi(argv[3]);
if ( setId > 99 || setId < 1 ) {
printf("InvalidSetId");
return 0;
}
pin=capa_PIN(studentNum, setId,0);
i=capa_get_student(studentNum,&student_data);
if ( i > 0 ) {
time(&curtime);
if( capa_check_date(CHECK_OPEN_DATE,studentNum,
student_data.s_sec,setId) < 0 ) {
printf("NotOpen");
} else {
printf("%d %s",pin,student_data.s_email);
}
} else {
printf("NotFound");
}
return 0;
}
int getid(int argc, char** argv)
{
char studentNum[MAX_STUDENT_NUMBER+1];
int i,setId,oldCapaID=-1,oldSetId,found=1,pin;
T_student student_data;
time_t curtime;
if (argc>5 || argc<4) {
printf("USAGE: webpage -getid stunum setId oldCapaID\n");
return 0;
}
strncpy(studentNum,argv[2],MAX_STUDENT_NUMBER);
setId=atoi(argv[3]);
if ( setId > 99 || setId < 1 ) {
printf("InvalidSetId");
return 0;
}
if ( argc == 5 ) {
found=0;
oldCapaID=atoi(argv[4]);
if ( oldCapaID < 1000 || oldCapaID > 9999 ) {
printf("InvalidOldCapaID");
return 0;
}
for(i=1;(i<setId)&&(!found);i++) if (capa_PIN(studentNum,i,oldCapaID)) found=i;
}
/* old line printf("%d",capa_PIN(studentNum, setId,0)); else printf("NotFound");*/
if ( found ) {
pin=capa_PIN(studentNum, setId,0);
if ( capa_get_student(studentNum,&student_data) > 0 ) {
time(&curtime);
if( capa_check_date(CHECK_OPEN_DATE,studentNum,
student_data.s_sec,setId) < 0 ) {
printf("NotOpen");
} else {
printf("%d",pin);
}
} else {
printf("NotFound");
}
} else {
printf("NotFound");
}
return 0;
}
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>