#include <sourcemod>

#pragma semicolon 1
#pragma newdecls required

public Plugin myinfo = {
    name        = "",
    author      = "",
    description = "",
    version     = "0.0.0",
    url         = ""
};

enum struct SomeStruct
{
    int a;
    char textLong[16];
    int b;
    char textShort[4];
    int c;
}

void PrintList(const char[] msg, ArrayList list)
{
    PrintToServer("------%s------", msg);
    PrintToServer("\xB3%-6s\xB3%-11s\xB3%-24s\xB3%-11s\xB3%-24s\xB3%-11s", "Index", "a", "textLong[16]", "b", "textShort[4]", "c");

    char longBuff[64];
    char shortBuff[64];
    for (int i = 0; i < list.Length; ++i)
    {
        SomeStruct s;
        list.GetArray(i, s, sizeof(s));

        Format(longBuff, sizeof(longBuff), "\"%s\"", s.textLong);
        Format(shortBuff, sizeof(shortBuff), "\"%s\"", s.textShort);

        PrintToServer("\xB3%-6i\xB3%-11i\xB3%-24s\xB3%-11i\xB3%-24s\xB3%-11i", i, s.a, longBuff, s.b, shortBuff, s.c);
    }
}

public void OnPluginStart()
{
    ArrayList list = new ArrayList(sizeof(SomeStruct));

    // Create default SomeStruct
    SomeStruct s;
    list.PushArray(s, sizeof(s));
    PrintList("Default struct", list);

    // Normal usage
    list.Set(0, 2147483647, SomeStruct::a);
    list.Set(0, 2147483647, SomeStruct::b);
    list.Set(0, 2147483647, SomeStruct::c);
    list.SetStringEx(0, "Some string1", SomeStruct::textLong, sizeof(SomeStruct::textLong));
    list.SetStringEx(0, "abc", SomeStruct::textShort, sizeof(SomeStruct::textShort));
    PrintList("Normal usage", list);

    // Empty strings
    list.Set(0, 2147483647, SomeStruct::a);
    list.Set(0, 2147483647, SomeStruct::b);
    list.Set(0, 2147483647, SomeStruct::c);
    list.SetStringEx(0, "", SomeStruct::textLong, sizeof(SomeStruct::textLong));
    list.SetStringEx(0, "", SomeStruct::textShort, sizeof(SomeStruct::textShort));
    PrintList("Empty strings", list);

    // Oversized strings
    list.Set(0, 2147483647, SomeStruct::a);
    list.Set(0, 2147483647, SomeStruct::b);
    list.Set(0, 2147483647, SomeStruct::c);
    list.SetStringEx(0, "Some string2 that is very much too large", SomeStruct::textLong, sizeof(SomeStruct::textLong));
    list.SetStringEx(0, "def, this is also too large", SomeStruct::textShort, sizeof(SomeStruct::textShort));
    PrintList("Oversized strings", list);


    // Out of bounds block ---- Throws native error
    //list.Set(0, 2147483647, SomeStruct::a);
    //list.Set(0, 2147483647, SomeStruct::b);
    //list.Set(0, 2147483647, SomeStruct::c);
    //list.SetStringEx(0, "Some string3", SomeStruct::c + 1, sizeof(SomeStruct::textLong));
    //list.SetStringEx(0, "ghi", SomeStruct::c + 1, sizeof(SomeStruct::textShort));
    //PrintList("Out of bounds block (error)", list);

    // Non-string block ---- Bug, no error
    //list.Set(0, 2147483647, SomeStruct::a);
    //list.Set(0, 2147483647, SomeStruct::b);
    //list.Set(0, 2147483647, SomeStruct::c);
    //list.SetStringEx(0, "Some string4", SomeStruct::a, sizeof(SomeStruct::textLong));
    //PrintList("Non-string block (bug)", list);
}