00000000 00000018 00000030 00000048 00000060 00000078 00000090 000000A8 000000C0 000000D8 000000F0 00000108 00000120 00000138 00000150 00000168 00000180 00000198 000001B0 000001C8 000001E0 000001F8 00000210 00000228 00000240 00000258 00000270 00000288 000002A0 000002B8 000002D0 000002E8 00000300 00000318 00000330 00000348 00000360 00000378 00000390 000003A8 000003C0 000003D8 000003F0 00000408 00000420 00000438 00000450 00000468 00000480 00000498 000004B0 000004C8 000004E0 000004F8 00000510 00000528 00000540 00000558 00000570 00000588 000005A0 000005B8 000005D0 000005E8 00000600 00000618 00000630 00000648 00000660 00000678 00000690 000006A8 000006C0 000006D8 000006F0 00000708 00000720 00000738 00000750 00000768 00000780 00000798 000007B0 000007C8 000007E0 000007F8 00000810 00000828 00000840 00000858 00000870 00000888 000008A0 000008B8 000008D0 000008E8 00000900 00000918 00000930 00000948 00000960 00000978 00000990 000009A8 000009C0 000009D8 000009F0 00000A08 00000A20 00000A38 00000A50 00000A68 00000A80 00000A98 00000AB0 00000AC8 00000AE0 00000AF8 00000B10 00000B28 00000B40 00000B58 00000B70 00000B88 00000BA0 00000BB8 00000BD0 00000BE8 00000C00 00000C18 00000C30 00000C48 00000C60 00000C78 00000C90 00000CA8 00000CC0 00000CD8 00000CF0 00000D08 00000D20 00000D38 00000D50 00000D68 00000D80 00000D98 00000DB0 00000DC8 00000DE0 00000DF8 00000E10 00000E28 00000E40 00000E58 00000E70 00000E88 00000EA0 00000EB8 00000ED0 00000EE8 00000F00 00000F18 00000F30 00000F48 00000F60 00000F78 00000F90 00000FA8 00000FC0 00000FD8 00000FF0 00001008 00001020 00001038 00001050 00001068 00001080 00001098 000010B0 000010C8 000010E0 000010F8 00001110 00001128 00001140 00001158 00001170 00001188 000011A0 000011B8 000011D0 000011E8 00001200 00001218 00001230 00001248 00001260 00001278 00001290 000012A8 000012C0 000012D8 000012F0 00001308 00001320 00001338 00001350 00001368 00001380 00001398 000013B0 000013C8 000013E0 000013F8 00001410 00001428 00001440 00001458 00001470 00001488 000014A0 000014B8 000014D0 000014E8 00001500 00001518 00001530 00001548 00001560 00001578 00001590 000015A8 000015C0 000015D8 000015F0 00001608 00001620 00001638 00001650 00001668 00001680 00001698 000016B0 000016C8 000016E0 000016F8 00001710 00001728 00001740 00001758 00001770 00001788 000017A0 000017B8 000017D0 000017E8 00001800 00001818 00001830 00001848 00001860 00001878 00001890 000018A8 000018C0 000018D8 000018F0 00001908 00001920 00001938 00001950 00001968 00001980 00001998 000019B0 000019C8 000019E0 000019F8 00001A10 00001A28 00001A40 00001A58 00001A70 00001A88 00001AA0 00001AB8 00001AD0 00001AE8 00001B00 00001B18 00001B30 00001B48 00001B60 00001B78 00001B90 00001BA8 00001BC0 00001BD8 00001BF0 00001C08 00001C20 00001C38 00001C50 00001C68 00001C80 00001C98 00001CB0 00001CC8 00001CE0 00001CF8 00001D10 00001D28 00001D40 00001D58 00001D70 00001D88 00001DA0 00001DB8 00001DD0 00001DE8 00001E00 00001E18 00001E30 00001E48 00001E60 00001E78 00001E90 00001EA8 00001EC0 00001ED8 00001EF0 00001F08 00001F20 00001F38 00001F50 00001F68 00001F80 00001F98 00001FB0 00001FC8 00001FE0 00001FF8 00002010 00002028 00002040 00002058 00002070 00002088 000020A0 000020B8 000020D0 000020E8 00002100 00002118 00002130 00002148 00002160 00002178 00002190 000021A8 000021C0 000021D8 000021F0 00002208 00002220 00002238 00002250 00002268 00002280 00002298 000022B0 000022C8 000022E0 000022F8 00002310 00002328 00002340 00002358 00002370 00002388 000023A0 000023B8 000023D0
| 23 21 2F 75 73 72 2F 62 69 6E 2F 70 65 72 6C 0A 23 20 2D 2A 2D 20 70 65 72 6C 20 2D 2A 2D 0A 0A 23 20 46 6F 6F 6D 61 74 69 63 20 50 50 44 20 66 69 6C 65 20 67 65 6E 65 72 61 74 6F 72 20 66 6F 72 20 6D 61 6E 75 61 6C 20 50 50 44 20 67 65 6E 65 72 61 74 69 6F 6E 20 28 76 69 61 20 22 2D 70 22 2C 0A 23 20 22 2D 64 22 2C 20 22 2D 41 22 2C 20 61 6E 64 20 22 2D 50 22 20 63 6F 6D 6D 61 6E 64 20 6C 69 6E 65 20 6F 70 74 69 6F 6E 73 29 20 6F 72 20 66 6F 72 20 61 75 74 6F 6D 61 74 69 63 0A 23 20 6F 6E 2D 74 68 65 2D 66 6C 79 20 50 50 44 20 67 65 6E 65 72 61 74 69 6F 6E 20 62 79 20 43 55 50 53 20 31 2E 32 20 6F 72 20 6E 65 77 65 72 20 28 76 69 61 20 22 63 61 74 22 20 61 6E 64 20 22 6C 69 73 74 22 0A 23 20 63 6F 6D 6D 61 6E 64 20 6C 69 6E 65 20 6F 70 74 69 6F 6E 73 29 2E 0A 0A 75 73 65 20 46 6F 6F 6D 61 74 69 63 3A 3A 44 65 66 61 75 6C 74 73 3B 0A 75 73 65 20 46 6F 6F 6D 61 74 69 63 3A 3A 44 42 3B 0A 75 73 65 20 47 65 74 6F 70 74 3A 3A 53 74 64 3B 0A 75 73 65 20 44 61 74 61 3A 3A 44 75 6D 70 65 72 3B 0A 23 75 73 65 20 73 74 72 69 63 74 3B 0A 0A 6D 79 20 24 64 65 62 75 67 20 3D 20 30 3B 0A 0A 23 20 55 73 65 20 70 72 6F 67 72 61 6D 20 6E 61 6D 65 20 61 73 20 74 68 65 20 66 69 72 73 74 20 70 61 72 74 20 6F 66 20 74 68 65 20 50 50 44 20 55 52 49 20 66 6F 72 20 43 55 50 53 20 28 73 68 6F 75 6C 64 20 62 65 20 0A 23 20 22 66 6F 6F 6D 61 74 69 63 22 29 2E 0A 24 30 20 3D 7E 20 6D 21 2F 28 5B 5E 2F 5D 2B 29 5C 73 2A 24 21 3B 0A 6D 79 20 24 70 72 6F 67 6E 61 6D 65 20 3D 20 28 24 31 20 7C 7C 20 24 30 29 3B 0A 0A 23 20 44 65 66 61 75 6C 74 20 73 65 74 74 69 6E 67 73 20 66 6F 72 20 6C 69 73 74 69 6E 67 20 50 50 44 73 20 62 79 20 63 75 70 73 2D 64 72 69 76 65 72 64 0A 0A 23 20 4C 69 73 74 20 6F 6E 6C 79 20 74 68 65 20 50 50 44 20 66 69 6C 65 20 77 69 74 68 20 74 68 65 20 72 65 63 6F 6E 6D 6D 65 6E 64 65 64 20 64 72 69 76 65 72 20 66 6F 72 20 65 61 63 68 20 70 72 69 6E 74 65 72 0A 23 20 61 6E 64 20 64 6F 20 6E 6F 74 20 73 68 6F 77 20 22 28 72 65 63 6F 6D 6D 65 6E 64 65 64 29 22 20 69 6E 20 74 68 65 20 43 55 50 53 20 77 65 62 20 69 6E 74 65 72 66 61 63 65 2E 20 54 68 69 73 20 6D 6F 64 65 0A 23 20 6D 61 6B 65 73 20 43 55 50 53 20 73 65 74 75 70 20 77 69 74 68 20 74 68 65 20 77 65 62 20 69 6E 74 65 72 66 61 63 65 20 76 65 72 79 20 65 61 73 79 20 66 6F 72 20 62 65 67 69 6E 6E 65 72 73 2E 0A 23 20 54 68 69 73 20 63 61 6E 20 62 65 20 73 65 74 20 62 79 20 22 4F 6E 6C 79 52 65 63 6F 6D 6D 65 6E 64 65 64 20 59 65 73 22 20 6F 72 20 22 4F 6E 6C 79 52 65 63 6F 6D 6D 65 6E 64 65 64 20 4E 6F 22 20 69 6E 0A 23 20 2F 65 74 63 2F 63 75 70 73 2F 66 6F 6F 6D 61 74 69 63 2E 63 6F 6E 66 0A 6D 79 20 24 6F 6E 6C 79 72 65 63 6F 6D 6D 65 6E 64 65 64 20 3D 20 30 3B 0A 23 20 54 68 65 20 46 6F 6F 6D 61 74 69 63 20 64 61 74 61 62 61 73 65 20 64 6F 65 73 20 6E 6F 74 20 6F 6E 6C 79 20 67 65 6E 65 72 61 74 65 20 50 50 44 20 66 69 6C 65 73 20 66 72 6F 6D 20 46 6F 6F 6D 61 74 69 63 0A 23 20 58 4D 4C 20 64 61 74 61 20 62 75 74 20 61 6C 73 6F 20 6F 66 20 72 65 61 64 79 2D 6D 61 64 65 20 50 50 44 73 20 6D 61 69 6E 6C 79 20 66 72 6F 6D 20 70 72 69 6E 74 65 72 20 6D 61 6E 75 66 61 63 74 75 72 65 72 73 0A 23 20 66 6F 72 20 74 68 65 69 72 20 50 6F 73 74 53 63 72 69 70 74 20 70 72 69 6E 74 65 72 73 2E 20 41 73 20 74 68 65 73 65 20 50 50 44 73 20 61 72 65 20 6F 66 74 65 6E 20 61 6C 73 6F 20 6C 69 6E 6B 65 64 20 74 6F 0A 23 20 74 68 65 20 64 69 72 65 63 74 6F 72 69 65 73 20 69 6E 20 77 68 69 63 68 20 43 55 50 53 20 6C 69 6E 6B 73 20 64 69 72 65 63 74 6C 79 20 74 6F 20 50 50 44 20 66 69 6C 65 73 2C 20 64 75 70 6C 69 63 61 74 65 0A 23 20 6C 69 73 74 69 6E 67 20 6F 66 20 74 68 65 73 65 20 50 50 44 73 20 62 79 20 43 55 50 53 20 77 6F 75 6C 64 20 72 65 73 75 6C 74 2E 20 54 68 65 72 65 66 6F 72 65 20 77 65 20 73 75 70 70 72 65 73 73 0A 23 20 6C 69 73 74 69 6E 67 20 74 68 65 20 72 65 61 64 79 2D 6D 61 64 65 20 50 50 44 73 2E 20 54 68 69 73 20 62 65 68 61 76 69 6F 75 72 20 63 61 6E 20 62 65 20 63 68 61 6E 67 65 64 20 62 79 20 75 73 69 6E 67 0A 23 20 22 4C 69 73 74 52 65 61 64 79 4D 61 64 65 50 50 44 73 20 59 65 73 22 20 6F 72 20 22 4C 69 73 74 52 65 61 64 79 4D 61 64 65 50 50 44 73 20 4E 6F 22 20 69 6E 0A 23 20 2F 65 74 63 2F 63 75 70 73 2F 66 6F 6F 6D 61 74 69 63 2E 63 6F 6E 66 0A 6D 79 20 24 6C 69 73 74 72 65 61 64 79 6D 61 64 65 70 70 64 73 20 3D 20 30 3B 0A 68 65 6C 70 28 29 20 69 66 20 21 40 41 52 47 56 3B 0A 23 6D 79 20 28 24 6F 70 74 5F 68 2C 20 24 6F 70 74 5F 64 2C 20 24 6F 70 74 5F 70 2C 20 24 6F 70 74 5F 41 2C 20 24 6F 70 74 5F 50 2C 20 24 6F 70 74 5F 77 29 3B 0A 67 65 74 6F 70 74 73 28 22 41 50 3A 64 3A 70 3A 68 77 74 3A 22 29 3B 0A 68 65 6C 70 28 29 20 69 66 20 24 6F 70 74 5F 68 3B 0A 6D 79 20 24 64 72 76 20 3D 20 24 6F 70 74 5F 64 3B 0A 6D 79 20 24 70 6F 69 64 20 20 20 3D 20 24 6F 70 74 5F 70 3B 0A 6D 79 20 24 73 68 6F 77 61 6C 6C 20 20 20 3D 20 24 6F 70 74 5F 41 3B 0A 6D 79 20 24 73 68 6F 77 6D 61 74 63 68 20 20 20 3D 20 24 6F 70 74 5F 50 3B 0A 68 65 6C 70 28 29 20 69 66 20 28 24 23 41 52 47 56 20 3E 20 31 29 20 26 26 20 21 28 24 70 6F 69 64 29 3B 0A 0A 69 66 20 28 24 41 52 47 56 5B 30 5D 20 3D 7E 20 2F 5E 6C 69 73 74 24 2F 69 29 20 7B 0A 20 20 20 20 23 20 4C 69 73 74 20 61 6C 6C 20 61 76 61 69 6C 61 62 6C 65 20 50 50 44 20 66 69 6C 65 73 20 28 66 6F 72 6D 61 74 20 66 6F 72 20 63 75 70 73 2D 64 72 69 76 65 72 64 29 0A 20 20 20 20 63 75 70 73 6C 69 73 74 70 70 64 73 28 29 3B 0A 7D 20 65 6C 73 69 66 20 28 24 41 52 47 56 5B 30 5D 20 3D 7E 20 2F 5E 63 61 74 24 2F 69 29 20 7B 0A 20 20 20 20 23 20 47 65 6E 65 72 61 74 65 20 61 6E 64 20 72 65 74 75 72 6E 20 74 68 65 20 73 65 6C 65 63 74 65 64 20 50 50 44 20 66 69 6C 65 20 28 63 75 70 73 2D 64 72 69 76 65 72 64 20 63 6F 6D 6D 61 6E 64 20 6C 69 6E 65 29 0A 20 20 20 20 67 65 6E 65 72 61 74 65 70 70 64 28 24 41 52 47 56 5B 31 5D 29 3B 0A 7D 20 65 6C 73 69 66 20 28 24 73 68 6F 77 61 6C 6C 20 6F 72 20 24 73 68 6F 77 6D 61 74 63 68 29 20 7B 0A 20 20 20 20 23 20 4C 69 73 74 20 61 6C 6C 20 50 50 44 20 66 69 6C 65 73 20 6F 72 20 66 69 6C 65 73 20 6D 61 74 63 68 69 6E 67 20 72 65 67 65 78 70 20 28 6D 61 6E 75 61 6C 20 6F 70 65 72 61 74 69 6F 6E 29 0A 20 20 20 20 66 6F 6F 6D 61 74 69 63 6C 69 73 74 70 70 64 73 28 24 73 68 6F 77 6D 61 74 63 68 29 3B 0A 7D 20 65 6C 73 69 66 20 28 24 70 6F 69 64 29 20 7B 0A 20 20 20 20 23 20 47 65 6E 65 72 61 74 65 20 61 6E 64 20 72 65 74 75 72 6E 20 74 68 65 20 73 65 6C 65 63 74 65 64 20 50 50 44 20 66 69 6C 65 20 28 6D 61 6E 75 61 6C 20 6F 70 65 72 61 74 69 6F 6E 29 0A 20 20 20 20 67 65 6E 65 72 61 74 65 70 70 64 28 24 70 6F 69 64 2C 20 24 64 72 76 29 3B 0A 7D 20 65 6C 73 65 20 7B 0A 20 20 20 20 68 65 6C 70 28 29 3B 0A 7D 0A 0A 65 78 69 74 28 30 29 3B 0A 0A 73 75 62 20 63 75 70 73 6C 69 73 74 70 70 64 73 20 7B 0A 0A 20 20 20 20 23 20 52 65 61 64 20 63 6F 6E 66 69 67 75 72 61 74 69 6F 6E 20 69 6E 20 2F 65 74 63 2F 63 75 70 73 2F 66 6F 6F 6D 61 74 69 63 2E 63 6F 6E 66 0A 20 20 20 20 6D 79 20 24 63 6F 6E 66 66 69 6C 65 6E 61 6D 65 3B 0A 20 20 20 20 69 66 20 28 6D 79 20 24 63 75 70 73 73 65 72 76 65 72 72 6F 6F 74 20 3D 20 24 45 4E 56 7B 43 55 50 53 5F 53 45 52 56 45 52 52 4F 4F 54 7D 29 20 7B 0A 20 20 20 20 20 20 20 20 24 63 6F 6E 66 66 69 6C 65 6E 61 6D 65 20 3D 20 22 24 63 75 70 73 73 65 72 76 65 72 72 6F 6F 74 2F 66 6F 6F 6D 61 74 69 63 2E 63 6F 6E 66 22 3B 0A 20 20 20 20 7D 20 65 6C 73 65 20 7B 0A 20 20 20 20 20 20 20 20 24 63 6F 6E 66 66 69 6C 65 6E 61 6D 65 20 3D 20 22 2F 65 74 63 2F 63 75 70 73 2F 66 6F 6F 6D 61 74 69 63 2E 63 6F 6E 66 22 3B 0A 20 20 20 20 7D 0A 20 20 20 20 69 66 20 28 2D 72 20 24 63 6F 6E 66 66 69 6C 65 6E 61 6D 65 20 61 6E 64 0A 09 6F 70 65 6E 20 43 4F 4E 46 2C 20 22 3C 20 24 63 6F 6E 66 66 69 6C 65 6E 61 6D 65 22 29 20 7B 0A 09 77 68 69 6C 65 20 28 6D 79 20 24 6C 69 6E 65 20 3D 20 3C 43 4F 4E 46 3E 29 20 7B 0A 09 20 20 20 20 63 68 6F 6D 70 20 24 6C 69 6E 65 3B 0A 09 20 20 20 20 69 66 20 28 24 6C 69 6E 65 20 3D 7E 0A 09 09 2F 5E 5C 73 2A 4F 6E 6C 79 52 65 63 6F 6D 6D 65 6E 64 65 64 5C 73 2B 28 59 65 73 7C 4F 6E 7C 54 72 75 65 7C 31 29 5C 73 2A 24 2F 69 29 20 7B 0A 09 09 24 6F 6E 6C 79 72 65 63 6F 6D 6D 65 6E 64 65 64 20 3D 20 31 3B 0A 09 20 20 20 20 7D 20 65 6C 73 69 66 20 28 24 6C 69 6E 65 20 3D 7E 0A 09 09 20 20 20 20 20 2F 5E 5C 73 2A 4F 6E 6C 79 52 65 63 6F 6D 6D 65 6E 64 65 64 5C 73 2B 28 4E 6F 7C 4F 66 66 7C 46 61 6C 73 65 7C 30 29 5C 73 2A 24 2F 69 29 20 7B 0A 09 09 24 6F 6E 6C 79 72 65 63 6F 6D 6D 65 6E 64 65 64 20 3D 20 30 3B 0A 09 20 20 20 20 7D 0A 09 20 20 20 20 69 66 20 28 24 6C 69 6E 65 20 3D 7E 0A 09 09 2F 5E 5C 73 2A 4C 69 73 74 52 65 61 64 79 4D 61 64 65 50 50 44 73 5C 73 2B 28 59 65 73 7C 4F 6E 7C 54 72 75 65 7C 31 29 5C 73 2A 24 2F 69 29 20 7B 0A 09 09 24 6C 69 73 74 72 65 61 64 79 6D 61 64 65 70 70 64 73 20 3D 20 31 3B 0A 09 20 20 20 20 7D 20 65 6C 73 69 66 20 28 24 6C 69 6E 65 20 3D 7E 0A 09 09 20 20 20 20 20 2F 5E 5C 73 2A 4C 69 73 74 52 65 61 64 79 4D 61 64 65 50 50 44 73 5C 73 2B 28 4E 6F 7C 4F 66 66 7C 46 61 6C 73 65 7C 30 29 5C 73 2A 24 2F 69 29 20 7B 0A 09 09 24 6C 69 73 74 72 65 61 64 79 6D 61 64 65 70 70 64 73 20 3D 20 30 3B 0A 09 20 20 20 20 7D 0A 09 7D 0A 09 63 6C 6F 73 65 20 43 4F 4E 46 3B 0A 20 20 20 20 7D 0A 0A 20 20 20 20 6D 79 20 24 64 62 20 3D 20 46 6F 6F 6D 61 74 69 63 3A 3A 44 42 2D 3E 6E 65 77 28 29 3B 0A 20 20 20 20 24 64 62 2D 3E 67 65 74 5F 6F 76 65 72 76 69 65 77 28 31 2C 20 31 20 2B 20 6C 69 73 74 72 65 61 64 79 6D 61 64 65 70 70 64 73 29 3B 0A 0A 20 20 20 20 66 6F 72 20 6D 79 20 24 70 72 69 6E 74 65 72 20 28 40 7B 24 64 62 2D 3E 7B 27 6F 76 65 72 76 69 65 77 27 7D 7D 29 20 7B 0A 09 6D 79 20 24 70 6F 69 64 20 3D 20 24 70 72 69 6E 74 65 72 2D 3E 7B 27 69 64 27 7D 3B 0A 09 6D 79 20 24 6D 61 6B 65 20 3D 20 24 70 72 69 6E 74 65 72 2D 3E 7B 27 6D 61 6B 65 27 7D 3B 0A 09 6D 79 20 24 6D 6F 64 65 6C 20 3D 20 24 70 72 69 6E 74 65 72 2D 3E 7B 27 6D 6F 64 65 6C 27 7D 3B 0A 09 6D 79 20 24 72 65 63 64 72 69 76 65 72 20 3D 20 24 70 72 69 6E 74 65 72 2D 3E 7B 27 64 72 69 76 65 72 27 7D 3B 0A 09 6D 79 20 40 64 72 69 76 65 72 73 20 3D 20 40 7B 24 70 72 69 6E 74 65 72 2D 3E 7B 27 64 72 69 76 65 72 73 27 7D 7D 3B 0A 09 6D 79 20 24 69 64 20 3D 20 24 70 72 69 6E 74 65 72 2D 3E 7B 27 69 65 65 65 27 7D 3B 0A 0A 09 23 20 4E 6F 20 64 72 69 76 65 72 73 20 3D 3E 20 4E 6F 20 50 50 44 73 0A 09 6E 65 78 74 20 69 66 20 24 23 64 72 69 76 65 72 73 20 3C 20 30 3B 0A 0A 09 23 20 50 75 74 20 74 68 65 20 72 65 63 6F 6E 6D 6D 65 6E 64 65 64 20 64 72 69 76 65 72 20 74 6F 20 74 68 65 20 62 65 67 69 6E 6E 69 6E 67 20 6F 66 20 6C 69 73 74 2C 20 61 73 20 43 55 50 53 0A 09 23 20 70 72 6F 62 61 62 6C 79 20 77 69 6C 6C 20 74 61 6B 65 20 74 68 65 20 66 69 72 73 74 20 50 50 44 20 77 68 69 63 68 20 6D 61 74 63 68 65 73 20 74 68 65 20 70 72 69 6E 74 65 72 20 6D 6F 64 65 6C 0A 09 6D 79 20 40 73 6F 72 74 65 64 64 72 69 76 65 72 73 3B 0A 09 69 66 20 28 46 6F 6F 6D 61 74 69 63 3A 3A 44 42 3A 3A 6D 65 6D 62 65 72 28 24 72 65 63 64 72 69 76 65 72 2C 20 40 64 72 69 76 65 72 73 29 29 20 7B 0A 09 20 20 20 20 23 20 56 61 6C 69 64 20 65 6E 74 72 79 20 66 6F 72 20 74 68 65 20 72 65 63 6F 6D 6D 65 6E 64 65 64 20 64 72 69 76 65 72 0A 09 20 20 20 20 70 75 73 68 28 40 73 6F 72 74 65 64 64 72 69 76 65 72 73 2C 20 24 72 65 63 64 72 69 76 65 72 29 3B 0A 09 20 20 20 20 69 66 20 28 21 24 6F 6E 6C 79 72 65 63 6F 6D 6D 65 6E 64 65 64 29 20 7B 0A 09 09 66 6F 72 65 61 63 68 20 6D 79 20 24 64 72 69 76 65 72 20 28 40 64 72 69 76 65 72 73 29 20 7B 0A 09 09 20 20 20 20 70 75 73 68 28 40 73 6F 72 74 65 64 64 72 69 76 65 72 73 2C 20 24 64 72 69 76 65 72 29 20 69 66 20 24 64 72 69 76 65 72 20 6E 65 20 24 72 65 63 64 72 69 76 65 72 3B 0A 09 09 7D 0A 09 20 20 20 20 7D 0A 09 7D 20 65 6C 73 65 20 7B 0A 09 20 20 20 20 23 20 49 6E 76 61 6C 69 64 20 65 6E 74 72 79 20 66 6F 72 20 74 68 65 20 72 65 63 6F 6D 6D 65 6E 64 65 64 20 64 72 69 76 65 72 0A 09 20 20 20 20 6E 65 78 74 20 69 66 20 24 6F 6E 6C 79 72 65 63 6F 6D 6D 65 6E 64 65 64 3B 0A 09 20 20 20 20 75 6E 64 65 66 20 24 72 65 63 64 72 69 76 65 72 3B 0A 09 20 20 20 20 40 73 6F 72 74 65 64 64 72 69 76 65 72 73 20 3D 20 40 64 72 69 76 65 72 73 3B 0A 09 7D 0A 0A 09 23 20 47 6F 20 74 68 72 6F 75 67 68 20 61 6C 6C 20 74 68 65 20 64 72 69 76 65 72 73 20 61 6E 64 20 6C 69 73 74 20 74 68 65 20 50 50 44 20 65 6E 74 72 69 65 73 0A 09 66 6F 72 65 61 63 68 20 6D 79 20 24 64 72 69 76 65 72 20 28 40 73 6F 72 74 65 64 64 72 69 76 65 72 73 29 20 7B 0A 09 20 20 20 20 23 20 47 65 74 20 50 50 44 20 68 65 61 64 65 72 20 64 61 74 61 20 66 72 6F 6D 20 74 68 65 20 50 50 44 20 66 69 6C 65 20 67 65 6E 65 72 61 74 6F 72 0A 09 20 20 20 20 6D 79 20 28 24 69 65 65 65 31 32 38 34 2C 24 70 6E 70 6D 61 6B 65 2C 24 70 6E 70 6D 6F 64 65 6C 2C 24 66 69 6C 65 6E 61 6D 65 2C 24 6C 6F 6E 67 6E 61 6D 65 2C 0A 09 09 24 64 72 69 76 65 72 6E 61 6D 65 2C 24 6E 69 63 6B 6E 61 6D 65 2C 24 6D 6F 64 65 6C 6E 61 6D 65 29 20 3D 0A 09 09 20 20 20 20 46 6F 6F 6D 61 74 69 63 3A 3A 44 42 3A 3A 67 65 74 70 70 64 68 65 61 64 65 72 64 61 74 61 28 24 70 72 69 6E 74 65 72 2C 20 24 64 72 69 76 65 72 2C 20 0A 09 09 09 09 09 09 20 20 20 28 24 6F 6E 6C 79 72 65 63 6F 6D 6D 65 6E 64 65 64 20 3F 20 27 27 20 3A 0A 09 09 09 09 09 09 20 20 20 20 24 70 72 69 6E 74 65 72 2D 3E 7B 27 64 72 69 76 65 72 27 7D 29 29 3B 0A 09 20 20 20 20 70 72 69 6E 74 20 22 5C 22 24 70 72 6F 67 6E 61 6D 65 3A 24 6C 6F 6E 67 6E 61 6D 65 5C 22 20 65 6E 20 5C 22 24 6D 61 6B 65 5C 22 20 5C 22 24 6E 69 63 6B 6E 61 6D 65 5C 22 20 5C 22 24 69 65 65 65 31 32 38 34 5C 22 5C 6E 22 3B 0A 09 7D 0A 20 20 20 20 7D 0A 7D 0A 0A 73 75 62 20 66 6F 6F 6D 61 74 69 63 6C 69 73 74 70 70 64 73 20 7B 0A 0A 20 20 20 20 6D 79 20 28 24 6D 61 74 63 68 29 20 3D 20 40 5F 3B 0A 0A 20 20 20 20 6D 79 20 24 64 62 20 3D 20 46 6F 6F 6D 61 74 69 63 3A 3A 44 42 2D 3E 6E 65 77 28 29 3B 0A 20 20 20 20 24 64 62 2D 3E 67 65 74 5F 6F 76 65 72 76 69 65 77 28 29 3B 0A 20 20 20 20 6D 79 20 40 64 72 69 76 65 72 73 20 3D 20 24 64 62 2D 3E 67 65 74 5F 64 72 69 76 65 72 6C 69 73 74 28 29 3B 0A 0A 20 20 20 20 66 6F 72 20 6D 79 20 24 70 72 69 6E 74 65 72 20 28 40 7B 24 64 62 2D 3E 7B 27 6F 76 65 72 76 69 65 77 27 7D 7D 29 20 7B 0A 09 6D 79 20 24 70 72 20 3D 20 24 70 72 69 6E 74 65 72 2D 3E 7B 27 6D 61 6B 65 27 7D 3B 0A 09 6D 79 20 24 6D 6F 64 65 6C 20 3D 20 24 70 72 69 6E 74 65 72 2D 3E 7B 27 6D 6F 64 65 6C 27 7D 3B 0A 09 6D 79 20 24 6E 61 6D 65 20 3D 20 22 24 70 72 20 24 6D 6F 64 65 6C 22 3B 0A 09 6D 79 20 24 64 72 69 76 65 72 20 3D 20 28 24 70 72 69 6E 74 65 72 2D 3E 7B 27 64 72 69 76 65 72 27 7D 20 7C 7C 20 22 4E 6F 20 44 65 66 61 75 6C 74 20 44 72 69 76 65 72 22 29 3B 0A 09 6D 79 20 24 64 6C 69 73 74 20 3D 20 22 22 3B 0A 09 6D 79 20 24 64 63 6F 75 6E 74 20 3D 20 30 3B 0A 09 69 66 28 20 24 70 72 69 6E 74 65 72 2D 3E 7B 27 64 72 69 76 65 72 73 27 7D 20 29 7B 0A 09 20 20 20 20 24 64 63 6F 75 6E 74 20 3D 20 40 7B 24 70 72 69 6E 74 65 72 2D 3E 7B 27 64 72 69 76 65 72 73 27 7D 7D 3B 0A 09 20 20 20 20 66 6F 72 20 6D 79 20 24 64 20 28 40 7B 24 70 72 69 6E 74 65 72 2D 3E 7B 27 64 72 69 76 65 72 73 27 7D 7D 29 20 7B 0A 09 09 24 64 6C 69 73 74 20 2E 3D 20 22 24 64 20 22 3B 0A 09 20 20 20 20 7D 0A 09 7D 0A 09 69 66 20 28 6E 6F 74 20 24 6D 61 74 63 68 20 6F 72 20 22 24 6E 61 6D 65 22 20 3D 7E 20 6D 7B 24 6D 61 74 63 68 7D 6F 29 20 7B 0A 09 20 20 20 20 70 72 69 6E 74 20 22 24 6E 61 6D 65 20 49 64 3D 27 24 70 72 69 6E 74 65 72 2D 3E 7B 27 69 64 27 7D 27 20 44 72 69 76 65 72 3D 27 24 64 72 69 76 65 72 27 22 3B 0A 09 20 20 20 20 69 66 20 28 24 64 63 6F 75 6E 74 20 3E 20 31 29 7B 0A 09 09 70 72 69 6E 74 20 22 20 43 6F 6D 70 61 74 69 62 6C 65 44 72 69 76 65 72 73 3D 27 24 64 6C 69 73 74 27 22 3B 0A 09 20 20 20 20 7D 0A 09 20 20 20 20 70 72 69 6E 74 20 22 5C 6E 22 3B 0A 09 7D 0A 20 20 20 20 7D 0A 7D 0A 0A 73 75 62 20 67 65 6E 65 72 61 74 65 70 70 64 20 7B 0A 0A 20 20 20 20 6D 79 20 28 24 70 70 64 75 72 69 2C 20 24 64 72 69 76 65 72 29 20 3D 20 40 5F 3B 0A 20 20 20 20 6D 79 20 24 70 6F 69 64 3B 0A 0A 20 20 20 20 6D 79 20 24 64 62 20 3D 20 46 6F 6F 6D 61 74 69 63 3A 3A 44 42 2D 3E 6E 65 77 28 29 3B 0A 20 20 20 20 24 64 62 2D 3E 67 65 74 5F 6F 76 65 72 76 69 65 77 28 29 3B 0A 20 20 20 20 6D 79 20 24 70 72 69 6E 74 65 72 3B 0A 20 20 20 20 6D 79 20 40 64 72 69 76 65 72 73 20 3D 20 24 64 62 2D 3E 67 65 74 5F 64 72 69 76 65 72 6C 69 73 74 28 29 3B 0A 0A 20 20 20 20 69 66 20 28 24 70 70 64 75 72 69 20 3D 7E 20 2F 5E 24 70 72 6F 67 6E 61 6D 65 3A 28 2E 2A 29 5C 2E 70 70 64 24 2F 29 20 7B 0A 09 23 20 63 75 70 73 2D 64 72 69 76 65 72 64 20 6F 70 65 72 61 74 69 6F 6E 0A 09 23 20 57 65 20 74 72 79 20 74 6F 20 73 70 6C 69 74 20 62 65 74 77 65 65 6E 20 70 72 69 6E 74 65 72 20 6E 61 6D 65 20 61 6E 64 20 64 72 69 76 65 72 20 6E 61 6D 65 20 61 74 20 61 6C 6C 0A 09 23 20 64 61 73 68 65 73 20 69 6E 20 74 68 65 20 50 50 44 20 66 69 6C 65 20 6E 61 6D 65 2C 20 61 73 20 73 6F 6D 65 20 64 72 69 76 65 72 73 20 28 65 78 2E 20 47 75 74 65 6E 70 72 69 6E 74 29 0A 09 23 20 68 61 76 65 20 64 61 73 68 65 73 20 69 6E 20 74 68 65 69 72 20 6E 61 6D 65 73 2E 0A 09 6D 79 20 24 70 70 64 6E 61 6D 65 20 3D 20 24 31 3B 0A 09 6D 79 20 40 70 6F 69 64 63 6F 6D 70 6F 6E 65 6E 74 73 20 3D 20 73 70 6C 69 74 28 2F 2D 2F 2C 20 24 70 70 64 6E 61 6D 65 29 3B 0A 09 6D 79 20 40 64 72 69 76 65 72 63 6F 6D 70 6F 6E 65 6E 74 73 20 3D 20 28 29 3B 0A 09 77 68 69 6C 65 20 28 24 23 70 6F 69 64 63 6F 6D 70 6F 6E 65 6E 74 73 20 3E 20 31 29 20 7B 0A 09 20 20 20 20 75 6E 73 68 69 66 74 28 40 64 72 69 76 65 72 63 6F 6D 70 6F 6E 65 6E 74 73 2C 20 70 6F 70 28 40 70 6F 69 64 63 6F 6D 70 6F 6E 65 6E 74 73 29 29 3B 0A 09 20 20 20 20 24 64 72 69 76 65 72 20 3D 20 6A 6F 69 6E 28 27 2D 27 2C 20 40 64 72 69 76 65 72 63 6F 6D 70 6F 6E 65 6E 74 73 29 3B 0A 09 20 20 20 20 6E 65 78 74 20 69 66 20 21 46 6F 6F 6D 61 74 69 63 3A 3A 44 42 3A 3A 6D 65 6D 62 65 72 28 24 64 72 69 76 65 72 2C 20 40 64 72 69 76 65 72 73 29 3B 0A 09 20 20 20 20 24 70 6F 69 64 20 3D 20 6A 6F 69 6E 28 27 2D 27 2C 20 40 70 6F 69 64 63 6F 6D 70 6F 6E 65 6E 74 73 29 3B 0A 09 20 20 20 20 6C 61 73 74 3B 0A 09 7D 0A 09 64 69 65 20 22 45 52 52 4F 52 3A 20 43 6F 75 6C 64 20 6E 6F 74 20 64 65 74 65 72 6D 69 6E 65 20 64 72 69 76 65 72 20 6E 61 6D 65 20 66 6F 72 20 24 70 70 64 6E 61 6D 65 2E 70 70 64 21 5C 6E 22 0A 09 20 20 20 20 69 66 28 20 21 24 70 6F 69 64 20 29 3B 0A 20 20 20 20 7D 20 65 6C 73 65 20 7B 0A 09 23 20 6D 61 6E 75 61 6C 20 6F 70 65 72 61 74 69 6F 6E 0A 09 24 70 6F 69 64 20 3D 20 24 70 70 64 75 72 69 3B 0A 20 20 20 20 7D 0A 0A 20 20 20 20 23 20 49 66 20 74 68 65 20 75 73 65 72 20 73 75 70 70 6C 69 65 73 20 61 6E 20 6F 6C 64 20 6E 75 6D 65 72 69 63 61 6C 20 70 72 69 6E 74 65 72 20 49 44 2C 20 74 72 61 6E 73 6C 61 74 65 20 69 74 20 74 6F 0A 20 20 20 20 23 20 61 20 6E 65 77 20 63 6C 65 61 72 2D 74 65 78 74 20 49 44 0A 20 20 20 20 24 70 6F 69 64 20 3D 20 46 6F 6F 6D 61 74 69 63 3A 3A 44 42 3A 3A 74 72 61 6E 73 6C 61 74 65 5F 70 72 69 6E 74 65 72 5F 69 64 28 24 70 6F 69 64 29 3B 0A 0A 20 20 20 20 6D 79 20 24 6C 63 6E 61 6D 65 20 3D 20 6C 63 28 20 24 70 6F 69 64 20 29 3B 0A 20 20 20 20 6D 79 20 24 70 65 6E 74 72 79 3B 0A 20 20 20 20 66 6F 72 20 24 70 72 69 6E 74 65 72 20 28 40 7B 24 64 62 2D 3E 7B 27 6F 76 65 72 76 69 65 77 27 7D 7D 29 20 7B 0A 09 6D 79 20 24 6E 61 6D 65 20 3D 20 6C 63 28 20 24 70 72 69 6E 74 65 72 2D 3E 7B 27 69 64 27 7D 20 29 3B 0A 09 70 72 69 6E 74 20 53 54 44 45 52 52 20 22 44 45 42 55 47 32 3A 20 24 70 72 6F 67 6E 61 6D 65 3A 20 63 6F 6D 70 61 72 65 20 27 24 6C 63 6E 61 6D 65 27 20 74 6F 20 27 24 6E 61 6D 65 27 5C 6E 22 20 69 66 20 24 64 65 62 75 67 3B 0A 09 69 66 28 20 24 6E 61 6D 65 20 65 71 20 24 6C 63 6E 61 6D 65 20 29 7B 0A 09 20 20 20 20 24 70 65 6E 74 72 79 20 3D 20 24 70 72 69 6E 74 65 72 3B 0A 09 20 20 20 20 6C 61 73 74 3B 0A 09 7D 0A 20 20 20 20 7D 0A 0A 20 20 20 20 64 69 65 20 22 45 52 52 4F 52 3A 20 50 72 69 6E 74 65 72 20 27 24 70 6F 69 64 27 20 6E 6F 74 20 66 6F 75 6E 64 21 5C 6E 22 20 69 66 28 20 6E 6F 74 20 64 65 66 69 6E 65 64 20 24 70 65 6E 74 72 79 20 29 3B 0A 20 20 20 20 70 72 69 6E 74 20 53 54 44 45 52 52 20 22 44 45 42 55 47 3A 20 24 70 72 6F 67 6E 61 6D 65 3A 20 46 6F 75 6E 64 20 24 70 65 6E 74 72 79 2D 3E 7B 69 64 7D 5C 6E 44 45 42 55 47 32 3A 20 24 70 72 6F 67 6E 61 6D 65 3A 20 22 20 2E 0A 09 6A 6F 69 6E 20 28 22 5C 6E 44 45 42 55 47 32 3A 20 24 70 72 6F 67 6E 61 6D 65 3A 20 22 2C 20 73 70 6C 69 74 28 2F 5C 6E 2F 2C 20 44 75 6D 70 65 72 28 24 70 65 6E 74 72 79 29 29 29 20 2E 0A 09 22 5C 6E 22 20 69 66 20 24 64 65 62 75 67 3B 0A 20 20 20 20 0A 20 20 20 20 69 66 20 28 21 24 64 72 69 76 65 72 20 7C 7C 20 28 24 64 72 69 76 65 72 20 3D 7E 20 2F 28 64 65 66 61 75 6C 74 7C 72 65 63 6F 6D 6D 65 6E 64 65 64 29 2F 69 29 29 20 7B 0A 09 24 64 72 69 76 65 72 20 3D 20 24 70 65 6E 74 72 79 2D 3E 7B 27 64 72 69 76 65 72 27 7D 3B 0A 09 69 66 28 20 6E 6F 74 20 64 65 66 69 6E 65 64 28 20 24 64 72 69 76 65 72 20 29 20 29 7B 0A 09 20 20 20 20 64 69 65 20 22 45 52 52 4F 52 3A 20 24 70 72 6F 67 6E 61 6D 65 3A 20 50 72 69 6E 74 65 72 20 27 24 70 6F 69 64 27 20 64 6F 65 73 20 6E 6F 74 20 68 61 76 65 20 64 65 66 61 75 6C 74 20 64 72 69 76 65 72 21 5C 6E 22 3B 0A 09 7D 0A 20 20 20 20 7D 0A 20 20 20 20 0A 20 20 20 20 6D 79 20 24 66 6F 75 6E 64 20 3D 20 30 3B 0A 20 20 20 20 66 6F 72 20 6D 79 20 24 64 20 28 40 7B 24 70 65 6E 74 72 79 2D 3E 7B 27 64 72 69 76 65 72 73 27 7D 7D 29 20 7B 0A 09 6C 61 73 74 20 69 66 20 28 24 66 6F 75 6E 64 20 3D 20 28 24 64 72 69 76 65 72 20 65 71 20 24 64 29 29 3B 0A 20 20 20 20 7D 0A 20 20 20 20 69 66 20 28 20 6E 6F 74 20 24 66 6F 75 6E 64 20 29 20 7B 0A 09 77 61 72 6E 20 22 45 52 52 4F 52 3A 20 24 70 72 6F 67 6E 61 6D 65 3A 20 50 72 69 6E 74 65 72 20 27 24 70 6F 69 64 27 20 61 6E 64 20 64 72 69 76 65 72 20 27 24 64 72 69 76 65 72 27 20 61 72 65 20 6E 6F 74 20 63 6F 6D 70 61 74 69 62 6C 65 5C 6E 22 3B 0A 20 20 20 20 7D 0A 20 20 20 20 24 66 6F 75 6E 64 20 3D 20 30 3B 0A 20 20 20 20 66 6F 72 20 6D 79 20 24 64 20 28 40 64 72 69 76 65 72 73 29 20 7B 0A 09 6C 61 73 74 20 69 66 20 28 24 66 6F 75 6E 64 20 3D 20 28 24 64 72 69 76 65 72 20 65 71 20 24 64 29 29 3B 0A 20 20 20 20 7D 0A 20 20 20 20 69 66 20 28 20 6E 6F 74 20 24 66 6F 75 6E 64 20 29 20 7B 0A 09 64 69 65 20 22 45 52 52 4F 52 3A 20 24 70 72 6F 67 6E 61 6D 65 3A 20 44 72 69 76 65 72 20 27 24 64 72 69 76 65 72 27 20 6E 6F 74 20 69 6E 20 64 61 74 61 62 61 73 65 21 5C 6E 22 3B 0A 20 20 20 20 7D 0A 0A 20 20 20 20 23 20 47 65 74 20 61 6C 6C 20 74 68 65 20 64 61 74 61 20 61 62 6F 75 74 20 74 68 69 73 20 64 72 69 76 65 72 2F 70 72 69 6E 74 65 72 20 70 61 69 72 0A 20 20 20 20 6D 79 20 24 70 6F 73 73 69 62 6C 65 20 3D 20 24 64 62 2D 3E 67 65 74 64 61 74 28 24 64 72 69 76 65 72 2C 20 24 70 6F 69 64 29 3B 0A 20 20 20 20 23 20 53 74 6F 70 20 69 66 20 74 68 65 20 70 72 69 6E 74 65 72 20 69 73 20 6E 6F 74 20 73 75 70 70 6F 72 74 65 64 20 62 79 20 74 68 65 20 67 69 76 65 6E 20 64 72 69 76 65 72 0A 20 20 20 20 64 69 65 20 22 45 52 52 4F 52 3A 20 24 70 72 6F 67 6E 61 6D 65 3A 20 54 68 61 74 20 70 72 69 6E 74 65 72 20 61 6E 64 20 64 72 69 76 65 72 20 63 6F 6D 62 69 6E 61 74 69 6F 6E 20 69 73 20 6E 6F 74 20 70 6F 73 73 69 62 6C 65 2E 5C 6E 22 0A 09 69 66 20 28 21 24 70 6F 73 73 69 62 6C 65 29 3B 0A 20 20 20 20 23 20 53 74 6F 70 20 69 66 20 74 68 65 20 64 72 69 76 65 72 20 65 6E 74 72 79 20 68 61 73 20 61 6E 20 65 6D 70 74 79 20 63 6F 6D 6D 61 6E 64 20 6C 69 6E 65 20 70 72 6F 74 6F 74 79 70 65 20 6F 72 20 69 66 20 74 68 65 72 65 20 0A 20 20 20 20 23 20 69 73 20 6E 6F 20 63 75 73 74 6F 6D 20 50 50 44 20 66 69 6C 65 0A 20 20 20 20 64 69 65 20 22 45 52 52 4F 52 3A 20 24 70 72 6F 67 6E 61 6D 65 3A 20 54 68 65 72 65 20 69 73 20 6E 65 69 74 68 65 72 20 61 20 63 75 73 74 6F 6D 20 50 50 44 20 66 69 6C 65 20 6E 6F 72 20 74 68 65 20 64 72 69 76 65 72 20 64 61 74 61 62 61 73 65 20 65 6E 74 72 79 20 63 6F 6E 74 61 69 6E 73 20 73 75 66 66 69 63 69 65 6E 74 20 64 61 74 61 20 74 6F 20 62 75 69 6C 64 20 61 20 50 50 44 20 66 69 6C 65 2E 5C 6E 22 0A 09 69 66 20 28 21 24 64 62 2D 3E 7B 27 64 61 74 27 7D 7B 27 63 6D 64 27 7D 29 20 26 26 20 28 21 24 64 62 2D 3E 7B 27 64 61 74 27 7D 7B 27 70 70 64 66 69 6C 65 27 7D 29 3B 0A 20 20 20 20 0A 20 20 20 20 6D 79 20 40 64 61 74 61 3B 0A 0A 20 20 20 20 40 64 61 74 61 20 3D 20 24 64 62 2D 3E 67 65 74 70 70 64 28 24 6F 70 74 5F 77 29 3B 0A 20 20 20 20 64 69 65 20 22 45 52 52 4F 52 3A 20 24 70 72 6F 67 6E 61 6D 65 3A 20 4E 6F 20 50 50 44 20 66 69 6C 65 20 66 6F 72 20 70 72 69 6E 74 65 72 20 27 24 70 6F 69 64 27 20 61 6E 64 20 64 72 69 76 65 72 20 27 24 64 72 69 76 65 72 27 21 5C 6E 22 0A 09 69 66 20 6E 6F 74 20 40 64 61 74 61 3B 0A 0A 20 20 20 20 70 72 69 6E 74 20 40 64 61 74 61 3B 0A 0A 7D 0A 0A 73 75 62 20 68 65 6C 70 20 7B 0A 20 20 20 20 70 72 69 6E 74 20 3C 3C 48 45 4C 50 3B 0A 0A 24 70 72 6F 67 6E 61 6D 65 20 2D 41 0A 24 70 72 6F 67 6E 61 6D 65 20 2D 50 20 3C 72 65 67 65 78 70 72 3E 0A 24 70 72 6F 67 6E 61 6D 65 20 2D 70 20 3C 70 72 69 6E 74 65 72 69 64 3E 20 5B 2D 64 20 3C 64 72 69 76 65 72 3E 5D 20 5B 2D 77 5D 0A 24 70 72 6F 67 6E 61 6D 65 20 6C 69 73 74 0A 24 70 72 6F 67 6E 61 6D 65 20 63 61 74 20 3C 43 55 50 53 20 50 50 44 20 55 52 49 3E 20 5B 2D 77 5D 0A 24 70 72 6F 67 6E 61 6D 65 20 2D 68 0A 0A 20 2D 41 20 20 20 20 20 20 20 20 20 20 20 20 20 3A 20 73 68 6F 77 20 61 6C 6C 20 50 72 69 6E 74 65 72 20 49 44 27 73 20 61 6E 64 20 63 6F 6D 70 61 74 69 62 6C 65 20 64 72 69 76 65 72 73 0A 20 2D 50 20 3C 72 65 67 65 78 70 72 3E 20 20 20 3A 20 73 68 6F 77 20 61 6C 6C 20 50 72 69 6E 74 65 72 20 49 44 27 73 20 77 68 6F 73 65 20 6E 61 6D 65 73 20 61 6E 64 20 6D 6F 64 65 6C 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6D 61 74 63 68 65 64 20 62 79 20 74 68 65 20 52 45 2E 20 20 46 6F 72 20 65 78 61 6D 70 6C 65 3A 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2D 50 20 48 50 20 77 69 6C 6C 20 6D 61 74 63 68 20 61 6C 6C 20 6E 61 6D 65 73 20 77 69 74 68 20 48 50 20 69 6E 20 74 68 65 6D 0A 20 2D 70 20 3C 70 72 69 6E 74 65 72 69 64 3E 20 3A 20 50 72 69 6E 74 65 72 20 49 44 0A 20 2D 64 20 3C 64 72 69 76 65 72 3E 20 20 20 20 3A 20 44 72 69 76 65 72 20 6E 61 6D 65 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 66 20 74 68 65 20 64 72 69 76 65 72 20 69 73 20 6E 6F 74 20 73 70 65 63 69 66 69 65 64 20 74 68 65 6E 20 74 68 65 20 64 65 66 61 75 6C 74 20 64 72 69 76 65 72 20 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6F 72 20 74 68 65 20 3C 70 72 69 6E 74 65 72 69 64 3E 20 69 73 20 75 73 65 64 2E 0A 20 6C 69 73 74 20 20 20 20 20 20 20 20 20 20 20 3A 20 4C 69 73 74 20 61 6C 6C 20 70 6F 73 73 69 62 6C 65 20 50 50 44 73 20 69 6E 20 74 68 65 20 66 6F 72 6D 61 74 20 6E 65 65 64 65 64 20 62 79 20 74 68 65 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 75 70 73 2D 64 72 69 76 65 72 64 0A 20 63 61 74 20 3C 43 55 50 53 20 50 50 44 20 55 52 49 3E 20 3A 20 47 65 6E 65 72 61 74 65 20 50 50 44 20 66 69 6C 65 20 61 70 70 72 6F 70 72 69 61 74 65 20 74 6F 20 74 68 65 20 3C 43 55 50 53 20 50 50 44 20 55 52 49 3E 2E 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 76 61 69 6C 61 62 6C 65 20 43 55 50 53 20 50 50 44 20 55 52 49 73 20 61 72 65 20 6C 69 73 74 65 64 20 62 79 20 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 24 70 72 6F 67 6E 61 6D 65 20 6C 69 73 74 22 2E 0A 20 2D 77 20 20 20 20 20 20 20 20 20 20 20 20 20 3A 20 47 65 6E 65 72 61 74 65 20 50 50 44 20 77 68 69 63 68 20 69 73 20 63 6F 6D 70 61 74 69 62 6C 65 20 77 69 74 68 20 74 68 65 20 43 55 50 53 20 50 6F 73 74 53 63 72 69 70 74 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 72 69 76 65 72 20 66 6F 72 20 57 69 6E 64 6F 77 73 20 28 47 55 49 20 73 74 72 69 6E 67 73 20 61 72 65 20 6C 69 6D 69 74 65 64 20 74 6F 20 33 39 20 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 68 61 72 61 63 74 65 72 73 29 2E 0A 20 2D 68 20 20 20 20 20 20 20 20 20 20 20 20 20 3A 20 73 68 6F 77 20 68 65 6C 70 20 69 6E 66 6F 72 6D 61 74 69 6F 6E 0A 0A 0A 48 45 4C 50 0A 09 65 78 69 74 20 31 3B 0A 0A 7D 0A | #!/usr/bin/perl # -*- pe rl -*- # Foomatic PPD f ile generator for manual PPD generation (via "-p ", # "-d", "-A", and "-P " command line options) or for automatic # on-th e-fly PPD generation by CUPS 1.2 or newer (via " cat" and "list" # comman d line options). use Fo omatic::Defaults; use Fo omatic::DB; use Getopt:: Std; use Data::Dumper; # use strict; my $debug = 0; # Use program name as the first part of the PPD URI for CUPS (shoul d be # "foomatic"). $0 =~ m!/([^/]+)\s*$!; my $ progname = ($1 || $0); # Default settings for l isting PPDs by cups-driv erd # List only the PPD file with the reconmmen ded driver for each prin ter # and do not show "( recommended)" in the CUP S web interface. This mo de # makes CUPS setup wi th the web interface ver y easy for beginners. # This can be set by "Only Recommended Yes" or "Onl yRecommended No" in # /e tc/cups/foomatic.conf my $onlyrecommended = 0; # The Foomatic database d oes not only generate PP D files from Foomatic # XML data but also of rea dy-made PPDs mainly from printer manufacturers # for their PostScript pr inters. As these PPDs ar e often also linked to # the directories in whic h CUPS links directly to PPD files, duplicate # listing of these PPDs by CUPS would result. Ther efore we suppress # list ing the ready-made PPDs. This behaviour can be c hanged by using # "ListR eadyMadePPDs Yes" or "Li stReadyMadePPDs No" in # /etc/cups/foomatic.conf my $listreadymadeppds = 0; help() if !@ARGV; #m y ($opt_h, $opt_d, $opt_ p, $opt_A, $opt_P, $opt_ w); getopts("AP:d:p:hwt: "); help() if $opt_h; my $drv = $opt_d; my $poid = $opt_p; my $showall = $opt_A; my $showmat ch = $opt_P; help() if ($#ARGV > 1) && !($poid ); if ($ARGV[0] =~ /^li st$/i) { # List all available PPD files (for mat for cups-driverd) cupslistppds(); } elsi f ($ARGV[0] =~ /^cat$/i) { # Generate and re turn the selected PPD fi le (cups-driverd command line) generateppd($ ARGV[1]); } elsif ($show all or $showmatch) { # List all PPD files or files matching regexp ( manual operation) fo omaticlistppds($showmatc h); } elsif ($poid) { # Generate and return the selected PPD file (m anual operation) gen erateppd($poid, $drv); } else { help(); } e xit(0); sub cupslistppd s { # Read configur ation in /etc/cups/fooma tic.conf my $conffil ename; if (my $cupss erverroot = $ENV{CUPS_SE RVERROOT}) { $co nffilename = "$cupsserve rroot/foomatic.conf"; } else { $conf filename = "/etc/cups/fo omatic.conf"; } if (-r $conffilename and open CONF, "< $conffil ename") { while (my $li ne = <CONF>) { chom p $line; if ($line =~ /^\s*OnlyRecommende d\s+(Yes|On|True|1)\s*$/ i) { $onlyrecommended = 1; } elsif ($line =~ /^\s*OnlyReco mmended\s+(No|Off|False| 0)\s*$/i) { $onlyrecom mended = 0; } if ($line =~ /^\s*List ReadyMadePPDs\s+(Yes|On| True|1)\s*$/i) { $list readymadeppds = 1; } elsif ($line =~ /^\s*ListReadyMadePPDs\ s+(No|Off|False|0)\s*$/i ) { $listreadymadeppds = 0; } } close C ONF; } my $db = Foomatic::DB->new(); $db->get_overview(1, 1 + listreadymadeppds); for my $printer (@{$ db->{'overview'}}) { my $poid = $printer->{'id' }; my $make = $printer- >{'make'}; my $model = $printer->{'model'}; my $recdriver = $printer-> {'driver'}; my @drivers = @{$printer->{'drivers '}}; my $id = $printer- >{'ieee'}; # No driver s => No PPDs next if $# drivers < 0; # Put the reconmmended driver to the beginning of list, a s CUPS # probably will take the first PPD which matches the printer mod el my @sorteddrivers; if (Foomatic::DB::member ($recdriver, @drivers)) { # Valid entry for the recommended driver push(@sorteddrivers , $recdriver); if ( !$onlyrecommended) { f oreach my $driver (@driv ers) { push(@sorte ddrivers, $driver) if $d river ne $recdriver; } } } else { # Invalid entry for the r ecommended driver n ext if $onlyrecommended; undef $recdriver; @sorteddrivers = @d rivers; } # Go throug h all the drivers and li st the PPD entries fore ach my $driver (@sortedd rivers) { # Get PPD header data from the PP D file generator my ($ieee1284,$pnpmake,$pn pmodel,$filename,$longna me, $drivername,$nickn ame,$modelname) = Foomatic::DB::getppdhead erdata($printer, $driver , ($onlyrecomm ended ? '' : $ printer->{'driver'})); print "\"$progname:$ longname\" en \"$make\" \"$nickname\" \"$ieee128 4\"\n"; } } } sub foomaticlistppds { my ($match) = @_; m y $db = Foomatic::DB->ne w(); $db->get_overvi ew(); my @drivers = $db->get_driverlist(); for my $printer (@{$ db->{'overview'}}) { my $pr = $printer->{'make' }; my $model = $printer ->{'model'}; my $name = "$pr $model"; my $driv er = ($printer->{'driver '} || "No Default Driver "); my $dlist = ""; my $dcount = 0; if( $prin ter->{'drivers'} ){ $dcount = @{$printer->{ 'drivers'}}; for my $d (@{$printer->{'drive rs'}}) { $dlist .= "$d "; } } if (not $ match or "$name" =~ m{$m atch}o) { print "$n ame Id='$printer->{'id'} ' Driver='$driver'"; if ($dcount > 1){ pr int " CompatibleDrivers= '$dlist'"; } p rint "\n"; } } } s ub generateppd { my ($ppduri, $driver) = @_ ; my $poid; my $db = Foomatic::DB->new( ); $db->get_overview (); my $printer; my @drivers = $db->get_ driverlist(); if ($ ppduri =~ /^$progname:(. *)\.ppd$/) { # cups-dri verd operation # We try to split between printe r name and driver name a t all # dashes in the P PD file name, as some dr ivers (ex. Gutenprint) # have dashes in their n ames. my $ppdname = $1; my @poidcomponents = s plit(/-/, $ppdname); my @drivercomponents = (); while ($#poidcomponent s > 1) { unshift(@d rivercomponents, pop(@po idcomponents)); $dr iver = join('-', @driver components); next i f !Foomatic::DB::member( $driver, @drivers); $poid = join('-', @poid components); last; } die "ERROR: Could no t determine driver name for $ppdname.ppd!\n" if( !$poid ); } el se { # manual operation $poid = $ppduri; } # If the user supp lies an old numerical pr inter ID, translate it t o # a new clear-text ID $poid = Foomatic ::DB::translate_printer_ id($poid); my $lcna me = lc( $poid ); my $pentry; for $print er (@{$db->{'overview'}} ) { my $name = lc( $pri nter->{'id'} ); print S TDERR "DEBUG2: $progname : compare '$lcname' to ' $name'\n" if $debug; if ( $name eq $lcname ){ $pentry = $printer; last; } } die "ERROR: Printer '$po id' not found!\n" if( no t defined $pentry ); print STDERR "DEBUG: $p rogname: Found $pentry-> {id}\nDEBUG2: $progname: " . join ("\nDEBUG2: $ progname: ", split(/\n/, Dumper($pentry))) . "\ n" if $debug; i f (!$driver || ($driver =~ /(default|recommended )/i)) { $driver = $pent ry->{'driver'}; if( not defined( $driver ) ){ die "ERROR: $prognam e: Printer '$poid' does not have default driver! \n"; } } m y $found = 0; for my $d (@{$pentry->{'driver s'}}) { last if ($found = ($driver eq $d)); } if ( not $found ) { warn "ERROR: $progna me: Printer '$poid' and driver '$driver' are not compatible\n"; } $found = 0; for my $d (@drivers) { last i f ($found = ($driver eq $d)); } if ( not $found ) { die "ERROR: $progname: Driver '$dri ver' not in database!\n" ; } # Get all t he data about this drive r/printer pair my $p ossible = $db->getdat($d river, $poid); # Sto p if the printer is not supported by the given d river die "ERROR: $p rogname: That printer an d driver combination is not possible.\n" if (!$ possible); # Stop if the driver entry has an empty command line prot otype or if there # is no custom PPD file die "ERROR: $progname : There is neither a cus tom PPD file nor the dri ver database entry conta ins sufficient data to b uild a PPD file.\n" if (!$db->{'dat'}{'cmd'}) & & (!$db->{'dat'}{'ppdfil e'}); my @data; @data = $db->getpp d($opt_w); die "ERRO R: $progname: No PPD fil e for printer '$poid' an d driver '$driver'!\n" if not @data; print @data; } sub help { print <<HELP; $progn ame -A $progname -P <reg expr> $progname -p <prin terid> [-d <driver>] [-w ] $progname list $progna me cat <CUPS PPD URI> [- w] $progname -h -A : show all Prin ter ID's and compatible drivers -P <regexpr> : show all Printer ID's whose names and model matched by the RE. For example: -P H P will match all names w ith HP in them -p <prin terid> : Printer ID -d <driver> : Driver nam e If t he driver is not specifi ed then the default driv er fo r the <printerid> is use d. list : Lis t all possible PPDs in t he format needed by the cups-d riverd cat <CUPS PPD UR I> : Generate PPD file a ppropriate to the <CUPS PPD URI>. Available CUPS PPD U RIs are listed by "$progname list". -w : Generate PPD which is c ompatible with the CUPS PostScript driver for Windows (GUI strings are limited to 39 characters). -h : show help infor mation HELP exit 1; } |