#!/usr/bin/awk -f

BEGIN {
    adobe["afii10036"] = 210;
    adobe["afii10022"] = 197;
    adobe["afii10057"] = 163;
    adobe["endash"] = 150;
    adobe["Euro"] = 136;
    adobe["dagger"] = 134;
    adobe["k"] = 107;
    adobe["asciicircum"] = 94;
    adobe["afii10065"] = 224;
    adobe["afii10037"] = 211;
    adobe["afii10024"] = 198;
    adobe["emdash"] = 151;
    adobe["afii10058"] = 138;
    adobe["daggerdbl"] = 135;
    adobe["l"] = 108;
    adobe["underscore"] = 95;
    adobe["afii10066"] = 225;
    adobe["afii10038"] = 212;
    adobe["afii10025"] = 199;
    adobe["bullet"] = 149;
    adobe["z"] = 122;
    adobe["m"] = 109;
    adobe["afii10067"] = 226;
    adobe["afii10039"] = 213;
    adobe["afii10026"] = 200;
    adobe["perthousand"] = 137;
    adobe["braceleft"] = 123;
    adobe["n"] = 110;
    adobe["afii10082"] = 240;
    adobe["afii10068"] = 227;
    adobe["afii10040"] = 214;
    adobe["afii10027"] = 201;
    adobe["bar"] = 124;
    adobe["o"] = 111;
    adobe["afii10083"] = 241;
    adobe["afii10069"] = 228;
    adobe["afii10041"] = 215;
    adobe["quoteleft"] = 145;
    adobe["braceright"] = 125;
    adobe["afii10084"] = 242;
    adobe["afii10070"] = 229;
    adobe["afii10042"] = 216;
    adobe["quoteright"] = 146;
    adobe["ellipsis"] = 133;
    adobe["asciitilde"] = 126;
    adobe["afii10085"] = 243;
    adobe["afii10072"] = 230;
    adobe["afii10043"] = 217;
    adobe["afii10086"] = 244;
    adobe["afii10073"] = 231;
    adobe["afii10071"] = 184;
    adobe["afii10087"] = 245;
    adobe["afii10074"] = 232;
    adobe["trademark"] = 153;
    adobe["afii10099"] = 144;
    adobe["afii10059"] = 140;
    adobe["afii10088"] = 246;
    adobe["afii10075"] = 233;
    adobe["afii61352"] = 185;
    adobe["afii10060"] = 142;
    adobe["afii10100"] = 131;
    adobe["afii10089"] = 247;
    adobe["afii10101"] = 186;
    adobe["afii10061"] = 141;
    adobe["afii10090"] = 248;
    adobe["afii10028"] = 202;
    adobe["afii10102"] = 190;
    adobe["guilsinglleft"] = 139;
    adobe["afii10091"] = 249;
    adobe["afii10029"] = 203;
    adobe["afii10103"] = 179;
    adobe["afii10062"] = 161;
    adobe["afii10030"] = 204;
    adobe["afii10104"] = 191;
    adobe["afii10145"] = 143;
    adobe["quotesinglbase"] = 130;
    adobe["afii10044"] = 218;
    adobe["afii10031"] = 205;
    adobe["afii10105"] = 188;
    adobe["space"] = 160;
    adobe["afii10045"] = 219;
    adobe["afii10032"] = 206;
    adobe["afii10106"] = 154;
    adobe["quotedblleft"] = 147;
    adobe["afii10046"] = 220;
    adobe["afii10033"] = 207;
    adobe["quotedblright"] = 148;
    adobe["afii10076"] = 234;
    adobe["afii10047"] = 221;
    adobe["degree"] = 176;
    adobe["quotedblbase"] = 132;
    adobe["afii10077"] = 235;
    adobe["afii10048"] = 222;
    adobe["plusminus"] = 177;
    adobe["afii10050"] = 165;
    adobe["currency"] = 164;
    adobe["afii10078"] = 236;
    adobe["afii10049"] = 223;
    adobe["afii10098"] = 180;
    adobe["guilsinglright"] = 155;
    adobe["afii10092"] = 250;
    adobe["afii10079"] = 237;
    adobe["brokenbar"] = 166;
    adobe["afii10093"] = 251;
    adobe["afii10080"] = 238;
    adobe["section"] = 167;
    adobe["afii10094"] = 252;
    adobe["afii10081"] = 239;
    adobe["mu"] = 181;
    adobe["afii10095"] = 253;
    adobe["paragraph"] = 182;
    adobe["copyright"] = 169;
    adobe["afii10107"] = 156;
    adobe["afii10096"] = 254;
    adobe["periodcentered"] = 183;
    adobe["afii10108"] = 158;
    adobe["afii10097"] = 255;
    adobe["afii10109"] = 157;
    adobe["afii10110"] = 162;
    adobe["afii10193"] = 159;
    adobe["guillemotleft"] = 171;
    adobe["logicalnot"] = 172;
    adobe["space"] = 32;
    adobe["hyphen"] = 173;
    adobe["exclam"] = 33;
    adobe["guillemotright"] = 187;
    adobe["registered"] = 174;
    adobe["quotedbl"] = 34;
    adobe["zero"] = 48;
    adobe["numbersign"] = 35;
    adobe["one"] = 49;
    adobe["dollar"] = 36;
    adobe["two"] = 50;
    adobe["percent"] = 37;
    adobe["at"] = 64;
    adobe["three"] = 51;
    adobe["ampersand"] = 38;
    adobe["A"] = 65;
    adobe["four"] = 52;
    adobe["quotesingle"] = 39;
    adobe["B"] = 66;
    adobe["five"] = 53;
    adobe["parenleft"] = 40;
    adobe["P"] = 80;
    adobe["C"] = 67;
    adobe["six"] = 54;
    adobe["parenright"] = 41;
    adobe["Q"] = 81;
    adobe["D"] = 68;
    adobe["seven"] = 55;
    adobe["R"] = 82;
    adobe["E"] = 69;
    adobe["eight"] = 56;
    adobe["grave"] = 96;
    adobe["S"] = 83;
    adobe["F"] = 70;
    adobe["nine"] = 57;
    adobe["a"] = 97;
    adobe["T"] = 84;
    adobe["G"] = 71;
    adobe["b"] = 98;
    adobe["U"] = 85;
    adobe["H"] = 72;
    adobe["p"] = 112;
    adobe["c"] = 99;
    adobe["V"] = 86;
    adobe["I"] = 73;
    adobe["q"] = 113;
    adobe["d"] = 100;
    adobe["W"] = 87;
    adobe["r"] = 114;
    adobe["e"] = 101;
    adobe["X"] = 88;
    adobe["asterisk"] = 42;
    adobe["s"] = 115;
    adobe["f"] = 102;
    adobe["Y"] = 89;
    adobe["plus"] = 43;
    adobe["t"] = 116;
    adobe["g"] = 103;
    adobe["comma"] = 44;
    adobe["u"] = 117;
    adobe["h"] = 104;
    adobe["colon"] = 58;
    adobe["hyphen"] = 45;
    adobe["v"] = 118;
    adobe["i"] = 105;
    adobe["semicolon"] = 59;
    adobe["period"] = 46;
    adobe["w"] = 119;
    adobe["less"] = 60;
    adobe["slash"] = 47;
    adobe["afii10023"] = 168;
    adobe["x"] = 120;
    adobe["J"] = 74;
    adobe["equal"] = 61;
    adobe["afii10051"] = 128;
    adobe["y"] = 121;
    adobe["K"] = 75;
    adobe["greater"] = 62;
    adobe["afii10017"] = 192;
    adobe["afii10052"] = 129;
    adobe["L"] = 76;
    adobe["question"] = 63;
    adobe["afii10018"] = 193;
    adobe["afii10053"] = 170;
    adobe["Z"] = 90;
    adobe["M"] = 77;
    adobe["afii10019"] = 194;
    adobe["afii10054"] = 189;
    adobe["bracketleft"] = 91;
    adobe["N"] = 78;
    adobe["afii10034"] = 208;
    adobe["afii10020"] = 195;
    adobe["afii10055"] = 178;
    adobe["backslash"] = 92;
    adobe["O"] = 79;
    adobe["afii10035"] = 209;
    adobe["afii10021"] = 196;
    adobe["afii10056"] = 175;
    adobe["j"] = 106;
    adobe["bracketright"] = 93;
}

