خطای کدگذاری encoding/encerr

واردسازی کدگذاری.خطای کدگذاری
واردسازی کدگذاری.جیسون
واردسازی رشته

تابع جایگاه(متن: رشته، بایت: صحیح): رشته:
    ناپایا سطر := ۱
    ناپایا ستون := ۱
    تکرار بایت در ای:
        اگر متن.زیررشته(ای، ۱) == "\n":
            سطر += ۱
            ستون = ۱
        وگرنه:
            ستون += ۱
        پایان
    پایان
    برگشت "سطر " + رشته.از عدد(سطر) + "، ستون " + رشته.از عدد(ستون)
پایان

تابع ریشه:
    متن := `{
  "name": "shop",
  "port": 8080
  "debug": true
}`
    ناپایا خطا := خطای کدگذاری.بدون خطا()
    _ := جیسون.کدگشایی(متن، خطا)
    اگر خطای کدگذاری.خطا است(خطا):
        سرچاپ "settings.json:"، جایگاه(متن، خطا.موقعیت) + ":"، خطا.پیام
    پایان
پایان

واردسازی کدگذاری.خطای کدگذاری
واردسازی کدگذاری.جیسون
واردسازی کدگذاری.پرونده محیط
واردسازی کدگذاری.مسج‌پک
واردسازی کدگذاری.مقدار
واردسازی فشرده سازی

ساختار سقف‌ها:
    @جیسون "max_users"
    همگانی بیشینه کاربر: صحیح = ۰
    @جیسون "max_storage_gb"
    همگانی بیشینه فضا: صحیح = ۰
پایان

تابع گزارش(منبع: رشته، خطا: خطای کدگذاری.خطای کدگذاری):
    اگر وارونه خطای کدگذاری.خطا است(خطا):
        سرچاپ منبع، "درست"
        برگشت
    پایان
    ناپایا چه شد := "ورودی خراب"
    اگر خطا.نوع == خطای کدگذاری.نوع اتمام ناگهانی:
        چه شد = "بریده شده"
    وگرنه خطا.نوع == خطای کدگذاری.نوع داده اضافی:
        چه شد = "داده‌ی اضافی پس از پایان"
    وگرنه خطا.نوع == خطای کدگذاری.نوع سفارشی:
        چه شد = "پشتیبانی نمی‌شود"
    پایان
    سرچاپ منبع، چه شد، "در بایت"، خطا.موقعیت، "(" + خطا.پیام + ")"
پایان

تابع ریشه:
    ناپایا خطا := خطای کدگذاری.بدون خطا()
    ناپایا سقف := سقف‌ها {}
    _ := جیسون.واسریال سازی(`{"max_users": "fifty", "max_storage_gb": 20}`، سقف، خطا)
    گزارش("limits.json:"، خطا)

    خطا = خطای کدگذاری.بدون خطا()
    _ := جیسون.کدگشایی(`{"plan": "team"} {"plan": "pro"}`، خطا)
    گزارش("plan.json:  "، خطا)

    خطا = خطای کدگذاری.بدون خطا()
    ناپایا محیط := پرونده محیط.تجزیه سخت گیرانه("PLAN=team\nSEATS=\"12\n"، خطا)
    گزارش(".env:       "، خطا)
    پرونده محیط.آزادسازی(محیط)

    ناپایا شیء := مقدار.شیء جدید()
    مقدار.تنظیم کلید(شیء، "seats"، مقدار.مقدار صحیح(۱۲))
    بایت‌ها := مسج‌پک.سریال سازی(شیء)
    خطا = خطای کدگذاری.بدون خطا()
    _ := مسج‌پک.واسریال سازی بایت‌ها(بایت‌ها.داده، فشرده سازی.طول بافر(بایت‌ها) - ۱، خطا)
    گزارش("cache.bin:  "، خطا)

    _ := مسج‌پک.واسریال سازی(بایت‌ها، خطا)
    گزارش("خطای مانده:"، خطا)
    خطا = خطای کدگذاری.بدون خطا()
    برگشتی := مسج‌پک.واسریال سازی(بایت‌ها، خطا)
    گزارش("پس از پاک کردن:"، خطا)
    سرچاپ "seats:"، مقدار.به صحیح(مقدار.مقدار کلید(برگشتی، "seats"))
پایان

واردسازی کدگذاری.خطای کدگذاری

ساختار ابعاد:
    همگانی پهنا: صحیح = ۰
    همگانی بلندی: صحیح = ۰
پایان

تابع تجزیه اندازه(متن: رشته، خروجی &: ابعاد، خطا &: خطای کدگذاری.خطای کدگذاری): منطقی:
    ضرب := متن.بیاب("x")
    اگر ضرب < ۰:
        خطا = خطای کدگذاری.خطای اتمام ناگهانی(متن.طول())
        برگشت نادرست
    پایان
    پ := متن.زیررشته(۰، ضرب)
    ب := متن.زیررشته(ضرب + ۱، متن.طول() - ضرب - ۱)
    اگر پ == "" یا ب == "":
        خطا = خطای کدگذاری.خطای نشانه نابجا("expected a number on both sides of 'x'"، ضرب)
        برگشت نادرست
    پایان
    خروجی.پهنا = پ.به صحیح()
    خروجی.بلندی = ب.به صحیح()
    اگر خروجی.پهنا <= ۰ یا خروجی.بلندی <= ۰:
        خطا = خطای کدگذاری.خطای جدید(خطای کدگذاری.نوع سفارشی، "اندازه‌ها باید مثبت باشند"، ۰)
        برگشت نادرست
    پایان
    برگشت درست
پایان

تابع ریشه:
    ورودی‌ها := ["1920x1080"، "800"، "x600"، "0x10"]
    هر م در ورودی‌ها:
        ناپایا ا := ابعاد {}
        ناپایا خطا := خطای کدگذاری.بدون خطا()
        اگر تجزیه اندازه(م، ا، خطا):
            سرچاپ م، "->"، ا.پهنا، "در"، ا.بلندی
        وگرنه خطا.نوع == خطای کدگذاری.نوع اتمام ناگهانی:
            سرچاپ م، "-> ناقص:"، خطا.پیام
        وگرنه:
            سرچاپ م، "-> نوع"، خطا.نوع، "در بایت"، خطا.موقعیت
            سرچاپ "   "، خطا.پیام
        پایان
    پایان
پایان