bound_card_input_.bind 02/23/81 2128.9rew 02/23/81 2035.7 8271 /* Bind file for bound_card_input_, created July 1975 by J. C. Whitmore */ /* Modified Feb 1978 by J. C. Whitmore to add validate_card_input_ */ /* Modified 1981*01*21 by Benson I. Margulies for reder_driver_ */ Objectname: bound_card_input_; Addname: cards_overseer_, reader_driver_, read_cards_, validate_card_input_, clean_card_pool; Order: read_cards_, reader_driver_, validate_card_input_, cards_overseer_, clean_card_pool; Global: delete; objectname: read_cards_; retain: read_cards_, set_station, set_rqt; objectname: reader_driver_; retain: init, command, request; objectname: validate_card_input_; retain: station, user, test; objectname: cards_overseer_; retain: cards_overseer_, test; objectname: clean_card_pool; retain: clean_card_pool, test_card_pool, clean_tape_pool, test_tape_pool; synonym: test_card_pool, test_tape_pool, clean_tape_pool; /* END */  cards_overseer_ 03/27/85 1136.3re 03/27/85 1134.2 109512 TKT6mme2T=VPTTTT0T(T,T&T$ThelpTSTPT TFTcrzrdraLT9T 4VTTL$TT+T rmccrawmccTquitT5T-TTTsynT LHTTT mrd_#VV TTYV?alrmcputVdebugreturnabortlogoutreinitstart?#***: ^a viipunchuser_i/oresumecleanupfinishclean_poolread_cardsuser_outputquit_enableviipunch_error_outputerror_i/oundefinedany_otherCalling debugcards_handlercommand_errorcommand_questioncalling debugSystem_Card_Poolraw_card_input_mcc_card_input_cards_overseer_card_in_streamcard_command_levelIllegal command: ^aviipunch_card_input_QUIT still in progress.Card Daemon: Command?Card Daemon cannot run.Enter station password:^/Could not initialize pool.^/** Card Daemon Commands **^/Card Daemon: enter Station_id^/Unable to attach ^a stream.Card Input Daemon cannot run.start - continue after a quitread_cards - begin read operationsCards handler: condition ^a intercepted.reinit - re-attach the card readerlogout - log out the Card Daemonclean_pool - garbage collect the card pool^/Unable to get element size for ^a stream.abort - halt current reading after a quitThe retention time cannot be less than 1 day.Enter retention time in days (or 0 to abort):^/Could not attach card reader on channel ^a.Use the "clean_pool" and "start" commands to continue.Card Daemon: Enter new device channel or type "quit".^/Invalid resetread to card dim. Card Daemon cannot run.The ^a command is only valid during interrupted card reading.The read_cards command is not valid while processing cards. Use start.Condition ^a signalled while handling unclaimed signal. Process terminated.The allowed age of segments to remain in the pool must be a decimal number of days.cards_overseer_: USAGE: cards_overseer_$test card_pool_root_dir card_dim card_device7 @ @@(a @@$i @@7@P@E999P@"PP@8@P@9@P@:@;@>@<@$PP@;@N@@\@\@@Z@\@X@$PP@@@@PP8@ @@`@P9@ @@`i P:@ @@`@a (@5@5@ F @@$  5@5,@N5@5@ F @@ 5@5,@N @@  @F @P@.@@@ @@ @P@.@@@@@@(@^@^@B@z@D@r@F@@H@q@J@L@N@P@R@T@@@$PP@ F@z D<@o>@W@<@B@W@D@r@F@;@H@@J@yL@vN@yP@qR@nT@@@$PP@<@>@`;@X@oZ@<@B@;@D@X@F@W@H@@J@QL@MN@QP@MR@JT@@@$PP@$P(PP@<@am>@<@B@i@D@a@F@W@H@@J@+L@4N@P@+R@(T@@@$PP@@^@@[$P@NPX<@>@@@;0@0@b@<@d@@@f@a@h@j@l@n@ p@`@P@@@>8`8`@Z@\@X@$PP@ @@LPL@^@PW@@b@^@d@W@f@@h@q@j@`@$P*P@q@ @~ @@`La F@a @@ ` `@Z@\@X@$PP@w@@**<@)am>@W@<@b@W@d@@f@h@j@l@`@ $P@ P@ @@  @ @@ @@ @@ @@ @@ @@ @@ @@ @@ W@<@am>@@B@W@D@<@F@;@H@@J@gL@tN@lP@oR@lT@@@$PP@@#$P@NP <@>@@@ ` @B@<@D@`@F@@H@TJ@HL@BN@<P@@@$PP@ @@ v<@_>@X@amZ@@B@<@D@X@F@;@H@@J@L@+N@"P@%R@"T@@@$PP@@$P@NP @@u r;@||<@{am>@@B@;@D@<@F@W@H@@J@L@N@P@R@T@@@$PP@@$P@NP@6@@ @6N@: Fb@Fd@@f@h@j@l@`@ $P"P@@^@@"66<@55>@@@,`,@ @B@<@D@`@F@FH@J@L@N@P@@@$PP@,@ W@@b@W@d@f@q@h@j@l@n@p@`@$P2P@q@<@>@@@#`q@B@<@D@`@F@H@}J@oL@@@ $PP@,@@N| @@ @@ @@ ` `@Z@_\@X@$PP@@^@PW@@b@^@d@W@f@@h@q@j@`@$P*P@q@}@~ @@` X@Z@\@X@b@@d@+f@Bh@`@$PP@ F@ @@@@Z@^@\@X@$P:P@ @@@^ A@@b@@d@@f@q@h@j@l@n@p@`@$P>P@q@"'^@^@b@@d@ f@h@`@$PP@,@X@Z@\@X@b@d@`@$PP@@b@q@d@f@h@`@$P8P@<@>@^@@b@<@d@^@f@q@h@j@n@l@p@`@$P,P@@@@@(@(@.@@  <@am>@<@b@@d@f@h@`@$P&P@@^@@<@>@@@<`<@B@<@D@`@F@H@J@uL@@@ $PP@7@^@<@>@@B@^@D@<@F@@@H@q@J@cL@\N@YP@UR@oT@@@$P6P@q@<@>@q@b@<@d@\f@Ph@`@$PP@.@ @@@@.@$P.P@@pP@ P@C@B@B@CN@  PFH@D@J@E@L@@@N@P@&R@T@"V@F@$P$P@B,@F@amH@F@Z@E@\@D@^@@@`@b@ d@f@h@X@$P$P@@P@|@@|B@|D@@@H@J@F@$PP@ P @@LPL@L@PN@@R@L@T@N@V@@X@q@Z@P@$P*P@ Pq@@ P@~ @@`LLPt@LP>@.@.@@N@PN~@N@ @@eLLP F@LP< F@LP8 F@LP@@w@ F@LP @@@@@H\H\@H@J@F@$P@P@ F@LP .@P@@(@K@ F@LP6@ P F@LP@@E(@@@@@" F@LP @ P F@LPy@@gB@@@H@AJ@F@$PP@.@$PP@Y F@LP| @@g0P0P@H@AJ@F@$PP@ P @@LPL@L@PN@@R@L@T@N@V@@X@q@Z@P@$P*P@ Pq@V@ P@~ @@`LLP@@@LPnPn@^@q@`@`@b@d@f@h@\@ $PP@ Pq@@@TT@B@D@@@$PP@`@N@@0P0P@H@J@F@$PP@N@@^@`@`@N@b@q@d@f@h@j@l@\@$P4P@ Pq@66@@55B@q@R@@@T@V@X@P@$PP@ F@LPp@@T P P@H@J@F@$PP@@@q$P$P@B@D@@@$PP@@@\$P$P@H@yJ@F@$PP@@@v(P(P@B@lD@@@$PP@@@t,P,P@H@_J@F@$PP@@@T(P(P@B@RD@@@$PP@@@r0P0P@H@EJ@F@$PP@@@hqL@L@B@5D@@@$PP@dL@L@H@)J@F@$PP@Q@@B@D@@@R@L@T@V@X@P@$PP@=@@@\@\@R@L@T@V@X@P@$P@P@,P@P@7v@N@x@v@|@x@~@h@@z@ P@Q@ @@`RB NP@@\PJ@ZPL@ F@B  @@ h@|@z@$P@ P@@ F@B @@@@B@@J@@Z@@@@@@@@@@$P<P@@ F@B  F@B  F@B  @ F@B  @@p @P@@(@@ F@B %@@@@88@|@~~@z@$PP@.@@@(@@ F@B ux@x@@ P@@@@@$P&P@@@3z@|@@@@z@@@@t@a@@$PP@x@v@ P@@@x@@v@@h@@K@@5@_@@$P,P@@@@|@P~@z@$PP@@@.@D@@(@Wv@Wx@ P@@@v@@x@@h@@@@@0@@$P,P@@H@j @P@@@@>(@[[z@Zr|@@@LL@@z@@@@B@@@@@@@$PP@@@55z@4g|@z@@@@$PP@.@$PP@@.@$P0P@@@@@((@@B@@@@@$PP@x@v@(@@x@@v@@@@@@@@@B@@J@@L@@@@@@@@@@@ $P P@@@z@g|@z@@s@@$PP@.@$PP@@@@@(@@.cards_overseer_ symbol_table com_err_condition_interpreter_continue_to_signal_ %cu_ arg_count(), cv_dec_check_//3debug668find_condition_info_;;A get_at_entry_DDHread_password_KKOioa_ ioa_streamRTWRRZios_attach]_asetsize]dfgetsize]ikdetach]np resetread]sviox_ user_inputy{~get_lineycontrolylogoutnew_proc pool_manager_init clean_pool read_cards_ set_station scramble_standard_default_handler_validate_card_input_station error_table_ionmat`test` cleanup.1h any_other.2zclean_up command_level1 cards_handler  cleanup.3presume.4 B&&&'&.&5&:&C&J&Q&Y&\&c&h&m&r&x&&&&&&&&&&&&&symbtreeK1K;;1PL/I 8"' *S___Multics PL/I Compiler, Release 28e, of February 14, 1985GJohnson.SysMaint.moptimize map8!\L>K;A&#WB"LK#WAj>spec>on>7.ds>cards_overseer_.pl1>ldd>include>card_stream_info.incl.pl1>ldd>include>cond_info.incl.pl1pl1info [cards_overseer_j!Wg7,g4-xOS4xWxx=St=xgZ<O 4 x7W!-x['3zg|!,o x[i<+Ox/ z/ O)@@=|/O @|/Oy|@ (;%g@dLPZjk PZPkVj Z+ZZ+kVj@+Z Z@Z@+Z|ZUXVBk +XV@V`ZZj +p@eU*eU*eU*eU*eU*eU*eU*eU*eU*eTobj_map  B  clean_card_pool 03/27/85 1136.3re 03/27/85 1134.4 28512 TT)T1TT'TTV-age#VV??#-quotaclean_tape_poolclean_card_poolThe "-age N" control arg must be given.Usage is: ^a -age ndays [-quota npages]All entries older than ^d days have been removed.Where ndays is the time segments are allowed to remain in the pool, and npages is the amount of unused quota for sharing among users of an access class. When quota is not specified, the default is ^d pages.{ @A(@D@L(@{@OP%@H@J@$P@@@OG(@VP%@ @@H$P@@@2O2G@G@M@@@y@~@|@bP@y@NN$P\PF@z@N@ N@zN@}N@@D@@B@@F@@@$PdP@F@A@A(@B@V@DP@F@@@@@@@9@:@@ $PfP@F@0@@.PL@L(@B@V@DP@F@@M@@@@@@@ $PfP@F@M@4DPB@ F` A@+ F` L@$$P`PF@B@T@^a@B@i@@DP `@`F@@H@@@@@@@@@@jP@ @@N,@@@@@(($P^P@H@@@@@@@@ jP@@F(@O@@@@@M@@F@@@@@@@$PhP@F@F@@H@@@@@$PjP@@@@44@@@@@@@@$PlP@@@@,,@@H@@~@@@$PlP@@@@@G@@m@w@@$PlP@@ ]P&@"PP@@$PPP@ @@`@@dP&@"PP@@$PPP@ @@`@2@clean_card_pool symbol_tableO  error_table_wrong_no_of_argsnoargbad_arg"$cu_ arg_count'(+arg_ptr'.0 cv_dec_check_337 pool_manager_ clean_pool:>Acom_err_DDGioa_JJLVx`clean_tape_pool]O`Rtest_card_pooldV`Ytest_tape_poolg]``\nTSystem_Card_Pool System_Tape_Pool &&!&&&-&2&9&C&I&NsymbtreeK1K;1PL/I 8"' *9kESbhEEMultics PL/I Compiler, Release 28e, of February 14, 1985GJohnson.SysMaint.moptimize map0!\LDK;>spec>on>7.ds>clean_card_pool.pl1pl1info Aclean_card_poolu3 Wx#iz<;Ot]x;i _ |%PZjk+kVj ZFkZUPXV@V`ZZjCUYUYU@Pobj_map h2n:Tk  read_cards_ 03/15/89 0841.5re 03/15/89 0837.1 258840 ()[]; >system_library_tools ^add_nl,lower_case,^trim. trimVT$-cpwT+T"LT VdTETT8VTTL$TTT T%T-T/XT>T.TVT6V TTCTALX TTTT3XVTTT*TT T4TTT)T&N$TTTT 4V NHV#NV?nocontincontinnoaddnladdnlnotrim ++endlogoutrunout -brief -of reset?#.absoutsystemabsin++absin-proxy .absin++RJE++rje++input++aim++format++DATA++data++uidcleanupIncorrect noconvertuppercaselowercase++passwordRead error.RJE job: "get_count++epilogue++rjecontrol++rjeargs -sender -argumentsoverwrite++control*Begin deck*any_other card format.&command_line on-output_file -output_file ^a.^d^[.absin^]out_of_boundscommand_errorUnable to continue.enter_abs_requestrje_args$set station&command_line off++END card read.^/enter_abs_request Error setting ACL.++UID card expected.card_command_levelIncorrect ++FORMAT card.Invalid ++PASSWORD cardset_epilogue_command "rje_args$set pun_rqt", queued for absentee.Error setting bit-count.Reading ^a (^a) for ^a.Entry name too long: >user_dir_dir>^a>^a>^aIncorrect ++ABSIN cardInvalid ++CONTROL cardrecord_quota_overflowPerson name must be defined.Aborted card input deck: rdf;rje_args$set prt_rqtError closing user's pool.Unable to open pool storage.Out of sequence ++RJE cardOut of sequence ++DATA cardBlank field in ++UID card.Unable to find error iocbp.Project name must be defined.Skipping to next ++EOF card. Unable to submit RJE request.Unable to submit RJE request: Successful read of card deck: *Successful read^[(^d cards)^]*Expected ++UID card not foundUnable to set user input modesUnable to open new pool entryUnexpected control card key: >user_dir_dir>^a>^a>^a.absoutInvalid option on ++ABSIN card Bad absin name on ++ABSIN card Unrecognized control card key: Deck must begin with ++EOF card.Unable to find control iocbp.Undefined mode on ++FORMAT card: Invalid ++PASSWORD control argument.Expected ++PASSWORD card not found^/No available quota in card pool.Mismatched ++UID card. Looking for: Unable to initiate new pool entry: Unable to create branch in pool: Invalid conversion format for RJE: Unable to convert deck access class Special characters in control string.Unable to initiate next MSF componentAborting deck: 500 duplicate decks in Undefined deck format for this device: Unable to set modes on control stream.Unexpected ++EOF card looking for password.Unexpected ++EOF card among control cards.Unexpected ++EOF card. Check deck format.Multi-segment input not allowed for card modeInsufficient quota in pool to convert to MSF.Error while reading user data. Aborting deck.Unable to decode ++ABSIN segment definition. ++EOF card found among control cards. Aborting deck.Aborting card input. Clear the hopper before continuing.^[^^^]trim,^[^^^]lower_case,^[^^^]add_nl,^[^^^]contin.Attempted read of more then a segments worth of data succeededread_cards_: ^[Error while processing deck "^a" for ^a^/^;^2s^]^a^/^aset_epilogue_command "dp -dl -rqt [rje_args prt_rqt] [user absout]";rdn @b(@b,@b@%O&O `@$b,@b@%N&N `@$ @b,@b@%M&M `@$b,@b@%L&L `@$~@b,@b@%K&K `@$Rb,@b@G%J&J `@$@c(@c,@c@(Fd(@d,@d@KKKe(@e,@e@(FU@@TLTSR&P&@ "PP@@P@@P@ P`@@@V(U@V@$P@ @@`W _@@_@ 9_@ 6_@ 3_@.@@@@@$PPP@{@ /pP'@^@ @.6pP'@@@ PE@B@D(@@@H@B@J@D@L@F@ NP@ PP@JP@L@T`:.@.@ F`nT`:.@.@>E@@L@E~@N@>O@TD@O@i@ @@E@N@ `@eH@D@L@F@  @ @ PP@L@VD@^aO@PPR@O@T@@JPV@"P@PX@Z@D@\@P@ $P`P@@@^ F F@R@ T@X@Z@P@@.@@B@@@ PA,@`@B@b@@@d@@@f@h@l@j@n@^@$PhP@@D(@D@H@F@$P4P@@@(<`P'@ P(@@@g8@8@@P@R@V@X@N@@.@G@@PP@P@@@@@@@@@ $PfP@@ @@S  @@@@@@T@@i@@PP `@`@,@@@@@@z@~@@ $PfP@ @@ @@@@d@@e@"@{@@@@@@\@S@S@[@@$P0P@@ @@((@@@@@C@.@y@.@@@$P,NP@@  @@5@,@3@@w@.@@@$P,NP.@@@$P,NP@@t,,PP@@@"P@P@@@`P@~@ F`AR@ N @ `@`S@ F` #@@)@@@@@@4@@@@@@@@@@!@.@B@@$P,NPM@@@_44@@@@@@@&&@%@PP@@@"P@P@@@$P`P@~@ F`@@ >@u@ >@.@.@@@ ~@@u@ >@.@.@@@ ~@@>i@@ `@` E@ 0@>@@@@@ e@`@ @@`  @(@@b.@@@$P,NP@@,,@@Z@K@^@@@~@ F`~@ F` ~@PN@P@@.@ o@`Q~@ F` R@ F`S  @O@@#@#@#@@@ @@$@@h@~@ F`I@~@ F`I@@9@@@@@@K@~>@@T@@i@ @@~@ `@`@@@@@@1@ @u~@ F`@@ r@@~@@~@@ Fo@~ N @u@ >@.@.@@@ ~@@u@ >@.@.@@@ ~@@>i@@ `@` E@ Z@>@@@@@ e@`@ @@`  @  @ `@$$P@u`>@.@.@@@@~@@u@ >@.@.@@@ ~@@>i@ @@@ `@`@ >@@@ E@ @>@@@@@ e@`@N @ `@`  @(@@N.@@@$P,NP@@,,@@F@7@J@@@~@ F`r ~@PN@P@@.@ o@`Q~@ F` @>i@@ `@`@ O@@P>@@@@P@ e@`Q@N@ `@` @~@ F`f  @>i@ @ `@`  @ O@@P>@@@@P@ e@`Q@N @ `@`  @~@ F`A~@ F`9 @>i@@ `@`@ O@@P>@@@@P@ e@`Q@N@ `@`i @~@ F``H@@NN@@@@@@@@@@R@T@R@i@@R@ `@`S@@@@@@@@@|@@@@$P6P@ @@-R>@@T@@i@ @@--R@ `@`S @o@@@s@@@ @@@@@  @@@@@@@@@@V@F@U@X@@$P>P@@R>@@T@@i@ @@R@ `@`S@9@@@=@@@ @g@ F`hjg@ F`hOi@ `@$ O@@ >@@@ E@@@ @NI@ `@`J @g>@@T@@i@ @@g@ `@`h@@@@@@B@ @ @@@@@T@@@|  (@@i@@ `@`@@@u@@@@@@@@@@@@@@@@$PbP@ @lS@@>M%u@>@.@.@@@~@@>i@@ `@` E@_@ >@@@ E@@@ @NI@ `@`J$ @@@@(@@@J@@@@@@@@@@@v@q@n@@@@@$PbP@I@u`J>@.@.@@@I@~@~>i@ `@`J O@Nt@ `@`u @~@ F`@~@ F`@@u@@F@<@J@@@~>@@T@@i@ @@~@ `@`@,@@@0@@t@ @~>@@T@@i@ @@~@ `@`@@@@@@X@ @@T@@i@@@ `@`@@@@@@@@@ $PFP@ @@$>@@T@@i@ @@$$@ `@` @@@@@@"@ @@@@@@@@ $PBP@@$P*P`P@@NNH@PP@P@@f@}@}@fN@  PP@PF @F@  },@}@PP@P@N@ @@'' @@@  @@@~@@@@ @F@8@@@@@@@@ $PfP@}@ PP@P@F@@N&@ N#u@ >@.@.@@@ ~@@#>@T@@i@ @@^##@ `@`@Q@@@U@@@ @PP@@@@@@@"P@P@<@(@=@@$PnP@@ @@P@@@@%@@@@BLB@@D@@D@@@@$PJP@@E@F@G@@@@$PRP@@@@ H @R@y@@ @y,@y@N @@ && @@@@@@@@@5@ii@hh@@NJ@@@@@@@@@@y@@@@@@@@@@@$PbP@@ N>@T@@i@ @@@ `@`@@@@@@@ @B@@@@@@@@@@@@@@@$P^P@@$P.NP@(@@.NP @@{!! @@@  @@}@\@{@@@r@@@@P@@@@T@d@a@e@@$PXP@P@y0@@@  @@T@J@R@@@(@@P@@@@@@@@]@@@@@$PZP@@R0@ @@## @@@  @@*@@(@@l@@@@PP@@@@@@@@@"P@P@@@@@@$P`P@@NWu@>@.@.@@@~@@>i@@ `@` E@@ >@@@ E@@ @NI@ `@`J @u@ >@.@.@@@ ~@~ N @ `@`@@X  (@@@u@@@@@@@@@@@@@@@@@$PbP@@@V88(@@@@@@@@@@@@@@@:@@@@@@@@@@@@f@c@m@e@@@@@$PbP@:@@z@@@@@@M@d@d@l@@$P0P@@@@  @@W@6@[@@@ @4 C@P'@@_@_@8@@@@@@6@@3@@ @4@@$PhP@$P$P$@@@@ N=@>@8@@@@@@@@@@@dP@@$P,NPI(NP&NP(@C@@00@@@@@@C@3@@@@@@@@@@3@#@@@~@@(@ @@_d_@@P@8@@@@@@@@@@@$PdP@@$P,NP(NP&NP(@@@;00@@@@@@@@Nx@ `@`_yz@@y@@@z@@$P2P@x@@@~@@@@P `@`y,@@N\@P@P@@@@@"PP@}@~@@ $PjP@@4.i@ @@ @@-- @@@.. @@@@d@9@b@@5@ @ @@PP@@@@@"P@P@H@I@@ $PjP@@@@00@@:@@8@@|@@P@@@@@@@@]@@@@@$PZP@@90@@@4((@@@@@@V@@N@(@PP@@@@@"P@P@@@@ $PjP@@x(@ x@~@N@x@ `@eyyx@@Px@ `@`y@@F@@~@@@@x@@Px@ `@`y@@F@@@@.@@@ @t@ @@8@@@@@@6@@@@@@@$PhP@@N8(@@@]@@P@@@@]@@@@@@@$P@P@@b@b@b@@@@T@@@@@@,Xu@ >@.@.@@@ ~@@>i@@ `@` E@ @@`,  @4@@N@@@@$PTP@@@@ 7 ?@@,@@P@@@@@@@@@$P\P@@3@@@@3@@1@@u@#.@@@$P,NP~>@@T@@i@ @@~@ `@`@@@@@@S@ @.@s@~@ F`:@@m  @@@@@@:@ @R@ `F`S$>@@T@@i@ @@$$@ `@` @@@@@@@ @P@0@P@@@$PVP@P@@1@@PP@@@@@@@@@"P@P@@@y@@@$PlP@@@@@@@@@@@(@@@  @C@@PP@@@@@@@"P@P@K@[@x@@$P`P@@N @ @@@, @ @@@% @>i@ @ `@`  @ O@@ >@@@ E@ @t>@@@@t@ e@`u@N @ `@`  @I>@i@ @@I@ `@`J@>@@@ E@B@ >@@@@ @ e@` @>@@@ E@@>@@@@@ e@`@N@ `@` @@@*@@@@@@@@@@ $PHP@@@u`>@.@.@@@@~@@ >@>@T@@i@ @@/ @ `@`@@@ E@@@@@@ @ @u`>@.@.@@@@~@@>@T@@i@ @@@ `@`@@@@@ @@@,@@@@@@@@@@@@@$PhP@L@@1PP@@@"P@P@X@@$P`P@.@@@`P@u@ >@.@.@@@ ~@@->@T@@i@ @@--@ `@` @Z@@@^@@@ @TRIP&@"PP@@P@P`@3`(P@ N $P@PP `@`@@TTRNP&@"PP@@P@@P@P`@`(P@ N $P@PP `@`@ @ N @P `@`@SpP(@"PP@@@P@PD@F@PJ@L@B@@.@}@@@sB PP@PP@B@R@"PPT@V@N@$P`P@X@Z@A(@ PA,@^@X@`@Z@b@A@d@f@j@h@l@\@$PhP@?@YpP(@"PP@@@P@PD@@PF@PJ@L@B@x@.@.@@@ B  PP@PP@B@R@"PPT@V@N@$P`P@X@Z@A(@ PA,@^@X@`@Z@b@A@d@rf@j@bh@sl@\@$PhP@ PM@|@ .@@ P@$P,NP0@ F` .@@ P@$P,NP.@@ P~@ F`~R@@ `F`S@ .@i@ PM@@ P|,@@^P(@"PP@F@ P@@ @@J@DN@L@C@N@H@ DP@ @@Cd w@@ d@P'@l@PP6@@4 P@u`>@.@.@@P@@P~@P@>Q@>R@F>@S@TG@Q@i@ @@P@ `@`R@@Q@ E@~S@@R@PF@ e@`@J@G@N@H@@ @@@HVH P@ F`gM@G@P@Pj@V@l@G@n@@p@@r@PPt@@v@"P@Px@pz@|@~@@"P@P@d@h@$P`P@@l`P'@ P(@A@ A@ P=(FA@A,@(N @@_d~(@_@B@PD@@H@B@J@D@L@@N@@P@F@$PdP@ P@$P,NP@(NP&NP(@F@H@F@T@X@R@K@ P@Nx@ `@`_y{@H@y@J@6L@N@F@$P2P@ Px@t`y>@.@.@@D@x@D~@ND@x@ `@eyy  D@y@@D@@D@x@D~@Nx@@t`..@.@@>@@@ N ~@ `@`~@ F`l@@~ N ~@ `@`y~@ F`[@ Px@@~@@@D@toy>@.@.@@E@D@E~@D@@@E>@E@D@NE@P@ `@eyQP@t`Qf.@.@@> @@(F(F@T@X@R@@ P@L(@@@  PL@A@~E@P@E~@@toP.@.@@>@P@~@>@L@.@@@@PNP=N>N `@oP@@>@E@~D@P@D~@E@tmP>@.@.@@>D@E@D>@~@@@@@,@@r`P'@ PP@0@&P@B@@@VP@y PP@ D@F(@@J@@L@D@N@E@P@F@R@6T@FV@X@=Z@E\@H@$PLP@ P@#F@E@D(@P@PJ@@L@F@N@E@P@D@R@"PPT@#V@#X@Z@"\@H@$PlP@ P(@@@@ L@ PP@PP@L@R@@T@"PPV@X@Z@N@ $PjP@ P@@@$N$N@^@`@d@f@\@@@@@h@:@>i@:@ `@`;:@ O@@O>@@@@O@ e@`P@>@@@ E@x@$P>@@@@@ e@` @>@@@ E@e@d>@@@@d@ e@`e@>@@@ E@U@>@@@@@ e@`@>@@@ E@C@y>@@@@y@ e@`z@>@@@ E@3@>@@@@@ e@`@>@@@ E@!@>@@@@@ e@`@>@@@ E@@XNX@ `@` @@ F`.@>i@@ `@`@ O@@>@@@@@ e@`@>@@@ E@@>@@@ E@@XNX@ `@` @@>@i@@ `@`@@ o@`@>@@@ E@@XNX@ `@` @5@ 5@N(F@ F`!@>Oi@@ `@`@@ n@` @>@@@ E@@XNX@ `@` @5,@@@@P@ `@`@@F@h@n@@>i@@ `@`@ O@rXNX{@ `@`| @5@5@N(F@ F`a!{@>Oi@{@ `@`|{@@ n@` @>@@@ E@I@XNX{@ `@`| @5,@{@z@@@z~@@@@P `@`|,@@N\@P@P@@ @@"@"PP$@t&@u(@@ $PjP@@4.i@ @@ @@-- @@@.. @@'@,@[.@02@Y4@*@,@ @@@PP@@ @@"@"P@P$@?&@@(@@ $PjP@@@@0*0*@@1 @$@/&@@s@@P@@@ @@"@@$@]@&@@(@@$PZP@@00@@@+(*(*@@  @$@ &@@M@@N@(@PP@@ @@"@"P@P$@&@(@@ $PjP@{@~@XNX@{@ `@e||{@@P{@ `@`|@ P@{@ `@`|z@.@n@wPP'@ P`(P(@(@ @@ @@ @@ I(@ @@@ t(@ @@(@ (@(@(@P@PP @ @@ @@(@z(@(@z(@(@@H(@(@(@^(@(@@(@@P@M(@@z@.@@@$P,NP@@,6,6@D@~F@HJ@L@B@@~@ F` @@G$6$6@D@jF@5J@nL@B@@@NN 6@ 8@ :@6@D@SF@6J@WL@B@@g@ F`h|@ F`}|@ @@`}@8@@:@6@$P8P@|(@F@C@g@ F`h@@$6$6@D@!F@J@%L@B@i@+@R@ F`SR@ @@`S@8@@:@6@$P8P@R(@@@$P@TA@@i@Z@@ `@`@R@@T@@V@@X@@\@.@^@@`@b@d@f@h@A@j@l@n@p@P@ <P@ @@(@.@D@F@J@L@B@@u@ >@.@.@@A@ A~@A@>i@A@ `@` E@eA@ >r@@A@ E@@ r@ @@`  @z@@@N[t@[v@[x@t@|@~@k@@z@@R@ @@`S @@5@ 5@N@d>F@ F`Cs@@V@ F`(@O@ F` @G@ F` (@@@ F` (@9@ F`f@1@ F`\(@*@ F`S@"@ F`I(@"s@=>O@T@@i@ @@""@ `@`|@(~@@@,@z@p@ @5,@@}`P(@"PP@@@ P F@C EV@B@A(@C@F@P@PH@B@J@A@L@N@PP@R@T@D@:P@@@@A@P@@@N&N$ >@@ >@T@@i@ @@ PP@ `@`@@@@ E@C @@@@@@@ @R@ N @ `@`S@N g@ @@`h |@ @@`} Ng@T`h..@.@ @@`h g@T`h..@.@>@g@~@@ @@eh F@ @ F@ <@@@@@m@@@@ F@ ) F@ %@@  @@l@h@p@@@@!<!? *".*>. read_cards_  symbol_table& sys_info max_seg_size error_table_ short_record" end_of_info%( ai_restricted+/ eof_record25namedup8: card_util_modes=@B translate=EHcontinue_to_signal_KKPexpand_pathname_SSX scramble_[[^ send_mail_aadvalidate_card_input_usergmosuffixed_name_makervx msf_manager_adjust{ aim_check_equalconvert_status_code_convert_authorization_ from_stringcu_cp level_getdelete_pathfind_condition_info_get_authorization_ get_group_id_tag_starclose{open{get_ptr{acl_add{hcs_create_branch_ioa_ ioa_streamrsnnliox_ get_chars look_iocbcontrol  pool_manager_ add_quotaclose_user_poolopen_user_pool#/ `record_quota_overflow.16&)command_error.2</2 cleanup.3C69out_of_bounds.4I<? set_stationNC`Fset_rqtSI!`LabortYNLQ abort_read^SVreportdY*\ any_other.5l^Maread_control_cardrdgclean_upwl oinit}r u notify_userw 2z $pprinter punch reader &&$&*&1&7&<&D&J&R&Z&`&f&q&z&&&&&&&&&&&&&&&&&&&&& &&&%symbtreeN_RO8+PL/I 7"' *Multics PL/I Compiler, Release 31a, of October 12, 1988Hirneisen.SysMaint.aoptimize mapD0xyO8y0P#WAjX)#WAjc&#WB"Lm<xO8y|$*bE>special_ldd>install>MR12.3-1025>read_cards_.pl1>ldd>include>cond_info.incl.pl1>ldd>include>cond_info_structure.incl.pl1>ldd>include>card_stream_info.incl.pl1>special_ldd>install>MR12.3-1025>create_branch_info.incl.pl1>ldd>include>send_mail_info.incl.pl1pl1info read_cards_rf|5>+<O&iO4Mx |I tmyL"i)6<=O-@O]x_.i PO4Mx+i<-O t-x{Zj W |5 ++<Oumx/oWPO5x{"#|72gFC4z|O(A#|?O\\Pk +uZZ@VjPZkZNkZ _j@+Vj @ Vj@ Z+ZPZ@5Z+VjZjV`ZZj ++V`Z +XV@ZjZj +XV@CUYUYUYUYUYUYUYUYUYUYUYUYUobj_map   p    reader_driver_ 10/28/88 1351.4re 10/28/88 1342.9 89208 mcc_ viipunch_ raw_ readerreader_driver_ NV?TX@TT5TLTT#helpT*VGT2T-T'L$VrmccrawmccT(LHTT T1TTT)V XcrzXdim=T VX T>T7V#X4viipunchpunchprinterstation=cleanupcleanpoolclean_poolreadcardsread_cards>card_poolmajor_argsindirect=UndefinedSystem_Card_Poolraw_card_input_mcc_card_input_card_in_streamInvalid argument: ^aCard input started.viipunch_card_input_card_command_levelCheck card deck format.Unable to clean the card pool.clean_pool <days allowed to remain>^/** Commands for the reader driver **^/The reader device can't accept requests.Fatal Error: Unable to attach ^a to ^a.Fatal Error: Unable to attach channel ^a^/^a driver ready for station ^a at ^16a^/Fatal Error: cannot initialize card pool.Fatal Error: Could not set station to ^a.Fatal Error: Invalid getsize call for dim ^a.Use the "clean_pool" command and retry card input.The reader driver does not support a ctl terminal.Fatal Error: Unable to set default request types.Argument missing: days allowed to remain in the pool.This driver requires a reader attached through the IOM.Multiple minor devices are not supported by the reader driver.PP%@@TbPP%@PP@P$P@@ P@@P4@.F@@@@& .F @@ @@f@NPG@@@88@@G@@@@@@@ @ @@@P@@@@NPG@@@@@@@G@@m@@@@@ @"@$@@P@@P@&@@t@6@&@@@@L@@@ P@$PPt@@N@V@ @ `@$@@LP@P@@i@@@n@@ P@O@ F`P* @gs@ @G@N@V@I'@&@'@@LP@)@@>@@@H@@ $PP@$PP(@ @@`)V F@V  @@(V @@V N @@@N > @@_F N@V@1@@@@@LP@)@@ @@@@@ P@(@ @@`) F@  @@ @@G@@@@@$PP@G@!@@,,*@,@G@.@0@@2@@4@6@8@:@<@>@@@(@$PP@@&@j@&@@j@@G@@@@@@ $PP@G@@@44@@G@@@@@@@ @"@$@@$PP@@$PPF@@V@@^@@i@@J@@@@ @ @|@@P@J@j@@/$PNP @(@.@@i@@@((i@*@w,@@.@;0@@2@P@^@4@T6@i8@e:@a<@K>@M@@(@P@$PP@@i@@F@@i@@J@@9@2@3@@ P@$P @@qF N@ @@#O @@iR @@<[ @@u^ @@g @@Yj @@s @@Wv P@Pu@@>@.@.@@i@i~@i@ >i@i@ `@`@ E@+ @@` @ @@/ i@@@@i@@@@G@@@@@ @@P@G@ @@@~,,@@@G@@@@@@@ @ @@@$PP@@ @P'@.@@@H@ H@NQ H@$PFO@@PF@@i@@J@@@@ @"@$@@P@J@j@@/$PNP@ i@@@((H@ i@*@,@@.@K0@@2@FF4@P@F@6@b8@w:@s<@o>@R@@[B@YD@(@P@H,@$PN@@H@H@N@> $PFF@NF@J@@@@R@:@@ P@J@j@@&i@@@00H@i@*@>,@@.@0@@2@4@6@18@-:@)<@ >@@@(@$PP@hH,@$PP@i@@@44i@@@J@@@@@@ @ @ @@@P@C2(@@j@j@@A@@@@@$PP@i@(@@@s,,i@*@,@@.@l@0@@2@$P4P@4@@6@A@8@:@>@<@@@B@D@F@H@(@ P@$P@@@P@.@@@PP%@l@(@@@((l@@@@@i@@@@@ @@"@$@@$PP@@QQTOPP%@PP@P@@ F`@][i(@@@(({@P@i@@@@@@p@@V @V @Q@@$PP@(@@@$$_@PP@@@i@@@@S@@9 @9"@&$@@$PP@i(@\\@ds@@@PP@i@@@@@@4@@ @ @$@@$PP@P(PP@P@@ F`@9 @@ F`@1 (P(@@@R@P@@@i@@@@ @@ @"@$@@$PP@@@ @P'@M@$PF@j@P@PP@@i@@@j@@.O@i@@G@@@@ @ @@@P@G@$@@@@PP@G@@@@@@@ @"@$@@$PP@G@PP@@i(@@@X44@PP@i@@@@@@@@y @y @k@@$PP@@@ F`@ @@ F`@ @@N(@@@T88t@P@@@i@@@@i@@O @O"@8$@@$PP@n@@@,@@n@@@@N*#m@i(@@@@G*@PP,@i@.@@0@@2@P@P@@4@76@8@:@<@>@m@@@(@$PP@: m@$P@@@@@m@@G@@@@@ @@P@G@@@_   @PP@G@@@@@@@ @"@$@@$PP@G@PP@@$PPPP@`P'@PF@F@A@H@B@J@ P@J@L@N@P@R@T@D@P@$PN@@@ PH@ PH@@N@ $PFFF@B@H@A@J@J@L@N@P@R@T@D@P@ PH,@@@@A@P@ @PP@T @@i@@@ `@`@@@@@@@ P@ @@n@z @"@$@@$PP@ @P P@@(@@*@@,@q.@P0@@2@ P4@O6@[8@:@8<@h>@3@@_B@&@$PP@P P@@> FP@ !P!L!N!!GSTQHOreader_driver_ symbol_table add_char_offset_ date_time_expand_pathname_ component$'initiate_file_*$. iodd_listen_115 iodd_msg_88; iodd_parse_args>ACios_setsizeFHJattachFMOdetachFRTgetsizeFWY pool_manager_init\`b clean_pool\eh read_cards_kknset_rqtkqs set_stationkvy error_table_action_not_performed| fatal_error|ionmat|\`e`` cleanup.1request`command`card_command_level.2] detach_alljr&p&n&)l&0j&7h&=f&Ed&Lb&Q`&V^&[\&dZ&jX&pV&uT&{R&P&N&symbtreeN_RNo8 PL/I 7"' *Multics PL/I Compiler, Release 31a, of October 12, 1988Hirneisen.SysMaint.aoptimize map P3vDN](\gqK-Lg&#WB"Lq7vDN87vDN%8vDN5vDNz'Z7{Ki(\VZPK >special_ldd>install>MR12.2-1199>reader_driver_.pl1>ldd>include>access_mode_values.incl.pl1>ldd>include>card_stream_info.incl.pl1>special_ldd>install>MR12.2-1199>driver_status.incl.pl1>special_ldd>install>MR12.2-1199>iod_constants.incl.pl1>special_ldd>install>MR12.2-1199>iod_tables_hdr.incl.pl1>special_ldd>install>MR12.2-1199>iodd_static.incl.pl1>ldd>include>mseg_message_info.incl.pl1>ldd>include>request_descriptor.incl.pl1pl1info reader_driver_{ _ tSt |1O3Z<AO 4|)@O 4|'@  A d2 @3:<_ S93Z3x[>gt._(+:!|OO |#OtxC(-|Mx[PZjkZ|ZPkZ ZP+kkZP /P Zk PV`Z +PC9UYUYUYUYUYUYobj_map   validate_card_input_ 03/27/85 1136.3re 03/27/85 1135.4 56952 VdLTTETT4VTT+T6TTT!T=.*.*TT T*V .acsT>rcp#V?cleanup >udd>any_otherlinkage_errorcard_input.acs^a ^[because ^a^]No password suppliedChecking card password.card_input_password.acsChanging network password.Incorrect password supplied.Incorrect user access to stationIncorrect station access for userIncorrect access to card_input_password.acsUnable to check user access to station ACSUnable to check user access to card_input_password.acsUnable to check station access to user access control segmentvalidate_card_input_: Fault with AIM privilege on. Privilege revoked.P@,P@"PP@@P@@P@@P@P@P@@ P@P@@P@ P@@P@(PP@P `@P@P@u`>@.@.@@@@~@@P@@u`@>@.@.@@@@~@@>i@@ `@`@ E@@>@@@@@ e@`@>@@@ E@v@ @@`B  @@u@@>@.@.@@@~@@>@T@P@P@u`>@.@.@@@@~@@>@T@@i@@ `@`@ E@@@i@@ `@` E@@@B@@@@@@@A@@@@@@@@@@@P@ @A@@@,,A@@@@@@@@P P@0$@@Y@@@6@(@@@  @@@@@x@@@PP@u`@>@.@.@@@@~@@>@>@>@@T@P@P@u`>@.@.@@@@~@@>@T@@i@ @@W@ `@`@@@@ E@@@@P@ e@`@@JJ@Ics@@i@@ `@` E@#@@@@@@@@@A@@@@@@@@@@@$PP@ @A@@@y@@A@@@@@@@ @P P@0$@@Y@@@6@(@@@,$$@@@@@@@@P@P F`G@P@ PN(@@@@@@@@@@@@@u@>@.@.@@@~@@>@T@@i@@ `@` E@@@@@@@B@@@@@@@A@@@@@@@@@@$PP@ @A@@@88A@@@@x@f@@@ @@@@Y@M@+(@@@,,@@@@^@K@@y@ @@`P@P@ @@`@P@@@@@"P@P@1@@@ a@@P@PP@"PP@P@P@P@"P@P@P@(PP@P `@P@P @@`@@P@@@@@P@@@@ #@@P@"PP@@@PP@ @@`@@@@@$PP@@P@"PP@T@@@P@P@@V@ P@J@X@@P\@V@^@X@`@A@b@Pd@f@h@j@Z@P@A@&$PNPU(@@@ZU@n@Z@p@t@v@l@@@@lA@\@l@^@b@d@Z@@PP PT@ `@@\ @ @P@M@@N@ @B(`P@ P@@.@{@@@H@H$P PT@@@V@OX@JZ@R@P@ PA@T@R@$PP@@T@H @P@.@Q@@@*@ H@N @P@@*@ @@@n@l@$PP@R(@ PP@P @@@T J@X@U@x@X@n@U@p@x@r@A@t@l@$PP@.@@A@@@.lA@\@l@^@b@d@Z@@@PP@ P@@ @@D@B@ P@ P@@@P@"PP@Y@P@P Z@@P^@Z@`@@@b@\@ P@@@\d(@PPM@e@\@h@ P@Pj@d@l@Pn@e@p@@@r@t@@Pv@x@"PPz@|@~@f@$PP@PP$P P P@P P@PX@>.p. validate_card_input_ symbol_table  error_table_ bad_passwordaction_not_performed$iox_ error_output')-continue_to_signal_005convert_status_code_88>hcs_get_user_effmodeACHioa_ ioa_switchKMPrsnnlKSU pnt_manager_testX\^network_get_entryXaf update_entryXimsystem_privilege_ seg_priv_onpux seg_priv_offp{` user` station` !`\ check_password> any_other.1 cleanup.2 linkage_error.3 priv_off) error< "+&&&&/&7&@&J&R&W&`&h&o&z&>system_control_1 symbtreeK1K<?PL/I 8"' *FSkSSMultics PL/I Compiler, Release 28e, of February 14, 1985GJohnson.SysMaint.moptimize map4&\LK;>\VZIK >spec>on>7.ds>validate_card_input_.pl1>ldd>include>pnt_entry.incl.pl1pl1info Nvalidate_card_input_! _39}x_|GO$B!WG, }G )g@Pg4xc  h_jZZk*PVj+|Z PZ_jV`Z +XV@V`Zk +PZj@eU*eU*eU*eU*e0obj_map F"h+"