/EncodingScheme/ {
    print "EncodingScheme FontSpecific";
    next;
}

/StartCharMetrics/, /EndCharMetrics/ {
    if ($0 ~ /StartCharMetrics/)
	{
	    print;
	    next;
	}
    if ($0 ~ /EndCharMetrics/)
	{
	    for (i=0; i<=255; i++)
		{
		    if (metpos [i] != "")
			{
			    print metpos [i];
			}
		}
	    for (i in metneg)
		{
		    print metneg [i];
		}
	    print;
	    next;
	}
    nw = split ($0, word);
    cur = 1;
    adobename = "";
    line = "";
    while (word [cur] != "")
	{
	    if (word [cur] == "C")
		{
		    cur = cur + 3;
		}
	    else 
		{
		    if (word [cur] == "N")
			{
			    adobename = word [cur + 1];
			}
		    line = line " " word [cur];
		    while (cur != nw && word [cur] != ";")
			{
			    cur = cur + 1;
			    line = line " " word [cur];
			}
		    cur = cur + 1;
		}
	}
    if (adobe [adobename] != "")
	{
	    line = "C " adobe [adobename] " ; " line;
	    metpos [adobe [adobename]] = line;
	}
    else
	{
	    line = "C -1 ; " line;
	    metneg [adobename] = line;
	}
    next;
}

{
    print;
}

