| 1 | #!perl |
1 | #!perl |
| 2 | ################################################################################ |
2 | ################################################################################ |
| 3 | # WeBWorK Online Homework Delivery System |
3 | # WeBWorK Online Homework Delivery System |
| 4 | # Copyright © 2000-2003 The WeBWorK Project, http://openwebwork.sf.net/ |
4 | # Copyright © 2000-2003 The WeBWorK Project, http://openwebwork.sf.net/ |
| 5 | # $CVSHeader: webwork2/conf/global.conf.dist,v 1.112 2004/11/03 22:00:10 dpvc Exp $ |
5 | # $CVSHeader: webwork2/conf/global.conf.dist,v 1.113 2004/11/19 19:13:11 sh002i Exp $ |
| 6 | # |
6 | # |
| 7 | # This program is free software; you can redistribute it and/or modify it under |
7 | # This program is free software; you can redistribute it and/or modify it under |
| 8 | # the terms of either: (a) the GNU General Public License as published by the |
8 | # the terms of either: (a) the GNU General Public License as published by the |
| 9 | # Free Software Foundation; either version 2, or (at your option) any later |
9 | # Free Software Foundation; either version 2, or (at your option) any later |
| 10 | # version, or (b) the "Artistic License" which comes with this package. |
10 | # version, or (b) the "Artistic License" which comes with this package. |
| … | |
… | |
| 405 | ################################################################################ |
405 | ################################################################################ |
| 406 | # Authorization system |
406 | # Authorization system |
| 407 | ################################################################################ |
407 | ################################################################################ |
| 408 | |
408 | |
| 409 | # This lets you specify a minimum permission level needed to perform certain |
409 | # This lets you specify a minimum permission level needed to perform certain |
| 410 | # actions. In the current system, >=10 will allow a professor to perform the |
410 | # actions. For each pair in the hash below, in order to perform the action |
| 411 | # action, >=5 will allow a TA to, and >=0 will allow a student to perform an |
411 | # described by the key, the user must have a permission level greater than or |
| 412 | # action (almost never what you want). |
412 | # equal to the value. |
| 413 | |
413 | |
|
|
414 | my $guest = -1; |
| 414 | my $student = 0; |
415 | my $student = 0; |
| 415 | my $ta = 5; |
416 | my $ta = 5; |
| 416 | my $professor = 10; |
417 | my $professor = 10; |
| 417 | my $nobody = undef; |
418 | my $nobody = undef; |
| 418 | |
419 | |
| 419 | %permissionLevels = ( |
420 | %permissionLevels = ( |
| 420 | login => $student, |
421 | login => $guest, |
| 421 | report_bugs => $student, |
422 | report_bugs => $student, |
| 422 | submit_feedback => $student, |
423 | submit_feedback => $student, |
| 423 | change_password => $student, |
424 | change_password => $student, |
| 424 | change_email_address => $student, |
425 | change_email_address => $student, |
| 425 | |
426 | |
| … | |
… | |
| 451 | show_correct_answers_before_answer_date => $ta, |
452 | show_correct_answers_before_answer_date => $ta, |
| 452 | show_solutions_before_answer_date => $ta, |
453 | show_solutions_before_answer_date => $ta, |
| 453 | avoid_recording_answers => $ta, |
454 | avoid_recording_answers => $ta, |
| 454 | check_answers_before_open_date => $ta, |
455 | check_answers_before_open_date => $ta, |
| 455 | check_answers_after_open_date_with_attempts => $ta, |
456 | check_answers_after_open_date_with_attempts => $ta, |
| 456 | check_answers_after_open_date_without_attempts => $student, |
457 | check_answers_after_open_date_without_attempts => $guest, |
| 457 | check_answers_after_due_date => $student, |
458 | check_answers_after_due_date => $guest, |
| 458 | check_answers_after_answer_date => $student, |
459 | check_answers_after_answer_date => $guest, |
| 459 | record_answers_when_acting_as_student => $nobody, |
460 | record_answers_when_acting_as_student => $nobody, |
| 460 | # "record_answers_when_acting_as_student" takes precedence |
461 | # "record_answers_when_acting_as_student" takes precedence |
| 461 | # over the following for professors acting as students: |
462 | # over the following for professors acting as students: |
| 462 | record_answers_before_open_date => $nobody, |
463 | record_answers_before_open_date => $nobody, |
| 463 | record_answers_after_open_date_with_attempts => $student, |
464 | record_answers_after_open_date_with_attempts => $student, |